How can we get next Alphabet in SAP

Question

Hi Gurus ,
                I have a requirement where in need alphabet as per the Fiscal Year .
For Example : Current Year : 2008
                      Alphabet      : F
Then for next year 2009 i want it to be G so can anybody help me how can i do that
Thanks in advance
Regards
Shankar

Answer 1

hi shanker,
I dont know if there is a standard function module for ur requirement
but we hav developed our own function module.
u can try it.
  data:v_char type char1.
  data:v_next_char type char1.
        call function 'YMPIFM_GET_NEXT_ALPHABET'
          exporting
            alphabet      = v_char
          importing
            next_alphabet = v_next_char.
Below are the function module parameters and source code.
1) In Import Parameter
Parameter Name       TypeSpec    Associated Type                   Short Text
ALPHABET     TYPE        CHAR1                               Single-character flag
2) In Export Parameter
Parameter Name       Type Spec    Associated Type                   Short Text
NEXT_ALPHABET     TYPE        CHAR1                               Single-character flag
3) In source Code
function ympifm_get_next_alphabet.
*""Local interface:*
*"       IMPORTING
*"             REFERENCE(ALPHABET) TYPE  CHAR1
*"       EXPORTING
*"             REFERENCE(NEXT_ALPHABET) TYPE  CHAR1
case alphabet.
when '  '.
next_alphabet = 'A'.
when 'A'.
next_alphabet = 'B'.
when 'B'.
next_alphabet = 'C'.
when 'C'.
next_alphabet = 'D'.
when 'D'.
next_alphabet = 'E'.
when 'E'.
next_alphabet = 'F'.
when 'F'.
next_alphabet = 'G'.
when 'G'.
next_alphabet = 'H'.
when 'H'.
next_alphabet = 'I'.
when 'I'.
next_alphabet = 'J'.
when 'J'.
next_alphabet = 'K'.
when 'K'.
next_alphabet = 'L'.
when 'L'.
next_alphabet = 'M'.
when 'M'.
next_alphabet = 'N'.
when 'N'.
next_alphabet = 'O'.
when 'O'.
next_alphabet = 'P'.
when 'P'.
next_alphabet = 'Q'.
when 'Q'.
next_alphabet = 'R'.
when 'R'.
next_alphabet = 'S'.
when 'S'.
next_alphabet = 'T'.
when 'T'.
next_alphabet = 'U'.
when 'U'.
next_alphabet = 'V'.
when 'V'.
next_alphabet = 'W'.
when 'W'.
next_alphabet = 'X'.
when 'X'.
next_alphabet = 'Y'.
when 'Y'.
next_alphabet = 'Z'.
endcase.
endfunction.