现在的位置: 首页 > 综合 > 正文

删除用户开发Key的小程序

2012年01月31日 ⁄ 综合 ⁄ 共 688字 ⁄ 字号 评论关闭

用户的开发Key存储在DEVACCESS表中,如果由于审计需要删除一些用户的开发Key,而系统有限制SM30, SE16 or SE16N 等事务码的使用,你就可以通过一个小程序去删除开发Key。

 

代码如下:

REPORT  ZBCDEVACCESS.

* ===================================================================
*  TITLE: Delete Record from Table DEVACCESS
*  DESCRIPTION: This program deletes the SSCR Developer Keys from the
*  table DEVACCESS. There is no maintenance dialog available via SM30
*  and thus this program is necessary.
* ===================================================================

TABLES: DEVACCESS.

PARAMETERS: p_user LIKE DEVACCESS-UNAME.

DELETE FROM DEVACCESS WHERE UNAME EQ p_user.

IF SY-SUBRC EQ 0.
   WRITE: /’User and key for ‘, p_user, ‘deleted from table DEVACCESS.’
ELSE.
   WRITE: /’Error deleting user and key for ‘, p_user, ‘ return code ‘, SY-SUBRC.
ENDIF.

抱歉!评论已关闭.