perform pl_information using rs_selfield.endif.endif.endform.指令(一串密码)操作指南交互式列表 事件下列事件是 交互式列表 环境特有的 :AT LINE-SELECTIONAT PF<nn>AT USER-COMMAND如果在程序中为这些事件之一定义处理块,则程序可以对某些用户动作做出反应 。如果用户随后执行显示列表中的已定义的...
首先你要确定user_command里面的代码没有问题(包括功能吗和状态里写的能对应上,不然肯定不响应的)你会出现这样的问题 估计是新手 代码应该是COPE过来的 不会有问题 问题应该出现在状态设置中 状态的设置也很简单 就是把功能码写进去 但是一定要激活才可以(重要)如果你确认已经激活 并且user_command代码...
SELECTION-SCREENBEGINOFBLOCKBL1WITHFRAMETITLETEXT-002 . PARAMETERS :P1RADIOBUTTONGROUPB1DEFAULT'X'USER-COMMANDchg, P2RADIOBUTTONGROUPB1. SELECTION-SCREENENDOFBLOCKBL1. SELECTION-SCREENBEGINOFBLOCKB1WITHFRAMETITLETEXT-001. SELECT-OPTIONS:S_VKORGFORA611-VKORG MODIFIDADD, S_VTWEGFORA611-VTWEG MODIFI...
r_exit = ls_selfield-exit. endform. "user_command
perform user_command using l_okcode lflg_refresh lflg_exit ls_stable. if lflg_exit = 'X'. e_exit_caused_by_caller = 'X'. perform exit. else. * IF LFLG_REFRESH = 'X'. if not lflg_refresh is initial. if lflg_refresh = 'X'. ...
把AT USER-COMMAND修改为 AT SELECTION-SCREEN. 就可以了AT SELECTION-SCREEN.(说明下面的代码是PAI,可以响应屏幕事件)你还可以在最后添加初始化,让按钮显示提示文本INITIALIZATION.pubu1 = 'ABCD'.pubu2 = 'ABCE'.SELECTION-SCREEN PUSHBUTTON /1(20) PUBU1 USER-COMMAND ABCD.SELECTION-SCREEN ...
USER-COMMAND uc定义了PAI事件,如果没有该语句则点击按钮将毫无作用。 3. SELECT-OPTIONS: SELECT-OPTIONS 语句用于定义选择选项,如 s1_auart、s1_vbeln、s1_kunnr 和s1_matnr。这些选择选项用于允许用户在选择屏幕上输入多个值,以用于后续的查询。 4. AT SELECTION-SCREEN OUTPUT: 这是一个事件块,在选择屏幕输...
FORM user_command USING r_ucomm LIKE sy-ucomm rs_selfield TYPE slis_selfield. CASE r_ucomm. * WHEN '&IC1'. CASE rs_selfield-fieldname. WHEN 'ZROWTT' or 'DMBTR1' . CHECK rs_selfield-value IS NOT INITIAL. READ TABLE gt_data INDEX rs_selfield-tabindex INTO DATA(l_temp). "获取...
set_change_0150设置界面元素的显示状态。set_change_0150,此MODULE是通过对变量“data_chg_150”的赋值,设置界面元素的显示状态(X则为可更改)。items_0150_modify,此MODULE结合LOOP AT语句,调用子程序在维护订单明细数据后,更新内表数据。user_command_0150,此MODULE是对点击不同的按钮进行响应。
Handle_user_command FOR EVENT user_command OF cl_gui_alv_grid IMPORTING e_ucomm. *--热点点击控制 Handle_hotspot_click FOR EVENT hotspot_click OF cl_gui_alv_grid IMPORTING e_row_id e_column_id es_row_no. *--在用户命令触发之前 Handle_before_user_command ...