Hi ,
We have written the BDC program for transaction COR6N. BDC works perfectly in foreground but it's not working for background option.
SELECT SINGLE AUFPL INTO W_AUFPL FROM AFKO
WHERE AUFNR = W_AUFNR.
SELECT AUFPL VORNR INTO TABLE IT_PHASE FROM AFVC
WHERE AUFPL = W_AUFPL
AND PHFLG = 'X'.
LOOP AT IT_PHASE.
WA_BDCDATA-PROGRAM = 'SAPLCORU_S'.
WA_BDCDATA-DYNPRO = '0100'.
WA_BDCDATA-DYNBEGIN = 'X'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
WA_BDCDATA-FNAM = 'AFRUD-AUFNR'.
WA_BDCDATA-FVAL = W_AUFNR.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
WA_BDCDATA-FNAM = 'AFRUD-VORNR'.
WA_BDCDATA-FVAL = IT_PHASE-VORNR.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
WA_BDCDATA-FNAM = 'BDC_OKCODE'.
WA_BDCDATA-FVAL = '/00'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
WA_BDCDATA-PROGRAM = 'SAPLCORU_S'.
WA_BDCDATA-DYNPRO = '0100'.
WA_BDCDATA-DYNBEGIN = 'X'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
WA_BDCDATA-FNAM = 'AFRUD-LMNGA'.
WA_BDCDATA-FVAL = w_qty. "'60'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
WA_BDCDATA-FNAM = 'AFRUD-BUDAT'.
WA_BDCDATA-FVAL = w_date. "'31.12.2008'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
WA_BDCDATA-FNAM = 'BDC_OKCODE'.
WA_BDCDATA-FVAL = '=BU'.
APPEND WA_BDCDATA TO BDCDATA.
clear X_OPTIONS.
X_OPTIONS-DISMODE = 'N'. ' works perfectly for 'A'
X_OPTIONS-UPDMODE = 'S'.
X_OPTIONS-CATTMODE = ' '.
X_OPTIONS-DEFSIZE = ' '.
X_OPTIONS-RACOMMIT = ' '.
X_OPTIONS-NOBINPT = 'X'.
X_OPTIONS-NOBIEND = ' '.
CALL TRANSACTION 'COR6N' USING BDCDATA OPTIONS FROM X_OPTIONS
MESSAGES INTO ITAB.
MODE 'N' MESSAGES INTO ITAB UPDATE 'S'.
WAIT UP TO 3 SECONDS.
COMMIT WORK AND WAIT.
CLEAR:BDCDATA[],WA_BDCDATA.