1 //DEFCLUSR JOB 'JAY MOSELEY',CLASS=A,MSGLEVEL=(1,1),MSGCLASS=A JOB 72
2 //IDCAMS EXEC PGM=IDCAMS,REGION=4096K 00020000
3 //SYSPRINT DD SYSOUT=A 00030000
4 //SYSIN DD * 00040000
\/\/\/\/\/\/\/\/\//\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/
IDCAMS SYSTEM SERVICES TIME: 17:31:55 01/07/74 PAGE 1
00050000
/* DELETE RRDS CLUSTER, IF IT EXISTS */ 00060000
00070000
DELETE MVS802.HRTITLE.TABLE CLUSTER PURGE 00080000
IDC3012I ENTRY MVS802.HRTITLE.TABLE NOT FOUND IDC3009I ** VSAM CATALOG RETURN CODE IS 8 - REASON CODE IS IGG0CLAG-6 IDC0551I **ENTRY MVS802.HRTITLE.TABLE NOT DELETED
IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 8
00090000
/* DEFINE RRDS CLUSTER */ 00100000
00110000
DEFINE CLUSTER ( - 00120000
NAME(MVS802.HRTITLE.TABLE) - 00130000
VOLUMES(MVS802) - 00140000
RECORDSIZE(30 30) - 00150000
RECORDS(100 100) - 00160000
NUMBERED - 00170000
REUSE ) - 00180000
DATA ( - 00190000
NAME(MVS802.HRTITLE.TABLE.DATA) ) 00200000
IDC0508I DATA ALLOCATION STATUS FOR VOLUME MVS802 IS 0
IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0
00210000
IF LASTCC = 0 THEN 00220000
LISTCAT ALL LEVEL(MVS802.HRTITLE) 00230000
CLUSTER ------- MVS802.HRTITLE.TABLE
IN-CAT --- UCMVS802
HISTORY
OWNER-IDENT-------(NULL) CREATION----------74.007
RELEASE----------------2 EXPIRATION--------00.000
PROTECTION-PSWD-----(NULL) RACF----------------(NO)
ASSOCIATIONS
DATA-----MVS802.HRTITLE.TABLE.DATA
DATA ---------- MVS802.HRTITLE.TABLE.DATA
IN-CAT --- UCMVS802
HISTORY
OWNER-IDENT-------(NULL) CREATION----------74.007
RELEASE----------------2 EXPIRATION--------00.000
PROTECTION-PSWD-----(NULL) RACF----------------(NO)
ASSOCIATIONS
==============================================================================================================
IDCAMS SYSTEM SERVICES TIME: 17:31:55 01/07/74 PAGE 2
CLUSTER--MVS802.HRTITLE.TABLE
ATTRIBUTES
KEYLEN-----------------0 AVGLRECL--------------30 BUFSPACE------------8192 CISIZE--------------4096
RKP--------------------0 MAXLRECL--------------30 EXCPEXIT----------(NULL) CI/CA-----------------10
RECORDS/CI-----------124 MAXRECS--------130023424
SHROPTNS(1,3) RECOVERY SUBALLOC NOERASE NUMBERED NOWRITECHK NOIMBED NOREPLICAT
UNORDERED REUSE NONSPANNED
STATISTICS
REC-TOTAL--------------0 SPLITS-CI--------------0 EXCPS------------------0
REC-DELETED------------0 SPLITS-CA--------------0 EXTENTS----------------1
REC-INSERTED-----------0 FREESPACE-%CI----------0 SYSTEM-TIMESTAMP:
REC-UPDATED------------0 FREESPACE-%CA----------0 X'0000000000000000'
REC-RETRIEVED----------0 FREESPC-BYTES------40960
ALLOCATION
SPACE-TYPE---------TRACK HI-ALLOC-RBA-------40960
SPACE-PRI--------------1 HI-USED-RBA------------0
SPACE-SEC--------------1
VOLUME
VOLSER------------MVS802 PHYREC-SIZE---------4096 HI-ALLOC-RBA-------40960 EXTENT-NUMBER----------1
DEVTYPE------X'3010200E' PHYRECS/TRK-----------10 HI-USED-RBA------------0 EXTENT-TYPE--------X'40'
VOLFLAG------------PRIME TRACKS/CA--------------1
EXTENTS:
LOW-CCHH-----X'00020002' LOW-RBA----------------0 TRACKS-----------------1
HIGH-CCHH----X'00020002' HIGH-RBA-----------40959
==============================================================================================================
IDCAMS SYSTEM SERVICES TIME: 17:31:55 01/07/74 PAGE 3
THE NUMBER OF ENTRIES PROCESSED WAS:
AIX -------------------0
ALIAS -----------------0
CLUSTER ---------------1
DATA ------------------1
GDG -------------------0
INDEX -----------------0
NONVSAM ---------------0
PAGESPACE -------------0
PATH ------------------0
SPACE -----------------0
USERCATALOG -----------0
TOTAL -----------------2
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
