Hi Experts
pls help me
i am displaying material master data in ALV report. i am extracting
fields from mara, makt, marc and zppqt tables
it_mara[]
MANDT MATNR MEINS LAEDA AENAM
020 |2062101|ST |20071126|ITS_PDMS|
020 |2062103|ST |20060612|RKOZLOWS|
020 |2062131|ST |20080109|KARTHIKEYAN|
020 |2062132|ST |20060612|RKOZLOWS|
it_marc[]
MATNR WERKS
2062101|2401|
2062103|2401|
2062131|2401|
it_makt[]
MATNR MAKTX
2062101|TERMINAL
2062103|"TERMINAL
2062131|TERMINAL
it_zmpkg[]
MATNR ZPPQT ZSPQT ZPMQT_3
2062101|300 |2000 | 0 |
my report output only displaying it_zmpkg[] value only.
it should display it_matnr values
following is my code pls help me
FORM get_data .
SELECT mandt matnr meins laeda aenam
FROM mara
INTO TABLE it_mara
WHERE matnr IN s_matnr
AND mtart IN s_mtart.
IF NOT it_mara[] IS INITIAL.
SELECT matnr werks
FROM marc
INTO TABLE it_marc
FOR ALL ENTRIES IN it_mara
WHERE matnr = it_mara-matnr
AND werks = p_werks
AND mmsta IN s_mmsta
AND dispo IN s_dispo
AND beskz IN s_beskz
AND lgpro IN s_lgpro
AND lgfsb IN s_lgfsb.
SELECT matnr maktx
FROM makt
INTO TABLE it_makt
FOR ALL ENTRIES IN it_marc
WHERE matnr = it_marc-matnr
AND spras = 'E'.
SELECT matnr zppqt zspqt zpmqt_3
INTO TABLE it_zmpkg
FROM zmpkg
FOR ALL ENTRIES IN it_marc
WHERE matnr = it_marc-matnr
AND werks = p_werks.
ENDIF.
LOOP AT it_mara.
READ TABLE it_marc WITH KEY matnr = it_mara-matnr.
IF sy-subrc EQ 0.
*endif.
READ TABLE it_makt WITH KEY matnr = it_mara-matnr.
IF sy-subrc EQ 0.
*endif.
READ TABLE it_zmpkg WITH KEY matnr = it_mara-matnr.
IF sy-subrc EQ 0.
it_material-zppqt = it_zmpkg-zppqt.
it_material-zspqt = it_zmpkg-zspqt.
it_material-zpmqt_3 = it_zmpkg-zpmqt_3.
it_material-date = sy-datum.
it_material-time = sy-uzeit.
it_material-user = sy-uname.
it_material-file = p_pcfile.
it_material-mandt = it_mara-mandt.
it_material-matnr = it_mara-matnr.
it_material-meins = it_mara-meins.
it_material-laeda = it_mara-laeda.
it_material-aenam = it_mara-aenam.
it_material-werks = it_marc-werks.
it_material-maktx = it_makt-maktx.
*endif.
*ENDIF.
*ENDIF.
CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT'
EXPORTING
input = it_material-meins
IMPORTING
output = it_material-meins.
APPEND it_material.
clear it_material.
ENDIF.
ENDIF.
ENDIF.
ENDLOOP.
ENDFORM.
" GET_DATA