Hi friends,
I have folowing code....
I want to have all datas in my final itab.
TYPES:BEGIN OF ty_tab,
bill_no TYPE zfi_way_bill-bill_no,
issued_on TYPE zfi_way_bill-issued_on,
issued_to TYPE zfi_way_bill-issued_to,
bill_status TYPE zfi_way_bill-bill_status,
END OF ty_tab.
TYPES:BEGIN OF ty_tab1,
mblnr TYPE mkpf-mblnr,
bktxt TYPE mkpf-bktxt,
END OF ty_tab1.
TYPES:BEGIN OF ty_tab2,
lifnr TYPE mseg-lifnr,
END OF ty_tab2.
TYPES:BEGIN OF ty_final,
bill_no TYPE zfi_way_bill-bill_no,
issued_on TYPE zfi_way_bill-issued_on,
issued_to TYPE zfi_way_bill-issued_to,
mblnr TYPE mkpf-mblnr,
bktxt TYPE mkpf-bktxt,
lifnr TYPE mseg-lifnr,
END OF ty_final.
DATA:it_tab TYPE STANDARD TABLE OF ty_tab INITIAL SIZE 0 WITH HEADER LINE,
it_tab1 TYPE STANDARD TABLE OF ty_tab1 INITIAL SIZE 0 WITH HEADER LINE,
it_tab2 TYPE STANDARD TABLE OF ty_tab2 INITIAL SIZE 0 WITH HEADER LINE,
it_final TYPE STANDARD TABLE OF ty_final INITIAL SIZE 0 WITH HEADER LINE.
ELECT bill_no
issued_on
issued_to FROM zfi_way_bill INTO TABLE it_tab WHERE issued_on LE date AND bill_status EQ '1'.
IF NOT IT_TAB[] IS INITIAL.
select mblnr from mkpf into table it_tab1 for all entries in it_tab where bktxt = it_tab-bill_no.
ENDIF.
IF NOT IN_TAB1[] IS INITIAL.
SELECT LIFNR FROM MSEG INTO TABLE IT_TAB2 FOR ALL ENTRIES IN IT_TAB1 WHERE MBLNR = IT_TAB1-MBLNR.
ENDIF.
Loop at it_final.
How can I do it.......