有时候dialog屏幕需要调用选择屏幕比如:
标准屏幕没有SELECT-OPTIONS:
下面实现dialog屏幕调用选择屏幕:
1、定义一个屏幕:9001.
2、定义个subscreen控件 SUB
3、定义选择屏幕:9999
SELECTION-SCREEN BEGIN OF SCREEN 9999 AS SUBSCREEN.
PARAMETERS p_werks LIKE ekpo-werks OBLIGATORY.
SELECT-OPTIONS:
s_ebeln FOR ekko-ebeln ,
s_lifnr FOR ekko-lifnr,
s_aedat FOR ekko-aedat ."OBLIGATORY.
SELECTION-SCREEN END OF SCREEN 9999.
部分代码:
START-OF-SELECTION.
CALL SCREEN 9001. "调用屏幕9001
件好像有的版本,9999屏幕必须使用变量才能传值,
即定义:g_sub(4) TYPE c VALUE '9999',但是不能使用定义的常量
PROCESS AFTER INPUT.
CALL SUBSCREEN sub. "如果不加这句,则传不了值