选择屏幕做必输项控制

最新推荐文章于 2024-07-10 19:11:05 发布

原创最新推荐文章于 2024-07-10 19:11:05 发布 · 534 阅读

1 ·

CC 4.0 BY-SA版权

文章标签：

#abap #sap

选择屏幕做必输项控制

在这里插入图片描述

实现的功能：点击不同的功能选择可以实现跳转到不同的选择条件同时要对必输字段进行控制。
源代码：

 IF RB_CJ = 'X'.   "选择创建
LOOP AT SCREEN.
IF SCREEN-GROUP1 = 'M2'.  " M2 是在选择屏幕界面对一些字段进行了分组
SCREEN-ACTIVE = '0'. " 0表示隐藏
ENDIF.
IF SCREEN-GROUP1 = 'M1' or SCREEN-NAME = 'S_WERKS-LOW' .  "SCREEN-NAME是对屏幕的具体某个字段进行了控制
SCREEN-REQUIRED = '2'.   "为2是一定要做手动检验的
ENDIF.

MODIFY SCREEN.
ENDLOOP.
ELSEIF RB_CX = 'X'.  "选择查询
LOOP AT SCREEN.
IF SCREEN-GROUP1 = 'M1'.
SCREEN-ACTIVE = '0'.
ENDIF.
IF  SCREEN-NAME = 'S_WERKS-LOW' .
SCREEN-REQUIRED = '2'.
ENDIF.

MODIFY SCREEN.
ENDLOOP.
ENDIF.

在这里插入图片描述
手动检验的代码：

IF RB_CJ = 'X'. 
IF S_WERKS IS INITIAL OR P_UMLGO IS INITIAL OR P_LGORT IS INITIAL .
MESSAGE '检查必输项！' TYPE 'S' DISPLAY LIKE 'E'.
STOP.
ENDIF.
ELSE.
IF S_WERKS IS INITIAL .
MESSAGE '检查必输项！' TYPE 'S' DISPLAY LIKE 'E'.
STOP.

ENDIF.
ENDIF.