The TSTDSRUE exit is called at queue access time with the following information:
The exit needs to return whether or not to direct the queue to the input SOR:
A sample exit is provided with Enterprise Developer and can be found in the following location $COBDIR/src/enterpriseserver/exit/TSTDSRUE.CBL.
The compiled program should be placed in the $COBDIR/lib/es and/or $COBDIR/lib/es64.
If this exit is used, any SOR models which have been defined will be ignored.
You must configure a TS model to ensure that Data File Editor correctly honors file locking across all enterprise server regions in a PAC.