7) How To Design Selection Screen (ABAP)
7) How To Design Selection Screen (ABAP)
Syntax:
PARAMETERS <P_NAME> TYPE <TABLE-FIELD> OBLIGATORY. "Parameter for mandatory input field
Example:
PARAMETERS: P_MATNR TYPE MARA-MATNR OBLIGATORY.
Syntax:
PARAMETERS <P_NAME> AS CHECKBOX. "Parameter for check box printing
Example:
PARAMETERS: P_CHK AS CHECKBOX.
Syntax:
PARAMETERS <P_NAME1> RADIOBUTTONGROUP <RADIOBUTTON GROUP1>. "Print Radio button group
PARAMETERS <P_NAME2> RADIOBUTTONGROUP <RADIOBUTTON GROUP1>. "Print Radio button group
PARAMETERS <P_NAME3> RADIOBUTTONGROUP <RADIOBUTTON GROUP1>. "Print Radio button group
Example:
PARAMETERS: P_RADIO1 RADIOBUTTON GROUP RG1.
PARAMETERS: P_RADIO2 RADIOBUTTON GROUP RG1.
PARAMETERS: P_RADIO3 RADIOBUTTON GROUP RG1.
B. Select-Options design
TABLES: MARA.
"Specify table for which you are creating select-options
TABLES: MARA.
"Specify table for which you are creating select-options
SELECT-OPTIONS S_MATNR FOR MARA-MATNR NO INTERVALS.
"Print select-options on screen
The above statement prints a select-option with no intervals.
\
TABLES: MARA.
"Specify table for which you are creating select-options
SELECT-OPTIONS S_MATNR FOR MARA-MATNR NO-EXTENSIONS.
"Print select-options on screen
The above statement prints a select-option without extension.
TABLES: MARA.
"Specify table for which you are creating select-options
Select-options: s_matnr for mara-matnr no-extension no intervals.
"Print select-options on screen
The above statement prints a select-option without intervals and without extensions.
TYPE-POOLS: VRM. "Use type group VRM(Value Request Manager) for list
DATA: IT_LIST TYPE VRM_VALUES.
DATA: WA_LIST TYPE VRM_VALUE.
DATA: IT_VALUES TYPE TABLE OF DYNPREAD,
WA_VALUES TYPE DYNPREAD.
DATA: LV_SELECTED_VALUE(10) TYPE C.
*--------------------------------------------------------------*
*Selection-Screen
*--------------------------------------------------------------*
PARAMETERS: COLORS TYPE C AS LISTBOX VISIBLE LENGTH 20. "Parameter
*--------------------------------------------------------------*
*Initialization
*--------------------------------------------------------------*
INITIALIZATION."Initialize values to drop down list
WA_LIST-KEY = '1'.
WA_LIST-TEXT = 'Green'.
APPEND WA_LIST TO IT_LIST.
WA_LIST-KEY = '2'.
WA_LIST-TEXT = 'Blue'.
APPEND WA_LIST TO IT_LIST.
WA_LIST-KEY = '3'.
WA_LIST-TEXT = 'Orange'.
APPEND WA_LIST TO IT_LIST.
WA_LIST-KEY = '4'.
WA_LIST-TEXT = 'Gray'.
APPEND WA_LIST TO IT_LIST.
WA_LIST-KEY = '5'.
WA_LIST-TEXT = 'White'.
APPEND WA_LIST TO IT_LIST.
WA_LIST-KEY = '6'.
WA_LIST-TEXT = 'Yellow'.
APPEND WA_LIST TO IT_LIST.
CALL FUNCTION 'VRM_SET_VALUES' "Value Request Manager Function Module
EXPORTING
ID
= 'COLORS'
VALUES
= IT_LIST
EXCEPTIONS
ID_ILLEGAL_NAME = 1
OTHERS
= 2.
*--------------------------------------------------------------*
*At Selection Screen
*--------------------------------------------------------------*
AT SELECTION-SCREEN ON COLORS.
CLEAR: WA_VALUES,
IT_VALUES.
REFRESH IT_VALUES.
WA_VALUES-FIELDNAME = 'COLORS'.
APPEND WA_VALUES TO IT_VALUES.
CALL FUNCTION 'DYNP_VALUES_READ' "Read screen field values before PAI field transport
EXPORTING
DYNAME
= SY-CPROG
DYNUMB
= SY-DYNNR
TRANSLATE_TO_UPPER = 'X'
TABLES
DYNPFIELDS
= IT_VALUES.
NOTE: In the same way you can replace radio button text, selection-options text,
Parameters text etc.