How to delete an editor lock?

A user created the ABAP program and set the "editor lock" checked-ON (in Program Attributes screen); which makes that user the only person to make any changes to the program.

The same user left the project a year ago, and now there is a need to change the program. How can we do that? Because if someone else tries to modify it, the system doesn't allow him/her saying that "the program is locked from any changes. Only original user can change it".

How do we resolve it? I know the checked-ON indicator is stored in TRDIR table, but that table cann't be maintained manually. Please suggest what to do?

The lock in an ABAP program is defined in table TRDIR, field EDTX. You must change the value 'X' by ' '.

Use the following example program to unlock your program 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.