案列背景:
选择屏幕作为SUBSCREEN时,搜索条件中的域值或者F4的搜索帮助会失效。
优化前示例与效果截图:
*=======================================================================
* SELECTION-SCREEN " 选择屏幕定义
*=======================================================================
SELECTION-SCREEN BEGIN OF SCREEN 900 AS SUBSCREEN.
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
SELECT-OPTIONS:
S_QYBM FOR ZRRE_D_XMTT-QYBM ,"区域编码
S_ZJBBM FOR ZRRE_D_XMTT-ZJBBM MATCHCODE OBJECT ZRRE_H_ZJBBM,"总监部编码
S_XMBM FOR ZRRE_D_XMTT-XMBM," 项目编码
S_BPNUM FOR ZRRE_D_BP-BPNUM,"客商编码
S_PLANNO FOR ZRRE_D_SETPLAN-SETPLANNO,
S_PLANNM FOR ZRRE_D_SETPLAN-SETPLANNM,
S_CONNO FOR /RER/D_BO_CONTH-CONNO,"系统合同编号
S_STATUS FOR /RER/D_BO_CONTH-APPSTATUS ."审批状态
SELECTION-SCREEN END OF BLOCK B1.
SELECTION-SCREEN END OF SCREEN 900.
AT SELECTION-SCREEN OUTPUT.
*==========================