ABAP OO(三)

*&---------------------------------------------------------------------*
*& Report  ZSTUDYC03
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT  ZSTUDYC03.
*----------------------------------------------------------------------*
*       CLASS BALL DEFINITION
*----------------------------------------------------------------------*
*类方法的定义和使用
*----------------------------------------------------------------------*
CLASS BALL DEFINITION.
  PUBLIC SECTION.
    METHODS:GET_VOLUMN
    IMPORTING INT1 TYPE I INT2 TYPE I
      RETURNING VALUE(INT3) TYPE I.
ENDCLASS.                    "BALL DEFINITION
*----------------------------------------------------------------------*
*       CLASS BALL IMPLEMENTATION
*----------------------------------------------------------------------*
*
*----------------------------------------------------------------------*
CLASS BALL IMPLEMENTATION.
  METHOD GET_VOLUMN.
    INT3 = INT1 + INT2.
  ENDMETHOD.                    "GET_VOLUMN
ENDCLASS.                    "BALL IMPLEMENTATION
DATA:BALL_OBJ TYPE REF TO BALL,
      RES TYPE I.
PARAMETERS:PARA1 TYPE I.
PARAMETERS:PARA2 TYPE I.

START-OF-SELECTION.
  CREATE OBJECT BALL_OBJ.
  CALL METHOD BALL_OBJ->GET_VOLUMN
    EXPORTING
      INT1 = PARA1
      INT2 = PARA2
    RECEIVING
      INT3 = RES.
  WRITE:/ RES.
  
*  类方法的调用格式
*  CALL METHOD OBJ->MENTOD EXPORTING ...I1 = F1.. RECEIVING .. R = H .