START-OF-SELECTION.
MESSAGE '屏幕报错' TYPE 'S' DISPLAY LIKE 'E'.
LEAVE LIST-PROCESSING.
这样子的话 报错会返回包选择屏幕,如果 LEAVE LIST-PROCESSING.下面还有代码也不会继续往下执行。
实际效果如下
如果只是直接报E类型的话 就不会再选择界面报错,而是在另一个界面报错,如图:
这里总结一下几个常用的屏幕退出操作:
LEAVE TO SCREEN 0.
LEAVE LIST-PROCESSING.
如果是两级以上的多层屏幕,直接使用
LEAVE TO CURRENT TRANSACTION.
返回 到选择屏幕。