//CBT0010 JOB  (CBT),
//             'Catalog CBT249',
//             CLASS=A,
//             MSGCLASS=A,
//             MSGLEVEL=(1,1),
//             COND=(0,NE),
//             REGION=2048K
//*********************************************************************
//*
//*                       PDS 7.3 Installation
//*                       ====================
//*
//* DESC: Build a user catalog on CBT001
//*       Define an Alias for CBT related files in user catalog
//*       Define the CBT249 files into this user catalog
//*
//*********************************************************************
//*
//CLEANUP EXEC PGM=IDCAMS
//SYSPRINT DD  SYSOUT=*
//CBT001   DD  UNIT=3350,VOL=SER=CBT001,DISP=SHR
//CBT002   DD  UNIT=3350,VOL=SER=CBT002,DISP=SHR
//SYSIN    DD  *
 EXPORT SYS1.UCAT.CBT249 DISCONNECT
 EXPORT SYS1.UCAT.CBT429 DISCONNECT
 SET LASTCC = 0
 SET MAXCC  = 0
 IMPORT CONNECT OBJECTS(SYS1.UCAT.CBT249 FILE(CBT001) VOLUME(CBT001)-
                DEVT(3350))
			 
 DEFINE ALIAS(NAME(CBT249) RELATE(SYS1.UCAT.CBT249))			
 DEFINE ALIAS(NAME(CBTCOV) RELATE(SYS1.UCAT.CBT249))			
 IMPORT CONNECT OBJECTS(SYS1.UCAT.CBT429 FILE(CBT002) VOLUME(CBT002)-
                        DEVT(3350))
 DEFINE ALIAS(NAME(CBT429) RELATE(SYS1.UCAT.CBT429))			
 SET LASTCC = 0
 SET MAXCC = 0
