Dialog屏幕调用选择屏幕

有时候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.           "如果不加这句，则传不了值