Developing an ESDS logical delete exit

The ESDS logical delete exit runs in the VSAM logical delete utility address space. A copy of the exit is loaded when an ESDS delete is indicated because the record is in the OLDFILE but not in the NEWFILE.

The exit is called in key 8 problem program state. The exit must reside in the STEPLIB concatenation for the CECVSMLD job step.

The exit is invoked in a language environment and can use any LE services.

The exit is intended to be developed by using a high-level language such as COBOL or PL/I. The sample exit is written in COBOL.

No special abend or ESTAE protection is in place, so if the exit abnormally terminates default exception processing for the language environment is invoked.

When you use debugging statements like the sample DISPLAY UPON SYSOUT, you should include a SYSOUT DD appropriate to collect your output.

An example COBOL logical delete exit is provided in USERSAMP member CECVSMLX.