ABAP 面向对象OO-最终类 FINAL_abap class public final c-优快云博客

本文链接：https://blog.youkuaiyun.com/weixin_44686958/article/details/144441157

文章目录

最终类
程序
执行结果
最终方法
代码
运行结果

最终类

在这里插入图片描述

程序

*&---------------------------------------------------------------------*
*& Report Z_OO_FINAL_LHY
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT Z_OO_FINAL_LHY.

"定义一个最终类
CLASS CLS DEFINITION FINAL.
  PUBLIC SECTION.
    DATA D1 TYPE I.
    METHODS M1.
ENDCLASS.

CLASS CLS IMPLEMENTATION.
  METHOD M1.
    WRITE:'最终类的普通方法'.
  ENDMETHOD.
ENDCLASS.

*CLASS SUB_CLS DEFINITION INHERITING FROM CLS.
*  PUBLIC SECTION.
*    DATA D2 TYPE I.
*ENDCLASS.

START-OF-SELECTION.
  DATA OBJ TYPE REF TO CLS.
  CREATE OBJECT OBJ.
  CALL METHOD OBJ->M1( ).

执行结果

在这里插入图片描述

最终方法

在这里插入图片描述

代码

*&---------------------------------------------------------------------*
*& Report Z_OO_FINAL_LHY
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT Z_OO_FINAL_LHY.

"定义一个最终类
CLASS CLS DEFINITION FINAL.
  PUBLIC SECTION.
    DATA D1 TYPE I.
    METHODS M1.
ENDCLASS.

CLASS CLS IMPLEMENTATION.
  METHOD M1.
    WRITE:'最终类的普通方法'.
  ENDMETHOD.
ENDCLASS.

"定义一个普通类
CLASS COMMON_CLS DEFINITION.
  PUBLIC SECTION.
    DATA D1 TYPE I.
    METHODS M1.
    METHODS M2_FIN FINAL. "最终方法
ENDCLASS.

CLASS COMMON_CLS IMPLEMENTATION.
  METHOD M1.
    WRITE:/,'普通类的普通方法'.
  ENDMETHOD.
  METHOD M2_FIN.
    WRITE:/,'普通类的最终方法'.
  ENDMETHOD.
ENDCLASS.

CLASS SUB_CLS DEFINITION INHERITING FROM COMMON_CLS.
  PUBLIC SECTION.
    DATA D2 TYPE I.
ENDCLASS.

CLASS SUB_CLS IMPLEMENTATION.

ENDCLASS.

START-OF-SELECTION.
  DATA OBJ TYPE REF TO COMMON_CLS.
  CREATE OBJECT OBJ.
  CALL METHOD OBJ->M1( ).
  CALL METHOD OBJ->M2_FIN( ).