Hi All,
I have written a simple Zprogram to unlock a particular user.
But the issue is that its not showing any log for that particular user in TCODE SU01-->Change document for user .
Please let me know if i am missing something from my side.
The code is as below:-
REPORT ZENF_USER_UNLOCK.
tables:USR02.
parameters:lv_user like USR02-bname default 'SLDDSUSER' obligatory,
lv_mandt like USR02-mandt default '001' obligatory.
CALL FUNCTION 'ENQUEUE_E_TABLE'
EXPORTING
MODE_RSTABLE = 'E'
TABNAME = 'USR02'
EXCEPTIONS
FOREIGN_LOCK = 1
SYSTEM_FAILURE = 2
OTHERS = 3.
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
update USR02 CLIENT SPECIFIED set UFLAG = '0'
where mandt = lv_mandt and
bname = lv_user
and UFLAG NE 0.
CALL FUNCTION 'DEQUEUE_E_TABLE'
EXPORTING
MODE_RSTABLE = 'E'
TABNAME = 'USR02'.