如何实现SAP报表程序报错后停在选择屏幕及让屏幕内容高亮

当在程序中写了报错消息后，一般如果message是E类型，那么就会出现屏幕直接跳转红色报错，结果一按后退按钮就直接退出程序了，特别是在屏幕筛选界面上做了屏幕字段校验的话，就会出现如下图所示：屏幕正中央一片空白，左下角报错。

 一点后退，就退出整个程序了，不方便用户。为了让用户更好的使用体验，如果出错后回到选择界面，那么用户感受回好很多。

FORM CHECK_DATA.
  LOOP AT S_WADAT.
    DATA(LS) = S_WADAT-HIGH - S_WADAT-LOW.
    IF  S_WADAT-HIGH - S_WADAT-LOW > 31.
      MESSAGE '查询日期超出31天，请重填日期。' TYPE 'S' DISPLAY LIKE 'E'. "用于用户报错后不退出界面，直接在原界面修改即可
      LEAVE LIST-PROCESSING.
    ENDIF.
  ENDLOOP.

  LOOP AT S_WERKS.
    IF S_WERKS-LOW <> '2031'.
      MESSAGE '不能查询不是2031工厂的数据，请修正工厂编码。' TYPE 'S' DISPLAY LIKE 'E'.
      LEAVE LIST-PROCESSING.
    ENDIF.
  ENDLOOP.

ENDFORM.

 2、有时候为了提醒用户一些注意事项，会在屏幕界面加上一行高亮文字。

 

ELECTION-SCREEN COMMENT /2(75) T10 MODIF ID 1.

AT SELECTION-SCREEN OUTPUT.
  LOOP AT SCREEN.
    IF SCREEN-GROUP1 = '1'.
      SCREEN-INTENSIFIED = 1.
      MODIFY SCREEN.
    ENDIF.
  ENDLOOP.

INITIALIZATION.

  T10 = '导入模板请使用左上角下载的模板，谢谢！'.