Chinaunix首页 | 论坛 | 博客
  • 博客访问: 92188
  • 博文数量: 39
  • 博客积分: 2000
  • 博客等级: 大尉
  • 技术积分: 420
  • 用 户 组: 普通用户
  • 注册时间: 2008-10-30 17:39
文章分类

全部博文(39)

文章存档

2011年(1)

2009年(21)

2008年(17)

我的朋友

分类:

2009-03-05 10:05:02

要在 ABAP/4 程序中检查 用户权限 请使用 AUTHORITY-CHECK 语句如下 所示语法

AUTHORITY-CHECK OBJECT ''
                        ID '' FIELD <F1>
                        ID '' FIELD <
F2>
                            .............
                       
ID '' FIELD <F10>.

是即将检查 的授权对象 的名称。必 须在 ID 后列出在 中定义的所 有授权字段 的名称(, .... 。必须在 <F1>, <F2>.... 中为即将检 查的权限输 入值以作为 变量或字母 。然后,该 语句将为命 名的对象搜 索该用户的 参数文件, 以检查该用 户是否有 中所有值的 授权。然后 SY-SUBRC 将设置为 0。可用 DUMMY 替换. FIELD 跳过字段的 检查。必须 检查系统字 SY-SUBRC 中的内容来 检查 AUTHORITY-CHECK 的结果并作 出相应的动作.

如:

SELECT * FROM SPFLI.
   AUTHORITY-CHECK OBJECT 'F_SPFLI'
                        ID 'ACTVT'  FIELD '02'
                        ID 'NAME' FIELD SPFLI-CARRID
                        ID 'CITY'   DUMMY.
   IF SY-SUBRC NE 0. EXIT. ENDIF.
ENDSELECT.

如果用户有 下列关于 F_SPFLI 的权限:

ACTVT 01-03 NAME AA-LH CITY none,

并且 SPFLI-CARRID 不处于“AA 和“LH 之间,权限 检查将终止 SELECT 循环。

阅读(1597) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~