Adding 1 to a letter/character

Question

Hi everyone,
I have a program where I need to find the next available wage type to use per category.
Some wage types, however, are alphanumeric (E.G '0SBC')
In the above example, the next available to use could be 'OSBD'
My question is, how do you add on to alphanumeric characters.
A more simpler example, if I have A, how do i add 1 and get 'B' as a result
Thank you
Daniel

Answer 1

Try this Daniel -
parameters: num1(4) type c default 'B'.
data: total(4) type c.
data: w_len type i.
data: w_num(3) type n,
      w_num1(4) type n,
      w_off type i,
      w_len1 type i,
      w_off1 type i.
w_len = strlen( num1 ).
w_len = w_len - 1.
if num1 CO '0123456789'.
   num1 = num1 + 1.
   stop.
endif.
do w_len times.
  w_len1 = w_len - w_off + 1.
  if num1+w_off(1) CO '012345678'.
     w_off = w_off + 1.
     if num1+w_off CO '012345678'.
          w_off = w_off - 1.
          w_num = num1+w_off.
          w_num = w_num + 1.
          w_off1 = 3 - w_len1.
          num1w_off = w_numw_off1(w_len1).
          stop.
     endif.
   endif.
   add 1 to w_off.
enddo.
if num1+w_len CO '012345678'.
   num1w_len = num1w_len + 1.
   stop.
endif.
if num1+w_len ne 'Z'
and num1+w_len CN '0123456789'..
  search sy-abcde for num1+w_len.
  add 1 to sy-fdpos.
  num1w_len = sy-abcdesy-fdpos(1).
endif.
end-of-selection.
write: / num1.