DATA LS_RET type BAPIRET2.
DATA: PEDIDO(10) TYPE C.
DATA: ITEM(6) TYPE C.
DATA: QTY(20) TYPE C.
DATA: UOM(3) TYPE C.
DATA: UOMISO(3) TYPE C.
DATA: LINHA(255) TYPE C.
LOOP AT PXKOMDLGN.
PEDIDO = PXKOMDLGN-LFIMG.
ITEM = PXKOMDLGN-LGMNG.
QTY = PXKOMDLGN-LFIMG_FLO.
UOM = PXKOMDLGN-LGMNG_FLO.
UOMISO = PXKOMDLGN-UMVKZ.
CONCATENATE '[' PEDIDO ']'
'[' ITEM ']'
'[' QTY ']'
'[' UOM ']'
'[' UOMISO ']'
INTO LINHA SEPARATED BY SPACE.
LS_RET-MESSAGE = LINHA.
APPEND LS_RET TO PRETURN.
Nenhum comentário:
Postar um comentário