INTERFACE WITH ALIASES IN OOPS

INTERFACE inter1.
  METHODs:show.
  ENDINTERFACE.


INTERFACE inter2.
  INTERFACEs:inter1.
   ALIASES show3 for inter1~SHOW.

  ENDINTERFACE.


class cls DEFINITION.
  PUBLIC SECTION.
  INTERFACEs: inter2.
   ALIASES: show1 FOR inter1~show,
            show2 for inter1~show,
            I_SHOW3 FOR INTER2~SHOW3.
  ENDCLASS.

  class cls IMPLEMENTATION.
 
   METHOD : inter1~show.

     write:/ ' the method use for aliase'.
     ENDMETHOD.
*        METHOD :inter2~show1.
*
*     write:/ ' the method use for aliase'.
*     ENDMETHOD.
   ENDCLASS.

 START-OF-SELECTION.
   DATA: in TYPE REF TO cls.
   CREATE OBJECT in.
   CALL METHOD : in->show1,
                 in->show2,
                 IN->I_show3.