*&---------------------------------------------------------------------*
*& Report ZTEST_ABAP_10
*&
*&---------------------------------------------------------------------*
*&构造方法测试程序
*&
*&---------------------------------------------------------------------*
REPORT ZTEST_ABAP_10.
CLASS CALLDEF DEFINITION.
PUBLIC SECTION.
METHODS CONSTRUCTOR. "定义构造方法
PRIVATE SECTION.
DATA: OUTPARA TYPE STRING.
ENDCLASS.
CLASS CALLDEF IMPLEMENTATION.
METHOD CONSTRUCTOR. "定义执行构造方法
OUTPARA = 'EXECUTE SAP CONSTRACTOR.'.
WRITE: / OUTPARA.
ENDMETHOD.
ENDCLASS.
DATA: calldef TYPE REF TO CALLDEF.
START-OF-SELECTION.
CREATE OBJECT calldef.