*&---------------------------------------------------------------------*
*& Report ZR_SELECTION
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT ZR_SELECTION.
data: wa_list TYPE spfli.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text - 001.
PARAMETERS pa_car type spfli- carrid.
SELECT-OPTIONS so_con FOR wa_list- connid.
SELECTION-SCREEN END OF BLOCK b1.
INITIALIZATION.
pa_car = 'AA'.
so_con- sign = 'I'.
so_con- option = 'BT'.
so_con- low = '0017'.
so_con- high = '0064'.
APPEND so_con.
AT SELECTION-SCREEN OUTPUT.
loop AT SCREEN.
IF screen - name = 'PA_CAR'.
screen - input = '0'.
screen - active = '0'.
MODIFY SCREEN.
ENDIF.
ENDLOOP.
AT SELECTION-SCREEN.
IF pa_car = 'JL'.
* MESSAGE e016(pn) WITH pa_car '검색불가' '다른값을 입력하세요' '안되' .
MESSAGE i016( pn) WITH pa_car 'not Search'.
* STOP.
ENDIF.
START-OF-SELECTION.
WRITE : / pa_car.