Previous Topic: Step 11. Install the VTAM Application IDNext Topic: Step 13. Install Optional Online Interfaces


Step 12. Install TSO Support

This step is for all CA Dispatch installations.

The CLIST source code for providing a link between TSO and CA Dispatch is in member DSTSO in the CADSCLS0 library.

Edit and customize the ALLOC and CALL statements in the CLIST to reflect the correct data set name. The default setting is CAI.DISP.SYSCTL for the ALLOC and CAI.CADSLOAD for the CALL statement. The following is a listing of the DSTSO CLIST with the ALLOC and CALL statements highlighted.

CONTROL MAIN NOMSG                                                     
ERROR DO                                                               
      IF &LASTCC LT 0  THEN +                                          
          DO                                                           
          WRITE                                                        
          WRITE + End of CAI/UCF/TSO session for user &SYSUID.         
          WRITE + CA Dispatch online not active or is being quiesced.  
          WRITE                                                        
          FREE  F(CAICTL)                                              
          EXIT QUIT                                                    
          END                                                          
      RETURN                                                           
      END                                                              
FREE  F(CAICTL)                                                        
ALLOC F(CAICTL) DA('CAI.DISP.SYSCTL')    SHR                           
CALL 'CAI.CADSLOAD(CAITSODC)'                                            
FREE  F(CAICTL)                                                        
WRITE                                                                  
WRITE + End of CAI/UCF/TSO session for user &SYSUID.                   
WRITE                                                                  
EXIT QUIT                                                              

Copy the DSTSO member into one of your system CLIST libraries and name it with the name specified in the Upgrade Parameters worksheet. Invoke the CLIST by entering this name.