CLASS lcl_airplane DEFINITION.

  PUBLIC SECTION.
    METHODS: attribute_setzen IMPORTING
               im_name TYPE string
               im_planetype TYPE string,
             attribute_anzeigen.

  PRIVATE SECTION.
    DATA: name TYPE string,
          planetype TYPE string.

ENDCLASS.

CLASS lcl_airplane IMPLEMENTATION.

  METHOD attribute_setzen.
    name = im_name.
    planetype = im_planetype.
  ENDMETHOD.

  METHOD attribute_anzeigen.
    WRITE: / 'Name des Flugzeugs: ', name,
           / 'Typ des Flugzeugs: ', planetype.
  ENDMETHOD.
 
ENDCLASS.