on 08-01-2007 9:14 AM
FRIENDS PROBLEM IS THAT I WANT TO CALCULATE THE WORK INVOLVED IN THE ACTIVITY I.E AFVGD-ARBEI . WHICH IS AS FOLLOWS
1.0,
6.0,
3.0,
I WANT TO SUM THEM UP SO THAT I GET 1.0 + 6.0 + 3.0 = 10.0
I HAVE WRITTEN THE SUBROUTINE N CALLED IT FROM THE SAPSCRIPT MAIN ..
BUT O/P I AM GETTING IS 3.0 .I.E ITS ONLY TAKING THE LAST VALUE WHERE AS I NEED THE TOTAL SUM..
PLEASE CORRECT THE BELOW GIVEN CODE.
URGENT
/: PERFORM YE_PM_COMMON_WORK IN PROGRAM ZPMINCLUDE
/: USING &AFVGD-ARBEI&
/: CHANGING &CONV_WORK&
/: ENDPERFORM
SUBROUTINE
FORM YE_PM_COMMON_WORK
TABLES in_tab STRUCTURE itcsy
out_tab STRUCTURE itcsy.
DATA: v_vaL TYPE AFVGD-ARBEI, WORK INVOLVED IN THE ACTIVITY
v_val1 TYPE AFVGD-ARBEI,
v_val_char(15) TYPE c.
READ TABLE in_tab INDEX 1.
v_val1 = in_tab-value.
V_VAL = V_VAL + V_VAL1.
v_val_char = v_val.
READ TABLE out_tab INDEX 1.
MOVE V_VAL_CHAR TO out_tab-value.
MODIFY out_tab INDEX 1.
CLEAR out_tab.
ENDFORM.
Hi
Data should be declared outside the FORM, ENDFORM (that is global) so that it is initiallized just once.
/: PERFORM YE_PM_COMMON_WORK IN PROGRAM ZPMINCLUDE
/: USING &AFVGD-ARBEI&
/: CHANGING &CONV_WORK&
/: ENDPERFORM
SUBROUTINE
<b>DATA: v_vaL TYPE AFVGD-ARBEI, “WORK INVOLVED IN THE ACTIVITY
v_val1 TYPE AFVGD-ARBEI,
v_val_char(15) TYPE c.</b>
FORM YE_PM_COMMON_WORK
TABLES in_tab STRUCTURE itcsy
out_tab STRUCTURE itcsy.
READ TABLE in_tab INDEX 1.
v_val1 = in_tab-value.
V_VAL = V_VAL + V_VAL1.
v_val_char = v_val.
READ TABLE out_tab INDEX 1.
MOVE V_VAL_CHAR TO out_tab-value.
MODIFY out_tab INDEX 1.
CLEAR out_tab.
ENDFORM.
-
If your query is resolved close this thread and as well as other threads you opened for this and award points.
Cheers
Shafiq
Message was edited by:
Shafiq
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.
User | Count |
---|---|
84 | |
24 | |
11 | |
9 | |
7 | |
6 | |
5 | |
5 | |
5 | |
4 |
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.