记录一个关于自开发屏幕中的先激活不显示screen-active=0 ,再激活显示时(screen-active=1),屏幕字段不显示的问题。 实现效果 问题解决是因为再 MODIFY SCREEN 语句时,更新active 属性时联动改变了 input output invisible 这三的属性 后续更新显示时,需修正该属性即可实现 参考代码 REPORT zlan_test5. INCLUDE zlan...
IFp_rd2='X'AND screen-group1='MXY'. "显示 screen-active='1'. * screen-input= '1'."显示前设为可输入 screen-required='2'."外观上打钩,但不自动校验 MODIFY SCREEN. ELSEIF screen-group1='MXY'." "隐藏 screen-active='0'. screen-required='2'. MODIFY SCREEN. ENDIF. ENDLOOP. AT SELE...
LOOP AT SCREEN. IF screen-name = `USER_ROLE` AND gv_user_role <> `ADMIN`. screen-active = 0. " 隐藏用户角色字段 ELSE. screen-active = 1. " 显示用户角色字段 ENDIF. MODIFY SCREEN. ENDLOOP. ENDMODULE. 在上述代码片段中,gv_user_role 是一个全局变量,用于存储当前用户的角色。在 PBO 阶段...
PARAMETERS : 字段 TYPE 参考数据元素 MODIF ID 分组 . select-option : 字段 for 参考数据元素 modif id 分组 . at SELECTION-SCREEN OUTPUT . loop as screen . CASE 'X'. WHEN 分类1. IF screen-group1 EQ '分组1'. screen-invisible = '1'. screen-active = '0'. ELSE. screen-invisible = '0...
screen-active = '0'. WHEN 'SC3'. screen-active = '1'. ENDCASE. MODIFY SCREEN. CONTINUE. ENDIF. ENDLOOP. 实现效果: 使用用户命令事件at user-command 按钮以及许多其他事件驱动的选择屏幕选项在维护用户交互和验证用户输入方面非常有用。在下一节中,您将探讨如何使用按钮调用at user-command事件,并查看...
ID ty2.AT SELECTION-SCREEN OUTPUT.LOOP AT SCREEN.CASE screen-group1.WHEN 'TY1'.IF p1 IS INITIAL.screen-active = '0'.ELSE.screen-active = '1'.ENDIF.WHEN 'TY2'.IF p2 IS INITIAL.screen-active = '0'.ELSE.screen-active = '1'.ENDIF.ENDCASE.MODIFY SCREEN.ENDLOOP.AT SELECTION-SCREEN...
通过LOOP AT SCREEN循环遍历选择屏幕上的所有屏幕元素。 CASE screen-group1用于检查屏幕元素所属的组。这里有两个组:TY1和TY2。 对于TY1组,如果P1单选按钮被选中(P1 = 'X'),则禁用相关的屏幕元素(screen-active = '0'),否则启用它们(screen-active = '1')。
ABAP 一个隐藏 selection-screen block的实例 以下是一个演示如何通过 selection-screen 中的pushbutton来动态改变屏幕上的字段的显示状态的(即显示或者隐藏)。 注意:显示通过本示例可知selection-screen 中的 field 的显示状态都是的,在程序中修改其属性 active 的值为 '0' 时,该field就回隐藏起来。 但是在下一次...
設定 ACTIVE = 1 には、属性へのその他の影響はありません。ACTIVE コンポーネントの唯一の目的は、1 回の割当によって画面項目を無効化することです。Dynpro 制御ロジックで FIELD 命令にリンクされているモジュール呼出は、該当する項目が SCREEN-ACTIVE = 0 の場合でも、必ず実行される...
*数据准备*选择屏幕SELECTION-SCREEN.PARAMETERS:字段TYPE参考数据元素MODIFID分组.select-option:字段for参考数据元素 modif id 分组.atSELECTION-SCREENOUTPUT.loopasscreen.CASE'X'.WHEN分类1.IFscreen-group1EQ'分组1'.screen-invisible='1'.screen-active='0'.ELSE.screen-invisible='0'.screen-active='1'.ENDI...