passing data to itab

[Former Member]

hi can any correc this logic, i'm unable to get the data in the itab.

select * FROM ZY310 INTO TABLE T_ZY310 WHERE WERKS =

'0054' AND MATNR = P_ZPART .

loop at T_ZY310.

SPLIT T_ZY310-ZBARCODE at '|' into VAR1 VAR2 VAR3.

IF VAR2 EQ P_ZPART AND VAR3 EQ P_ZCAM.

CLEAR VAR1.

CLEAR VAR2.

CLEAR VAR3.

clear T_ZY310-ZBARCODE.

ENDIF.

ENDLOOP.

MOVE T_ZY310-BELNR TO T_SUID-P_SUID.

APPEND T_SUID.

SELECT MANDT MATNR LENUM VERME LGPLA LQNUM LGTYP PLPOS LGORT MEINS FROM LQUA INTO

TABLE ITAB WHERE LGNUM = '754' AND

WERKS = '0054' AND VERME <> '' AND MATNR = P_ZPART

AND LENUM = T_SUID-P_SUID.

ENDIF.

[Former Member]

hi can any correc this logic, i'm unable to get the data in the itab.

select * FROM ZY310 INTO TABLE T_ZY310 WHERE WERKS =

'0054' AND MATNR = P_ZPART .

loop at T_ZY310.

SPLIT T_ZY310-ZBARCODE at '|' into VAR1 VAR2 VAR3.

IF VAR2 EQ P_ZPART AND VAR3 EQ P_ZCAM.

CLEAR VAR1.

CLEAR VAR2.

CLEAR VAR3.

clear T_ZY310-ZBARCODE.

ENDIF.

ENDLOOP.

MOVE T_ZY310-BELNR TO T_SUID-P_SUID.

APPEND T_SUID.

SELECT MANDT MATNR LENUM VERME LGPLA LQNUM LGTYP PLPOS LGORT MEINS FROM LQUA INTO

TABLE ITAB WHERE LGNUM = '754' AND

WERKS = '0054' AND VERME <> '' AND MATNR = P_ZPART

AND LENUM = T_SUID-P_SUID.

ENDIF.

[Former Member]

Modify your last SELECT:

CALL FUNCTION 'CONVERSION_EXIT_MATN1_INPUT'
  EXPORTING
    input  = p_zpar
  IMPORTING
    output = p_zpar.

SELECT mandt matnr lenum verme lgpla lqnum lgtyp plpos lgort meins
 FROM lqua
 INTO TABLE itab
 WHERE lgnum = '754'   AND
       werks = '0054'  AND
       verme <> ''     AND
       matnr = p_zpart AND
       lenum = t_suid-p_suid.

Rob