topic Re: modify itab in Application Development and Automation Discussions

modify itab

Former Member — Thu, 19 Mar 2009 12:17:05 GMT

I have itab1 and itab2

Itab1 has fields f1 f2 f3 and f4.

Itab2 has fields f1 f2.

Itab1 is filled and itab2 is filled but itab1 doesnt have data for f2.

How Can i populate the content of whole f2 column from itab2 in itab1 ?

thanks

Golu

Re: modify itab

GauthamV — Thu, 19 Mar 2009 12:19:05 GMT


loop at itab2 where f1 = itab1-f1.

itab1-f2 = itab2-f2.
modify itab1 transporting f2.
clear itab1.
clear itab2.

endloop.

Re: modify itab

Former Member — Thu, 19 Mar 2009 12:20:21 GMT

i tried that, i was wondering if there is a smart solution...

btw f1 is a unique key field

Re: modify itab

former_member404244 — Thu, 19 Mar 2009 12:20:51 GMT

Hi,

Loop at itab1.

lv_index = sy-tabix.

read table itab2 index lv_index.

if there is any common key then..

read table itab2 with key <field> = itab1-field.

if sy-subrc eq 0.

move : itab2-f1 to ltab1-f1.

endif.

modify itab1.

endloop.

Regards,

Nagaraj

Re: modify itab

Former Member — Thu, 19 Mar 2009 12:21:49 GMT

Hi,

If f1 is key field for both itab1 and itab2 then look following code,

loop at itab1 into wa_itab1.

read table itab2 into wa_itab2 with key f1 = wa_itab1-f1.

if sy-subrc = 0.

move wa_itab2-f2 to wa_itab1-f2.

endif.

modify itab1 from wa_itab1.

clear: wa_itab1, wa_itab2.

endloop.

Thanks!

Brunda

Re: modify itab

Former Member — Thu, 19 Mar 2009 12:22:01 GMT

Hi,

Try this

loop at itab2 into wa_itab2.

wa_itab1-f2 = wa_itab2-f2.

modify itab1 from wa_itab1 transporting f2 where f1 = wa_itab2-f1 .

endloop.

Thanks & Regards,

Anagha Deshmukh

Re: modify itab

Former Member — Thu, 19 Mar 2009 12:23:52 GMT

use field symbols for this:

field-symbols: <f1> type wa_itab1(work area of itab1).

loop at itab1 assigning <f1>.

read table itab2 assigning <f2>

with key f1 = <f1>-f1

f2 = <f1>-f2.

if sy-subrc EQ 0.

<f2>-f2 = <f1>-f2.

like wise trasfer all required fileds.

endif.

endloop.

Re: modify itab

Former Member — Thu, 19 Mar 2009 12:29:17 GMT

Hi,

If f1 is key field for both itab1 and itab2 then look following code,

loop at itab1 into wa_itab1.

read table itab2 into wa_itab2 with key f1 = wa_itab1-f1.

if sy-subrc EQ 0.

move wa_itab2-f2 to wa_itab1-f2.

endif.

modify itab1 from wa_itab1.

clear: wa_itab1, wa_itab2.

endloop.

Regards,

Sekhar babu

Re: modify itab

faisalatsap — Thu, 19 Mar 2009 12:58:32 GMT

Please Use more meaningful Subject

Re: modify itab

Former Member — Thu, 19 Mar 2009 13:08:36 GMT

hi,

Hope this will help u, I have tried and its working.

TYPES: BEGIN OF T_ITAB1,

FLD1(3) TYPE C,

FLD2(3) TYPE C,

FLD3(3) TYPE C,

FLD4(3) TYPE C,

END OF T_ITAB1.

TYPES: BEGIN OF T_ITAB2,

FLD1(3) TYPE C,

FLD2(3) TYPE C,

END OF T_ITAB2.

DATA: ITAB1 TYPE STANDARD TABLE OF T_ITAB1,

ITAB1_LINE LIKE LINE OF ITAB1,

ITAB2 TYPE STANDARD TABLE OF T_ITAB2,

ITAB2_LINE LIKE LINE OF ITAB2.

ITAB1_LINE-FLD1 = 'AA'.

ITAB1_LINE-FLD2 = ''.

ITAB1_LINE-FLD3 = '11'.

ITAB1_LINE-FLD4 = 'ZZ'.

APPEND ITAB1_LINE TO ITAB1.

CLEAR ITAB1_LINE.

ITAB1_LINE-FLD1 = 'BB'.

ITAB1_LINE-FLD2 = ''.

ITAB1_LINE-FLD3 = '22'.

ITAB1_LINE-FLD4 = 'YY'.

APPEND ITAB1_LINE TO ITAB1.

CLEAR ITAB1_LINE.

ITAB1_LINE-FLD1 = 'CC'.

ITAB1_LINE-FLD2 = ''.

ITAB1_LINE-FLD3 = '33'.

ITAB1_LINE-FLD4 = 'XX'.

APPEND ITAB1_LINE TO ITAB1.

CLEAR ITAB1_LINE.

ITAB2_LINE-FLD1 = 'AA'.

ITAB2_LINE-FLD2 = '99'.

APPEND ITAB2_LINE TO ITAB2.

CLEAR ITAB2_LINE.

ITAB2_LINE-FLD1 = 'BB'.

ITAB2_LINE-FLD2 = '88'.

APPEND ITAB2_LINE TO ITAB2.

CLEAR ITAB2_LINE.

LOOP AT ITAB1 INTO ITAB1_LINE.

LOOP AT ITAB2 INTO ITAB2_LINE.

IF ITAB1_LINE-FLD1 = ITAB2_LINE-FLD1.

ITAB1_LINE-FLD2 = ITAB2_LINE-FLD2.

MODIFY ITAB1 FROM ITAB1_LINE TRANSPORTING FLD2

WHERE FLD1 = ITAB1_LINE-FLD1.

ENDIF.

ENDLOOP.

Thanks and Regards

Suraj S Nair

Re: modify itab

Former Member — Thu, 19 Mar 2009 13:13:47 GMT

Hi,

See below code:



data : l_tabix type sy-tabix.

loop at itab1.

l_tabix = sy-tabix.

read table itab2 with key f1 = itab1-f1.

if sy-subrc = 0.

itab1-f2 = itab2-f2.

modify itab1 index  l_tabix.

else.

continue.

endif.

endloop.

Edited by: santosh sarda on Mar 19, 2009 6:44 PM