Static

*&---------------------------------------------------------------------*
*& Report ZMENG_OBJECT3
*&---------------------------------------------------------------------*
*& /sap_abap/sap_abap_classes.html
*&---------------------------------------------------------------------*
REPORT zmeng_03_static.


CLASS class1 DEFINITION.
   PUBLIC SECTION.
      "静态属性用语句CLASS-DATA声明。
      "所有对象或实例都可以使用类的静态属性。
      CLASS-DATA: name1 TYPE char45,
                  data1 TYPE i.
   METHODS: meth1.
ENDCLASS.

CLASS class1 IMPLEMENTATION.
   METHOD meth1.
      DO 4 TIMES.
         data1 = 1 + data1.
         WRITE: / data1, name1.
      ENDDO.
      SKIP.
   ENDMETHOD.
ENDCLASS.

START-OF-SELECTION.
   class1=>name1 = 'ABAP Object Oriented Programming'.
   class1=>data1 = 0.

   DATA: object1 TYPE REF TO class1,
         object2 TYPE REF TO class1.

   CREATE OBJECT: object1,
                  object2.

   CALL METHOD: object1->meth1,
                object2->meth1.