abap 在屏幕如何调用选择屏幕以及如何获得选择屏幕的操作
1个回答
展开全部
定义可调用的选择屏幕:
SELECTION-SCREENBEGINOFSCREEN700.SELECT-OPTIONS:S_CPTNRFOR
ZTMM0141-CPTNR,S_MAKTXFORZTMM0141-MAKTX.
SELECTION-SCREENENDOFSCREEN700.
调用选择屏幕:CALLSELECTION-SCREEN700STARTINGAT152ENDINGAT1004.
捕捉选择屏幕的操作:
*----------------------------------------------------------------------*
*ATSELECTION-SCREENOUTPUT.
*在屏幕输出之前处理*
. 调用子例程执行相关操作ENDIF.WHEN'0800'.IFSY-UCOMM='CRET'.PERFORMFRM_DISPLAY_HISTORYUSING2.ENDIF.WHEN'0900'.IFSY-UCOMM='CRET'.PERFORMFRM_DISPLAY_HISTORYUSING3.ENDIF.ENDCASE.
SELECTION-SCREENBEGINOFSCREEN700.SELECT-OPTIONS:S_CPTNRFOR
ZTMM0141-CPTNR,S_MAKTXFORZTMM0141-MAKTX.
SELECTION-SCREENENDOFSCREEN700.
调用选择屏幕:CALLSELECTION-SCREEN700STARTINGAT152ENDINGAT1004.
捕捉选择屏幕的操作:
*----------------------------------------------------------------------*
*ATSELECTION-SCREENOUTPUT.
*在屏幕输出之前处理*
. 调用子例程执行相关操作ENDIF.WHEN'0800'.IFSY-UCOMM='CRET'.PERFORMFRM_DISPLAY_HISTORYUSING2.ENDIF.WHEN'0900'.IFSY-UCOMM='CRET'.PERFORMFRM_DISPLAY_HISTORYUSING3.ENDIF.ENDCASE.
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询