Business transaction Event (BTE) sap abap
Publicado por Win Vega (1 intervención) el 11/06/2015 18:28:52
I need to save, some changes that i do in the interface_00001421 FI
i were trying all kind of information but until now , i don´t find de solution . Please help me
i were trying all kind of information but until now , i don´t find de solution . Please help me
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
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
FUNCTION zfi_wv_interface_00001421.*"----------------------------------------------------------------------
*"*"Local Interface:
*" IMPORTING*" VALUE(I_LFA1) LIKE LFA1 STRUCTURE LFA1 OPTIONAL
*" VALUE(I_LFA1_OLD) LIKE LFA1 STRUCTURE LFA1 OPTIONAL
*" VALUE(I_LFB1) LIKE LFB1 STRUCTURE LFB1 OPTIONAL
*" VALUE(I_LFB1_OLD) LIKE LFB1 STRUCTURE LFB1 OPTIONAL
*" VALUE(I_LFM1) LIKE LFM1 STRUCTURE LFM1 OPTIONAL
*" VALUE(I_LFM1_OLD) LIKE LFM1 STRUCTURE LFM1 OPTIONAL
*" VALUE(UPD_LFA1) LIKE CDPOS-CHNGIND OPTIONAL
*" VALUE(UPD_LFAS) LIKE CDPOS-CHNGIND OPTIONAL
*" VALUE(UPD_LFAT) LIKE CDPOS-CHNGIND OPTIONAL
*" VALUE(UPD_LFB1) LIKE CDPOS-CHNGIND OPTIONAL
*" VALUE(UPD_LFB5) LIKE CDPOS-CHNGIND OPTIONAL
*" VALUE(UPD_LFBK) LIKE CDPOS-CHNGIND OPTIONAL
*" VALUE(UPD_LFBK_IBAN) LIKE CDPOS-CHNGIND OPTIONAL
*" VALUE(UPD_LFBW) LIKE CDPOS-CHNGIND OPTIONAL
*" VALUE(UPD_LFEI) LIKE CDPOS-CHNGIND OPTIONAL
*" VALUE(UPD_LFLR) LIKE CDPOS-CHNGIND OPTIONAL
*" VALUE(UPD_LFM1) LIKE CDPOS-CHNGIND OPTIONAL
*" VALUE(UPD_LFM2) LIKE CDPOS-CHNGIND OPTIONAL
*" VALUE(UPD_LFZA) LIKE CDPOS-CHNGIND OPTIONAL
*" VALUE(UPD_WYT1) LIKE CDPOS-CHNGIND OPTIONAL
*" VALUE(UPD_WYT1T) LIKE CDPOS-CHNGIND OPTIONAL
*" VALUE(UPD_WYT3) LIKE CDPOS-CHNGIND OPTIONAL
*" VALUE(I_ADD_ON_DATA) LIKE VEND_ADD_ON_DATA STRUCTURE
*" VEND_ADD_ON_DATA OPTIONAL*" TABLES
*" T_XLFAS STRUCTURE FLFAS OPTIONAL*" T_YLFAS STRUCTURE FLFAS OPTIONAL
*" T_XLFAT STRUCTURE FLFAT OPTIONAL*" T_YLFAT STRUCTURE FLFAT OPTIONAL
*" T_XLFB5 STRUCTURE FLFB5 OPTIONAL*" T_YLFB5 STRUCTURE FLFB5 OPTIONAL
*" T_XLFBK STRUCTURE FLFBK OPTIONAL*" T_YLFBK STRUCTURE FLFBK OPTIONAL
*" T_XLFBK_IBAN STRUCTURE FLFBK_IBAN OPTIONAL*" T_YLFBK_IBAN STRUCTURE FLFBK_IBAN OPTIONAL
*" T_XLFBW STRUCTURE FLFBW OPTIONAL*" T_YLFBW STRUCTURE FLFBW OPTIONAL
*" T_XLFEI STRUCTURE FLFEI OPTIONAL*" T_YLFEI STRUCTURE FLFEI OPTIONAL
*" T_XLFLR STRUCTURE FLFLR OPTIONAL*" T_YLFLR STRUCTURE FLFLR OPTIONAL
*" T_XLFM2 STRUCTURE FLFM2 OPTIONAL*" T_YLFM2 STRUCTURE FLFM2 OPTIONAL
*" T_XLFZA STRUCTURE FLFZA OPTIONAL*" T_YLFZA STRUCTURE FLFZA OPTIONAL
*" T_XWYT1 STRUCTURE FWYT1 OPTIONAL*" T_YWYT1 STRUCTURE FWYT1 OPTIONAL
*" T_XWYT1T STRUCTURE FWYT1T OPTIONAL*" T_YWYT1T STRUCTURE FWYT1T OPTIONAL
*" T_XWYT3 STRUCTURE FWYT3 OPTIONAL*" T_YWYT3 STRUCTURE FWYT3 OPTIONAL
*"----------------------------------------------------------------------
if sy-uname = 'WVEGA'.
FIELD-SYMBOLS: <fs_xlfbk> TYPE FLFBK.
break wvega.LOOP AT t_xlfbk ASSIGNING <fs_xlfbk>.
concatenate i_lfa1-name1 'win' into <fs_xlfbk>-koinh.
"= i_lfa1-name1. <fs_xlfbk>-bvtyp = <fs_xlfbk>-bankl.
t_xlfbk-kz = 'U'.
ENDLOOP.
*t_xlfbk_iban[] = t_xlfbk[].
*I_ADD_ON_DATA-changed = 'X'.
*i_add_on_data-lifnr = i_lfa1-lifnr.
*i_lfa1-name1 = 'WIN VEGA'.
*UPD_LFA1 = 'U'.
upd_lfbk = 'U'.
*upd_lfbk_iban = 'U'.
ENDIF.
ENDFUNCTION.Valora esta pregunta
0