000001 //IDCAMS JOB 1,NOTIFY=&SYSUID,CLASS=A,MSGCLASS=C . . 000002 //STEP1 EXEC PGM=IDCAMS . . 000003 //SYSPRINT DD SYSOUT=* . . 000004 //SYSIN DD * . . 000005 DELETE AU00773.BCC.VSAM CLUSTER . . 000006 //STEP2 EXEC PGM=IDCAMS . . 000007 //SYSPRINT DD SYSOUT=* . . 000008 //SYSIN DD * . . 000009 DEFINE CLUSTER (NAME(AU00773.BCC.VSAM) - . . 000010 INDEXED - . . 000011 KEYS(8 0) - . . 000012 VOLUMES(VPWRKH) - . . 000013 RECSZ(133 133) - . . 000014 TRACKS(1,1) - . . 000015 CISZ(4096) - . . 000016 FREESPACE(3 3) ) - . . 000017 DATA (NAME(AU00773.BCC.VSAM.DATA)) - . . 000018 INDEX (NAME(AU00773.BCC.VSAM.INDEX)) . . 000019 /*