Time-controlled operations exit routine

The time-controlled operations (TCO) exit routine inserts messages on the IMS message queue for processing. The messages are the commands, transactions, and message switches that you specify in the time schedule requests and message sets that make up a TCO script.

The TCO exit routine passes any data found in columns 56 through 71 of the time schedule request to IMS for processing.

You do not need to write your own exit routine. You can schedule predefined commands, transactions, and message switches at predefined times using DFSTXIT0, the TCO exit routine IMS supplies.

You must bind user-written exit routines with the TCO language interface module (DFSTDLI0) and place them in the IMS.SDFSRESL data set. A user-written exit routine can have any name.

The following example shows a user-written exit routine, MYEXIT, being bound with DFSTDLI0: 

 //XIT       JOB ...
 //BIND      EXEC PGM=IEWL
 //SYSUT1    DD UNIT=SYSDA,SPACE=(TRK,(20,20))
 //SYSPRINT  DD SYSOUT=A
 //SYSLMOD   DD DSN=IMS.SDFSRESL,DISP=SHR
 //INLIB     DD DSN=IMS.OBJ,DISP=SHR
 //ADFSLOAD  DD DSN=IMS.ADFSLOAD,DISP=SHR
 //SYSLIN    DD *
     INCLUDE  INLIB(MYEXIT)
     INCLUDE  ADFSLOAD(DFSTDLI0)
     NAME     MYEXIT(R)
 /*

To load and execute a user-written exit routine, a time schedule request in a TCO script that is executing must refer to the routine. The following example shows a time schedule request in a TCO script that executes the user-written exit routine, MYEXIT: 

 *TIME 1200 MYEXIT