添加SAP_ALL权限

博客内容提及更新usr04、ust04、usrbf2这三张表,并给出转载链接https://www.cnblogs.com/miaosj/p/10570100.html 。

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

更新usr04,ust04,usrbf2这三张表

REPORT ZTESTCREATEUSER.
data: l_USR04 LIKE USR04 ,
l_UST04 LIKE UST04 ,
l_PROFS LIKE USR04-PROFS ,
l_USRBF2 like USRBF2 occurs 0 with header line,
l_userid like usr01-bname.
TABLES : usr01.
SELECT-OPTIONS: p_user FOR USR01-BNAME .
 
START-OF-SELECTION.
 
select single * 
  into l_USR04 
  from USR04
 where BNAME in p_user.
move 'C SAP_ALL' to l_PROFS .
l_USR04-NRPRO = '14'.
l_USR04-PROFS = l_PROFS.
Update USR04 from l_USR04 .
 
l_userid = l_USR04-BNAME.
select single * 
  into l_UST04 
  from UST04
 where BNAME in p_user.
l_UST04-PROFILE = 'SAP_ALL'.
Update UST04 from l_UST04 .
 
select * 
  from USRBF2 
  into table l_USRBF2
 where BNAME = 'SAP*' .
Loop at l_USRBF2.
  l_USRBF2-BNAME = l_userid.
  Modify l_USRBF2 INDEX sy-tabix TRANSPORTING BNAME.
endloop.
INSERT USRBF2 FROM TABLE l_USRBF2 ACCEPTING DUPLICATE KEYS.

转载于:https://www.cnblogs.com/miaosj/p/10570100.html

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

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

抵扣说明:

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

余额充值