ABAP DIALOG ALV

1.子屏幕代码

  IF GR_ALVGRID IS INITIAL.GT_FIELDCAT = VALUE #( ( FIELDNAME = 'EBELN'  COLTEXT = '采购凭证' )( FIELDNAME = 'EBELP'  COLTEXT = '行项目' )( FIELDNAME = 'MATNR'  COLTEXT = '物料号' )( FIELDNAME = 'WERKS'  COLTEXT = '工厂' )( FIELDNAME = 'LGORT'  COLTEXT = '仓库' )( FIELDNAME = 'MENGE'  COLTEXT = '数量' )).GS_LAYOUT-ZEBRA = 'X' .GS_LAYOUT-GRID_TITLE = '采购信息' .
*    GS_LAYOUT-SMALLTITLE = 'X' .
*    GS_LAYOUT-NO_TOOLBAR = ' '.GS_LAYOUT-CWIDTH_OPT = 'X'.CREATE OBJECT ALV_CUSTOM_CONTAINER1EXPORTINGCONTAINER_NAME = 'CONTAINER1'.   "屏幕容器名称CREATE OBJECT GR_ALVGRIDEXPORTINGI_PARENT      = ALV_CUSTOM_CONTAINER1I_APPL_EVENTS = 'X'.CONCATENATE SY-REPID SY-DYNNR 'U' INTO GS_VARIANT-REPORT.*    CREATE OBJECT event_receiver.
*
*    SET HANDLER event_receiver->HANDLE_TOOLBAR FOR GR_ALVGRID.CALL METHOD GR_ALVGRID->SET_TABLE_FOR_FIRST_DISPLAYEXPORTINGI_BYPASSING_BUFFER   = 'X'I_BUFFER_ACTIVE      = ''IS_LAYOUT            = GS_LAYOUT   "样式设定IT_TOOLBAR_EXCLUDING = GT_EXCLUDE  "排除现有功能码I_SAVE               = 'A'IS_VARIANT           = GS_VARIANTCHANGINGIT_OUTTAB            = GT_EKPO[]IT_FIELDCATALOG      = GT_FIELDCAT[].SET HANDLER LCL_EVENT_RECEIVER=>HANDLE_TOOLBAR FOR GR_ALVGRID.SET HANDLER LCL_EVENT_RECEIVER=>HANDLE_USER_COMMAND FOR GR_ALVGRID.SET HANDLER LCL_EVENT_RECEIVER=>handle_double_click FOR GR_ALVGRID.CALL METHOD GR_ALVGRID->SET_TOOLBAR_INTERACTIVE.ELSE.CALL METHOD GR_ALVGRID->REFRESH_TABLE_DISPLAY.ENDIF.

追加按钮类

