创建全局接口
创建接口
创建一个人的类
创建学生子类
测试程序
完整程序
*&---------------------------------------------------------------------*
*& Report Z_OO_INTERFACE_LHY
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT Z_OO_INTERFACE_LHY.
DATA(LO_STUDENT) = NEW Z_CL_STUDENT_LHY( ).
DATA ID TYPE I.
CALL METHOD LO_STUDENT->TEST.
CALL METHOD LO_STUDENT->Z_IF_PERSON_LHY~SET_ID
EXPORTING
IV_ID = 12.
CALL METHOD LO_STUDENT->Z_IF_PERSON_LHY~GET_ID
IMPORTING
OV_ID = ID.
WRITE:/,'id:' && ID.
运行结果
现在的程序
*&---------------------------------------------------------------------*
*& Report Z_OO_INTERFACE_LHY
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT Z_OO_INTERFACE_LHY.
DATA(LO_STUDENT) = NEW Z_CL_STUDENT_LHY( ).
DATA ID TYPE I.
CALL METHOD LO_STUDENT->TEST.
CALL METHOD LO_STUDENT->Z_IF_PERSON_LHY~SET_ID
EXPORTING
IV_ID = 12.
*CALL METHOD LO_STUDENT->Z_IF_PERSON_LHY~GET_ID
* IMPORTING
* OV_ID = ID.
"使用别名
CALL METHOD LO_STUDENT->GET_ID
IMPORTING
OV_ID = ID.
WRITE:/,'id:' && ID.
在这里插入图片描述