Query input variable issue

Question

Hi experts,
We are using BEx 3.5.
1.We defined a RKF such that restricting the 0deb_cre_lc on Fiscal Year/period and restricted Fiscal Year/Period with a mandatory variable and the condition is <= ( Less than or equal to ).
When we execute a query a input screen will come asking to enter a Fiscal Year/Period.
Its a mandatory field.As per our client only 16 periods are defined and the fiscal year variant is V3.
Periods are from 001 to 016.
User will be entering like 001.2005 or 012.2008 like that.So in the output we will be getting the balance
i.e 0deb_cre_lc amount less than or equal to the user entered fiscal year/period.
But when user enters 234.2008 or any other wrong value which is other than 001 to 016 the report should
not be executed.But now it is executing.
Is there any possibility such as if user enters any period out of the range 001 to 016 then the report
should not be executed. or show any error message. Or Is there any possibility such that if user enters
only the values which are in the infoprovider then only the report should be executed.
For the above requirement, please check whether the following code matches or not. But the code is not
working.
Tables: /BIC/AZSM_DSO00.
data: begin of zfisc occurs 0,
fiscper(7),
end of zfisc.
Data WA_I_T_RANGE like line of I_T_VAR_RANGE.
If i_step = 3.
Case i_vnam.
WHEN 'TEST_FCE'.
SELECT FISCPER FROM /BIC/AZSM_DSO00 INTO table ZFISC where FISCPER = /BIC/AZSM_DSO00-FISCPER.
READ TABLE I_T_VAR_RANGE INTO WA_I_T_RANGE WITH KEY VNAM = 'TEST_FCE' .
*READ TABLE ZFISC with key fiscper = WA_I_T_RANGE-LOW.
IF ZFISC CA WA_I_T_RANGE-LOW.
IF sy-subrc EQ 0.
exit.
else.
CALL FUNCTION 'RRMS_MESSAGE_HANDLING'
EXPORTING
i_class = 'CD'
i_type = 'E'
i_number = '121'
i_msgv1 = 'Enter Correct value for FISCPER'
EXCEPTIONS
dummy = 0
OTHERS = 0.
RAISE no_processing.
ENDIF.
ENDIF.
Endcase.
Endif.
Please check the code and let me know if i have done any mistakes.
Regards,
smitha.

Answer 1

Have done the specified changes. The code is as follows. But it is not working.
Tables: /BIC/AZSM_DSO00.
data: begin of zfisc occurs 0,
fiscper(7),
end of zfisc.
data: text(12) type c.
text = text-001.
Data WA_I_T_RANGE like line of I_T_VAR_RANGE.
If i_step = 3.
Case i_vnam.
WHEN 'TEST_FCE'.
*SELECT FISCPER FROM /BIC/AZSM_DSO00 INTO table ZFISC where FISCPER = /BIC/AZSM_DSO00-FISCPER.
SELECT FISCPER FROM /BIC/AZSM_DSO00 INTO table ZFISC.
READ TABLE I_T_VAR_RANGE INTO WA_I_T_RANGE WITH KEY VNAM = 'TEST_FCE' .
READ TABLE ZFISC with key fiscper = WA_I_T_RANGE-LOW.
*IF ZFISC CA WA_I_T_RANGE-LOW.   commented this
IF sy-subrc EQ 0.
exit.
else.
CALL FUNCTION 'RRMS_MESSAGE_HANDLING'
EXPORTING
i_class = 'CD'
i_type = 'E'
i_number = '121'
i_msgv1 = text
EXCEPTIONS
dummy = 0
OTHERS = 0.
raise again.
RAISE no_processing.
*ENDIF.  commented this
ENDIF.
Endcase.
Endif.
The structure of table /BIC/AZSM_DSO00. It is having 96 fields. Short des is 'ODS Object ZSM_DSO : Active Records'
Regards,
smitha.