‎2014 Jan 07 3:03 PM
Good day experts, in a previous request help with a topic for bulk load report, 'but now I have another request to the same report. Should massive load some data that I get from the CO11N transaction, I need your help in obtaining the value of the notification field, this value is obtained after entering the values ​​in the order and operation field, enter is pressed and displayed the data in the notification area.
I'm using this code, I hope you can help.
LOOP AT ti_input INTO st_input.
CLEAR:st_de_data.
MOVE: st_input-aufnr TO st_de_data-aufnr,
st_input-vornr TO st_de_data-vornr,
st_input-budat TO st_de_data-budat,
st_input-rueck TO st_de_data-rueck.
REFRESH:ti_return,ti_return_data,ti_stock,ti_return,ti_status,ti_user.
PERFORM bdc_dynpro USING :
'X' 'SAPLCORU_S' '0100',
' ' 'BDC_OKCODE' '/00',
' ' 'AFRUD-RUECK' st_de_data-rueck,
' ' 'AFRUD-AUFNR' st_de_data-aufnr,
' ' 'AFRUD-VORNR' st_de_data-vornr,
' ' 'AFRUD-BUDAT' st_de_data-budat.
PERFORM bdc_dynpro USING :
'X' 'SAPLCORU_S' '0100',
' ' 'BDC_CURSOR' '/00',
' ' 'AFRUD-RUECK' st_de_data-rueck,
' ' 'AFRUD-VORNR' st_de_data-vornr,
' ' 'AFRUD-BUDAT' st_de_data-budat.
PERFORM bdc_dynpro USING :
'X' 'SAPLCORU_S' '0100',
' ' 'BDC_OKCODE' '=BU',
' ' 'AFRUD-AUFNR' st_de_data-aufnr,
' ' 'AFRUD-VORNR' st_de_data-vornr,
' ' 'AFRUD-BUDAT' st_de_data-budat,
' ' 'AFRUD-RUECK' st_de_data-rueck.
ENDLOOP.
s_opt-dismode = c_mod.
s_opt-updmode = c_update.
s_opt-nobinpt = 'X'.
CALL TRANSACTION 'CO11N' USING it_bdc_tab[]
OPTIONS FROM s_opt
MESSAGES INTO it_messtab[].
Best regards friends.
‎2014 Jan 08 2:08 PM
Good day I just had to modify the code and I am this way, I can now record, thanks ....
LOOP AT ti_input INTO st_input.
CLEAR:st_de_data.
MOVE: st_input-aufnr TO st_de_data-aufnr,
st_input-vornr TO st_de_data-vornr,
st_input-budat TO st_de_data-budat,
st_input-zzcant1 TO st_de_data-zzcant1,
st_input-zzmot1 TO st_de_data-zzmot1,
st_input-zzcant2 TO st_de_data-zzcant2,
st_input-zzmot2 TO st_de_data-zzmot2,
st_input-zzcant3 TO st_de_data-zzcant3,
st_input-zzmot3 TO st_de_data-zzmot3,
st_input-zzcant4 TO st_de_data-zzcant4,
st_input-zzmot4 TO st_de_data-zzmot4,
st_input-ltxa1 TO st_de_data-ltxa1,
st_input-rueck TO st_de_data-rueck.
DATA: l_budat(10) TYPE c,
l_result(10) TYPE c.
l_budat = st_de_data-budat.
CONCATENATE l_budat+6(2)'.'l_budat+4(2)'.'l_budat+0(4) INTO l_result.
PERFORM bdc_dynpro USING :
'X' 'SAPLCORU_S' '0100',
' ' 'BDC_OKCODE' '/00',
' ' 'AFRUD-RUECK' st_de_data-rueck,
' ' 'AFRUD-AUFNR' st_de_data-aufnr,
' ' 'AFRUD-VORNR' st_de_data-vornr,
' ' 'AFRUD-BUDAT' l_result. "Fecha
PERFORM bdc_dynpro USING :
'X' 'SAPLCORU_S' '0100',
' ' 'BDC_OKCODE' '=BU', "Grabar
' ' 'AFRUD-AUFNR' st_de_data-aufnr,
' ' 'AFRUD-VORNR' st_de_data-vornr,
' ' 'AFRUD-BUDAT' l_result,
* ' ' 'AFRUD-ZZCANT1' st_de_data-zzcant1,
* ' ' 'AFRUD-ZZMOT1' st_de_data-zzmot1,
* ' ' 'AFRUD-ZZCANT2' st_de_data-zzcant2,
* ' ' 'AFRUD-ZZMOT2' st_de_data-zzmot2,
* ' ' 'AFRUD-ZZCANT3' st_de_data-zzcant3,
* ' ' 'AFRUD-ZZMOT3' st_de_data-zzmot3,
* ' ' 'AFRUD-ZZCANT4' st_de_data-zzcant4,
* ' ' 'AFRUD-ZZMOT4' st_de_data-zzmot4,
' ' 'AFRUD-RUECK' st_de_data-rueck.
s_opt-dismode = c_mod.
s_opt-updmode = c_update.
s_opt-nobinpt = ' '.
ENDLOOP.
CALL TRANSACTION 'CO11N' USING it_bdc_tab[]
OPTIONS FROM s_opt
MESSAGES INTO it_messtab[].
‎2014 Jan 07 3:20 PM
‎2014 Jan 08 2:08 PM
Good day I just had to modify the code and I am this way, I can now record, thanks ....
LOOP AT ti_input INTO st_input.
CLEAR:st_de_data.
MOVE: st_input-aufnr TO st_de_data-aufnr,
st_input-vornr TO st_de_data-vornr,
st_input-budat TO st_de_data-budat,
st_input-zzcant1 TO st_de_data-zzcant1,
st_input-zzmot1 TO st_de_data-zzmot1,
st_input-zzcant2 TO st_de_data-zzcant2,
st_input-zzmot2 TO st_de_data-zzmot2,
st_input-zzcant3 TO st_de_data-zzcant3,
st_input-zzmot3 TO st_de_data-zzmot3,
st_input-zzcant4 TO st_de_data-zzcant4,
st_input-zzmot4 TO st_de_data-zzmot4,
st_input-ltxa1 TO st_de_data-ltxa1,
st_input-rueck TO st_de_data-rueck.
DATA: l_budat(10) TYPE c,
l_result(10) TYPE c.
l_budat = st_de_data-budat.
CONCATENATE l_budat+6(2)'.'l_budat+4(2)'.'l_budat+0(4) INTO l_result.
PERFORM bdc_dynpro USING :
'X' 'SAPLCORU_S' '0100',
' ' 'BDC_OKCODE' '/00',
' ' 'AFRUD-RUECK' st_de_data-rueck,
' ' 'AFRUD-AUFNR' st_de_data-aufnr,
' ' 'AFRUD-VORNR' st_de_data-vornr,
' ' 'AFRUD-BUDAT' l_result. "Fecha
PERFORM bdc_dynpro USING :
'X' 'SAPLCORU_S' '0100',
' ' 'BDC_OKCODE' '=BU', "Grabar
' ' 'AFRUD-AUFNR' st_de_data-aufnr,
' ' 'AFRUD-VORNR' st_de_data-vornr,
' ' 'AFRUD-BUDAT' l_result,
* ' ' 'AFRUD-ZZCANT1' st_de_data-zzcant1,
* ' ' 'AFRUD-ZZMOT1' st_de_data-zzmot1,
* ' ' 'AFRUD-ZZCANT2' st_de_data-zzcant2,
* ' ' 'AFRUD-ZZMOT2' st_de_data-zzmot2,
* ' ' 'AFRUD-ZZCANT3' st_de_data-zzcant3,
* ' ' 'AFRUD-ZZMOT3' st_de_data-zzmot3,
* ' ' 'AFRUD-ZZCANT4' st_de_data-zzcant4,
* ' ' 'AFRUD-ZZMOT4' st_de_data-zzmot4,
' ' 'AFRUD-RUECK' st_de_data-rueck.
s_opt-dismode = c_mod.
s_opt-updmode = c_update.
s_opt-nobinpt = ' '.
ENDLOOP.
CALL TRANSACTION 'CO11N' USING it_bdc_tab[]
OPTIONS FROM s_opt
MESSAGES INTO it_messtab[].