Login Form

Best viewed in IE 7.0

ADVERTISEMENTS
ADVERTISEMENT

Report to remove Editor Lock

The following report is used to remove the editor lock.

REPORT sy-repid.
TABLES: TRDIR.

PARAMETERS: P_PROG LIKE TRDIR-NAME OBLIGATORY.

START-OF-SELECTION.
SELECT SINGLE * FROM TRDIR WHERE NAME = P_PROG.
IF SY-SUBRC = 0.
IF TRDIR-EDTX = 'X'.
MOVE ' ' TO TRDIR-EDTX.
MODIFY TRDIR.
WRITE: /'Editor Lock was removed from', P_PROG.
ELSE.
WRITE: /'Program', P_PROG, 'does not have an Editor Lock'.
ENDIF.
ELSE.
WRITE: /'No match found for program', P_PROG.
ENDIF.

 

ADVERTISEMENT
Free software downloads