*----------------------------------------------------------------------
* Program Name: Z_REMOVE_EDITOR_LOCK
* Author      : Michael Watson
* Description : Removes the editor locks for the given objects
*----------------------------------------------------------------------
REPORT  Z_REMOVE_EDITOR_LOCK.

TABLES: trdir.

SELECT-OPTIONS: PROG FOR trdir-NAME.

UPDATE PROGDIR SET EDTX = SPACE
       WHERE NAME IN PROG.

WRITE: 'Reset ok when number 0 appears ->', SYST-SUBRC.