class oop
*&---------------------------------------------------------------------*
*& Report ZJHSOFTECH*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT zjhsoftech.
CLASS c1 DEFINITION.
PUBLIC SECTION.
DATA: a(10) TYPE n VALUE 10,
b(10) TYPE n VALUE 20,
c(10) TYPE n.
METHODS m1.
ENDCLASS.
CLASS c1 IMPLEMENTATION.
METHOD m1.
c = a + b.
WRITE: 'i am method in c1 class', c.
ENDMETHOD.
ENDCLASS.
DATA: obj1 TYPE REF TO c1.
START-OF-SELECTION.
CREATE OBJECT obj1.
CALL METHOD obj1->m1.
Comments
Post a Comment