取消ABAP程序的Editor lock

How to delete an editor lock?

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

The same user left the project a year ago, and nowthere is a need to change the program. How can we do that? Becauseif someone else tries to modify it, the system doesn't allowhim/her saying that "the program is locked from any changes. Onlyoriginal user can change it". 

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

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

Use the following example program to unlock yourprogram editor lock:

REPORT sy-repid. 

TABLES: TRDIR. 

 

PARAMETERS: P_PROG LIKE TRDIR-NAMEOBLIGATORY. 

 

START-OF-SELECTION. 

  SELECT SINGLE * FROM TRDIRWHERE NAME = P_PROG. 

  IF SY-SUBRC =0. 

    IFTRDIR-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 EditorLock'. 

   ENDIF. 

 ELSE. 

   WRITE: /'No match found for program',P_PROG. 

  ENDIF.