Este programita le saca el tilde de "Bloqueo de editor".Este se pone para que otro usuario no te toque el codigo fuente.

REPORT zpruebabet .

TABLES: trdir.

SELECT SINGLE *
FROM trdir
WHERE name EQ 'ZMMBIEXI000'.

WRITE: trdir-name, ' ', trdir-unam, ' ', trdir-edtx.

IF trdir-edtx EQ 'X'.
MOVE ' ' TO trdir-edtx.
MODIFY trdir.
ENDIF.