1 //REPROUC2 JOB 'JAY MOSELEY',CLASS=A,MSGLEVEL=(1,1),MSGCLASS=A JOB 101
2 //IDCAMS1 EXEC PGM=IDCAMS,REGION=4096K 00020000
3 //SYSPRINT DD SYSOUT=A 00030000
4 //SYSIN DD * 00040000
5 //IDCAMS2 EXEC PGM=IDCAMS,REGION=4096K,COND=(0,NE) 00170000
6 //STEPCAT DD DSN=UCMVS802,DISP=SHR 00180000
7 //SYSPRINT DD SYSOUT=A 00190000
8 //BACKUP DD UNIT=(TAPE,,DEFER),DISP=(OLD,KEEP), 00200000
// DSN=BACKUP.UCMVS802,VOL=SER=B00002 00210000
9 //SYSIN DD * 00220000
\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\
IDCAMS SYSTEM SERVICES TIME: 15:49:56 01/08/74 PAGE 1
00050000
DELETE (UCMVS802) - 00060000
USERCATALOG FORCE PURGE 00070000
IDC0550I ENTRY (U) UCMVS802 DELETED
IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0
00080000
IF LASTCC = 0 THEN 00090000
DEFINE USERCATALOG ( - 00100000
NAME (UCMVS802) - 00110000
VOLUME (MVS802) - 00120000
TRACKS (15) - 00130000
FOR (9999) ) 00140000
IDC0510I CATALOG ALLOCATION STATUS FOR VOLUME MVS802 IS 0
IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0
IDC0002I IDCAMS PROCESSING COMPLETE. MAXIMUM CONDITION CODE WAS 0
==============================================================================================================
IDCAMS SYSTEM SERVICES TIME: 15:49:59 01/08/74 PAGE 1
00230000
REPRO INFILE(BACKUP) - 00240000
OUTDATASET(UCMVS802) 00250000
IDC0571I CATALOG RELOAD HAS BEEN INVOKED
IDC1575I ONLY BACKUP DEFINES MVS802.DEPT.LIST
IDC1575I ONLY BACKUP DEFINES MVS802.DEPT.LIST.DATA
IDC1575I ONLY BACKUP DEFINES MVS802.HRTITLE.BACKUP
IDC1575I ONLY BACKUP DEFINES MVS802.HRTITLE.TABLE
IDC1575I ONLY BACKUP DEFINES MVS802.HRTITLE.TABLE.DATA
IDC1575I ONLY BACKUP DEFINES MVS802.STUDENT.BACKUP
IDC1575I ONLY BACKUP DEFINES MVS802.STUDENT.BACKUP.DATA
IDC1575I ONLY BACKUP DEFINES MVS802.STUDENT.BACKUP.INDEX
IDC0005I NUMBER OF RECORDS PROCESSED WAS 283
IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 4
IDC0002I IDCAMS PROCESSING COMPLETE. MAXIMUM CONDITION CODE WAS 4
