提问
ABAP Development ABAP Development

如何在ALV程序中添加下一个按钮？

2020-09-21 14:03发布

站内问答 / ABAP
1857 2 4

点击此处---> 群内免费提供SAP练习系统（在群公告中）加入QQ群：457200227（SAP S4 HANA技术交流） 群内免费提供SAP练习系统（在群公告中）嗨，我是SAP的初学者。 我创建...

         点击此处--->   EasySAP.com群内免费提供SAP练习系统（在群公告中）

加入QQ群：457200227（SAP S4 HANA技术交流） 群内免费提供SAP练习系统（在群公告中）


嗨，我是SAP的初学者。 我创建了ALV程序来显示10行的but000表的详细信息。 现在它的工作，但我想在单击它时添加[next]按钮，然后应该在屏幕上显示下10条记录作为输出？

我使用了此程序代码：-

TYPE-POOLS：slis。 " SLIS包含所有ALV数据类型

*＆---------------------------------- ----------------------------------- *
*＆数据声明
*＆- -------------------------------------------------- ----------------- *
数据：but000的it_but000类型表。
数据：it_fieldcat类型slis_t_fieldcat_alv，
wa_fieldcat类型slis_fieldcat_alv。
*＆ -------------------------------------------------- ------------------- *
*＆开始选择
*＆--------------- -------------------------------------------------- ---- *
开始选择。

*从数据库中获取数据
SELECT *从BUT000到表it_but000最多10行。

*构建字段 catalog
wa_fieldcat-fieldname ='TYPE'。"数据表中的字段名
wa_fieldcat-seltext_m ='BU_TYPE'。 "输出中的列描述
APPEND wa_fieldcat到it_fieldcat。

wa_fieldcat-fieldname ='PARTNER'。
wa_fieldcat-seltext_m ='BU_PARTNER。'。
APPEND wa_fieldcat到it_fieldcat。
>
wa_fieldcat-fieldname ='BU_GROUP'。
wa_fieldcat-seltext_m ='BU_GROUP'。
将wa_fieldcat添加到it_fieldcat。

wa_fieldcat-fieldname ='NAME_FIRST'。
wa_fieldcat- seltext_m ='BU_NAMEP_F'。
APPEND wa_fieldcat到it_fieldcat。

wa_fieldcat-fieldname ='NAME_LAST'。
wa_fieldcat-seltext_m ='BU_NAMEP_L'。
APPEND WA_fieldcat到它_fieldcat。

*将数据和字段目录传递到ALV功能模块以显示ALV列表 br> program_error = 1

OTHERS = 2。

我也点击了此链接的下一个按钮。 但是没有得到

https://blogs.sap.com/2014/06/26/how-to-activate-next-page-last-page-buttons-in-alv-reports /

2条回答
hongfeng1314
2020-09-21 15:01 .采纳回答

HI。

有一个简单的示例，如何将自己的GUI状态添加到ALV并处理用户命令。

通话功能'REUSE_ALV_GRID_DISPLAY'
     出口
       i_callback_program = sy-repid"当前程序的名称
       i_callback_pf_status_set ='SET_PF_STATUS'
       i_callback_user_command ='USER_COMMAND'
       it_fieldcat = it_fieldcat
     桌子
       t_outtab = it_but000
     例外情况
       程序错误= 1
       其他= 2。
   如果sy-subrc <> 0。
 *在这里实施适当的错误处理
   万一。

 表格set_pf_status
   使用ut_extab类型slis_t_extab。
   SET PF-STATUS'XYZ'" XYZ-GUI状态名称（将GUI状态创建/复制到您的程序！）
     不包含ut_extab。
 ENDFORM。

 FORM user_command
   使用uv_ucomm像sy-ucomm
         us_selfield TYPE slis_selfield。
   案例uv_ucomm。
     当'＆NEXT'。  "功能码
       去做。  "将用于选择下10条记录的代码写入it_but000
       us_selfield-refresh = abap_true。
   结束。
 ENDFORM。

JG

一周热门 更多>