[SAP ABAP开发技术总结]权限对象检查

20.14. 权限检查

AT SELECTION-SCREEN.
DATA: BEGIN OF lt_bukrs OCCURS 0,
    bukrs TYPE t001-bukrs,
    END OF lt_bukrs.
SELECT bukrs FROM t001 INTO CORRESPONDING FIELDS OF TABLE lt_bukrs WHERE bukrs IN s_bukrs.
LOOP AT lt_bukrs.
    AUTHORITY-CHECK OBJECT 'ZDABAP'   [ɔ:ˈθɔriti]
           ID 'VKORG' DUMMY                      销售组织
           ID 'BUKRS' FIELD lt_bukrs-bukrs        公司代码
           ID 'WERKS' DUMMY                      工厂
           ID 'EKORG' DUMMY                      采购组织
           ID 'KOKRS' DUMMY
           ID 'GSBER' DUMMY
           ID 'SEGMENT' DUMMY.
    IF sy-subrc <> 0."
      MESSAGE s001(00) DISPLAY LIKE 'E' WITH 'You do not have authorization to access company code:' lt_bukrs-bukrs.
      STOP.
    ENDIF.
ENDLOOP.
ENDFORM.

转载于:https://www.cnblogs.com/jiangzhengjun/p/4265610.html

[SAP ABAP开发技术总结]权限对象检查相关推荐

[SAP ABAP开发技术总结]ABAP调优——Open SQL优化
11.1. 数据库编程方面优化 1. 不要使用 SELECT * ...,选择需要的字段, SELECT * 既浪费CPU,又浪费网络带宽资源,还需占用大量的ABAP内存 2. 不要使 ...
[SAP ABAP开发技术总结]SD销售订单定价过程
16.3.2. 定价过程 16.3.2.1. 条件技术七要素 16.3.2.2. 条件表V/03.V/04.V/05 16.3.2.3. ...
[SAP ABAP开发技术总结]选择屏幕——SELECT-OPTIONS
12.4. SELECT-OPTIONS. 89 12.4.1. 输入ABAP程序默认值时,需要加上"=". 89 12.4.2. 选择条件内表多条 ...
[SAP ABAP开发技术总结]ABAP调优——代码优化
11.2. 程序 1. READ TABLE ...WITH [TABLE] KEY...BINARY SEARCH读取标准内表使用二分查找 2. 在循环(LOOP AT ...WHE ...
[SAP ABAP开发技术总结]EXIT-COMMAND
12.8. EXIT-COMMAND 12.8.1. MODULE <mod> AT EXIT-COMMAND 对话屏幕中,对于E类型的Function Cod ...
[SAP ABAP开发技术总结]动态语句、动态程序
在ABAP中写动态的程序,灵活的程序,一定要知道的 1.13. 动态语句 1.13.1. 内表动态访问 1.13.2. 动态类型 1.13.3. 动态SQL 1 ...
[SAP ABAP开发技术总结]ABAP读写、解析XML文件
20.6. XML. 236 20.6.1. 生成... 237 20.6.2. 解析... 240 20.6. XML if_ixml if_ixml_doc ...
[SAP ABAP开发技术总结]屏幕跳转
12.18. 屏幕跳转 LEAVE SCREEN. or LEAVE TO SCREEN <next screen>. LEAVE SCREEN语句会结束当前屏幕并 ...
[SAP ABAP开发技术总结]CLEAR、REFRESH、FREE内表清理区别
1.8. CLEAR.REFRESH.FREE 内表:如果使用有表头行的内表,CLEAR 仅清除表格工作区域.要重置整个内表而不清除表格工作区域,使用REFRESH语句或 CLEAR 语句CLEAR ...

[SAP ABAP开发技术总结]权限对象检查

20.14. 权限检查

[SAP ABAP开发技术总结]权限对象检查相关推荐

最新文章

热门文章