DATA:ALV_CUSTOM_CONTAINER1 TYPE REF TO CL_GUI_CUSTOM_CONTAINER, "ALV对象GR_ALVGRID           TYPE REF TO CL_GUI_ALV_GRID, "ALV对象GS_VARIANT            TYPE DISVARIANT,GT_FIELDCAT          TYPE LVC_T_FCAT,GS_LAYOUT            TYPE LVC_S_LAYO,GT_EXCLUDE            TYPE UI_FUNCTIONS . "存放排除按钮的内表*定义ALV自定义控件
CLASS LCL_EVENT_RECEIVER DEFINITION DEFERRED.DATA:event_receiver TYPE REF TO LCL_EVENT_RECEIVER.CLASS LCL_EVENT_RECEIVER DEFINITION.PUBLIC SECTION.CLASS-METHODS HANDLE_TOOLBAR FOR EVENT TOOLBAR OF CL_GUI_ALV_GRIDIMPORTING E_OBJECT E_INTERACTIVE.CLASS-METHODS:handle_double_click FOR EVENT double_click OF cl_gui_alv_gridIMPORTING e_row e_column,HANDLE_USER_COMMAND FOR EVENT user_commANd of cl_gui_alv_gridIMPORTING E_UCOMM,HANDLE_DATA_CHANGE FOR EVENT DATA_CHANGED OF CL_GUI_ALV_GRIDIMPORTING ER_DATA_CHANGED E_UCOMM.ENDCLASS.CLASS LCL_EVENT_RECEIVER IMPLEMENTATION.METHOD HANDLE_TOOLBAR.DATA:LS_TOOLBAR TYPE STB_BUTTON,LS_BTNMNU  TYPE STB_BTNMNU.LS_TOOLBAR-FUNCTION = 'SELE'.LS_TOOLBAR-ICON = '@DH@'.LS_TOOLBAR-QUICKINFO = '日志记录'.LS_TOOLBAR-DISABLED = ''.LS_TOOLBAR-TEXT = '日志记录'.APPEND LS_TOOLBAR TO E_OBJECT->MT_TOOLBAR.*    LS_BTNMNU-FUNCTION = 'SELE'.
*
*    APPEND LS_BTNMNU TO E_OBJECT->MT_BTNMNU.ENDMETHOD.METHOD handle_double_click.PERFORM handle_double_click USING e_row e_column.ENDMETHOD.                    "handle_double_clickMETHOD HANDLE_USER_COMMAND.PERFORM FRM_ALV_USER_COMMAND USING E_UCOMM.ENDMETHOD.ENDCLASS.

ABAP DIALOG ALV相关推荐

ABAP - OO ALV基本实现步骤
ABAP - OO ALV基本实现步骤新建程序定义屏幕 PBO实现 PAI实现完整代码新建程序使用T-code:SE38 新建Report: ZOOALV 为新建的Report分配一个pac ...
ABAP学习----ALV注意事项
2018年/8月/1日. 到今天为止,学习ABAP大概快一个月了,我知道一个月,对于任何一门计算机语言来说,都只能说才了解,更何况是在自学,没有视频的情况下.ABAP语言相对其他语言来说,较为封闭,因 ...
abap开发alv篇
abap 报表开发之alv(刚接触abap,所以用到的都是最基本的配置): 在start-of-selection中调用了两个函数: start-of-selection. perform frm_d ...
【ABAP】ALV可编辑数据更新
这两天收到用户的一个关于ALV Report的问题反馈,具体是这样的,该ALV是可编辑的,可进行增加.删除.复制及编辑功能,用户删除了几行数据之后直接点击保存按钮,保存完成之后,被删除的几行又还原出来 ...
ABAP在ALV工具栏显示一个计时器
其实就是调用一个类,刷新不断ALV界面,下面是来自Sariel的一段代码: *&-------------------------------------------------------- ...
ABAP 关于ALV布局保存选项的讲解
关于ALV布局保存选项: 1:I_SAVE = SPACE. 布局不能被保存 2:I_SAVE = 'U'. 仅自定义的布局可以被保存 3:I_SAVE = 'X'. ...
ABAP：ALV中自定义搜索帮助
如果希望ALV中某字段具有搜索帮助,第一种办法当然是对表中某字段的引用,设置ref_table.ref_field,将自动触发该字段所带的搜索帮助. 可不可以直接设置Searh Help呢?应该不可以 ...
【SAP】ABAP开发——ALV展示后字段的下划线连接
在ALV展示后,在很多情况下需要根据字段进一步展开内容,如点击金额展开科目明细,点击采购订单号进入该采购订单,根据销售订单号进入该销售订单等...... 点击字段的下划线进入下一步,在USER_COM ...
ABAP 设置ALV复选框
ALV有两种写法,一种是FUCTION(FM),另一种就是OOALV DATA BEGIN OF gs_data,sel,gjahr TYPE acdoca-gjahr, "年度poper ...

ABAP DIALOG ALV

ABAP DIALOG ALV相关推荐

最新文章

热门文章