How to pass parameters to CTSSYNC from my own program.

Document ID : KB000025654
Last Modified Date : 14/02/2018
Show Technical Document Details

Question:

How can I pass parameters to CTSSYNC from my own program to update the IBM ATL/VTS system?

 

Environment:

CA 1 rel 12.6 and 14.0

Answer:

Here is sample code that can be used as an example of how to call CTSSYNC and pass your needed parameters. In this example we are going to synchronize a range of volumes, 760100-760102. 

TSTSYNC CSECT                                        CL050B0  
         TMMLINK ENTRY,BASE=(R12),EQUS=YES,SAVE=YES,SYSMOD=TMOD01     
         LA    R1,VOLPARM                                                  
         LINK  EP=CTSSYNC                                                  
         EJECT                                                             
XITPGM   DS    0H                                                          
         L     R13,4(,R13)        POINT TO CALLER SAVE AREA                
         RETURN (14,12),RC=0      END OF JOB STEP                          
         SPACE 3                                                           
VOLPARM  DC    A(VOLR1+X'80000000')                                        
VOLR1    DC    H'21',CL8'SYNC',CL13'760100-760102'                         
                                                         
         SPACE 3                                       
         EJECT                                                             
         TMMLINK PATCH                                CL050B0  
         LTORG                                                             
         END