Hi
i have an issue in following logic.
my report output coming like
vgbel bukrs vkorg werks Vbeln bstkd date
11111 021 1201 1200 23445 2222 080907
11112
11113
11114
my output should be
vgbel bukrs vkorg werks Vbeln bstkd date
11111 021 1201 1200 23445 2222 080907
pls help me
SELECT vbeln werks posnr matnr lfimg erdat ernam meins vgbel
FROM lips INTO TABLE it_lips
*FOR ALL ENTRIES IN it_likp
WHERE werks = p_werks
AND vbeln in s_vbeln
AND erdat IN s_erdat
AND ernam IN s_ernam.
IF NOT it_lips[] IS INITIAL.
SELECT vbeln vkorg kunag kunnr lfdat wadat lifnr vstel lfart
FROM likp INTO TABLE it_likp
FOR ALL ENTRIES IN it_lips
WHERE vbeln = it_lips-vbeln
AND vkorg IN s_vkorg
AND wadat IN s_wadat
AND kunag in s_kunag
And kunnr in s_KUNWE.
select kunnr bukrs
from knb1 into table it_knb1
FOR ALL ENTRIES IN it_likp
where kunnr = it_likp-kunnr.
SELECT vbeln BSTKD FROM VBkd
INTO table IT_VBkd
FOR ALL ENTRIES IN IT_LIPS
WHERE VBELN = IT_lips-vgbel.
SELECT kunnr name1 name2 stras ort02 pstlz ort01
FROM kna1 INTO TABLE it_kna1
FOR ALL ENTRIES IN it_likp
WHERE kunnr = it_likp-kunnr.
ENDIF.
LOOP AT it_lips.
*it_final-vbeln = it_lips-vbeln.
it_final-werks = it_lips-werks.
it_final-posnr = it_lips-posnr.
it_final-matnr = it_lips-matnr.
it_final-lfimg = it_lips-lfimg.
it_final-erdat = it_lips-erdat.
it_final-ernam = it_lips-ernam.
*it_final-meins = it_lips-meins.
it_final-vgbel = it_lips-vgbel.
READ TABLE it_likp WITH KEY vbeln = it_lips-vbeln.
IF sy-subrc = 0.
READ TABLE it_vbkd WITH KEY vbeln = it_lips-vgbel.
if sy-subrc = 0.
it_final-bstkd = it_vbkd-bstkd.
endif.
it_final-vbeln = it_likp-vbeln.
it_final-vkorg = it_likp-vkorg.
it_final-kunag = it_likp-kunag.
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
EXPORTING
input = it_final-kunag
IMPORTING
OUTPUT = it_final-kunag.
it_final-kunnr = it_likp-kunnr.
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
EXPORTING
input = it_final-kunnr
IMPORTING
OUTPUT = it_final-kunnr.
it_final-lfdat = it_likp-lfdat.
it_final-wadat = it_likp-wadat.
it_final-vstel = it_likp-vstel.
*it_final-lfart = it_likp-lfart.
*it_final-lifnr = it_likp-lifnr.
READ TABLE it_knb1 WITH KEY kunnr = it_likp-kunnr.
IF sy-subrc = 0.
it_final-bukrs = it_knb1-bukrs.
ENDIF.
ENDIF.
READ TABLE it_kna1 WITH KEY kunnr = it_likp-kunnr.
IF sy-subrc = 0.
it_final-name1 = it_kna1-name1.
it_final-name2 = it_kna1-name2.
it_final-stras = it_kna1-stras.
it_final-ort02 = it_kna1-ort02.
it_final-pstlz = it_kna1-pstlz.
it_final-ort01 = it_kna1-ort01.
ENDIF.
it_final-mandt = sy-mandt.
it_final-date = sy-datum.
it_final-time = sy-uzeit.
it_final-user = sy-uname.
it_final-file = p_pcfile.
.
APPEND it_final.
CLEAR : it_lips, it_likp, it_kna1, it_final.
ENDLOOP.