用CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY' 显示ALV报表

最新推荐文章于 2023-01-11 15:21:28 发布

Ian

最新推荐文章于 2023-01-11 15:21:28 发布

阅读量5.9k

点赞数

分类专栏： SAP ABAP

本文链接：https://blog.csdn.net/yuqinying112/article/details/8541116

版权

该博客详细介绍了如何在SAP ABAP环境中利用CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY' 函数来显示ALV报表。首先，它定义了所需的表格和数据结构，然后通过SELECT-OPTIONS获取用户输入，接着从数据库中检索数据并进行排序和过滤。数据被填充到内表中，之后调用ALV报表显示函数，最后处理用户交互，如双击事件，跳转到相应事务代码进行更详细的操作。

摘要由CSDN通过智能技术生成

REPORT  zmmr003 .

TYPE-POOLS :slis .
TABLES :mast , mara , stko , makt , afko , afpo , aufk .

DATA :stb LIKE stpox OCCURS 0 WITH HEADER LINE .

DATA : BEGIN OF matcat OCCURS 0 .
         INCLUDE STRUCTURE cscmat .
DATA : END OF matcat .

DATA : BEGIN OF mats .
         INCLUDE STRUCTURE cscmat .
DATA : END OF mats .

DATA : BEGIN OF selpool .
         INCLUDE STRUCTURE cstmat .
DATA : END OF selpool .

DATA : dstst_flg LIKE csdata -xfeld .

DATA : layout TYPE slis_layout_alv ,
      gs_layout TYPE slis_layout_alv ,
      g_repid LIKE sy -repid .

DATA : wa_alv_field TYPE slis_fieldcat_alv , "列描述内表，列清单
wa_alv_fieldcat TYPE slis_t_fieldcat_alv , "定义内表
g_user_command TYPE slis_formname VALUE 'USER_COMMAND' .

DATA : BEGIN OF wa_data ,
  werks LIKE aufk -werks ,
  aufnr LIKE afko -aufnr ,
  objnr LIKE aufk -objnr ,
  plnbez LIKE afko -plnbez ,
  gamng LIKE afko -gamng ,
   END OF wa_data .
DATA : it_data LIKE wa_data OCCURS 0 WITH HEADER LINE .

DATA : itab TYPE TABLE OF zmmsf003 WITH HEADER LINE .
DATA : it_out TYPE TABLE OF zmmsf003 WITH HEADER LINE .

DATA :it_objnr TYPE TABLE OF jest WITH HEADER LINE .

DATA : BEGIN OF wa_batch ,
  werks TYPE mchb -werks ,
  matnr TYPE mchb -matnr ,
  lgort TYPE mchb -lgort ,
  charg TYPE mchb -charg ,
  clabs TYPE mchb -clabs ,
   END OF wa_batch .
DATA : it_batch LIKE TABLE OF wa_batch WITH HEADER LINE .

SELECTION-SCREEN BEGIN OF BLOCK block1 WITH FRAME TITLE text - 001 .
SELECT-OPTIONS : s_werks FOR aufk -werks .
SELECT-OPTIONS : s_aufnr FOR afko -aufnr .
SELECT-OPTIONS :s_matnr FOR afko -plnbez .
PARAMETERS : s_auart LIKE aufk -auart .
SELECTION-SCREEN END OF BLOCK block1 .

INITIALIZATION .
  g_repid = sy -repid .

START-OF-SELECTION .
   PERFORM getdata .
   PERFORM displaydata .
   PERFORM layout_init CHANGING gs_layout .

   CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY' "调用ALV 显示表单数据
   EXPORTING
  i_callback_program = sy -repid
   "i_callback_top_of_page = 'TOP_OF_PAGE'
  it_fieldcat = wa_alv_fieldcat
  is_layout = gs_layout
  i_callback_user_command = g_user_command
   TABLES