SAP的ABAP程序中权限检查

在SAP的各种程序中，常常会需要限定用户能看到的数据，这时候就需要在程序里面做权限检查，如：

 AUTHORITY-CHECK OBJECT 'F_AVIK_BUK'
     ID 'ACTVT' FIELD '03'
     ID 'BUKRS' FIELD S_BUKRS.

  IF SY-SUBRC <> 0.
    MESSAGE E000(ZBW001)  WITH '您没有查询公司代码：' S_BUKRS '的资料的权限!'.
  ENDIF.

这里就是检查当前用户输入的公司代码和他的权限是否匹配的程序，如果该用户有权限的话，则SY-SUBRC返回0。

同时可以在取完数据之后，进行数据的权限检查：

    AUTHORITY-CHECK OBJECT 'M_ANFR_EKO'
      ID 'EKORG'  FIELD GS_TAB-EKORG.
    IF SY-SUBRC <> 0.
      DELETE  TABLE GT_TAB FROM GS_TAB.
    ENDIF.

查看当前用户是否有相应的采购组织，没有的话就把数据删掉