Using mod in the calculation

Question

experts
810312301234X
I need to calculate the x value in the above field .
logic is as shown below.
First we need to add all the odd numbers starting from left ie in our above example it is 4 because x we should not consider so first number is 4.
var1 = sum of odd(42023+1)  = 10
First we need to add all the even numbers starting from left  here in our case 3 is the first even number and x we should not consider.
var2 = sum of even(31310+8) = 16
var3 = var13 + var2  = 103 + 16 = 46
finally we need to take the mod value ie the remainder and that is our desired value X.
var4 = mod(var3/10) = mod(46/10) = 6
x= var4 = 6
Now please tell me how to do this easily in sap ie how to calculate this.
thank you for the replies.

Answer 1

Hi Shiva,
Check this logic.
DATA: varx TYPE c LENGTH 10 VALUE '12345x',
      var1 TYPE I,
      var2 TYPE I,
      var3 TYPE I,
      cnt TYPE I,
      mod1 TYPE I,
      x TYPE I.
cnt = STRLEN( varx ) - 1.
DO cnt TIMES.
  mod1 = var2 mod 2.
  IF mod1 eq 0. " for even numbers
  var1 = varx+var2(1) + var1.
  ELSE. " for odd numbers
  var3 = varx+var2(1) + var3.
  ENDIF.
var2 = var2 + 1.
ENDDO.
x =  ( ( var3 * 3 ) + var1 )  mod 10.
Regards,
Swarna Munukoti