Restricting select-options

Former Member — Wed, 27 Oct 2004 04:52:18 GMT

Hi,

I came across this piece of code in ABAP FAQ. It is supposed to restrict the select-options so that the user can enter only specific options like only intervals or single values or patterns etc. But for some reason its not working for me. I am using SAP 4.7.

Any pointers will be greatly appreciated.

Restricting the selection screen

REPORT ZDANY_RESTRICT_SELECTION.

Include type pool SSCR

TYPE-POOLS sscr.

TABLES : sflight.

defining the selection-screen

select-options :

s_carrid for sflight-carrid,

s_connid for sflight-connid.

Define the object to be passed to the RESTRICTION parameter

DATA restrict TYPE sscr_restrict.

Auxiliary objects for filling RESTRICT

DATA : optlist TYPE sscr_opt_list,

ass type sscr_ass.

INITIALIZATION.

Restricting the carrid selection to only EQ and 'BT'.

optlist-name = 'OBJECTKEY1'.

optlist-options-eq = 'X'.

optlist-options-bt = 'X'.

APPEND optlist TO restrict-opt_list_tab.

ass-kind = 'S'.

ass-name = 'S_carrid'.

ass-sg_main = 'I'.

ass-sg_addy = space.

ass-op_main = 'OBJECTKEY1'.

APPEND ass TO restrict-ass_tab.

Restricting the connid selection to CP, GE, LT, NE.

optlist-name = 'OBJECTKEY2'.

optlist-options-cp = 'X'.

optlist-options-ge = 'X'.

optlist-options-lt = 'X'.

optlist-options-ne = 'X'.

APPEND optlist TO restrict-opt_list_tab.

ass-kind = 'S'.

ass-name = 'S_connid'.

ass-sg_main = 'I'.

ass-sg_addy = space.

ass-op_main = 'OBJECTKEY2'.

APPEND ass TO restrict-ass_tab.

CALL FUNCTION 'SELECT_OPTIONS_RESTRICT'

EXPORTING

restriction = restrict

EXCEPTIONS

TOO_LATE = 1

REPEATED = 2

SELOPT_WITHOUT_OPTIONS = 3

SELOPT_WITHOUT_SIGNS = 4

INVALID_SIGN = 5

EMPTY_OPTION_LIST = 6

INVALID_KIND = 7

REPEATED_KIND_A = 8

OTHERS = 9.

IF sy-subrc <> 0.

MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

Regards,

Sudeep

Re: Restricting select-options

Former Member — Wed, 27 Oct 2004 07:12:55 GMT

Hi Sudeep,

please correct the code as follows:

ass-name = 'S_CARRID'. => always upper case

ass-name = 'S_CONNID'. => always upper case

cheers

Olaf

Re: Restricting select-options

ssimsekler — Wed, 27 Oct 2004 10:12:48 GMT

Olaf's solution should be OK. Always use uppercase for this kind of variable values. I guess you've already seen, but the FM has a documentation if you need more information on it.

*--Serdar

topic Re: Restricting select-options in Application Development and Automation Discussions

Restricting select-options

Re: Restricting select-options

Re: Restricting select-options