ABAP - SALV教程 01- 开篇：打开SALV的三种方式之一

news2024/9/20 1:01:22

关于SALV，这里参考巨佬江正军的文章讲解，在做SAP开发的遇到困难和瓶颈的时候，每每读到巨佬的文章都会灵感爆发、醍醐灌顶。https://www.cnblogs.com/jiangzhengjun/p/4291387.html
博主由于是由JAVA转型的ABAP开发，刚接触ABAP的时候被ABAP简单的面向对象震惊到了，这是神马语言？入坑了吗？emmm...哈哈哈讲这些当然是因为关于SALV代码的内容，博主都采取面向对象的方式开发，面对对象的程序设计是要比面向过程的程序设计更优秀的，关于ABAP的面向对象等知识的内容，实际上网上细致的教程很少，带入门的前辈更倾向于面向过程的方式开发，因此在前期的学习的过程中有C的基础度过了入门期，又凭借JAVA的经验慢慢摸索，才算习得和使得SALV的方式，此中艰难，特此分享，望共勉之。

实例:通过CL_SALV_TABLE直接调用模式-不需要容器或创建屏幕

CLASS lcl_model DEFINITION.
  PUBLIC SECTION.
    TYPES:BEGIN OF TY_dATA,
            vbeln TYPE vbak-vbeln,
            erdat TYPE erdat,
            erzet TYPE erzet,
            ernam TYPE ernam,
            auart TYPE auart.
    TYPES:END  OF ty_data.

    DATA mt_data TYPE TABLE OF ty_data.

    DATA mo_salv TYPE REF TO cl_salv_table.

    "获取数据的方法
    METHODS get_data.
    "展示SALV的方法
    METHODS alv_show.
ENDCLASS.

CLASS lcl_model IMPLEMENTATION.
  METHOD get_data.
    SELECT vbeln erdat erzet ernam auart
      INTO TABLE mt_data
      FROM vbak
      UP TO 20 ROWS.
  ENDMETHOD.

  METHOD alv_show.
    DATA: lx_msg TYPE REF TO cx_salv_msg.
    TRY.
        cl_salv_table=>factory(
          IMPORTING
            r_salv_table = mo_salv
          CHANGING
            t_table      = mt_data ).
      CATCH cx_salv_msg INTO lx_msg.
    ENDTRY.
    mo_salv->display( ).
  ENDMETHOD.
ENDCLASS.

START-OF-SELECTION.
  DATA(lo_model) = NEW lcl_model( ).
  lo_model->get_data( ).
  lo_model->alv_show( ).

显示效果如下图所示：