2007 Jan 07 8:39 AM
i ahve some problem in my recording , but i cant get what screen couse
to the error .
i get message in the end of the session "Start screen does not exist in batch input data".
i try to fix ( remark or open some lines ) but i cant find
the problem , so i wan to see the log in sm35 but i cant see .
how can i do it ?
i now about "RSBDC_PROTOCOL " , but it didn't help .
my program/record :
LOOP AT IT_AGR_LIST .
---------------------------------------
PERFORM BDC_DYNPRO USING 'SAPMM06E' '0205'.
PERFORM BDC_FIELD USING 'BDC_CURSOR'
'RM06E-EVRTN'.
PERFORM BDC_FIELD USING 'BDC_OKCODE'
'/00'.
PERFORM BDC_FIELD USING 'RM06E-EVRTN'
IT_AGR_LIST-EVRTN . " '4610000065'.
PERFORM BDC_DYNPRO USING 'SAPMM06E' '0220'.
PERFORM BDC_FIELD USING 'BDC_CURSOR'
'RM06E-EBELP'.
PERFORM BDC_FIELD USING 'BDC_OKCODE'
'=NP'.
PERFORM BDC_FIELD USING 'RM06E-EBELP'
'10'.
PERFORM BDC_DYNPRO USING 'SAPMM06E' '0220'.
PERFORM BDC_FIELD USING 'BDC_CURSOR'
'EKPO-PEINH(02)'.
PERFORM BDC_FIELD USING 'BDC_OKCODE'
'/00'.
PERFORM BDC_FIELD USING 'RM06E-EBELP'
'20'.
LOOP AT IT_BKPF WHERE EVRTN = IT_AGR_LIST-EVRTN .
PERFORM BDC_FIELD USING 'EKPO-EMATN(02)'
IT_BKPF-EMATN . " '7000305'.
PERFORM BDC_FIELD USING 'EKPO-NETPR(02)'
IT_BKPF-NETPR . "'2552'.
PERFORM BDC_FIELD USING 'EKPO-PEINH(02)'
'1000'.
PERFORM BDC_DYNPRO USING 'SAPMM06E' '0220'.
PERFORM BDC_FIELD USING 'BDC_CURSOR'
'RM06E-EVRTP(02)'.
PERFORM BDC_FIELD USING 'BDC_OKCODE'
'=TXP'.
PERFORM BDC_FIELD USING 'RM06E-EBELP'
COUNTR . "'20'.
PERFORM BDC_FIELD USING 'RM06E-TCSELFLAG(02)'
'X'.
PERFORM BDC_DYNPRO USING 'SAPMM06E' '0106'.
PERFORM BDC_FIELD USING 'BDC_CURSOR'
'RM06E-LTEX1(01)'.
PERFORM BDC_FIELD USING 'BDC_OKCODE'
'=TEDE'.
PERFORM BDC_FIELD USING 'RM06E-SELKZ(01)'
'X'.
PERFORM BDC_DYNPRO USING 'SAPLSTXX' '1100'.
PERFORM BDC_FIELD USING 'BDC_CURSOR'
'RSTXT-TXLINE(02)'.
PERFORM BDC_FIELD USING 'BDC_OKCODE'
'=EDNP'.
PERFORM BDC_FIELD USING 'RSTXT-TXLINE(02)'
IT_BKPF-STR_LEN1.
'aaaaaaaaa1aaaaaaaaa2aaaaaaaaa3aaaaaaaa' &
*'a4aaaaaaaaa5aaaaaaaaa6aaaaaaaaa7aa'.
PERFORM BDC_DYNPRO USING 'SAPLSTXX' '1100'.
PERFORM BDC_FIELD USING 'BDC_CURSOR'
'RSTXT-TXLINE(03)'.
if not IT_BKPF-STR_LEN2 is initial .
PERFORM BDC_FIELD USING 'BDC_OKCODE'
'=EDNP'.
PERFORM BDC_FIELD USING 'RSTXT-TXLINE(03)'
IT_BKPF-STR_LEN2.
'aaaaaaaaa1aaaaaaaaa2aaaaaaaaa3aaaaaaaa' &
*'a4aaaaaaaaa5aaaaaaaaa6aaaaaaaaa7aa'.
endif.
PERFORM BDC_DYNPRO USING 'SAPLSTXX' '1100'.
PERFORM BDC_FIELD USING 'BDC_CURSOR'
'RSTXT-TXLINE(04)'.
PERFORM BDC_FIELD USING 'BDC_OKCODE'
'=EDNP'.
PERFORM BDC_FIELD USING 'RSTXT-TXLINE(04)'
IT_BKPF-STR_LEN3.
'aaaaaaaaa1aaaaaaaaa2aaaaaaaaa3aaaaaaaa' &
*'a4aaaaaaaaa5aaaaaaaaa6aaaaaaaaa7aa'.
**
PERFORM BDC_DYNPRO USING 'SAPLSTXX' '1100'.
PERFORM BDC_FIELD USING 'BDC_CURSOR'
'RSTXT-TXLINE(05)'.
if not IT_BKPF-STR_LEN2 is initial .
PERFORM BDC_FIELD USING 'BDC_OKCODE'
'=EDNP'.
PERFORM BDC_FIELD USING 'RSTXT-TXLINE(05)'
***
**'ssssssssssssssssssssssssssssssssssssss'
&
***'sendif.sssssssssssssssssssssssssssssssss'.
**endif.
PERFORM BDC_DYNPRO USING 'SAPLSTXX' '1100'.
PERFORM BDC_FIELD USING 'BDC_CURSOR'
'RSTXT-TXLINE(06)'.
PERFORM BDC_FIELD USING 'BDC_OKCODE'
'=EDNP'.
PERFORM BDC_FIELD USING 'RSTXT-TXLINE(06)'
***
**'ssssssssssssssssssssssssssssssssssssss'
&
***'ssssssssssssssssssssssssssssssssss'.
PERFORM BDC_DYNPRO USING 'SAPLSTXX' '1100'.
PERFORM BDC_FIELD USING 'BDC_CURSOR'
'RSTXT-TXLINE(07)'.
PERFORM BDC_FIELD USING 'BDC_OKCODE'
'=TXBA'.
PERFORM BDC_DYNPRO USING 'SAPMM06E' '0106'.
PERFORM BDC_FIELD USING 'BDC_CURSOR'
'RM06E-SELKZ(01)'.
PERFORM BDC_FIELD USING 'BDC_OKCODE'
'=BU'.
PERFORM BDC_FIELD USING 'RM06E-SELKZ(01)'
'X'.
CALL TRANSACTION 'ME32K' USING BDCDATA
MODE P_DMODE "A"
UPDATE 'S'
MESSAGES INTO ITAB_MSG1.
2007 Jan 08 7:33 AM
2007 Jan 08 7:27 AM
hi,
goto se38 - find - rsbdc*:
you'll find a lot of prg. to analyse your bdc-map
like RSBDCLOG or RSBDC_ANALYSE
A.
2007 Jan 08 7:33 AM