topic Re: itab chk in Application Development and Automation Discussions

itab chk

Former Member — Tue, 25 Mar 2008 05:23:25 GMT

hi,

i have itab1-belnr , bukrs , wrbtr and

itab2-belnr, bukrs , wrbtr.

i want to chk if itab1-belnr = itab2-belnr

then deduct wrbtr and kept in itab1 like,

itab1-wrbtr = (itab1-wrbtr) - (itab2-wrbtr)

how can i do this . can any one gide me?

Re: itab chk

Former Member — Tue, 25 Mar 2008 05:26:59 GMT

hi,

data:ind like sy-tabix.

loop at itab1.

ind = sy-tabix.

read table itab2 with key belnr = itab1-belnr.

if sy-subrc eq 0.

itab1-wrbtr = (itab1-wrbtr) - (itab2-wrbtr)

modify itab1 index ind.

endif.

endloop.

Reward if helpful

Regards

Vodka.

Re: itab chk

Former Member — Tue, 25 Mar 2008 05:27:00 GMT

Hi,

loop at itab1.

clear itab2.

read table itab2 with key belnr = itab1-belnr.

if sy-subrc eq 0.

itab1-wrbtr = itab1-wrbtr - itab2-wrbtr.

modify itab1.

endif.

clear itab1.

endloop.

Regards,

Sankar.

Edited by: sankar on Mar 25, 2008 6:32 AM

Re: itab chk

Former Member — Tue, 25 Mar 2008 05:28:29 GMT

Hi Santosini,

LOOP AT ITAB1.

READ TABLE ITAB2 WITH KEY BELNR = ITAB1-BELNR.

IF SY-SUBRC = 0.

itab1-wrbtr = itab1-wrbtr - itab2-wrbtr.

MODIFY ITAB1.

ENDIF.

ENDLOOP.

THANKS ARJUN

Re: itab chk

Former Member — Tue, 25 Mar 2008 05:29:03 GMT

Hi,

do like this.


LOOP AT itab1.
  LOOP AT itab2 WHERE belnr = itab1-belnr.
    itab1-wrbtr = itab1-wrbtr - itab2-wrbtr.
  ENDLOOP.
  MODIFY itab1.
ENDLOOP.

rgds,

bharat.

Re: itab chk

Former Member — Tue, 25 Mar 2008 05:30:40 GMT

try this..

loop at itab1.

read itab2 with key belnr = itab1-belnr.

itab1-wrbtr = itab1-wrbtr - itab2-wrbtr.

modify itab1.

clear:itab1,itab2.

endloop.

Regards

Sugumar G

Edited by: Sugumar Ganesan on Mar 25, 2008 6:30 AM

Re: itab chk

Former Member — Tue, 25 Mar 2008 05:30:47 GMT

Hi,

Use this code.

sort itab2 by belnr.

loop at itab1 into wa_itab1.

read table itab2 into wa_itab2 with key wa_itab1-belnr binary

search.

if sy-subrc = 0.

wa_itab1-wrbtr = wa_itab1-wrbtr - wa_itab2-wrbtr.

modify itab1 from wa_itab1 transporting wrbtr.

endif.

endloop.

This will solve your problem i guess.

Reward points if useful.

Regards,

Sowmya.