topic Re: Assign and increment in Application Development and Automation Discussions

Assign and increment

Former Member — Thu, 19 Mar 2009 14:06:24 GMT

I have a code that add the amount from period 1 up to period 16 to get the total

"determines what periods have been requested and sums them accordingly
LOOP AT s_perio INTO wa_perio.
    IF wa_perio+6(3) = space.
      w_low = wa_perio+3(3).
      w_high = wa_perio+3(3).
    ELSE.
      w_low = wa_perio+3(3).
      IF wa_perio+6(3) = 12.
        w_high = 16.
      ELSE.
        w_high = wa_perio+6(3).
      ENDIF.
    ENDIF.
  ENDLOOP.

  wa_times-sign = c_sign.
  wa_times-option = c_option_bt.
  wa_times-low = w_low.
  wa_times-high = w_high.
  APPEND wa_times TO times.


  ADD st_linerec-wog001 THEN st_linerec-wog002 UNTIL st_linerec-wog016
         GIVING w_total ACCORDING TO times.

Now i want to change the code from add then until... to ASSIGN and INCREMENT (since the first one is not used in classes, an obsolete statement). Am i supposed to use field symbol? and i'm not sure how to use INCREMENT for it.

Thanks.

Re: Assign and increment

former_member194669 — Thu, 19 Mar 2009 14:28:16 GMT

Try this way


v_int = times-low.
do.
 concatenate 'ST_LINEREC-WOG' v_int into v_field.
 condense v_field no-gaps.
 assign (v_field) to <fs>
 w_total = w_total + <fs>.
 if times-high eq v_int.
    exit.
 endif.
 v_int = v_int + 1.
enddo.

a®

Re: Assign and increment

Former Member — Thu, 19 Mar 2009 14:31:43 GMT

Hi,

try this.

w_total = w_total + : st_linerec-wog001,

st_linerec-wog002,

st_linerec-wog003,

st_linerec-wog004,

st_linerec-wog005,

st_linerec-wog006,

st_linerec-wog007,

st_linerec-wog008,

st_linerec-wog009,

st_linerec-wog010,

st_linerec-wog011,

st_linerec-wog012,

st_linerec-wog013,

st_linerec-wog014 ,

st_linerec-wog015,

st_linerec-wog016 .

Re: Assign and increment

Former Member — Thu, 19 Mar 2009 14:48:36 GMT

Hi Sreesudha , thank you for your suggestion but your code will always sum all period no matter what the period the user enter on selection screen.

Re: Assign and increment

Former Member — Thu, 19 Mar 2009 14:53:37 GMT

Hi a®s, when i tried your code. It says times is not a table with header line. This is how i declare times

DATA: times TYPE RANGE OF index,
      wa_times LIKE LINE OF times.

Re: Assign and increment

former_member194669 — Thu, 19 Mar 2009 14:58:16 GMT

Try this way


read table times into wa_times index 1.
v_int = wa_times-low.
do.
 concatenate 'ST_LINEREC-WOG' v_int into v_field.
 condense v_field no-gaps.
 assign (v_field) to <fs>
 w_total = w_total + <fs>.
 if wa_times-high eq v_int.
    exit.
 endif.
 v_int = v_int + 1.
enddo.

a®

Re: Assign and increment

Former Member — Thu, 19 Mar 2009 15:08:11 GMT

It gaves msg "Field symbol is not assigned" ,a®s

this is how i applied your code in mine.

FIELD-SYMBOLS <fs> TYPE ANY.
DATA v_int(3) type c.
DATA v_field(17) type C.
 read table times into wa_times index 1.
 v_int = wa_times-low.
do.
 concatenate 'ST_LINEREC-WOG' v_int into v_field.
 condense v_field no-gaps.
 assign (v_field) to <fs>.
 w_total = w_total + <fs>.
 if wa_times-high eq v_int.
    exit.
 endif.
 v_int = v_int + 1.
enddo.

maybe the problem comes from the declaration part?

Re: Assign and increment

former_member194669 — Thu, 19 Mar 2009 16:31:35 GMT

I think v_field not getting proper values

ST_LINEREC-WOG003 i think it getting as ST_LINEREC-WOG3

Try to change this way


field-symbols <fs> type any.
data v_int type i.   "<<
data : v_cint(3) type c.   "<<
data v_field(17) type c.
data: times type range of index,
      wa_times like line of times.

read table times into wa_times index 1.
v_int = wa_times-low.
do.
  unpack v_int to v_cint..  "<<
  concatenate 'ST_LINEREC-WOG' v_cint into v_field.
  condense v_field no-gaps.
  assign (v_field) to <fs>.
  w_total = w_total + <fs>.
  if wa_times-high eq v_int.
    exit.
  endif.
  v_int = v_int + 1.
enddo.

a®

Re: Assign and increment

Former Member — Thu, 19 Mar 2009 17:02:22 GMT

awesome, it works!. Thanks a lot a®s !.