CHECK 功能:
CHECK Selection Option 用在事件块(event blocks )GET中检查当前GET事件中接口工作区里面的 components是否已经填充到相应的Selection Option 里面。
问题:如果Selection Option 为空,CHECK语句将不会起作用,因为默认所以数据满足条件。
实例:
初始:
SELECT-OPTIONS: s_pspnr FOR prps_r-pspnr NO-DISPLAY.
GET prps_r.
CHECK s_pspnr.
......
Note:当s_pspnr为空,CHECK s_pspnr后面的coding将继续处理.
改进后:
SELECT-OPTIONS: s_pspnr FOR prps_r-pspnr NO-DISPLAY.
DATA: lin(5).
GET prps_r.
DESCRIBE TABLE s_pspnr LINES lin.
IF lin = 0.
WRITE: 'No Valid Projects.'.
EXIT.
ELSE.
CHECK s_pspnr.
ENDIF.
......
Note:当s_pspnr为空,程序将显示提示信息‘No Valid Projects’;当s_pspnr不为空,将正确执行CHECK功能。