Additional ESDS considerations

When a record is added to a VSAM ESDS by a batch job, CICS® VR undo logging writes a before-image log record with the RBA of the record that was added to the undo log stream. Therefore, during batch backout processing, CICS VR locates any records that were added to the ESDS by the batch job step.

However, because ESDS records are written sequentially, they cannot be physically deleted by CICS VR. Instead, these records that were added to ESDSs must be logically marked-for-deletion. However, the method used to logically mark ESDS records for deletion varies between environments. Therefore, CICS VR allows you to specify a CICS VR batch backout ESDS delete exit in a batch backout job.

The CICS VR batch backout ESDS delete exit is passed the ESDS record that was added by the batch job step. The exit can then mark the record for deletion according to your environment's standards. The exit then passes the marked-for-deletion ESDS record back to CICS VR, along with an action code indicating the next step for CICS VR to take; terminate, ignore, or replace the ESDS record with the marked-for-deletion record and continue. See the CICS VR Implementation Guide and Reference, for further information about creating the exit.

You must add the following command to the input command area; after the "DWWIN DD *" statement, to all CICS VR batch backout jobs that attempt to remove one or more records that were added to a VSAM ESDS.

DEFEXIT ESDSDELETE(batch backout ESDS delete exit program)

Where batch backout ESDS delete exit program is the name of the CICS VR batch backout ESDS delete exit program.

In addition, the library that contains the specified batch backout ESDS delete exit program must be allocated to the batch backout job if it is not in Link List. For example, the library can be allocated by adding the following DD statement to the batch backout job:
 //DWWLOAD   DD DISP=SHR,DSN=name of library with exit
Where name of library with exit is the name of the library that contains the CICS VR batch backout ESDS delete exit.

If you have configured CICS VR to start batch backout automatically when a batch job encounters an abend, make the ESDS delete exit changes mentioned above to the batch backout JCL skeleton DWWBAFJS.