*&---------------------------------------------------------------------*
*& Report ZTEST_ABAP_20
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT ZTEST_ABAP_20.
TABLES: sflight.
CALL SCREEN 123
STARTING AT 10 10
ENDING AT 80 10.
SELECTION-SCREEN BEGIN OF SCREEN 123 AS WINDOW TITLE text-a01.
PARAMETERS: matnr LIKE mara-matnr.
PARAMETERS: type AS CHECKBOX.
SELECTION-SCREEN end of screen 123.
SELECTION-SCREEN BEGIN OF BLOCK carr WITH FRAME TITLE text-001.
SELECT-OPTIONS: so_carr FOR sflight-carrid,
so_fldt FOR sflight-fldate.
SELECTION-SCREEN END OF BLOCK carr.
SELECTION-SCREEN BEGIN OF BLOCK limit WITH FRAME TITLE text-002.
PARAMETERS: pa_oarr LIKE sflight-carrid,
pa_name AS CHECKBOX DEFAULT 'X',
pa_curr AS CHECKBOX DEFAULT 'X',
pa_lim1 RADIOBUTTON GROUP lim,
pa_lim2 RADIOBUTTON GROUP lim,
pa_lim3 RADIOBUTTON GROUP lim.
SELECTION-SCREEN END OF BLOCK limit.