ABAP编程 选择屏幕字段权限检查--公司代码事例

本文展示了一个ABAP程序示例,该程序通过定义选择屏幕并进行权限检查来确保用户只能访问其授权范围内的公司代码数据。具体步骤包括定义选择选项、从T001表中读取数据并使用权威检查功能。

摘要生成于 C知道 ,由 DeepSeek-R1 满血版支持, 前往体验 >

 "屏幕字段
SELECTION-SCREEN BEGIN OF BLOCK WITH FRAME .

SELECT-OPTIONS G_BUKRS FOR ANLA-BUKRS.

SELECTION-SCREEN END OF BLOCK .


 START-OF-SELECTION.
  PERFORM FRM_AUTHORITY_CHECK.     "权限检查

***子程序

FORM FRM_AUTHORITY_CHECK .

DATABEGIN OF LT_BUKRS OCCURS ,

            BUKRS LIKE T001-BUKRS,
          END OF LT_BUKRS.
  DATAL_STR TYPE STRING.

  SELECT INTO CORRESPONDING FIELDS OF TABLE LT_BUKRS FROM T001 WHERE BUKRS IN G_BUKRS. "输入区间值

  LOOP AT  LT_BUKRS.
    AUTHORITY-CHECK OBJECT  'ZAO_BUKRS'         “权限对象
               ID 'ZAF_BUKRS' FIELD LT_BUKRS-BUKRS."检查字段
    IF SY-SUBRC <> 0.
      CONCATENATE '您没有公司代码' LT_BUKRS-BUKRS '的权限,请输入一个您权限范围内的公司代码' INTO L_STR.
      EXIT.
    ENDIF.

  ENDLOOP.

ENDFORM.  

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值