REPORT  Z17_014.
CLASS vehicle DEFINITION .
PUBLIC SECTION.
        METHODS: create.
ENDCLASS.
* Class IMPLEMENTATIONs
CLASS vehicle IMPLEMENTATION.
        METHOD create.
                WRITE: / '슈퍼클래스의 오리지널 메소드'.
        ENDMETHOD.
ENDCLASS.

CLASS plane DEFINITION INHERITING FROM vehicle.
        PUBLIC SECTION.
                METHODS: create REDEFINITION.
ENDCLASS.

CLASS plane IMPLEMENTATION.
        METHOD create.
                CALL METHOD super->create.
                WRITE: / '서브클래스의 재정의된 메소드'.
        ENDMETHOD.
ENDCLASS.

* Global DATA
DATA : plane_ref type ref to plane.

* Classical Processing Blocks
START-OF-SELECTION.
        CREATE OBJECT: plane_ref.


        CALL METHOD: plane_ref->create.