Monday, June 3, 2013

Lock/Unlock the ABAP Editor Lock Field

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. 



1 comment:

  1. SAP ABAP training is provided in CHENNAI.

    THE CREATING EXPERTS is one of the leading trainer in SAP who provides real time training

    http://thecreatingexperts.com/sap-abap-training-in-chennai/

    contact 8122241286

    ReplyDelete