Trying to use the customer exit to retrieve prior year dates HELP

Question

i have the code below where i want to return a to & from date of the prior period.  the "TO" date is always the 1st of the month of the day they entered - 1 to get prior year.  when i debug they are populated but I get an error when i run the query sayin gthe enhancement has errors. 
CASE I_VNAM.
  WHEN 'ZD_TOFROMDATEPRIOR'.
    IF i_step = 2.
      loop at  I_T_VAR_RANGE INTO Loc_Var_Range
      where vnam = 'ZD_DATEENTERED'.
        Clear L_S_Range.
        L_S_Range-low0(4) = Loc_Var_Range-low0(4) - 1.
        CONCATENATE L_S_Range-low0(4) loc_var_range-low4(2) '01' INTO L_S_RANGE-low.
   CONCATENATE L_S_Range-low0(4) loc_var_range-low4(2) loc_var_range-low+6(2) INTO l_s_range-high.
     l_s_range-high = loc_var_range-low+4(4).
        L_S_RANGE-sign = 'I'.
        L_S_RANGE-opt = 'BT'.
        APPEND L_S_Range TO E_T_RANGE.
      endloop.
    ENDIF.
ENDCASE.

Answer 1

In case you haven't considered it, there is an easier way to accomplish this.
Since you are ignoring the day anyway, change your query to prompt for Calendar Month/Year or Fiscal Year/Period instead of prompting for a date range, then use variable offset of "-12" on first entry ("From") to get prior year's data.
Alternatively, you could use the current date range variable with an offset of "-365", but it doesn't sound like that would be good enough in your case.
Hope this helps...
Bob