10-24-2007 12:23 PM
Can u tell why inside of " AT NEW / ENDAT" all the contents of internal table are initial?
i need them.
example,
LOOP AT TLZK.
AT NEW BUDAT.
T_RESULT-ERFMG = summa.
MODIFY T_RESULT TRANSPORTING ERFMG WHERE BUDAT = ZBUDAT.
T_RESULT-NPP = NPP.
T_RESULT-ERFMG = T_RESULT-ERFMG + TLZK-ERFMG.
T_RESULT-RSNUM = TLZK-RSNUM.
T_RESULT-RSPOS = TLZK-RSPOS.
T_RESULT-LGORT = TLZK-LGORT.
T_RESULT-UMLGO = TLZK-UMLGO.
T_RESULT-BUDAT = TLZK-BUDAT.
APPEND T_RESULT.
CLEAR SUMMA.
NPP = NPP + 1.
ENDAT.
zbudat = WA_TLZK-budat.
summa = summa + WA_TLZK-ERFMG.
ENDLOOP.
10-24-2007 12:26 PM
10-24-2007 12:29 PM
HI,
Move the data to a temporary internal table:
LOOP AT TLZK.
ITEMP[] = TLZK[].
AT NEW BUDAT.
T_RESULT-ERFMG = summa.
MODIFY T_RESULT TRANSPORTING ERFMG WHERE BUDAT = ZBUDAT.
T_RESULT-NPP = NPP.
* T_RESULT-ERFMG = T_RESULT-ERFMG + ITEMP-ERFMG.
T_RESULT-RSNUM = ITEMP-RSNUM.
T_RESULT-RSPOS = ITEMP-RSPOS.
T_RESULT-LGORT = ITEMP-LGORT.
T_RESULT-UMLGO = ITEMP-UMLGO.
T_RESULT-BUDAT = ITEMP-BUDAT.
APPEND T_RESULT.
CLEAR SUMMA.
NPP = NPP + 1.
ENDAT.
zbudat = WA_TLZK-budat.
summa = summa + WA_TLZK-ERFMG.
ENDLOOP.
10-24-2007 12:34 PM
10-24-2007 12:44 PM
Oops !! missed out that..
Instead of
ITEMP[] = TLZK[].
Please use the read statement which you have mentioned.