SAPABAPOO面向对象入门实例VIP免费

1 *&---------------------------------------------------------------------* *& Report Y_TEST_A * *&---------------------------------------------------------------------* *& 简单ABAP对象 * *&---------------------------------------------------------------------* REPORT y_test_a . *&---------------------------------------------------------------------* *& Class simpleobj *&---------------------------------------------------------------------* * Text *----------------------------------------------------------------------* CLASS simpleobj DEFINITION. PUBLIC SECTION. METHODS: show_text. PRIVATE SECTION. DATA text(100) TYPE c VALUE 'This is my first ABAP object.'. ENDCLASS. "simpleobj *&---------------------------------------------------------------------* *& Class (Implementation) SIMPLEOBJ *&---------------------------------------------------------------------* * Text *----------------------------------------------------------------------* CLASS simpleobj IMPLEMENTATION. METHOD show_text. WRITE text. ENDMETHOD. "show_text ENDCLASS. "SIMPLEOBJ * Global Data Declaratioin DATA ob_app TYPE REF TO simpleobj. START-OF-SELECTION. CREATE OBJECT ob_app. CALL METHOD ob_app->show_text. 2 *&---------------------------------------------------------------------* *& Report Y_TEST_A_1 * *& * *&---------------------------------------------------------------------* *& * *& 类的静态属性 * *&---------------------------------------------------------------------* REPORT y_test_a_1 . *&---------------------------------------------------------------------* *& Class vehicle *&---------------------------------------------------------------------* * Text *----------------------------------------------------------------------* CLASS vehicle DEFINITION. PUBLIC SECTION. CLASS-DATA class_name(10) VALUE 'Vehicle'. METHODS:accelerate,show_speed. PROTECTED SECTION. DATA speed TYPE i...