2008 Mar 25 5:23 AM
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?
2008 Mar 25 5:28 AM
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
2008 Mar 25 5:26 AM
data:ind like sy-tabix.
loop at itab1.
ind = sy-tabix.
read table itab2 with key belnr = itab1-belnr.
if sy-subrc eq 0.
modify itab1 index ind.
endif.
endloop.
Reward if helpful
Regards
Vodka.
2008 Mar 25 5:27 AM
Hi,
clear itab2.
modify itab1.
clear itab1.
Regards,
Sankar.
Edited by: sankar on Mar 25, 2008 6:32 AM
2008 Mar 25 5:29 AM
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.
2008 Mar 25 5:30 AM
try this..
read itab2 with key belnr = itab1-belnr.
clear:itab1,itab2.
Sugumar G
Edited by: Sugumar Ganesan on Mar 25, 2008 6:30 AM
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.
This will solve your problem i guess.
Reward points if useful.
Sowmya.
Bluesky
