‎2007 Aug 27 7:33 AM
Hi
I am in need of combining two internal tables inorder to produce report..
Could anyone give me source code to combine????
Thanks in advance
‎2007 Aug 27 7:35 AM
SELECT klifnr kebeln pebelp pelikz
FROM ekko AS k INNER JOIN ekpo AS p ON kebeln = pebeln
INTO TABLE it_ekpo WHERE k~aedat < w_aedat.
OR use APPEND
reward if helpful
Message was edited by:
Kaushik Datta
‎2007 Aug 27 7:35 AM
Hi,
loop at itab1.
append itab1 to itab2.
endloop.
Reward if useful!
‎2007 Aug 27 7:37 AM
Hi,
please find the code
data declaration part
TABLES: mara,marc,mard .
**********TYPES
TYPES: BEGIN OF t_mara,
matnr TYPE matnr, "Material Number
mtart TYPE mtart, "Material Type
meins TYPE meins, "Basic Unit Of measure
END OF t_mara.
TYPES: BEGIN OF t_marc,
matnr TYPE matnr, "Material Number
werks TYPE werks_d, "Plant
END OF t_marc.
TYPES: BEGIN OF t_mard,
matnr TYPE matnr,
werks TYPE werks_d,
lgort TYPE lgort_d,
END OF t_mard.
TYPES: BEGIN OF t_tab,
matnr TYPE matnr,
mtart TYPE mtart,
meins TYPE meins ,
werks TYPE werks_d ,
lgort TYPE lgort_d,
END OF t_tab.
**********WORKAREA
DATA: wa_mara TYPE t_mara,
wa_marc TYPE t_marc,
wa_mard type t_mard,
wa_tab TYPE t_tab,
e_matnr TYPE matnr,
wa_matnr TYPE matnr.
DATA : i_fieldcat TYPE slis_t_fieldcat_alv.
DATA: d_field(40), d_value(40),
AMBER(20).
**********INTERNAL TABLES
DATA: it_mara TYPE STANDARD TABLE OF t_mara,
it_marc TYPE STANDARD TABLE OF t_marc,
it_mard TYPE STANDARD TABLE OF t_mard,
it_tab TYPE STANDARD TABLE OF t_tab.
Data Selection Part
*select data from mara table
SELECT matnr
mtart
meins
FROM mara
INTO TABLE it_mara
WHERE matnr IN s_matnr.
*select data from marc table
SELECT matnr
werks
FROM marc
INTO TABLE it_marc
FOR ALL ENTRIES IN it_mara
WHERE matnr = it_mara-matnr.
**********************************************************
THIS BLOCK MOVES THE FIELDS FROM DIFFERENT *
TABLES(mara,marc) INTO A FINAL TABLE IT_TAB *
*********************************************************
LOOP AT it_marc INTO wa_marc .
READ TABLE it_mara INTO wa_mara WITH KEY matnr = wa_marc-matnr BINARY SEARCH.
IF sy-subrc = 0 .
wa_tab-matnr = wa_mara-matnr .
wa_tab-mtart = wa_mara-mtart.
wa_tab-meins = wa_mara-meins.
ENDIF.
wa_tab-werks = wa_marc-werks .
APPEND wa_tab TO it_tab.
ENDLOOP.
‎2007 Aug 27 8:14 AM