Subroute call example from class

ztst_subroute_call

REPORT ztst_subroute_call.

CLASS lcl_class DEFINITION.
  PUBLIC SECTION.
    CLASS-METHODS:
      call_subroute.
ENDCLASS.

CLASS lcl_class IMPLEMENTATION.
  METHOD call_subroute.
    PERFORM subroute IN PROGRAM ztst_subroute_call.
  ENDMETHOD.
ENDCLASS.

FORM subroute.
  MESSAGE 'Subroute called' TYPE 'I'.
ENDFORM.

START-OF-SELECTION.
  lcl_class=>call_subroute( ).