Run Time Operation

When the Exit Routine is Invoked
When the Exit Routine is Invoked
At program run time, the exit routine comes into play when the DL/I application issues an ISRT (insert) or REPL (replace) call for a CA IDMS/DB record that has been defined as an index source record in the INDEX SECTION of the active IPSB. When CA IDMS DLI Transparency encounters the ISRT or REPL call, it attempts to load the exit routine. To make sure the exit routine is available to CA IDMS DLI Transparency, you must place it in an operating system partitioned data set that can be accessed via a CDMSLIB JCL statement. An unsuccessful load of the routine will result in a PCB error status of NX.
For an ISRT call, CA IDMS DLI Transparency determines whether the record to be stored participates in an index relationship as the index source record. If CA IDMS DLI Transparency finds such a relationship, it builds a suitable index pointer record. After checking for null value criteria, CA IDMS DLI Transparency calls the exit routine specified in the IPSB and passes control to it. It is the responsibility of the routine to determine whether the index pointer record should be stored or suppressed. The routine indicates its decision via a return code in register 15.
For a REPL call, the same process occurs as for an ISRT. The only difference is that prior to storing or suppressing an index pointer record CA IDMS DLI Transparency removes all existing index pointer records from the secondary index.