REPORT Z15_014.
PARAMETERS:
p_carr_1  TYPE spfli-carrid,  
p_carr_2  TYPE spfli-carrid.
AT SELECTION-SCREEN ON VALUE-REQUEST
                                        FOR p_carr_2.
        CALL SCREEN 100 STARTING AT 10 5
                                ENDING   AT 50 10.
MODULE value_list OUTPUT.
        SUPPRESS DIALOG.
        LEAVE TO LIST-PROCESSING AND
                                RETURN TO SCREEN 0.
        SET PF-STATUS space.

        p_carr_2 = 'AK '.   WRITE: / p_carr_2  
        COLOR COL_KEY,     '아시아나 Korea'.
        HIDE p_carr_2.

        p_carr_2 = 'AD '.   WRITE: / p_carr_2
        COLOR COL_KEY,    '대한항공 Korea'.
        HIDE p_carr_2.

        p_carr_2 = 'UA '.   WRITE: / p_carr_2
        COLOR COL_KEY,       'United Airlines'.
        HIDE p_carr_2.

ENDMODULE.

AT LINE-SELECTION.
        CHECK NOT p_carr_2 IS INITIAL.   LEAVE TO SCREEN 0.