Code: Alles auswählen.
CLASS: lcl_message DEFINITION DEFERRED.
DATA: go_mes TYPE REF TO lcl_message.
Code: Alles auswählen.
CLASS lcl_message DEFINITION.
PUBLIC SECTION.
METHODS show_message.
ENDCLASS. "LCL_MESSAGE
Code: Alles auswählen.
CLASS lcl_message IMPLEMENTATION.
METHOD show_message.
CREATE OBJECT go_mes.
IF gv_ebeln IS NOT INITIAL.
SHIFT gv_ebeln BY 1 PLACES LEFT.
MESSAGE i017(06) WITH text-006 gv_ebeln.
ENDIF.
IF gv_nast IS NOT INITIAL.
SHIFT gv_nast BY 1 PLACES LEFT.
MESSAGE i900(06) WITH gv_nast.
ENDIF.
ENDMETHOD. "show_message
ENDCLASS. "LCL_MESSAGE
Code: Alles auswählen.
CALL METHOD go_mes->show_message.
Code: Alles auswählen.
CLASS: lcl_message DEFINITION DEFERRED.
DATA: go_mes TYPE REF TO lcl_message.
CLASS lcl_message DEFINITION.
PUBLIC SECTION.
METHODS show_message.
ENDCLASS. "LCL_MESSAGE
CLASS lcl_message IMPLEMENTATION.
METHOD show_message.
MESSAGE i000(oo) WITH 'HALLO'.
ENDMETHOD. "show_message
ENDCLASS. "LCL_MESSAGE
START-OF-SELECTION.
*create object go_mes.
CREATE OBJECT go_mes.
CALL METHOD go_mes->show_message.
daran lags. Ich hab die Instanzerzeugung in der Klassenimplementierung gemachtewx hat geschrieben:Die Instanzerzeugung muss ausserhalb deiner Klasse erfolgen (CREATE OBJECT go_mes).