0
Cargando...
Intente algo como:
/:PERFORM sub_sap_script EN PROGRAMA type_i_program
/:USANDO &Z_LIFNR&
/:CAMBIANDO &Z_STRT2&
/:FIN DE REALIZAR
/:SI &Z_STRT2& NE &ESPACIO&
/:FIN DE SI.FORMA sub_sap_script TABLAS from_sapscript ESTRUCTURA itcsy
to_sapscript ESTRUCTURA itcsy.
DATOS: lv_lifnr TIPO lfa1-lifnr,
lv_strt2 TIPO adrc-str_suppl1.
LEER TABLA from_sapscript CON CLAVE 'Z_LIFNR'.
MOVER from_sapscript-valor A lv_lifnr.
LLAMAR FUNCIÓN 'CONVERSION_EXIT_ALPHA_INPUT'
EXPORTAR
entrada = lv_lifnr
IMPORTAR
salida = lv_lifnr.
SELECCIONAR ÚNICO adrc~str_suppl1 EN lv_strt2 DE lfa1
UNIR INTERNO adrc EN
lfa1~adrnr = adrc~addrnumber
DONDE lfa1~lifnr = lv_lifnr.
SI sy-subrc EQ 0.
LEER TABLA to_sapscript CON CLAVE 'Z_STRT2'.
SI sy-subrc = 0.
MOVER lv_strt2 A to_sapscript-valor.
MODIFICAR to_sapscript ÍNDICE sy-tabix.
FIN DE SI.
FIN DE SI.
FIN DE FORMA. Saludos
Respondido el 15/04/2024
LUCIANO RIOJA GHIOTTO
Se unió el 13/07/2019
