Hola,
He leido todos los foros que conozco y aun no logro entender porque mi codigo no funciona como debería.
El problema se encuentra en la parte de código que inserta una nueva linea (LINS). Cuando debugeo el programa, la tabla bdcdata se completa bien, pero cuando corre es como que no ejecute ese bdc_okcode.
Por favor! Necesito ayuda. Estoy trabajando en SAP R/3 version 4.6C.
Adjunto mi código. Solo hay que copiarlo y luego correrlo. Si alguien me puede decir cual es el problema estaría muuuuy agradecida.
********************************************
REPORT ZPRU_1 .
DATA: not TYPE CAUFV-AUFNR,
wa_trx TYPE bdcdata,
it_trx TYPE TABLE OF bdcdata.
wa_trx-PROGRAM = 'RIAFRU20'.
wa_trx-DYNPRO = '1000'.
wa_trx-DYNBEGIN = 'X'.
APPEND wa_trx TO it_trx.
CLEAR wa_trx.
wa_trx-FNAM = 'BDC_OKCODE'.
wa_trx-FVAL = '%011'.
APPEND wa_trx TO it_trx.
CLEAR wa_trx.
wa_trx-PROGRAM = 'SAPLALDB'.
wa_trx-DYNPRO = '3000'.
wa_trx-DYNBEGIN = 'X'.
APPEND wa_trx TO it_trx.
CLEAR wa_trx.
SELECT AUFNR FROM CAUFV INTO not UP TO 20 ROWS WHERE AUTYP = '30'.
wa_trx-FNAM = 'RSCSEL-SLOW_I(01)'.
wa_trx-FVAL = not.
APPEND wa_trx TO it_trx.
wa_trx-FNAM = 'BDC_OKCODE'.
wa_trx-FVAL = 'LINS'.
APPEND wa_trx TO it_trx.
ENDSELECT.
wa_trx-FNAM = 'BDC_OKCODE'.
wa_trx-FVAL = 'ACPT'.
APPEND wa_trx TO it_trx.
wa_trx-PROGRAM = 'RIAFRU20'.
wa_trx-DYNPRO = '1000'.
wa_trx-DYNBEGIN = 'X'.
APPEND wa_trx TO it_trx.
CLEAR wa_trx.
wa_trx-FNAM = 'BDC_OKCODE'.
wa_trx-FVAL = 'ONLI'.
APPEND wa_trx TO it_trx.
CALL TRANSACTION 'IW47' USING it_trx.
************************************************** **
He leido todos los foros que conozco y aun no logro entender porque mi codigo no funciona como debería.
El problema se encuentra en la parte de código que inserta una nueva linea (LINS). Cuando debugeo el programa, la tabla bdcdata se completa bien, pero cuando corre es como que no ejecute ese bdc_okcode.
Por favor! Necesito ayuda. Estoy trabajando en SAP R/3 version 4.6C.
Adjunto mi código. Solo hay que copiarlo y luego correrlo. Si alguien me puede decir cual es el problema estaría muuuuy agradecida.
********************************************
REPORT ZPRU_1 .
DATA: not TYPE CAUFV-AUFNR,
wa_trx TYPE bdcdata,
it_trx TYPE TABLE OF bdcdata.
wa_trx-PROGRAM = 'RIAFRU20'.
wa_trx-DYNPRO = '1000'.
wa_trx-DYNBEGIN = 'X'.
APPEND wa_trx TO it_trx.
CLEAR wa_trx.
wa_trx-FNAM = 'BDC_OKCODE'.
wa_trx-FVAL = '%011'.
APPEND wa_trx TO it_trx.
CLEAR wa_trx.
wa_trx-PROGRAM = 'SAPLALDB'.
wa_trx-DYNPRO = '3000'.
wa_trx-DYNBEGIN = 'X'.
APPEND wa_trx TO it_trx.
CLEAR wa_trx.
SELECT AUFNR FROM CAUFV INTO not UP TO 20 ROWS WHERE AUTYP = '30'.
wa_trx-FNAM = 'RSCSEL-SLOW_I(01)'.
wa_trx-FVAL = not.
APPEND wa_trx TO it_trx.
wa_trx-FNAM = 'BDC_OKCODE'.
wa_trx-FVAL = 'LINS'.
APPEND wa_trx TO it_trx.
ENDSELECT.
wa_trx-FNAM = 'BDC_OKCODE'.
wa_trx-FVAL = 'ACPT'.
APPEND wa_trx TO it_trx.
wa_trx-PROGRAM = 'RIAFRU20'.
wa_trx-DYNPRO = '1000'.
wa_trx-DYNBEGIN = 'X'.
APPEND wa_trx TO it_trx.
CLEAR wa_trx.
wa_trx-FNAM = 'BDC_OKCODE'.
wa_trx-FVAL = 'ONLI'.
APPEND wa_trx TO it_trx.
CALL TRANSACTION 'IW47' USING it_trx.
************************************************** **

Comentario