Skip to Content
0
Former Member
Jul 19, 2008 at 11:18 AM

Combining three itabs....

20 Views

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.......