abap--如何使用reuse_alv_grid_display函数删除内表数据(样例代码,感谢依风提供)

《abap--如何使用reuse_alv_grid_display函数删除内表数据(样例代码,感谢依风提供)》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、ABAP--如何使用REUSE_ALV_GRID_DISPLAY函数删除内表数据(样例代码,感谢依风提供)ABAP--如何使用REUSE_ALV_GRID_DISPLAY函数删除内表数据(样例代码，感谢依风提供)ABAP--如何使用REUSE_ALV_GRID_DISPLAY函数删除内表数据(样例代码，感谢依风提供)请注意程序中的五处红色标记的代码，其他代码请用户自己按自己的需要进行修改*&---------------------------------------------------------**&REPORTCREATETRANSFER**&--------

2、-------------------------------------------------**&Createdate:2007/06/21**&Programtype:Report**&---------------------------------------------------------**&Modifications:**&Date

3、Programmer

4、Changerequest

5、Description**&**&--------------------------------------------------------*REPORTzsdp

6、r_yfdjMESSAGE-IDzmc01NOSTANDARDPAGEHEADINGLINE-SIZE500.*************************************************************TABLES************************************************************TABLES:zadtb_yf.TYPE-POOLS:slis.*************************************************************INTERNALTABLE

7、DEFINITION************************************************************DATA:BEGINOFgs_it,lfdat(10),vbeln(50),zstation(20),ENDOFgs_it.DATA:gt_itLIKEgs_itOCCURS0WITHHEADERLINE.DATA:gt_itabLIKEzadtb_yfOCCURS0WITHHEADERLINE.DATA:BEGINOFgs_yfOCCURS0.*1内表增加一个选中字段DATA:gv_checkTYPEc.INCLUDETYPEza

8、dtb_yf.DATA:ENDOFgs_yf.DATA:gt_yfLIKEgs_yfOCCURS0WITHHEADERLINE.*************************************************************VariableDEFINITION***********************************************************DATA:gt_fieldcatTYPEslis_t_fieldcat_alvWITHHEADERLINE,gs_layoutTYPEslis_layout_alv,use

9、rcommandTYPEslis_fieldnameVALUE'USERCOMMAND',gt_sortTYPEslis_t_sortinfo_alv.DATA:prognameLIKEsy-repid,title(70).DATA:gv_cancel(1)TYPEc,gv_flagTYPEi.*************************************************************SELECTION-SCREEN************************************************************SEL

10、ECTION-SCREENBEGINOFBLOCKbl1WITHFRAMETITLEtext-bl1.SELECTION-SCREENSKIP1.SELECT-OPTIONS:so_lfdatFORzadtb_yf-lfdat,"提货日期so_vbelnFORzadtb_yf-vbeln,"销售凭证so_erdatFORzadtb_yf-erdat."录入日期SELECTION-SCREENENDOFBLOCKbl1.SELECTION-SCREENBEGINOFBLOCKbl3WITHFRAMETITLEtext-bl3.PARAMET