1 //REPRO04 JOB 'JAY MOSELEY',CLASS=A,MSGLEVEL=(1,1),MSGCLASS=A JOB 87
2 //IDCAMS EXEC PGM=IDCAMS,REGION=4096K 00020000
3 //SYSPRINT DD SYSOUT=A 00030000
4 //SYSIN DD * 00040000
\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\
IDCAMS SYSTEM SERVICES TIME: 23:16:12 01/07/74 PAGE 1
00050000
/* DELETE BACKUP CLUSTER, IF IT EXISTS */ 00060000
00070000
DELETE MVS802.STUDENT.BACKUP CLUSTER PURGE 00080000
IDC3012I ENTRY MVS802.STUDENT.BACKUP NOT FOUND IDC3009I ** VSAM CATALOG RETURN CODE IS 8 - REASON CODE IS IGG0CLAG-6 IDC0551I **ENTRY MVS802.STUDENT.BACKUP NOT DELETED
IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 8
00090000
/* DEFINE BACKUP KSDS CLUSTER */ 00100000
00110000
DEFINE CLUSTER ( - 00120000
NAME(MVS802.STUDENT.BACKUP) - 00130000
VOLUMES(MVS802) - 00140000
MODEL(MVS801.STUDENT.FILE) ) - 00150000
DATA ( - 00160000
NAME(MVS802.STUDENT.BACKUP.DATA) ) - 00170000
INDEX ( - 00180000
NAME(MVS802.STUDENT.BACKUP.INDEX) ) 00190000
IDC0508I DATA ALLOCATION STATUS FOR VOLUME MVS802 IS 0
IDC0509I INDEX ALLOCATION STATUS FOR VOLUME MVS802 IS 0
IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0
00200000
00210000
IF LASTCC = 0 THEN 00220000
REPRO INDATASET(MVS801.STUDENT.FILE) - 00230000
OUTDATASET(MVS802.STUDENT.BACKUP) 00240000
IDC0005I NUMBER OF RECORDS PROCESSED WAS 97
IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0
00250000
IF LASTCC = 0 THEN 00260000
LISTCAT ALL LEVEL(MVS802.STUDENT) 00270000
CLUSTER ------- MVS802.STUDENT.BACKUP
IN-CAT --- UCMVS802
HISTORY
==============================================================================================================
IDCAMS SYSTEM SERVICES TIME: 23:16:12 01/07/74 PAGE 2
OWNER-IDENT-------(NULL) CREATION----------74.007
RELEASE----------------2 EXPIRATION--------00.000
PROTECTION-PSWD-----(NULL) RACF----------------(NO)
ASSOCIATIONS
DATA-----MVS802.STUDENT.BACKUP.DATA
INDEX----MVS802.STUDENT.BACKUP.INDEX
DATA ---------- MVS802.STUDENT.BACKUP.DATA
IN-CAT --- UCMVS802
HISTORY
OWNER-IDENT-------(NULL) CREATION----------74.007
RELEASE----------------2 EXPIRATION--------00.000
PROTECTION-PSWD-----(NULL) RACF----------------(NO)
ASSOCIATIONS
CLUSTER--MVS802.STUDENT.BACKUP
ATTRIBUTES
KEYLEN----------------10 AVGLRECL--------------80 BUFSPACE-----------25088 CISIZE-------------12288
RKP--------------------0 MAXLRECL--------------80 EXCPEXIT----------(NULL) CI/CA------------------3
SHROPTNS(1,3) RECOVERY SUBALLOC NOERASE INDEXED NOWRITECHK NOIMBED NOREPLICAT
UNORDERED NOREUSE NONSPANNED
STATISTICS
REC-TOTAL-------------97 SPLITS-CI--------------0 EXCPS------------------2
REC-DELETED------------0 SPLITS-CA--------------0 EXTENTS----------------1
REC-INSERTED-----------0 FREESPACE-%CI----------0 SYSTEM-TIMESTAMP:
REC-UPDATED------------0 FREESPACE-%CA----------0 X'84C6EFC193068000'
REC-RETRIEVED----------0 FREESPC-BYTES------24576
ALLOCATION
SPACE-TYPE---------TRACK HI-ALLOC-RBA-------36864
SPACE-PRI--------------1 HI-USED-RBA--------36864
SPACE-SEC--------------1
VOLUME
VOLSER------------MVS802 PHYREC-SIZE---------4096 HI-ALLOC-RBA-------36864 EXTENT-NUMBER----------1
DEVTYPE------X'3010200E' PHYRECS/TRK-----------10 HI-USED-RBA--------36864 EXTENT-TYPE--------X'00'
VOLFLAG------------PRIME TRACKS/CA--------------1
EXTENTS:
LOW-CCHH-----X'00020003' LOW-RBA----------------0 TRACKS-----------------1
HIGH-CCHH----X'00020003' HIGH-RBA-----------36863
INDEX --------- MVS802.STUDENT.BACKUP.INDEX
IN-CAT --- UCMVS802
HISTORY
OWNER-IDENT-------(NULL) CREATION----------74.007
RELEASE----------------2 EXPIRATION--------00.000
PROTECTION-PSWD-----(NULL) RACF----------------(NO)
ASSOCIATIONS
CLUSTER--MVS802.STUDENT.BACKUP
ATTRIBUTES
KEYLEN----------------10 AVGLRECL---------------0 BUFSPACE---------------0 CISIZE---------------512
RKP--------------------0 MAXLRECL-------------505 EXCPEXIT----------(NULL) CI/CA-----------------46
SHROPTNS(1,3) RECOVERY SUBALLOC NOERASE NOWRITECHK NOIMBED NOREPLICAT UNORDERED
NOREUSE
==============================================================================================================
IDCAMS SYSTEM SERVICES TIME: 23:16:12 01/07/74 PAGE 3
STATISTICS
REC-TOTAL--------------1 SPLITS-CI--------------0 EXCPS------------------3 INDEX:
REC-DELETED------------0 SPLITS-CA--------------0 EXTENTS----------------1 LEVELS-----------------1
REC-INSERTED-----------0 FREESPACE-%CI----------0 SYSTEM-TIMESTAMP: ENTRIES/SECT-----------1
REC-UPDATED------------0 FREESPACE-%CA----------0 X'84C6EFC193068000' SEQ-SET-RBA------------0
REC-RETRIEVED----------0 FREESPC-BYTES------23040 HI-LEVEL-RBA-----------0
ALLOCATION
SPACE-TYPE---------TRACK HI-ALLOC-RBA-------23552
SPACE-PRI--------------1 HI-USED-RBA----------512
SPACE-SEC--------------1
VOLUME
VOLSER------------MVS802 PHYREC-SIZE----------512 HI-ALLOC-RBA-------23552 EXTENT-NUMBER----------1
DEVTYPE------X'3010200E' PHYRECS/TRK-----------46 HI-USED-RBA----------512 EXTENT-TYPE--------X'00'
VOLFLAG------------PRIME TRACKS/CA--------------1
EXTENTS:
LOW-CCHH-----X'00020004' LOW-RBA----------------0 TRACKS-----------------1
HIGH-CCHH----X'00020004' HIGH-RBA-----------23551
==============================================================================================================
IDCAMS SYSTEM SERVICES TIME: 23:16:12 01/07/74 PAGE 4
THE NUMBER OF ENTRIES PROCESSED WAS:
AIX -------------------0
ALIAS -----------------0
CLUSTER ---------------1
DATA ------------------1
GDG -------------------0
INDEX -----------------1
NONVSAM ---------------0
PAGESPACE -------------0
PATH ------------------0
SPACE -----------------0
USERCATALOG -----------0
TOTAL -----------------3
THE NUMBER OF PROTECTED ENTRIES SUPPRESSED WAS 0
IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0
IDC0002I IDCAMS PROCESSING COMPLETE. MAXIMUM CONDITION CODE WAS 8
