Common Tape System › Commands › CTS Started Task

CTS Started Task

The following member is CTS in CAI.CTAPPROC.

//* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
//*            CA COMMON TAPE SYSTEM                            *
//*                 FOR TLMS                                    *
//* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
//*
//*
//CTS      PROC PRM=,                      /*  EXEC TIME COMMAND */
//             ALOG='CAI.TLMS.ALOG'
//*            EARLLIB='CAI.CTAPEARL',     /* OPTIONAL */ 
//*            EARLMAC='CAI.CTAPECPB',     /* OPTIONAL */ 
//             CTSDMP='CAI.CTS.DUMP',
//             LAB1='A',
//             LAB2='A',
//             LAB3='A',
//*            LBL='TLMSLBLS'
//             LINKLIB='CAI.CTAPLINK',
//*            SPIN='A',
//             START='CAI.CTAPOPTN(CTSSTART)',
//             VMF='CAI.TLMS.VMF',
//*            VMFIDX='CAI.TLMS.VMFINDEX',
//*            WORK='SYSDA',
//             SOUT='A'
//*
//CTSGO    EXEC PGM=CTSMAIN,REGION=3M,IME=1439,
//         PARM='&PRM'.
//*
//SPINOFF  OUTPUT CLASS=&SPN.              SYSOUT FOR SPINOFF
//OUTPUTP1 OUTPUT CLASS=&LAB1.             LABEL PRINTER #1
//OUTPUTP2 OUTPUT CLASS=&LAB2.             LABEL PRINTER #2
//OUTPUTP3 OUTPUT CLASS=&LAB3.             LABEL PRINTER #3
//*
//STEPLIB  DD DISP=SHR,DSN=&LINKLIB.
//SYSOUT   DD SYSOUT=&SOUT.
//SYSPRINT DD SYSOUT=&SOUT.
//SYSUDUMP DD DISP=MOD,DSN=&CTSDMP.        DUMP SPOOL
//*ABNLIGNR DD DUMMY                       DISABLE ABENDAID
//CTSSYSIN DD DISP=SHR,DSN=&START.         STARTUP COMMANDS
//*
//*----------- TLMS                                  (REQUIRED)
//CAIVMF    DD DISP=SHR,DSN=&VMF.          TAPEDB (UPDATE)
//CAIVMFI   DD DISP=SHR,DSN=&VMF.          TAPEDB (INPUT)
//TAPEDB    DD DISP=SHR,DSN=&VMF.          TAPEDB (CTSDBIO)
//*
//*----------- TLMS                                  (OPTIONAL)
//*CAIALOG  DD DISP=SHR,DSN=ALOG           ALTERNATE TRAN LOG
//*CAIVMFXI DD DISP=SHR,DSN=&VMFIDX.       TAPEDB INDEX (INPUT)
//*CAIVMFXU DD DISP=SHR,DSN=&VMFIDX.       TAPEDB INDEX (UPDATE)
//*

//*----------- EXTERNAL TAPE LABELS                 (OPTIONAL)
//*EARLOBJ  DD UNIT=&WORK.,                 EARL COMPILE OUTPUT
//*           SPACE=(TRK,2),DISP=(NEW,DELETE)
//*EARLLIB DD DISP=SHR,DSN=&EARLLIB.        EARL SOURCE LIB
//*SORTIN   DD DUMMY
//*SORTOUT  DD DUMMY
//*SYSIN    DD DISP=SHR,DSN=&EARLLIB(.&LBL). LABEL FRMTTR SOURCE
//*
//*