REPORT zso_01.
TABLES : sflight. SELECT-OPTIONS s_carrid FOR sflight-carrid NO INTERVALS. TYPE-POOLS sscr. DATA : restrict TYPE sscr_restrict. DATA : optlist TYPE sscr_opt_list, ass TYPE sscr_ass. INITIALIZATION. optlist-name = 'OBJECTKEY1'. optlist-options-eq = 'X'. * optlist-options-bt = ' '. 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_CARRID'. " name of SELECT-OPTIONS ass-sg_main = 'I'. ass-sg_addy = space. ass-op_main = 'OBJECTKEY1'. APPEND ass TO restrict-ass_tab. CALL FUNCTION 'SELECT_OPTIONS_RESTRICT' EXPORTING restriction = restrict db = ' '. |
Wednesday, January 21, 2015
ABAP Tip-Using single value in select-options
Subscribe to:
Post Comments (Atom)
No comments:
Post a Comment