Febbraio 2018 – Nick4Name

8

Feb

Ottenere indirizzo email default del cliente

n4nadm No Comments

Obiettivo

Ricavare l’indirizzo email di default, SMTP_ADDR, del cliente, KUNNR.

Modalità

*&---------------------------------------------------------------------*

*&      Form  get_email_address

*&---------------------------------------------------------------------*

*       text Returns in SMTP_ADDR the customer, KUNNR, default email address.

*       (by N4N)

*----------------------------------------------------------------------*

*      -->KUNNR      text

*      -->SMTP_ADDR  text

*----------------------------------------------------------------------*

FORM get_email_address USING kunnr smtp_addr.


DATA: t_adrnr TYPE adrnr,

t_smtp_addr TYPE ad_smtpadr.


SELECT SINGLE adrnr FROM kna1 INTO t_adrnr

WHERE kunnr = kunnr.


IF sy-subrc EQ 0.

SELECT SINGLE smtp_addr FROM adr6 INTO t_smtp_addr

WHERE addrnumber = t_adrnr and flgdefault = 'X'.

IF sy-subrc EQ 0.

smtp_addr =  t_smtp_addr.

ENDIF.

ENDIF.

ENDFORM.                    "get_email_address

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

30

31

32

33

34

35

36

37

38

39

40

41

42

43

44

45

46

*&---------------------------------------------------------------------*

*& Form get_email_address

*&---------------------------------------------------------------------*

* text Returns in SMTP_ADDR the customer, KUNNR, default email address.

* (by N4N)

*----------------------------------------------------------------------*

* -->KUNNR text

* -->SMTP_ADDR text

*----------------------------------------------------------------------*

FORM get_email_address USING kunnr smtp_addr.

DATA: t_adrnr TYPE adrnr,

t_smtp_addr TYPE ad_smtpadr.

SELECT SINGLE adrnr FROM kna1 INTO t_adrnr

WHERE kunnr = kunnr.

IF sy-subrc EQ 0.

SELECT SINGLE smtp_addr FROM adr6 INTO t_smtp_addr

WHERE addrnumber = t_adrnr and flgdefault = 'X'.

IF sy-subrc EQ 0.

smtp_addr = t_smtp_addr.

ENDIF.

ENDFORM. "get_email_address

8

Feb

Invocare un URL

n4nadm No Comments

Obiettivo

Invocare un URL da codice ABAP.

Modalità

FUNCTION zn4n_call_url.
*"----------------------------------------------------------------------
*"*"Interfaccia locale:
*"  IMPORTING
*"  REFERENCE(URL) TYPE  CHAR255
*"----------------------------------------------------------------------
CALL FUNCTION 'WS_EXECUTE'
EXPORTING
program        = '%programfiles%\Internet Explorer\IEXPLORE.EXE'
commandline    = url
inform         = ''
EXCEPTIONS
prog_not_found = 1.

ENDFUNCTION.

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

FUNCTION zn4n_call_url.

*"----------------------------------------------------------------------

*"*"Interfaccia locale:

*" IMPORTING

*" REFERENCE(URL) TYPE CHAR255

*"----------------------------------------------------------------------

CALL FUNCTION 'WS_EXECUTE'

EXPORTING

program = '%programfiles%\Internet Explorer\IEXPLORE.EXE'

commandline = url

inform = ''

EXCEPTIONS

prog_not_found = 1.

ENDFUNCTION.

Invocando IEXPLORE.EXE, la function funziona solo su client Windows based.

8

Feb

Loop infinito

n4nadm No Comments

Obiettivo

Causare un loop infinito nel codice così da permettere l’individuazione del task in esecuzione tramite SM50.

Modalità

DATA: debug(1).
DO.
IF debug = 'X'.
EXIT.
ENDIF.
ENDDO.

1

2

3

4

5

6

DATA: debug(1).

DO.

IF debug = 'X'.

EXIT.

ENDIF.

ENDDO.

7

Feb

Invio email con file di testo allegato

n4nadm No Comments

Scenario

File-to-Mail

Requisito

Allegare file di testo a una mail.

Enterprise Service Builder

Il seguente mapping converte il contesto in un’unica stringa in cui ogni elemento di context diventa una riga.

La stringa viene mossa in Content.

