ABAP快速开始之权限校验

  SELECT * FROM T001 INTO TABLE @DATA(LT_T001) WHERE BUKRS IN @S_BUKRS.

  LOOP AT LT_T001 INTO DATA(LS_T001).
    AUTHORITY-CHECK OBJECT 'F_BKPF_BUK'
    ID 'BUKRS' FIELD LS_T001-BUKRS.
    IF SY-SUBRC <> 0.
      MESSAGE '你没有' && LS_T001-BUKRS && '公司 的操作权限!' TYPE 'S' DISPLAY LIKE 'E' .
      RETURN.
    ENDIF.
  ENDLOOP.
  IF SY-SUBRC <> 0.
    MESSAGE '你没有' && LS_T001-BUKRS && '公司 的操作权限!' TYPE 'S' DISPLAY LIKE 'E' .
    RETURN.
  ENDIF.

标签：RETURN,T001,校验,ABAP,LS,&&,BUKRS,权限
来源： https://www.cnblogs.com/huangqingdong/p/16457797.html