ABAP :Compare two internal tables and store value in third internal table.

[hollowfiend]

CODE:

TABLES: T1,"

T2.

TYPES : BEGIN OF TY_STRUC1,

OBJECT_ID TYPE T1-OBJECT_ID,

END OF TY_STRUC1.

TYPES : BEGIN OF TY_STRUC2,

BELNR TYPE T2-BELNR,

END OF TY_STRUC2.

TYPES : BEGIN OF TY_STRUC3,

TRUE(10) TYPE C,

END OF TY_STRUC3.

DATA: IT_TABLE1 TYPE STANDARD TABLE OF TY_STRUC1,

WA_1 TYPE TY_STRUC1.

DATA: IT_TABLE2 TYPE STANDARD TABLE OF TY_STRUC2,

WA_2 TYPE TY_STRUC2.

DATA: IT_TABLE3 TYPE STANDARD TABLE OF TY_STRUC3,

WA_3 TYPE TY_STRUC3.

SELECT OBJECT_ID FROM T1 INTO CORRESPONDING FIELDS OF TABLE IT_TABLE1 WHERE AR_OBJECT EQ 'VALUE' .

SELECT BELNR FROM T2 INTO CORRESPONDING FIELDS OF TABLE IT_TABLE2.

"IT_TABLE FIRST 10 CHARECTERS ONLY CAUSE IT_TABLE2 VALUE IS ALL 10 CHAR ITEMS

LOOP AT IT_TABLE1 ASSIGNING FIELD-SYMBOL(<C>).

<C>-OBJECT_ID = <C>-OBJECT_ID(10).

ENDLOOP.

SORT IT_TABLE1 BY OBJECT_ID.

SORT IT_TABLE2 BY BELNR.

How do i compare the values in IT_TABLE1 with IT_TABLE2 and if there are similarities put it into IT_TABLE3.

Please assist and explain if possible i am new.

THANK YOU!

[abityildiz]

Hello,

if you want to compare 2 tables,there are 2 cases

try this method:

case 1:
loop at IT_TABLE1.
read table IT_TABLE2 with key BELNR = IT_TABLE1-OBJECT_ID.
if sy-subrc <> 0.
append it_table1 to it_table3.
endif.
endloop.

case 2:
loop at IT_TABLE2.
read table IT_TABLE1 with key OBJECT_ID = IT_TABLE2-BELNR.
if sy-subrc <> 0.
append it_table2 to it_table3.
endif.
endloop.