ABAP-AVL-OO方法中的ALV的如何自己添加按钮及其响应

*publicattributesandmethodPUBLICSECTION.METHODS:handle_toolbarFOREVENTtoolbarOFcl_gui_alv_gridIMPORTINGe_object,handle_user_commandFOREVENTuser_commandOFcl_gui_alv_gridIMPORTINGe_ucomm,ENDCLASS."lcl_event_receiverDEFINITION注意这个事件处理类中添加了两个方法，第一个方法负责往工具栏上添加按钮，第二个方法用来响应工具栏上按钮的动作步骤二：类的实现CLASSlcl_event_receiverIMPLEMENTATION.*methodtoolbarhandlerMETHODhandle_toolbar.PERFORMset_toolbarCHANGINGe_object.ENDMETHOD."handle_toolbarMETHODhandle_user_command.*HandleownfunctionsdefinedinthetoolbarCASEe_ucomm.WHEN'ADD'.PERFORMxyz. “这里你想干嘛就可以干嘛ENDCASE.ENDMETHOD."handle_user_commandENDCLASS."lcl_event_receiverIMPLEMENTATION步骤三：在FORM-----set_toolbar中添加buttonFORMset_toolbarCHANGINGprf_objectTYPEREFTOcl_alv_event_toolbar_set.CLEARprf_object-mt_toolbar.CLEARgs_toolbar.MOVE'ADD'TOgs_toolbar-function.MOVETOgs_toolbar-quickinfo.MOVETOgs_toolbar-text.MOVE''TOgs_toolbar-disabled.INSERTgs_toolbarINTOprf_object-mt_toolbarINDEX1.ENDFORM."set_toolbar1步骤四：创建事件处理对象--这一步一般在

初始屏幕 加一个栏位以及一个按钮

当按按钮，把栏位的数据提交，

主屏幕PAI Select * into * form * 把得到的数据放入子屏幕的table裏面

子屏幕裏面加个表格控制，表格控制设置可以单项选择。

你把SET PF-STATUS '0200' EXCLUDING RT_EXTAB.

改成SET PF-STATUS '0200' 这个看看,

如果还不行

CASE R_UCOMM改成 CASE SY-UCOMM

如果还不行

FUNCTION 'REUSE_ALV_GRID_DISPLAY'多开2个参数再看看

i_save = 'X'

i_callback_program = sy-repid

---