ALV 数据比较和显示

这个任务要求首先比较两个表格的数据，然后将不同的数据项列在最终的ALV中，并显示。

* ---------------------------------------------------------------------------
*  比较两个表格中的行数 sy-dbcnt 是否相等。
* ---------------------------------------------------------------------------
PERFORM. check_item_vergleichen.

* ---------------------------------------------------------------------------
*  比较表格之间的value是否相同，将不同的value 放入ALV
*  不同的字段涂黄色，value值为文本，不显示SID.
* ---------------------------------------------------------------------------
PERFORM data_retrieval.

FORM  data_retrieval.
* get short description of Domain.
CALL FUNCTION 'DDIF_DOMA_GET'.
* 如果值不相等
* 将行值pack into it_view, it_view 将在 FORM display_alv_report 载入 ALV
ENDFORM  data_retrieval.

* ---------------------------------------------------------------------------
*  添加ALV 表格的列项
* ---------------------------------------------------------------------------
PERFORM  build_fieldcatalog.

DATA: fieldcatalog TYPE slis_t_fieldcat_alv WITH HEADER LINE.
FORM build_fieldcatalog.
   fieldcatalog-fieldname = ' '.
   fieldcatalog-seltext_m =
   fieldcatalog-col_pos =
   fieldcatalog-outputlen =
   fieldcatalog-key =
   APPEND  fieldcatalog TO fieldcatalog.
   CLEAR  fieldcatalog.
ENDFORM build_fieldcatalog.

* ---------------------------------------------------------------------------
*  ALV 结构
* ---------------------------------------------------------------------------
PERFORM  build_layout.

* ---------------------------------------------------------------------------
*  显示ALV
* ---------------------------------------------------------------------------
PERFORM   display_alv_report.

FORM display_alv_report.
  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
        EXPORTING
             i_callback_program =
             i_callback_top_of_page =
             i_callback_user_command =
             is_layout =
             it_fieldcat =
             i_save =
        TABLES
             t_outtab =
         EXCEPTIONS
             programm_error = 1
              OTHERS = 2.
ENDFORM display_alv_report.

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/23541073/viewspace-686854/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/23541073/viewspace-686854/