Avalados por :
Esta transacción afecta a tantas tablas que es bueno registrar esta transacción con la transacción SD para que sepas qué tablas son.
Hola,
Tu código es así.
Usa este código en tu programa.
Puedes codificar como,
DATA: ok_code LIKE sy-ucomm,
BDCDATA TYPE TABLE OF BDCDATA,
WA_BDCDATA TYPE BDCDATA.
*Grupo de cuentas
WA_BDCDATA-PROGRAM = 'SAPMF02K'.
WA_BDCDATA-DYNPRO = '0105'.
WA_BDCDATA-DYNBEGIN = 'X'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
WA_BDCDATA-FNAM = 'RF02K-KTOKK'.
WA_BDCDATA-FVAL = 'ZHRO'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
*Proveedor
WA_BDCDATA-FNAM = 'RF02K-LIFNR'.
WA_BDCDATA-FVAL = '1115'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
*Código de empresa
WA_BDCDATA-FNAM = 'RF02K-BUKRS'.
WA_BDCDATA-FVAL = '1000'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
Nombre
WA_BDCDATA-PROGRAM = 'SAPMF02K'.
WA_BDCDATA-DYNPRO = '111'. "v
WA_BDCDATA-DYNBEGIN = 'X'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
WA_BDCDATA-FNAM = 'ADDR1_DATA-NAME1'.
WA_BDCDATA-FVAL = 'Shou'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
*Término de búsqueda
WA_BDCDATA-FNAM = 'ADDR1_DATA-SORT1'.
WA_BDCDATA-FVAL = 'Shou'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
Nombre del proveedor
WA_BDCDATA-PROGRAM = 'SAPMF02K'.
WA_BDCDATA-DYNPRO = '0110'.
WA_BDCDATA-DYNBEGIN = 'X'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
WA_BDCDATA-FNAM = 'LFA1-Name1'.
WA_BDCDATA-FVAL = 'Shou'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
Clave de orden
WA_BDCDATA-FNAM = 'LFA1-SORTL'.
WA_BDCDATA-FVAL = 'Shou'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
Clave de idioma
WA_BDCDATA-FNAM = 'LFA1-SPRAS'.
WA_BDCDATA-FVAL = 'DA'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
Call Transaction 'FK01' using BDCDATA.
ENDFUNCTION.
*Puntos de recompensa
Saludos
Hola,
¿Puedes ser un poco más claro, qué campos necesitas para BDC?
Para hacer BDC, realiza la grabación, así conocerás los nombres de los campos.
Gracias,
Anitha
Hola,
Tu código es así.
Usa este código en tu programa.
Puedes codificar así,
DATA: ok_code LIKE sy-ucomm,
BDCDATA TYPE TABLE OF BDCDATA,
WA_BDCDATA TYPE BDCDATA.
*Grupo de cuentas
WA_BDCDATA-PROGRAM = 'SAPMF02K'.
WA_BDCDATA-DYNPRO = '0105'.
WA_BDCDATA-DYNBEGIN = 'X'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
WA_BDCDATA-FNAM = 'RF02K-KTOKK'.
WA_BDCDATA-FVAL = 'ZHRO'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
*Proveedor
WA_BDCDATA-FNAM = 'RF02K-LIFNR'.
WA_BDCDATA-FVAL = '1115'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
*Código de empresa
WA_BDCDATA-FNAM = 'RF02K-BUKRS'.
WA_BDCDATA-FVAL = '1000'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
Nombre
WA_BDCDATA-PROGRAM = 'SAPMF02K'.
WA_BDCDATA-DYNPRO = '111'. "v
WA_BDCDATA-DYNBEGIN = 'X'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
WA_BDCDATA-FNAM = 'ADDR1_DATA-NAME1'.
WA_BDCDATA-FVAL = 'Shou'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
*Término de búsqueda
WA_BDCDATA-FNAM = 'ADDR1_DATA-SORT1'.
WA_BDCDATA-FVAL = 'Shou'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
Nombre del proveedor
WA_BDCDATA-PROGRAM = 'SAPMF02K'.
WA_BDCDATA-DYNPRO = '0110'.
WA_BDCDATA-DYNBEGIN = 'X'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
WA_BDCDATA-FNAM = 'LFA1-Name1'.
WA_BDCDATA-FVAL = 'Shou'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
Clave de orden
WA_BDCDATA-FNAM = 'LFA1-SORTL'.
WA_BDCDATA-FVAL = 'Shou'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
Clave de idioma
WA_BDCDATA-FNAM = 'LFA1-SPRAS'.
WA_BDCDATA-FVAL = 'DA'.
APPEND WA_BDCDATA TO BDCDATA.
CLEAR WA_BDCDATA.
Call Transaction 'FK01' using BDCDATA.
ENDFUNCTION.
*Puntos de recompensa
Saludos
contacto@primeinstitute.com
(+51) 1641 9379
(+57) 1489 6964
© 2024 Copyright. Todos los derechos reservados.
Desarrollado por Prime Institute
