- A+
所属分类：SAP
- 原因
有的员工已经离职，但是未上报信息中心，SAP账号仍然在使用的情况。
为了保证信息安全，SAP团队将使用程序自动锁定离职员工的账号！
- 对相关部门提出的要求
信息中心：
- 每天查询被锁定的用户，确认是否离职，确属离职的备份该账号权限；
- 同样岗位的新员工来之后根据OA申请拷贝（创建）该锁定账号权限给新员工；
- 员工的SAP用户名必须用工号，SAP账号的持有者必须是工号对应的人（或责任人）、不得沿袭。
- 如果有员工报账号被锁定，先确认是不是离职的，如果是离职的，不能解锁！
- 信息中心每周五删除本周内所有锁定的SAP账号；
用人部门：
- 及时反馈该账户所拥有的权限是否有后来人继承使用，如需使用相关权限应发OA用新员工的信息申请SAP账号。
- 员工离职后不得继续使用该员工名下的各种系统账号，如果发现账号未冻结的、应主动上报信息中心处理。
人力资源部：
- 及时录入员工的离职信息；
3．具体实现方式
通过后台程序循环执行程序扫描离职员工信息，即刻锁定对应的SAP账号！
人力资源部录入离职状态 -- 程序扫描离职员工信息并锁定对应的SAP账号 -- 信息中心每天清查被锁定的SAP账号，备份账号对应的权限 -- 信息中心每周五删除本周内被锁定的SAP账号 -- 用人部门发起OA申请，注明新的SAP账号责任人、工号、参考的SAP账号权限 -- 信息中心评估 -- 分配SAP账号或者退回申请。
代码参考：
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 |
REPORT ZSAPTEAM_SU01_PA30_LOCKSAPID. DATA GT_PA0000 TYPE TABLE OF P0000 WITH HEADER LINE. DATA GT_RETURN TYPE TABLE OF BAPIRET2. DATA LV_BAPIBNAME TYPE BAPIBNAME. *先全部锁定一次！ SELECT * INTO CORRESPONDING FIELDS OF TABLE GT_PA0000 FROM PA0000 WHERE ENDDA EQ '99991231'. LOOP AT GT_PA0000. LV_BAPIBNAME = GT_PA0000-PERNR+3(5). IF GT_PA0000-STAT2 EQ 3. "状态为3表示在职，在职则解锁SAP账号（人力资源录了离职又改回来的，需要解锁). CALL FUNCTION 'BAPI_USER_UNLOCK' EXPORTING USERNAME = LV_BAPIBNAME TABLES RETURN = GT_RETURN. ELSE. CALL FUNCTION 'BAPI_USER_LOCK' EXPORTING USERNAME = LV_BAPIBNAME TABLES RETURN = GT_RETURN. ENDIF. CLEAR:GT_PA0000, GT_RETURN, LV_BAPIBNAME. ENDLOOP. REFRESH:GT_PA0000. |
BAPI_USER_ACTGROUPS_ASSIGN Change User-Role Assignments
BAPI_USER_ACTGROUPS_DELETE Delete User-Role Assignments
BAPI_USER_CHANGE Change User
BAPI_USER_CLONE Create/Change Users (Only Usable by CUA Distribution)
BAPI_USER_CREATE
BAPI_USER_CREATE1 Create users
BAPI_USER_DELETE Delete User
BAPI_USER_DISPLAY Display Users
BAPI_USER_EXISTENCE_CHECK Check a user exists
BAPI_USER_GETLIST Search for Users
BAPI_USER_GET_DETAIL Read User Details
BAPI_USER_INTERNET_CREATE Create a user in the Internet
BAPI_USER_LOCACTGROUPS_ASSIGN Change User-Role Assignments in CUA Central System
BAPI_USER_LOCACTGROUPS_DELETE Delete User-Role Assignments in CUA Central System
BAPI_USER_LOCACTGROUPS_READ Read User-Role Assignments in CUA Central System
BAPI_USER_LOCK Lock User
BAPI_USER_LOCPROFILES_ASSIGN Change User-Profile Assignments in CUA Central System
BAPI_USER_LOCPROFILES_DELETE Delete User-Profile Assignments in CUA Central System
BAPI_USER_LOCPROFILES_READ Read User-Profile Assignments in CUA Central System
BAPI_USER_PROFILES_ASSIGN Change User-Profile Assignments
BAPI_USER_PROFILES_DELETE Delete User-Profile Assignments
BAPI_USER_SYSTEM_ASSIGN Change User-System Assignments in Central CUA System
BAPI_USER_UNLOCK Unlock User