L’UDF concatRows converte l’array in una stringa in cui gli elementi dell’array sono separati tramite new line.

public void concatRows(String[] rows, ResultList result, Container container) throws StreamTransformationException{
String t = "";

for (int i = 0; i < rows.length; i++) {
if (i > 0) {
t += System.getProperty("line.separator") + rows[i];
} else {
t += rows[i];
}
}
result.addValue(t);
}

1

2

3

4

5

6

7

8

9

10

11

12

public void concatRows(String[] rows, ResultList result, Container container) throws StreamTransformationException{

String t = "";

for (int i = 0; i < rows.length; i++) {

if (i > 0) {

t += System.getProperty("line.separator") + rows[i];

} else {

t += rows[i];

}

result.addValue(t);

}

Integration Builder

Il canale sender file

Nel caso in cui l’Adapter sender non preveda il tab Content Convertion (per esempio l’SFTP) si può adottare il modulo AF_Modules/MessageTransformBean

In questo caso, il file letto

Num. Mensaje;Fecha;Error W0051326G J20150721;20150721;Muy Sres. nuestros: W0051326G J20150721;20150721;Nos referimos a su/s factura/s abajo relacionada/s. W0051326G J20150721;20150721;Al objeto de verificar su conformidad, y como quiera que no

assume il seguente payload

Il canale receiver mail

I parametri della mail devono essere assunti dal mapping e quini impostare Using Mail Package.

Prerequisito perché il file in attach abbia il nome del file di turno

La Receiver Interface

Il test

Limitazioni

Se il canale sender è configurato per leggere più file, questi verranno inviati come attach in mail separate.

La presente soluzione gestisce solo file di testo e non anche file binary.

7

Feb

Communication Channel File: Determinare filename receiver da mapping

n4nadm No Comments

Scenario

File receiver.

Requisito

Il nome del file dev’essere generato dinamicamente secondo un algoritmo definito nel

Mapping

Il mapping su rset scrive nella Dynamic Configuration il filename ricevuto dal cc sender.

Implementando anche i legami su row e su FIELD si replica il file da sender a receiver (opzionale).

In particolare,

In blu: lettura da Dynamic Configuration del channel sender

In rosso: regola arbitraria per determinare il nome file receiver

In verde: scrittura su Dynamic Configuration del nome file receiver

Communication channel sender

Content Conversion opzionale

Communication channel receiver

Content Conversion opzionale

Monitor: Dynamic Configuration

Dynamic Configuration dal communication channel receiver

7

Feb

splitForLength(): UDF per splitting dei testi

n4nadm No Comments

Scenario

Mapping grafico.

Requisito

In un contesto di generazione IDoc verso ECC, occorre generare i segmenti di testo E1EDT01/E1EDT02 e/o E1EDP01/E1EDP02 partendo da una stringa in ingresso.

l’UDF splitForLength() è utile nella generazione dei segmenti di testo negli idoc sia nella sezione testata E1EDKT1/E1EDKT2 che in quella di posizione E1EDPT1/E1EDPT2

In particolare, l’UDF consente di generare tanti contesti E1ED*T2 quante sono le sottostringhe di src che si ottengono dividendola per la lunghezza ln.

public void splitForLength(String[] mst, String[] src, String[] ln, ResultList result, Container container) throws StreamTransformationException{
/*
@Author: Nicola Martella | www.nick4name.eu
Genera un context (ResultList) sulla base dello splitting della stringa src in tante sottostringhe quante ne occorrono dividendola per la 
lunghezza indicata in ln.
La funzione gestisce i contesti multipli su mst e src.
*/
 
	 AbstractTrace _trc =  container.getTrace();
	 // _trc.addWarning(source.substring(s, s + len)); //*******************
	 
	int len = Integer.parseInt(ln[0]);
	result.clear();
 
	int isrc = -1;
	for (int imst=0; imst &lt; mst.length; imst++){
		if (mst[imst].equals(ResultList.SUPPRESS)){
			result.addSuppress();
		} else if (mst[imst].equals(ResultList.CC)) {
			//
		} else {
			isrc++;
			String source = src[isrc];

			if (!source.equals("")){    
				if (len >= source.length()){
					result.addValue(source);
				} else {

				int e = source.length() / len;
				e = ((source.length() % len) > 0 ? e + 1 : e); 

				int s = 0;
				for (int i = 0; i &lt; e; i++){
					if (source.length() - s > len){
					result.addValue(source.substring(s, s + len));
					} else {
						result.addValue(source.substring(s));
					}
					s += len;
				}
			} 
				result.addContextChange();
			} 
		}
	}
 	return;
}

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

30

31

32

33

34

35

36

37

38

39

40

41

42

43

44

45

46

47

48

public void splitForLength(String[] mst, String[] src, String[] ln, ResultList result, Container container) throws StreamTransformationException{

/*

@Author: Nicola Martella | www.nick4name.eu

Genera un context (ResultList) sulla base dello splitting della stringa src in tante sottostringhe quante ne occorrono dividendola per la

lunghezza indicata in ln.

La funzione gestisce i contesti multipli su mst e src.

*/

AbstractTrace _trc = container.getTrace();

// _trc.addWarning(source.substring(s, s + len)); //*******************

int len = Integer.parseInt(ln[0]);

result.clear();

int isrc = -1;

for (int imst=0; imst < mst.length; imst++){

if (mst[imst].equals(ResultList.SUPPRESS)){

result.addSuppress();

} else if (mst[imst].equals(ResultList.CC)) {

//

} else {

isrc++;

String source = src[isrc];

if (!source.equals("")){

if (len >= source.length()){

result.addValue(source);

} else {

int e = source.length() / len;

e = ((source.length() % len) > 0 ? e + 1 : e);

int s = 0;

for (int i = 0; i < e; i++){

if (source.length() - s > len){

result.addValue(source.substring(s, s + len));

} else {

result.addValue(source.substring(s));

}

s += len;

}

result.addContextChange();

}

return;

}

Implementazione per testi di testata

Questo genera le occorrenze di E1EDKT2 sulla base del numero di sottostringhe di TDLINE

Questo, per ciascun contesto, effettua lo splitting di TDLINE in ingresso e scrive le sottostringhe prodotte nei campi TDLINE in uscita.

Implementazione per testi di posizione

Questo genera le occorrenze di E1EDPT2 sulla base del numero di sottostringhe di TDLINE

Questo, per ciascun contesto, effettua lo splitting di TDLINE in ingresso e scrive le sottostringhe prodotte nei campi TDLINE in uscita.

Nel seguente esempio, il contesto in entrata all’UDF – 1mo param, è così configurato:

E1EDP01 con testo (true)

E1EDP01 senza testo (false) -> SUPPRESS

E1EDP01 con testo (true)

6

Feb

AS2 channel

n4nadm No Comments

Scenario

AS2 sender (feedback)

AS2 receiver

Requisito

Realizzare un contesto EDI.

Predisposizione lato sender.

Creazione Party

AS2_WHR_LEGACY

Party del sender

La coppia AS2 ZZZ 117 | AS2ID viene convertita in WHRLEGACY_QAS e viene inviata ad AS2. Questa stringa è come AS2 ha censito il sender.

Predisposizione lato receiver (AS2)

Creazione party

AS2_TESI

Party di AS2

La coppia AS2 ZZZ 117 | AS2ID viene convertita in TESIEINT2015… Questa stringa è come xxx ha censito il receiver (?).

Integrated Configuration con AS2 in receiver – Flusso invio payload business

Il communication channel receiver si riferisce all’AS2

Integrated Configuration con AS2 in receiver – Flusso invio feedback (MDN)

Channel sender SOAP

Channel receiver, per es. FILE

5

Feb

Variable substitution

n4nadm No Comments

Scenario

File receiver.

Requisito

Il nome del file receiver dev’essere composto da parti variabili dipendenti da elementi del payload receiver.

Enterprise Service Repository

Integration Builder

Archivio mensileFebbraio 2018

Feb

Ottenere indirizzo email default del cliente

Obiettivo

Modalità

Feb

Invocare un URL

Obiettivo

Modalità

Feb

Loop infinito

Obiettivo

Modalità

Feb

Invio email con file di testo allegato

Scenario

Requisito

Feb

Communication Channel File: Determinare filename receiver da mapping

Scenario

Requisito

Feb

splitForLength(): UDF per splitting dei testi

Scenario

Requisito

Feb

AS2 channel

Scenario

Requisito

Feb

Variable substitution

Scenario

Requisito

Categorie

Archivi