SAp函数ALV按钮切换可编辑
时间: 2023-10-18 16:06:19 浏览: 178
在 ALV 表格中,可以使用 SAp 函数 `REUSE_ALV_GRID_DISPLAY` 来显示一个可编辑的表格。如果你想要在表格中添加一个按钮来切换编辑模式,可以使用以下步骤:
1. 定义一个带有 `USER_COMMAND` 参数的事件处理程序,用于处理按钮的点击事件。
2. 在 `REUSE_ALV_GRID_DISPLAY` 函数中设置 `I_CALLBACK_USER_COMMAND` 参数为你定义的事件处理程序。
3. 在 `FIELD_CATALOG` 表中添加一个新的字段,用于显示按钮。
4. 在 `OUTPUT` 表中设置该字段的值为一个文本或者一个图标。
5. 在 `EVENTS` 表中添加一个 `BUTTON_CLICK` 事件,将其与按钮相关联。
6. 在事件处理程序中处理 `BUTTON_CLICK` 事件,将表格的编辑模式切换为可编辑或者只读模式。
下面是一个示例代码,用于在 ALV 表格中添加一个按钮来切换编辑模式:
```
REPORT ztest.
DATA: gt_data TYPE TABLE OF mara,
gs_data LIKE LINE OF gt_data,
gt_fieldcat TYPE lvc_t_fcat,
gs_fieldcat TYPE lvc_s_fcat.
* Populate data table
SELECT * FROM mara INTO TABLE gt_data.
* Define event handler for button click event
FORM handle_user_command USING r_ucomm TYPE sy-ucomm
rs_selfield TYPE slis_selfield.
IF rs_selfield-fieldname = 'EDIT_MODE'.
IF rs_selfield-value = 'X'.
CALL METHOD cl_gui_alv_grid=>set_edit_mode
EXPORTING i_edit_mode = ' '
io_grid = rs_selfield-grid.
ELSE.
CALL METHOD cl_gui_alv_grid=>set_edit_mode
EXPORTING i_edit_mode = 'X'
io_grid = rs_selfield-grid.
ENDIF.
ENDIF.
ENDFORM.
* Define field catalog for button field
gs_fieldcat-fieldname = 'EDIT_MODE'.
gs_fieldcat-icon = '@01@'.
APPEND gs_fieldcat TO gt_fieldcat.
* Display ALV grid with button field
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
i_callback_user_command = 'HANDLE_USER_COMMAND'
TABLES
t_outtab = gt_data
t_fieldcat = gt_fieldcat.
```
在这个示例中,我们添加了一个名为 `EDIT_MODE` 的按钮字段,并将其值设置为一个图标。在事件处理程序中,我们检查该按钮是否被点击,并根据其值来切换表格的编辑模式。
阅读全文