Hi,
Then use this:
DATA: loc_var_range Type rrrangeexit,
temp_day type d,
temp_calmonth(6) type c.
CASE i_vnam.
WHEN 'ZCALMONTH2'.
if i_step = 2.
LOOP AT i_t_var_range INTO loc_var_range WHERE vnam = 'ZCAL_DAY'.
CLEAR l_s_range.
concatenate loc_var_range-low(6) '01' into temp_day.
temp_day = temp_day - 1.
temp_calmonth = temp_day(6).
l_s_range-low = temp_calmonth.
l_s_range-sign = 'I'.
l_s_range-opt = 'EQ'.
APPEND l_s_range TO e_t_range.
exit.
endloop.
endif.
ENDCASE.
Regards,
Loed