ABAP OO

SE38 创建类

 

REPORT yshikm_test03.


CLASS lcl_main DEFINITION CREATE PRIVATE.

  PUBLIC SECTION.
    METHODS: run.
    CLASS-METHODS create
      RETURNING
        VALUE(r_result) TYPE REF TO lcl_main.
  PROTECTED SECTION.
  PRIVATE SECTION.

ENDCLASS.

CLASS lcl_main IMPLEMENTATION.

  METHOD create.
    CREATE OBJECT r_result.
  ENDMETHOD.

  METHOD run.

    cl_salv_gui_table_ida=>create_for_cds_view( 'YCDS_SKM_001' )->fullscreen( )->display( ).

  ENDMETHOD.

ENDCLASS.

START-OF-SELECTION.
  lcl_main=>create( )->run(  ).