06-07-2006 4:18 AM
Hi All,
Can anyone tell how to unlock Editor Lock?
Thanks in advance.
Regards
Mohammad.
06-07-2006 4:31 AM
Hi Mohammad,
Please check this sample program.
REPORT ZEDITOR.
TABLES: TRDIR. "System table TRDIR
PARAMETERS: PROGRAM LIKE TRDIR-NAME.
PARAMETERS: EDITOR LIKE TRDIR-EDTX.
SELECT SINGLE * FROM TRDIR WHERE NAME = PROGRAM.
TRDIR-EDTX = EDITOR.
MODIFY TRDIR.
IF SY-SUBRC EQ 0.
WRITE: / 'Editor Lock update Successful ', TRDIR-NAME.
IF TRDIR-EDTX = 'X'.
WRITE: ' Lock'.
ELSE.
WRITE: ' UnLock'.
ENDIF.
ELSE.
WRITE: / 'Editor Lock update Unsuccessful ', TRDIR-NAME.
ENDIF.
Hope this will help.
Regards,
Ferry Lianto
Please reward points if helpful.
06-07-2006 4:21 AM
Hi,
The attributes of the program has the Editor Lock flag..
But this can be checked or unchecked only by the one user and the owner.
Others wont be allowed to change the contents of the program..
Regards,
Tanveer.
<b>Please mark helpful answers</b>
06-07-2006 4:31 AM
Hi Mohammad,
Please check this sample program.
REPORT ZEDITOR.
TABLES: TRDIR. "System table TRDIR
PARAMETERS: PROGRAM LIKE TRDIR-NAME.
PARAMETERS: EDITOR LIKE TRDIR-EDTX.
SELECT SINGLE * FROM TRDIR WHERE NAME = PROGRAM.
TRDIR-EDTX = EDITOR.
MODIFY TRDIR.
IF SY-SUBRC EQ 0.
WRITE: / 'Editor Lock update Successful ', TRDIR-NAME.
IF TRDIR-EDTX = 'X'.
WRITE: ' Lock'.
ELSE.
WRITE: ' UnLock'.
ENDIF.
ELSE.
WRITE: / 'Editor Lock update Unsuccessful ', TRDIR-NAME.
ENDIF.
Hope this will help.
Regards,
Ferry Lianto
Please reward points if helpful.
12-09-2008 1:45 AM
12-09-2008 2:30 AM
12-09-2008 4:54 AM
12-09-2008 5:03 AM