Help me writing a Customer Exit!!

Question

Hi Guys
  Help me how to write a customer for calculating the next quarter forecast based on the user enter the input..
to write a code from the fiscal period they enter....
*********START OF FIRST PROG
WHEN 'ZVAR_**** type as interval or selection*
CLEAR l_s_range.
IF i_step = 2. "after the popup
LOOP AT i_t_var_range INTO loc_var_range
WHERE vnam = ZPxxXXXX.
ENDLOOP.
IF loc_var_range-low = '001'
l_s_range-sign = 'I'.
l_s_range-opt = 'BT'.
l_s_range-low = "01"
l_s_range-low = "03"
ENDIF.
IF loc_var_range-low = '004'
l_s_range-sign = 'I'.
l_s_range-opt = 'EQ'.
l_s_range-low = "04"
l_s_range-low = "06"
ENDIF.
IF loc_var_range-low = '007'
l_s_range-sign = 'I'.
l_s_range-opt = 'EQ'.
l_s_range-low = "07"
l_s_range-low = "09"
ENDIF.
IF loc_var_range-low = '010'
l_s_range-sign = 'I'.
l_s_range-opt = 'EQ'.
l_s_range-low = "10"
l_s_range-low = "12"
ENDIF.
*****Until here I calculated the Quarterly months...if I am wrong correct me...
******then from here I need to caculate Next Quarter as mentioned below. which is requirement logic...
if they enter period
01 --- Quarter1
02---Q1
03--- Q2
04--Q2
05---Q2
06---Q3
07---Q3
08---Q3
09---Q4
10---Q4
11-Q4
12-Q4
This is how i need
Is it again I need to enter for each period as they enter????
pls help me with next part of coding???
APPEND l_s_range TO e_t_range.
Thanks a lot...
BI Learner

Answer 1

Hi,
Here I'm giving simple code this will give First Day of the Fy Period and Last Day of the Fy Period entered by the user, so you can change as per your requirement, please ask ABAPer in your project to chenge the code, because I don't know what exactly you want to.
it will give first date of the FY Period based on user entry on ZFYP variable
ZFDAY_FI is Customer Exit Variable on 0CALDAY and ZFYP is User Entry Variable on Fiscal year/Perod
    WHEN 'ZFDAY_FI'.
      LOOP AT i_t_var_range INTO loc_var_range WHERE vnam = 'ZFYP'.
        zbdatj = loc_var_range-low+0(4).
        zbuper = loc_var_range-low+4(3).
        CALL FUNCTION 'FIRST_DAY_IN_PERIOD_GET'
          EXPORTING
            i_gjahr = zbdatj
            i_periv = 'V3'
            i_poper = zbuper
          IMPORTING
            e_date  = zzdate.
        CLEAR: l_s_range.
        l_s_range-low = zzdate.
        l_s_range-sign = 'I'.
        l_s_range-opt = 'EQ'.
        APPEND l_s_range TO e_t_range.
      ENDLOOP.
it will give last date of the FY Period based on user entry on ZFYP variable
ZLDAY_FI is Customer Exit Variable on 0CALDAY and ZFYP is User Entry Variable on Fiscal year/Perod
    WHEN 'ZLDAY_FI'.
      LOOP AT i_t_var_range INTO loc_var_range WHERE vnam = 'ZFYP'.
        zbdatj = loc_var_range-low+0(4).
        zbuper = loc_var_range-low+4(3).
        CALL FUNCTION 'LAST_DAY_IN_PERIOD_GET'
          EXPORTING
            i_gjahr = zbdatj
            i_periv = 'V3'
            i_poper = zbuper
          IMPORTING
            e_date  = zzdate.
        CLEAR: l_s_range.
        l_s_range-low = zzdate.
        l_s_range-sign = 'I'.
        l_s_range-opt = 'EQ'.
        APPEND l_s_range TO e_t_range.
      ENDLOOP.
In Report Create new Selection and drag the Keyfigure and 0CALDAY and restrict the 0CALDAY with *Intervales i.e. with ZFDAY_FI ; ZLDAY_FI *
Thanks
Reddy