This document presents advanced topics related to VSAM alternate indexes, and includes the following sections:
The reader is assumed to have a basic understanding of VSAM alternate indexes. Readers who do not have such an understanding can acquire it by reading the IBM documentation or other documents available on the Internet.
VSAM Alternate Indexes are documented in theAccess to Records through Alternate Indexes section of theDFSMS Using Data Sets manual.
The DEFINE Alternate Index Command and BLDINDEX Command are documented in Access Method Services manual.
A VSAM Alternate Index (AIX) is similar to a KSDS and made up of an INDEX
and a DATA component. Records in the DATA component of an AIX have a 5-byte
prefix which define the format of the rest of the record. The format of an AIX
record is as follows:
00 | Flag Byte | Contains X'00' if the base cluster is an ESDS, X'01' if it is a KSDS |
01 | Length of Pointer | If the base cluster is an ESDS, this field contains X'04'. If the base cluster is a KSDS, this field contains the 8-bit length of the primary key |
02 | Count of number of pointers | Always X'0001' if the AIX is DEFINE'd with the UNIQUEKEY attribute. If the AIX is DEFINE'd with the NONUNIQUEKEY attribute and duplicate keys are present, the count may have a value greater than 1, up to 32767 |
04 | Length of alternate key | Key length of the alternate index |
05 | Alternate key | Alternate index key |
** | Pointer(s) to base record(s) | 4-byte RBA (ESDS) or primary key (KSDS); if the AIX is DEFINE'd with the NONUNIQUEKEY attribute, multiple pointers may be present, as specified in the count field at offset 02 in the AIX record. |
The pointer contained in each AIX record is the RBA of the record in the base cluster if it is an ESDS, or the key of the record of the base cluster if it is a KSDS. Using the key instead of the RBA for KSDS records has a negative impact on performance, but ensures consistency with CI/CA splits which may occur in the base cluster.
Although a DEFINE AIX command fails if the base cluster is DEFINE'd with the REUSE attribute, an alternate index may, itself, be defined with either REUSE or NOREUSE. An AIX DEFINE'd with REUSE can be the object of multiple BLDINDEX commands without intermediate DELETE/DEFINE commands.
When an alternate index is defined with NONUNIQUEKEY, an alternate key can
point to a maximum of 32767 base records. The default value for the RECORDSIZE
parameter for an AIX is 32600 which only permits a maximum of 16297 base records
in the best circumstances. If RECORDSIZE is not big enough, BLDINDEX issues the
following message and fails with RC=4:
Note that because an AIX always has the SPANNED attribute, the maximun value specified for RECORDSIZE can exceed 32760. To calculate the RECORDSIZE value needed for a particular configuration, see the IBM documentation for the IDCAMS BLDINDEX command.
See the two examples below.
A VSAM Alternate Index (AIX) is generally built with the IDCAMS BLDINDEX command, which reads the base cluster's records, creates AIX records, sorts them, and writes them out to the AIX.
It is recommended to use the SORTCALL option of the BLDINDEX command which invokes the SORT utility program to sort the AIX records. The SORTCALL option was added (and became the default option) in the 1980s, and is more efficient than IDCAMS's own ESORT capability when creating large indexes. Specifying SORTMESSAGELEVEL(ALL) ensures all of the SORT messages are written to SYSOUT. Example:
//BIX1 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSOUT DD SYSOUT=* //SORTWK01 DD SPACE=(CYL,(50,50)) //SORTWK02 DD SPACE=(CYL,(50,50)) //SYSIN DD * BLDINDEX IDS(VSAMAIX.BIX.ESDS) ODS(VSAMAIX.BIX.AIX) SORTMESSAGELEVEL(ALL) /*
Note: IDCAMS allocates the SYSOUT and SORTWKxx data sets dynamically if they're not present in the JCL.
Using INFILE/OUTFILE instead of INDATASET and OUTDATASET allows the specification of BUFSP in the JCL and significantly reduces the I/O activity of the BLDINDEX command. Example:
//BUFSP EXEC PGM=IDCAMS //ESDS DD DSN=VSAMAIX.BIX.ESDS,DISP=SHR,AMP='BUFSP=500000' //AIX DD DSN=VSAMAIX.BIX.AIX,DISP=SHR,AMP='BUFSP=500000' //SYSPRINT DD SYSOUT=* //SYSOUT DD SYSOUT=* //SORTWK01 DD SPACE=(CYL,(50,50)) //SORTWK02 DD SPACE=(CYL,(50,50)) //SYSIN DD * BLDINDEX IFILE(ESDS) OFILE(AIX) SORTML(ALL) /*
Note: BLDINDEX allows the specification of several indexes, as shown in the KSDS example below. This has no effect on performance, as BLDINDEX still reads the base cluster once for each of the alternate indexes.
Once the format of an AIX record is understood, it is fairly trivial to write a program to replace IDCAMS BLDINDEX and, for example, create a partial index. As far as the program is concerned, writing AIX records is the same as writing KSDS records.
Several non-IBM products are available to speed up the creation of an AIX; some of these products allow the creation of several indexes in a single pass, others allow the creation of partial indexes by selecting specific records from the base cluster. The alternatives to BLDINDEX we know of are the following:
1IDCAMS SYSTEM SERVICES TIME: 10:48:30 2004-01-17 PAGE 1 0 DEF CL(NAME(VSAMAIX.BIX.ESDS) RECORDS(10 5) RECSZ(80 80) NIXD NRUS) 0IGD01010I STORGRP_ACS: STORCLAS(DEFAULT) STORGRP(DEFAULT) DSN(VSAMAIX.BIX.ESDS) 0IDC0508I DATA ALLOCATION STATUS FOR VOLUME PRIM14 IS 0 0IDC0512I NAME GENERATED-(D) VSAMAIX.BIX.ESDS.DATA IDC0181I STORAGECLASS USED IS DEFAULT IDC0181I DATACLASS USED IS SMALL 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 0 IF MAXCC > 4 THEN CANCEL ; /*-+----1----+----2----+----3----+----4----+----5----+----6----+----7 REPRO IFILE(SYSIN) ODS(VSAMAIX.BIX.ESDS) COUNT(4) 0IDC0005I NUMBER OF RECORDS PROCESSED WAS 4 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 0 DEF AIX(NAME(VSAMAIX.BIX.AIX) REL(VSAMAIX.BIX.ESDS) - KEYS(30 0) RECORDS(10 5) NUNQK) 0IDC0508I DATA ALLOCATION STATUS FOR VOLUME PRIM14 IS 0 0IDC0509I INDEX ALLOCATION STATUS FOR VOLUME PRIM14 IS 0 1IDCAMS SYSTEM SERVICES TIME: 10:48:30 2004-01-17 PAGE 2 0IDC0512I NAME GENERATED-(D) VSAMAIX.BIX.AIX.DATA 0IDC0512I NAME GENERATED-(I) VSAMAIX.BIX.AIX.INDEX IDC0181I STORAGECLASS USED IS DEFAULT IDC0181I DATACLASS USED IS SMALL 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 0 IF MAXCC > 4 THEN CANCEL ; DEF PATH(NAME(VSAMAIX.BIX.PATH) PENT(VSAMAIX.BIX.AIX)) 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 0 IF MAXCC > 4 THEN CANCEL ; BLDINDEX IDS(VSAMAIX.BIX.ESDS) ODS(VSAMAIX.BIX.AIX) 0IDC0652I VSAMAIX.BIX.AIX SUCCESSFULLY BUILT 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 0 PRINT IDS(VSAMAIX.BIX.ESDS) CHAR 1IDCAMS SYSTEM SERVICES TIME: 10:48:30 2004-01-17 PAGE 3 -LISTING OF DATA SET -VSAMAIX.BIX.ESDS 0RBA OF RECORD - 0 B33333333333333333333333333333A11111111 C222222222222222222 0RBA OF RECORD - 80 B22222222222222222222222222222A22222222 C111111111111111111 0RBA OF RECORD - 160 B11111111111111111111111111111A33333333 C333333333333333333 0RBA OF RECORD - 240 B11111111111111111111111111111A44444444 C444444444444444444 0IDC0005I NUMBER OF RECORDS PROCESSED WAS 4 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 1IDCAMS SYSTEM SERVICES TIME: 10:48:30 2004-01-17 PAGE 4 0 PRINT IDS(VSAMAIX.BIX.PATH) CHAR 1IDCAMS SYSTEM SERVICES TIME: 10:48:30 2004-01-17 PAGE 5 -LISTING OF DATA SET -VSAMAIX.BIX.PATH 0KEY OF RECORD - B11111111111111111111111111111 B11111111111111111111111111111A33333333 C333333333333333333 0KEY OF RECORD - B11111111111111111111111111111 B11111111111111111111111111111A44444444 C444444444444444444 0KEY OF RECORD - B22222222222222222222222222222 B22222222222222222222222222222A22222222 C111111111111111111 0KEY OF RECORD - B33333333333333333333333333333 B33333333333333333333333333333A11111111 C222222222222222222 0IDC0005I NUMBER OF RECORDS PROCESSED WAS 4 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 1IDCAMS SYSTEM SERVICES TIME: 10:48:30 2004-01-17 PAGE 6 0 PRINT IDS(VSAMAIX.BIX.AIX) DUMP 1IDCAMS SYSTEM SERVICES TIME: 10:48:30 2004-01-17 PAGE 7 -LISTING OF DATA SET -VSAMAIX.BIX.AIX 0KEY OF RECORD - C2F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1 000000 00040002 1EC2F1F1 F1F1F1F1 F1F1F1F1 F1F1F1F1 F1F1F1F1 F1F1F1F1 F1F1F1F1 *.....B11111111111111111111111111* 000020 F1F1F100 0000A000 0000F0 *111.......0 * 0KEY OF RECORD - C2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2 000000 00040001 1EC2F2F2 F2F2F2F2 F2F2F2F2 F2F2F2F2 F2F2F2F2 F2F2F2F2 F2F2F2F2 *.....B22222222222222222222222222* 000020 F2F2F200 000050 *222...& * 0KEY OF RECORD - C2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3 000000 00040001 1EC2F3F3 F3F3F3F3 F3F3F3F3 F3F3F3F3 F3F3F3F3 F3F3F3F3 F3F3F3F3 *.....B33333333333333333333333333* 000020 F3F3F300 000000 *333.... * 0IDC0005I NUMBER OF RECORDS PROCESSED WAS 3 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 1IDCAMS SYSTEM SERVICES TIME: 10:48:30 2004-01-17 PAGE 8 0 LISTC ENT(VSAMAIX.BIX.ESDS VSAMAIX.BIX.AIX VSAMAIX.BIX.PATH) ALL 0CLUSTER ------- VSAMAIX.BIX.ESDS IN-CAT --- USERCAT.SYSCAT HISTORY DATASET-OWNER-----(NULL) CREATION--------2004.017 RELEASE----------------2 EXPIRATION------0000.000 SMSDATA STORAGECLASS ----DEFAULT MANAGEMENTCLASS---(NULL) DATACLASS ---------SMALL LBACKUP ---0000.000.0000 BWO STATUS------00000000 BWO TIMESTAMP---00000 00:00:00.0 BWO---------------(NULL) RLSDATA LOG ----------------(NULL) RECOVERY REQUIRED --(NO) FRLOG ------------(NULL) VSAM QUIESCED -------(NO) RLS IN USE ---------(NO) 0 LOGSTREAMID-----------------------------(NULL) RECOVERY TIMESTAMP LOCAL-----X'0000000000000000' RECOVERY TIMESTAMP GMT-------X'0000000000000000' PROTECTION-PSWD-----(NULL) RACF----------------(NO) ASSOCIATIONS DATA-----VSAMAIX.BIX.ESDS.DATA AIX------VSAMAIX.BIX.AIX 0 DATA ------- VSAMAIX.BIX.ESDS.DATA IN-CAT --- USERCAT.SYSCAT HISTORY DATASET-OWNER-----(NULL) CREATION--------2004.017 RELEASE----------------2 EXPIRATION------0000.000 ACCOUNT-INFO-----------------------------------(NULL) PROTECTION-PSWD-----(NULL) RACF----------------(NO) ASSOCIATIONS CLUSTER--VSAMAIX.BIX.ESDS ATTRIBUTES KEYLEN-----------------0 AVGLRECL--------------80 BUFSPACE-----------36864 CISIZE-------------18432 RKP--------------------0 MAXLRECL--------------80 EXCPEXIT----------(NULL) CI/CA------------------3 SHROPTNS(1,3) SPEED UNIQUE NOERASE NONINDEXED NOWRITECHK NOIMBED NOREPLICAT UNORDERED NOREUSE NONSPANNED STATISTICS REC-TOTAL--------------4 SPLITS-CI--------------0 EXCPS------------------5 REC-DELETED------------0 SPLITS-CA--------------0 EXTENTS----------------1 REC-INSERTED-----------0 FREESPACE-%CI----------0 SYSTEM-TIMESTAMP: REC-UPDATED------------0 FREESPACE-%CA----------0 X'C004EB1CD483D000' REC-RETRIEVED---------12 FREESPC------------36864 ALLOCATION SPACE-TYPE---------TRACK HI-A-RBA-----------55296 SPACE-PRI--------------1 HI-U-RBA-----------18432 SPACE-SEC--------------1 VOLUME 1IDCAMS SYSTEM SERVICES TIME: 10:48:30 2004-01-17 PAGE 9 0 VOLSER------------PRIM14 PHYREC-SIZE--------18432 HI-A-RBA-----------55296 EXTENT-NUMBER----------1 DEVTYPE------X'3010200F' PHYRECS/TRK------------3 HI-U-RBA-----------18432 EXTENT-TYPE--------X'40' VOLFLAG------------PRIME TRACKS/CA--------------1 EXTENTS: LOW-CCHH-----X'01500000' LOW-RBA----------------0 TRACKS-----------------1 HIGH-CCHH----X'01500000' HIGH-RBA-----------55295 0AIX ----------- VSAMAIX.BIX.AIX IN-CAT --- USERCAT.SYSCAT HISTORY DATASET-OWNER-----(NULL) CREATION--------2004.017 RELEASE----------------2 EXPIRATION------0000.000 SMS MANAGED--------(YES) PROTECTION-PSWD-----(NULL) RACF----------------(NO) ASSOCIATIONS DATA-----VSAMAIX.BIX.AIX.DATA INDEX----VSAMAIX.BIX.AIX.INDEX CLUSTER--VSAMAIX.BIX.ESDS PATH-----VSAMAIX.BIX.PATH ATTRIBUTES UPGRADE 0 DATA ------- VSAMAIX.BIX.AIX.DATA IN-CAT --- USERCAT.SYSCAT HISTORY DATASET-OWNER-----(NULL) CREATION--------2004.017 RELEASE----------------2 EXPIRATION------0000.000 ACCOUNT-INFO-----------------------------------(NULL) PROTECTION-PSWD-----(NULL) RACF----------------(NO) ASSOCIATIONS AIX------VSAMAIX.BIX.AIX ATTRIBUTES KEYLEN----------------30 AVGLRECL------------4086 BUFSPACE-----------41472 CISIZE-------------20480 RKP--------------------5 MAXLRECL-----------32600 EXCPEXIT----------(NULL) CI/CA------------------2 AXRKP------------------0 SHROPTNS(1,3) SPEED UNIQUE NOERASE INDEXED NOWRITECHK NOIMBED NOREPLICAT UNORDERED REUSE SPANNED NONUNIQKEY STATISTICS REC-TOTAL--------------3 SPLITS-CI--------------0 EXCPS------------------4 REC-DELETED------------0 SPLITS-CA--------------0 EXTENTS----------------1 REC-INSERTED-----------0 FREESPACE-%CI----------0 SYSTEM-TIMESTAMP: REC-UPDATED------------0 FREESPACE-%CA----------0 X'C004EB1EA951D000' REC-RETRIEVED----------6 FREESPC------------20480 ALLOCATION SPACE-TYPE---------TRACK HI-A-RBA-----------40960 SPACE-PRI--------------1 HI-U-RBA-----------40960 SPACE-SEC--------------1 VOLUME VOLSER------------PRIM14 PHYREC-SIZE--------10240 HI-A-RBA-----------40960 EXTENT-NUMBER----------1 DEVTYPE------X'3010200F' PHYRECS/TRK------------5 HI-U-RBA-----------40960 EXTENT-TYPE--------X'40' VOLFLAG------------PRIME TRACKS/CA--------------1 1IDCAMS SYSTEM SERVICES TIME: 10:48:30 2004-01-17 PAGE 10 0 EXTENTS: LOW-CCHH-----X'01500001' LOW-RBA----------------0 TRACKS-----------------1 HIGH-CCHH----X'01500001' HIGH-RBA-----------40959 0 INDEX ------ VSAMAIX.BIX.AIX.INDEX IN-CAT --- USERCAT.SYSCAT HISTORY DATASET-OWNER-----(NULL) CREATION--------2004.017 RELEASE----------------2 EXPIRATION------0000.000 PROTECTION-PSWD-----(NULL) RACF----------------(NO) ASSOCIATIONS AIX------VSAMAIX.BIX.AIX ATTRIBUTES KEYLEN----------------30 AVGLRECL---------------0 BUFSPACE---------------0 CISIZE---------------512 RKP--------------------5 MAXLRECL-------------505 EXCPEXIT----------(NULL) CI/CA-----------------49 SHROPTNS(1,3) SPEED UNIQUE NOERASE NOWRITECHK NOIMBED NOREPLICAT UNORDERED REUSE STATISTICS REC-TOTAL--------------1 SPLITS-CI--------------0 EXCPS------------------5 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'C004EB1EA951D000' SEQ-SET-RBA------------0 REC-RETRIEVED----------0 FREESPC------------24576 HI-LEVEL-RBA-----------0 ALLOCATION SPACE-TYPE---------TRACK HI-A-RBA-----------25088 SPACE-PRI--------------1 HI-U-RBA-------------512 SPACE-SEC--------------1 VOLUME VOLSER------------PRIM14 PHYREC-SIZE----------512 HI-A-RBA-----------25088 EXTENT-NUMBER----------1 DEVTYPE------X'3010200F' PHYRECS/TRK-----------49 HI-U-RBA-------------512 EXTENT-TYPE--------X'00' VOLFLAG------------PRIME TRACKS/CA--------------1 EXTENTS: LOW-CCHH-----X'0168000E' LOW-RBA----------------0 TRACKS-----------------1 HIGH-CCHH----X'0168000E' HIGH-RBA-----------25087 0 PATH ------- VSAMAIX.BIX.PATH IN-CAT --- USERCAT.SYSCAT HISTORY DATASET-OWNER-----(NULL) CREATION--------2004.017 RELEASE----------------2 EXPIRATION------0000.000 PROTECTION-PSWD-----(NULL) RACF----------------(NO) ASSOCIATIONS AIX------VSAMAIX.BIX.AIX DATA-----VSAMAIX.BIX.AIX.DATA INDEX----VSAMAIX.BIX.AIX.INDEX DATA-----VSAMAIX.BIX.ESDS.DATA ATTRIBUTES UPDATE 0PATH ---------- VSAMAIX.BIX.PATH IN-CAT --- USERCAT.SYSCAT 1IDCAMS SYSTEM SERVICES TIME: 10:48:30 2004-01-17 PAGE 11 0 HISTORY DATASET-OWNER-----(NULL) CREATION--------2004.017 RELEASE----------------2 EXPIRATION------0000.000 PROTECTION-PSWD-----(NULL) RACF----------------(NO) ASSOCIATIONS AIX------VSAMAIX.BIX.AIX DATA-----VSAMAIX.BIX.AIX.DATA INDEX----VSAMAIX.BIX.AIX.INDEX DATA-----VSAMAIX.BIX.ESDS.DATA ATTRIBUTES UPDATE 1IDCAMS SYSTEM SERVICES TIME: 10:48:30 2004-01-17 PAGE 12 0 THE NUMBER OF ENTRIES PROCESSED WAS: AIX -------------------1 ALIAS -----------------0 CLUSTER ---------------1 DATA ------------------2 GDG -------------------0 INDEX -----------------1 NONVSAM ---------------0 PAGESPACE -------------0 PATH ------------------2 SPACE -----------------0 USERCATALOG -----------0 TAPELIBRARY -----------0 TAPEVOLUME ------------0 TOTAL -----------------7 0 THE NUMBER OF PROTECTED ENTRIES SUPPRESSED WAS 0 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 0 DELETE VSAMAIX.BIX.* 0IDC0550I ENTRY (R) VSAMAIX.BIX.PATH DELETED 0IDC0550I ENTRY (D) VSAMAIX.BIX.AIX.DATA DELETED 0IDC0550I ENTRY (I) VSAMAIX.BIX.AIX.INDEX DELETED 0IDC0550I ENTRY (G) VSAMAIX.BIX.AIX DELETED 0IDC0550I ENTRY (D) VSAMAIX.BIX.ESDS.DATA DELETED 0IDC0550I ENTRY (C) VSAMAIX.BIX.ESDS DELETED 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 0 0IDC0002I IDCAMS PROCESSING COMPLETE. MAXIMUM CONDITION CODE WAS 0
1IDCAMS SYSTEM SERVICES TIME: 10:48:35 2004-01-17 PAGE 1 0 DEF CL(NAME(VSAMAIX.BIX.KSDS) RECORDS(100 50) RECSZ(80 80) KEYS(9 30) + NRUS) 0IGD01010I STORGRP_ACS: STORCLAS(DEFAULT) STORGRP(DEFAULT) DSN(VSAMAIX.BIX.KSDS) 0IDC0508I DATA ALLOCATION STATUS FOR VOLUME PRIM12 IS 0 0IDC0509I INDEX ALLOCATION STATUS FOR VOLUME PRIM12 IS 0 0IDC0512I NAME GENERATED-(D) VSAMAIX.BIX.KSDS.DATA 0IDC0512I NAME GENERATED-(I) VSAMAIX.BIX.KSDS.INDEX IDC0181I STORAGECLASS USED IS DEFAULT IDC0181I DATACLASS USED IS SMALL 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 0 IF MAXCC > 4 THEN CANCEL ; DEF AIX(NAME(VSAMAIX.BIX.AIX1) REL(VSAMAIX.BIX.KSDS) - KEYS(30 0) RECSZ(53 53) RECORDS(100 50) UNQK NUPG) 0IDC0508I DATA ALLOCATION STATUS FOR VOLUME PRIM10 IS 0 0IDC0509I INDEX ALLOCATION STATUS FOR VOLUME PRIM10 IS 0 0IDC0512I NAME GENERATED-(D) VSAMAIX.BIX.AIX1.DATA 0IDC0512I NAME GENERATED-(I) VSAMAIX.BIX.AIX1.INDEX IDC0181I STORAGECLASS USED IS DEFAULT IDC0181I DATACLASS USED IS SMALL 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 0 IF MAXCC > 4 THEN CANCEL ; DEF PATH(NAME(VSAMAIX.BIX.PATH1) PENT(VSAMAIX.BIX.AIX1)) 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 0 IF MAXCC > 4 THEN CANCEL ; DEF AIX(NAME(VSAMAIX.BIX.AIX2) REL(VSAMAIX.BIX.KSDS) - KEYS(20 51) RECSZ(34 34) RECORDS(100 50) UNQK NUPG) 0IDC0508I DATA ALLOCATION STATUS FOR VOLUME PRIM14 IS 0 1IDCAMS SYSTEM SERVICES TIME: 10:48:35 2004-01-17 PAGE 2 0IDC0509I INDEX ALLOCATION STATUS FOR VOLUME PRIM14 IS 0 0IDC0512I NAME GENERATED-(D) VSAMAIX.BIX.AIX2.DATA 0IDC0512I NAME GENERATED-(I) VSAMAIX.BIX.AIX2.INDEX IDC0181I STORAGECLASS USED IS DEFAULT IDC0181I DATACLASS USED IS SMALL 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 0 IF MAXCC > 4 THEN CANCEL ; DEF PATH(NAME(VSAMAIX.BIX.PATH2) PENT(VSAMAIX.BIX.AIX2)) 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 0 IF MAXCC > 4 THEN CANCEL ; /*-+----1----+----2----+----3----+----4----+----5----+----6----+----7 REPRO IFILE(SYSIN) ODS(VSAMAIX.BIX.KSDS) COUNT(3) 0IDC0005I NUMBER OF RECORDS PROCESSED WAS 3 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 0 ALLOCATE DD(AIX1) DS('VSAMAIX.BIX.AIX1') SHR 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 0 ALLOCATE DD(AIX2) DS('VSAMAIX.BIX.AIX2') SHR 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 0 BLDINDEX IDS(VSAMAIX.BIX.KSDS) OFILE(AIX1 AIX2) 0IDC0652I VSAMAIX.BIX.AIX1 SUCCESSFULLY BUILT 0IDC0652I VSAMAIX.BIX.AIX2 SUCCESSFULLY BUILT 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 0 PRINT IDS(VSAMAIX.BIX.KSDS) CHAR 1IDCAMS SYSTEM SERVICES TIME: 10:48:35 2004-01-17 PAGE 3 -LISTING OF DATA SET -VSAMAIX.BIX.KSDS 0KEY OF RECORD - A11111111 B33333333333333333333333333333A11111111 C222222222222222222 0KEY OF RECORD - A22222222 B22222222222222222222222222222A22222222 C111111111111111111 0KEY OF RECORD - A33333333 B11111111111111111111111111111A33333333 C333333333333333333 0IDC0005I NUMBER OF RECORDS PROCESSED WAS 3 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 1IDCAMS SYSTEM SERVICES TIME: 10:48:35 2004-01-17 PAGE 4 0 PRINT IDS(VSAMAIX.BIX.PATH1) CHAR 1IDCAMS SYSTEM SERVICES TIME: 10:48:35 2004-01-17 PAGE 5 -LISTING OF DATA SET -VSAMAIX.BIX.PATH1 0KEY OF RECORD - B11111111111111111111111111111 B11111111111111111111111111111A33333333 C333333333333333333 0KEY OF RECORD - B22222222222222222222222222222 B22222222222222222222222222222A22222222 C111111111111111111 0KEY OF RECORD - B33333333333333333333333333333 B33333333333333333333333333333A11111111 C222222222222222222 0IDC0005I NUMBER OF RECORDS PROCESSED WAS 3 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 1IDCAMS SYSTEM SERVICES TIME: 10:48:35 2004-01-17 PAGE 6 0 PRINT IDS(VSAMAIX.BIX.PATH2) CHAR 1IDCAMS SYSTEM SERVICES TIME: 10:48:35 2004-01-17 PAGE 7 -LISTING OF DATA SET -VSAMAIX.BIX.PATH2 0KEY OF RECORD - C111111111111111111 B22222222222222222222222222222A22222222 C111111111111111111 0KEY OF RECORD - C222222222222222222 B33333333333333333333333333333A11111111 C222222222222222222 0KEY OF RECORD - C333333333333333333 B11111111111111111111111111111A33333333 C333333333333333333 0IDC0005I NUMBER OF RECORDS PROCESSED WAS 3 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 1IDCAMS SYSTEM SERVICES TIME: 10:48:35 2004-01-17 PAGE 8 0 PRINT IDS(VSAMAIX.BIX.AIX1) DUMP 1IDCAMS SYSTEM SERVICES TIME: 10:48:35 2004-01-17 PAGE 9 -LISTING OF DATA SET -VSAMAIX.BIX.AIX1 0KEY OF RECORD - C2F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1 000000 01090001 1EC2F1F1 F1F1F1F1 F1F1F1F1 F1F1F1F1 F1F1F1F1 F1F1F1F1 F1F1F1F1 *.....B11111111111111111111111111* 000020 F1F1F1C1 F3F3F3F3 F3F3F3F3 *111A33333333 * 0KEY OF RECORD - C2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2 000000 01090001 1EC2F2F2 F2F2F2F2 F2F2F2F2 F2F2F2F2 F2F2F2F2 F2F2F2F2 F2F2F2F2 *.....B22222222222222222222222222* 000020 F2F2F2C1 F2F2F2F2 F2F2F2F2 *222A22222222 * 0KEY OF RECORD - C2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3 000000 01090001 1EC2F3F3 F3F3F3F3 F3F3F3F3 F3F3F3F3 F3F3F3F3 F3F3F3F3 F3F3F3F3 *.....B33333333333333333333333333* 000020 F3F3F3C1 F1F1F1F1 F1F1F1F1 *333A11111111 * 0IDC0005I NUMBER OF RECORDS PROCESSED WAS 3 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 1IDCAMS SYSTEM SERVICES TIME: 10:48:35 2004-01-17 PAGE 10 0 PRINT IDS(VSAMAIX.BIX.AIX2) DUMP 1IDCAMS SYSTEM SERVICES TIME: 10:48:35 2004-01-17 PAGE 11 -LISTING OF DATA SET -VSAMAIX.BIX.AIX2 0KEY OF RECORD - C3F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F140 000000 01090001 14C3F1F1 F1F1F1F1 F1F1F1F1 F1F1F1F1 F1F1F1F1 40C1F2F2 F2F2F2F2 *.....C111111111111111111 A222222* 000020 F2F2 *22 * 0KEY OF RECORD - C3F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F240 000000 01090001 14C3F2F2 F2F2F2F2 F2F2F2F2 F2F2F2F2 F2F2F2F2 40C1F1F1 F1F1F1F1 *.....C222222222222222222 A111111* 000020 F1F1 *11 * 0KEY OF RECORD - C3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F340 000000 01090001 14C3F3F3 F3F3F3F3 F3F3F3F3 F3F3F3F3 F3F3F3F3 40C1F3F3 F3F3F3F3 *.....C333333333333333333 A333333* 000020 F3F3 *33 * 0IDC0005I NUMBER OF RECORDS PROCESSED WAS 3 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 1IDCAMS SYSTEM SERVICES TIME: 10:48:35 2004-01-17 PAGE 12 0 LISTC ENT(VSAMAIX.BIX.KSDS VSAMAIX.BIX.AIX1 VSAMAIX.BIX.PATH1 - VSAMAIX.BIX.AIX2 VSAMAIX.BIX.PATH2) ALL 0CLUSTER ------- VSAMAIX.BIX.KSDS IN-CAT --- USERCAT.SYSCAT HISTORY DATASET-OWNER-----(NULL) CREATION--------2004.017 RELEASE----------------2 EXPIRATION------0000.000 SMSDATA STORAGECLASS ----DEFAULT MANAGEMENTCLASS---(NULL) DATACLASS ---------SMALL LBACKUP ---0000.000.0000 BWO STATUS------00000000 BWO TIMESTAMP---00000 00:00:00.0 BWO---------------(NULL) RLSDATA LOG ----------------(NULL) RECOVERY REQUIRED --(NO) FRLOG ------------(NULL) VSAM QUIESCED -------(NO) RLS IN USE ---------(NO) 0 LOGSTREAMID-----------------------------(NULL) RECOVERY TIMESTAMP LOCAL-----X'0000000000000000' RECOVERY TIMESTAMP GMT-------X'0000000000000000' PROTECTION-PSWD-----(NULL) RACF----------------(NO) ASSOCIATIONS DATA-----VSAMAIX.BIX.KSDS.DATA INDEX----VSAMAIX.BIX.KSDS.INDEX AIX------VSAMAIX.BIX.AIX1 AIX------VSAMAIX.BIX.AIX2 0 DATA ------- VSAMAIX.BIX.KSDS.DATA IN-CAT --- USERCAT.SYSCAT HISTORY DATASET-OWNER-----(NULL) CREATION--------2004.017 RELEASE----------------2 EXPIRATION------0000.000 ACCOUNT-INFO-----------------------------------(NULL) PROTECTION-PSWD-----(NULL) RACF----------------(NO) ASSOCIATIONS CLUSTER--VSAMAIX.BIX.KSDS ATTRIBUTES KEYLEN-----------------9 AVGLRECL--------------80 BUFSPACE-----------37376 CISIZE-------------18432 RKP-------------------30 MAXLRECL--------------80 EXCPEXIT----------(NULL) CI/CA------------------3 SHROPTNS(1,3) SPEED UNIQUE NOERASE INDEXED NOWRITECHK NOIMBED NOREPLICAT UNORDERED NOREUSE NONSPANNED STATISTICS REC-TOTAL--------------3 SPLITS-CI--------------0 EXCPS------------------6 REC-DELETED------------0 SPLITS-CA--------------0 EXTENTS----------------1 REC-INSERTED-----------0 FREESPACE-%CI----------0 SYSTEM-TIMESTAMP: REC-UPDATED------------0 FREESPACE-%CA----------0 X'C004EB227F96C000' REC-RETRIEVED---------15 FREESPC------------36864 ALLOCATION SPACE-TYPE---------TRACK HI-A-RBA-----------55296 1IDCAMS SYSTEM SERVICES TIME: 10:48:35 2004-01-17 PAGE 13 0 SPACE-PRI--------------1 HI-U-RBA-----------55296 SPACE-SEC--------------1 VOLUME VOLSER------------PRIM12 PHYREC-SIZE--------18432 HI-A-RBA-----------55296 EXTENT-NUMBER----------1 DEVTYPE------X'3010200F' PHYRECS/TRK------------3 HI-U-RBA-----------55296 EXTENT-TYPE--------X'40' VOLFLAG------------PRIME TRACKS/CA--------------1 EXTENTS: LOW-CCHH-----X'00100007' LOW-RBA----------------0 TRACKS-----------------1 HIGH-CCHH----X'00100007' HIGH-RBA-----------55295 0 INDEX ------ VSAMAIX.BIX.KSDS.INDEX IN-CAT --- USERCAT.SYSCAT HISTORY DATASET-OWNER-----(NULL) CREATION--------2004.017 RELEASE----------------2 EXPIRATION------0000.000 PROTECTION-PSWD-----(NULL) RACF----------------(NO) ASSOCIATIONS CLUSTER--VSAMAIX.BIX.KSDS ATTRIBUTES KEYLEN-----------------9 AVGLRECL---------------0 BUFSPACE---------------0 CISIZE---------------512 RKP-------------------30 MAXLRECL-------------505 EXCPEXIT----------(NULL) CI/CA-----------------49 SHROPTNS(1,3) SPEED UNIQUE NOERASE NOWRITECHK NOIMBED NOREPLICAT UNORDERED NOREUSE STATISTICS REC-TOTAL--------------1 SPLITS-CI--------------0 EXCPS------------------7 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'C004EB227F96C000' SEQ-SET-RBA------------0 REC-RETRIEVED----------0 FREESPC------------24576 HI-LEVEL-RBA-----------0 ALLOCATION SPACE-TYPE---------TRACK HI-A-RBA-----------25088 SPACE-PRI--------------1 HI-U-RBA-------------512 SPACE-SEC--------------1 VOLUME VOLSER------------PRIM12 PHYREC-SIZE----------512 HI-A-RBA-----------25088 EXTENT-NUMBER----------1 DEVTYPE------X'3010200F' PHYRECS/TRK-----------49 HI-U-RBA-------------512 EXTENT-TYPE--------X'00' VOLFLAG------------PRIME TRACKS/CA--------------1 EXTENTS: LOW-CCHH-----X'00100008' LOW-RBA----------------0 TRACKS-----------------1 HIGH-CCHH----X'00100008' HIGH-RBA-----------25087 0AIX ----------- VSAMAIX.BIX.AIX1 IN-CAT --- USERCAT.SYSCAT HISTORY DATASET-OWNER-----(NULL) CREATION--------2004.017 RELEASE----------------2 EXPIRATION------0000.000 SMS MANAGED--------(YES) PROTECTION-PSWD-----(NULL) RACF----------------(NO) ASSOCIATIONS DATA-----VSAMAIX.BIX.AIX1.DATA INDEX----VSAMAIX.BIX.AIX1.INDEX 1IDCAMS SYSTEM SERVICES TIME: 10:48:35 2004-01-17 PAGE 14 0 CLUSTER--VSAMAIX.BIX.KSDS PATH-----VSAMAIX.BIX.PATH1 ATTRIBUTES NOUPGRADE 0 DATA ------- VSAMAIX.BIX.AIX1.DATA IN-CAT --- USERCAT.SYSCAT HISTORY DATASET-OWNER-----(NULL) CREATION--------2004.017 RELEASE----------------2 EXPIRATION------0000.000 ACCOUNT-INFO-----------------------------------(NULL) PROTECTION-PSWD-----(NULL) RACF----------------(NO) ASSOCIATIONS AIX------VSAMAIX.BIX.AIX1 ATTRIBUTES KEYLEN----------------30 AVGLRECL--------------53 BUFSPACE-----------37376 CISIZE-------------18432 RKP--------------------5 MAXLRECL--------------53 EXCPEXIT----------(NULL) CI/CA------------------3 AXRKP------------------0 SHROPTNS(1,3) SPEED UNIQUE NOERASE INDEXED NOWRITECHK NOIMBED NOREPLICAT UNORDERED REUSE SPANNED UNIQUEKEY STATISTICS REC-TOTAL--------------3 SPLITS-CI--------------0 EXCPS------------------4 REC-DELETED------------0 SPLITS-CA--------------0 EXTENTS----------------1 REC-INSERTED-----------0 FREESPACE-%CI----------0 SYSTEM-TIMESTAMP: REC-UPDATED------------0 FREESPACE-%CA----------0 X'C004EB253F437000' REC-RETRIEVED----------6 FREESPC------------36864 ALLOCATION SPACE-TYPE---------TRACK HI-A-RBA-----------55296 SPACE-PRI--------------1 HI-U-RBA-----------55296 SPACE-SEC--------------1 VOLUME VOLSER------------PRIM10 PHYREC-SIZE--------18432 HI-A-RBA-----------55296 EXTENT-NUMBER----------1 DEVTYPE------X'3010200F' PHYRECS/TRK------------3 HI-U-RBA-----------55296 EXTENT-TYPE--------X'40' VOLFLAG------------PRIME TRACKS/CA--------------1 EXTENTS: LOW-CCHH-----X'00050000' LOW-RBA----------------0 TRACKS-----------------1 HIGH-CCHH----X'00050000' HIGH-RBA-----------55295 0 INDEX ------ VSAMAIX.BIX.AIX1.INDEX IN-CAT --- USERCAT.SYSCAT HISTORY DATASET-OWNER-----(NULL) CREATION--------2004.017 RELEASE----------------2 EXPIRATION------0000.000 PROTECTION-PSWD-----(NULL) RACF----------------(NO) ASSOCIATIONS AIX------VSAMAIX.BIX.AIX1 ATTRIBUTES KEYLEN----------------30 AVGLRECL---------------0 BUFSPACE---------------0 CISIZE---------------512 RKP--------------------5 MAXLRECL-------------505 EXCPEXIT----------(NULL) CI/CA-----------------49 SHROPTNS(1,3) SPEED UNIQUE NOERASE NOWRITECHK NOIMBED NOREPLICAT UNORDERED REUSE 1IDCAMS SYSTEM SERVICES TIME: 10:48:35 2004-01-17 PAGE 15 0 STATISTICS REC-TOTAL--------------1 SPLITS-CI--------------0 EXCPS------------------5 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'C004EB253F437000' SEQ-SET-RBA------------0 REC-RETRIEVED----------0 FREESPC------------24576 HI-LEVEL-RBA-----------0 ALLOCATION SPACE-TYPE---------TRACK HI-A-RBA-----------25088 SPACE-PRI--------------1 HI-U-RBA-------------512 SPACE-SEC--------------1 VOLUME VOLSER------------PRIM10 PHYREC-SIZE----------512 HI-A-RBA-----------25088 EXTENT-NUMBER----------1 DEVTYPE------X'3010200F' PHYRECS/TRK-----------49 HI-U-RBA-------------512 EXTENT-TYPE--------X'00' VOLFLAG------------PRIME TRACKS/CA--------------1 EXTENTS: LOW-CCHH-----X'03590002' LOW-RBA----------------0 TRACKS-----------------1 HIGH-CCHH----X'03590002' HIGH-RBA-----------25087 0 PATH ------- VSAMAIX.BIX.PATH1 IN-CAT --- USERCAT.SYSCAT HISTORY DATASET-OWNER-----(NULL) CREATION--------2004.017 RELEASE----------------2 EXPIRATION------0000.000 PROTECTION-PSWD-----(NULL) RACF----------------(NO) ASSOCIATIONS AIX------VSAMAIX.BIX.AIX1 DATA-----VSAMAIX.BIX.AIX1.DATA INDEX----VSAMAIX.BIX.AIX1.INDEX DATA-----VSAMAIX.BIX.KSDS.DATA INDEX----VSAMAIX.BIX.KSDS.INDEX ATTRIBUTES UPDATE 0PATH ---------- VSAMAIX.BIX.PATH1 IN-CAT --- USERCAT.SYSCAT HISTORY DATASET-OWNER-----(NULL) CREATION--------2004.017 RELEASE----------------2 EXPIRATION------0000.000 PROTECTION-PSWD-----(NULL) RACF----------------(NO) ASSOCIATIONS AIX------VSAMAIX.BIX.AIX1 DATA-----VSAMAIX.BIX.AIX1.DATA INDEX----VSAMAIX.BIX.AIX1.INDEX DATA-----VSAMAIX.BIX.KSDS.DATA INDEX----VSAMAIX.BIX.KSDS.INDEX ATTRIBUTES UPDATE 0AIX ----------- VSAMAIX.BIX.AIX2 IN-CAT --- USERCAT.SYSCAT HISTORY 1IDCAMS SYSTEM SERVICES TIME: 10:48:35 2004-01-17 PAGE 16 0 DATASET-OWNER-----(NULL) CREATION--------2004.017 RELEASE----------------2 EXPIRATION------0000.000 SMS MANAGED--------(YES) PROTECTION-PSWD-----(NULL) RACF----------------(NO) ASSOCIATIONS DATA-----VSAMAIX.BIX.AIX2.DATA INDEX----VSAMAIX.BIX.AIX2.INDEX CLUSTER--VSAMAIX.BIX.KSDS PATH-----VSAMAIX.BIX.PATH2 ATTRIBUTES NOUPGRADE 0 DATA ------- VSAMAIX.BIX.AIX2.DATA IN-CAT --- USERCAT.SYSCAT HISTORY DATASET-OWNER-----(NULL) CREATION--------2004.017 RELEASE----------------2 EXPIRATION------0000.000 ACCOUNT-INFO-----------------------------------(NULL) PROTECTION-PSWD-----(NULL) RACF----------------(NO) ASSOCIATIONS AIX------VSAMAIX.BIX.AIX2 ATTRIBUTES KEYLEN----------------20 AVGLRECL--------------34 BUFSPACE-----------37376 CISIZE-------------18432 RKP--------------------5 MAXLRECL--------------34 EXCPEXIT----------(NULL) CI/CA------------------3 AXRKP-----------------51 SHROPTNS(1,3) SPEED UNIQUE NOERASE INDEXED NOWRITECHK NOIMBED NOREPLICAT UNORDERED REUSE SPANNED UNIQUEKEY STATISTICS REC-TOTAL--------------3 SPLITS-CI--------------0 EXCPS------------------4 REC-DELETED------------0 SPLITS-CA--------------0 EXTENTS----------------1 REC-INSERTED-----------0 FREESPACE-%CI----------0 SYSTEM-TIMESTAMP: REC-UPDATED------------0 FREESPACE-%CA----------0 X'C004EB2652CDA000' REC-RETRIEVED----------6 FREESPC------------36864 ALLOCATION SPACE-TYPE---------TRACK HI-A-RBA-----------55296 SPACE-PRI--------------1 HI-U-RBA-----------55296 SPACE-SEC--------------1 VOLUME VOLSER------------PRIM14 PHYREC-SIZE--------18432 HI-A-RBA-----------55296 EXTENT-NUMBER----------1 DEVTYPE------X'3010200F' PHYRECS/TRK------------3 HI-U-RBA-----------55296 EXTENT-TYPE--------X'40' VOLFLAG------------PRIME TRACKS/CA--------------1 EXTENTS: LOW-CCHH-----X'01500000' LOW-RBA----------------0 TRACKS-----------------1 HIGH-CCHH----X'01500000' HIGH-RBA-----------55295 0 INDEX ------ VSAMAIX.BIX.AIX2.INDEX IN-CAT --- USERCAT.SYSCAT HISTORY DATASET-OWNER-----(NULL) CREATION--------2004.017 RELEASE----------------2 EXPIRATION------0000.000 PROTECTION-PSWD-----(NULL) RACF----------------(NO) 1IDCAMS SYSTEM SERVICES TIME: 10:48:35 2004-01-17 PAGE 17 0 ASSOCIATIONS AIX------VSAMAIX.BIX.AIX2 ATTRIBUTES KEYLEN----------------20 AVGLRECL---------------0 BUFSPACE---------------0 CISIZE---------------512 RKP--------------------5 MAXLRECL-------------505 EXCPEXIT----------(NULL) CI/CA-----------------49 SHROPTNS(1,3) SPEED UNIQUE NOERASE NOWRITECHK NOIMBED NOREPLICAT UNORDERED REUSE STATISTICS REC-TOTAL--------------1 SPLITS-CI--------------0 EXCPS------------------5 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'C004EB2652CDA000' SEQ-SET-RBA------------0 REC-RETRIEVED----------0 FREESPC------------24576 HI-LEVEL-RBA-----------0 ALLOCATION SPACE-TYPE---------TRACK HI-A-RBA-----------25088 SPACE-PRI--------------1 HI-U-RBA-------------512 SPACE-SEC--------------1 VOLUME VOLSER------------PRIM14 PHYREC-SIZE----------512 HI-A-RBA-----------25088 EXTENT-NUMBER----------1 DEVTYPE------X'3010200F' PHYRECS/TRK-----------49 HI-U-RBA-------------512 EXTENT-TYPE--------X'00' VOLFLAG------------PRIME TRACKS/CA--------------1 EXTENTS: LOW-CCHH-----X'01500001' LOW-RBA----------------0 TRACKS-----------------1 HIGH-CCHH----X'01500001' HIGH-RBA-----------25087 0 PATH ------- VSAMAIX.BIX.PATH2 IN-CAT --- USERCAT.SYSCAT HISTORY DATASET-OWNER-----(NULL) CREATION--------2004.017 RELEASE----------------2 EXPIRATION------0000.000 PROTECTION-PSWD-----(NULL) RACF----------------(NO) ASSOCIATIONS AIX------VSAMAIX.BIX.AIX2 DATA-----VSAMAIX.BIX.AIX2.DATA INDEX----VSAMAIX.BIX.AIX2.INDEX DATA-----VSAMAIX.BIX.KSDS.DATA INDEX----VSAMAIX.BIX.KSDS.INDEX ATTRIBUTES UPDATE 0PATH ---------- VSAMAIX.BIX.PATH2 IN-CAT --- USERCAT.SYSCAT HISTORY DATASET-OWNER-----(NULL) CREATION--------2004.017 RELEASE----------------2 EXPIRATION------0000.000 PROTECTION-PSWD-----(NULL) RACF----------------(NO) ASSOCIATIONS AIX------VSAMAIX.BIX.AIX2 DATA-----VSAMAIX.BIX.AIX2.DATA INDEX----VSAMAIX.BIX.AIX2.INDEX DATA-----VSAMAIX.BIX.KSDS.DATA 1IDCAMS SYSTEM SERVICES TIME: 10:48:35 2004-01-17 PAGE 18 0 INDEX----VSAMAIX.BIX.KSDS.INDEX ATTRIBUTES UPDATE 1IDCAMS SYSTEM SERVICES TIME: 10:48:35 2004-01-17 PAGE 19 0 THE NUMBER OF ENTRIES PROCESSED WAS: AIX -------------------2 ALIAS -----------------0 CLUSTER ---------------1 DATA ------------------3 GDG -------------------0 INDEX -----------------3 NONVSAM ---------------0 PAGESPACE -------------0 PATH ------------------4 SPACE -----------------0 USERCATALOG -----------0 TAPELIBRARY -----------0 TAPEVOLUME ------------0 TOTAL ----------------13 0 THE NUMBER OF PROTECTED ENTRIES SUPPRESSED WAS 0 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 0 DELETE VSAMAIX.BIX.* 0IDC0550I ENTRY (R) VSAMAIX.BIX.PATH1 DELETED 0IDC0550I ENTRY (D) VSAMAIX.BIX.AIX1.DATA DELETED 0IDC0550I ENTRY (I) VSAMAIX.BIX.AIX1.INDEX DELETED 0IDC0550I ENTRY (G) VSAMAIX.BIX.AIX1 DELETED 0IDC0550I ENTRY (R) VSAMAIX.BIX.PATH2 DELETED 0IDC0550I ENTRY (D) VSAMAIX.BIX.AIX2.DATA DELETED 0IDC0550I ENTRY (I) VSAMAIX.BIX.AIX2.INDEX DELETED 0IDC0550I ENTRY (G) VSAMAIX.BIX.AIX2 DELETED 0IDC0550I ENTRY (D) VSAMAIX.BIX.KSDS.DATA DELETED 0IDC0550I ENTRY (I) VSAMAIX.BIX.KSDS.INDEX DELETED 0IDC0550I ENTRY (C) VSAMAIX.BIX.KSDS DELETED 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0 0 0IDC0002I IDCAMS PROCESSING COMPLETE. MAXIMUM CONDITION CODE WAS 0
//GILBERTB JOB (ACCT#),BLDIX4, // NOTIFY=&SYSUID, // CLASS=A,MSGCLASS=X,COND=(0,NE) //********************************************************** //* * //* SAMPLE COBOL PROGRAM TO CREATE AN AIX FOR A KSDS * //* * //********************************************************** //COB3 EXEC PGM=IGYCRCTL CBL NOMAP,NOOFFSET,NOXREF,NONAME,NOSEQ IDENTIFICATION DIVISION. PROGRAM-ID. BLDIX4. ENVIRONMENT DIVISION. INPUT-OUTPUT SECTION. FILE-CONTROL. SELECT CLUSTER-IN ASSIGN VS-KSDS ORGANIZATION IS INDEXED RECORD KEY IS IN-KEY. SELECT AIX-OUT ASSIGN VS-AIX, ORGANIZATION IS INDEXED RECORD KEY IS OUT-KEY. SELECT SORT-FILE ASSIGN UT-SORTWK1. DATA DIVISION. FILE SECTION. FD CLUSTER-IN. 01 INREC. 05 IN-1-30 PIC X(30). 05 IN-KEY PIC X(9). 05 IN-40-80 PIC X(41). FD AIX-OUT. 01 OUTREC. 05 OUT-PREFIX. 01 10 OUT-FLAG PIC X. 09 10 OUT-PTRL PIC X. 0001 10 OUT-PTRC PIC S9(4) BINARY. 1E 10 OUT-KEYL PIC X. 05 OUT-KEY PIC X(30). 05 OUT-PTR PIC X(9). SD SORT-FILE. 01 SORTREC. 05 SORT-KEY PIC X(30). 05 SORT-PTR PIC X(9). WORKING-STORAGE SECTION. 77 EOF PIC X. PROCEDURE DIVISION. OPEN INPUT CLUSTER-IN, OUTPUT AIX-OUT. SORT SORT-FILE ASCENDING KEY SORT-KEY INPUT PROCEDURE SORT-PROC-IN OUTPUT PROCEDURE SORT-PROC-OUT. CLOSE CLUSTER-IN, AIX-OUT. STOP RUN. SORT-PROC-IN. MOVE 'N' TO EOF. PERFORM UNTIL EOF = 'Y' READ CLUSTER-IN AT END MOVE 'Y' TO EOF NOT AT END MOVE IN-1-30 TO SORT-KEY MOVE IN-KEY TO SORT-PTR RELEASE SORTREC END-READ END-PERFORM. SORT-PROC-OUT. MOVE 'N' TO EOF. MOVE X'01' TO OUT-FLAG MOVE X'09' TO OUT-PTRL MOVE 1 TO OUT-PTRC MOVE X'1E' TO OUT-KEYL PERFORM UNTIL EOF = 'Y' RETURN SORT-FILE AT END MOVE 'Y' TO EOF NOT AT END MOVE SORT-KEY TO OUT-KEY MOVE SORT-PTR TO OUT-PTR WRITE OUTREC END-RETURN END-PERFORM. /* //SYSPRINT DD SYSOUT=* //SYSUT1 DD UNIT=VIO,SPACE=(TRK,2) //SYSUT3 DD UNIT=VIO,SPACE=(TRK,2) //SYSUT2 DD UNIT=VIO,SPACE=(TRK,2) //SYSUT4 DD UNIT=VIO,SPACE=(TRK,2) //SYSUT5 DD UNIT=VIO,SPACE=(TRK,2) //SYSUT6 DD UNIT=VIO,SPACE=(TRK,2) //SYSUT7 DD UNIT=VIO,SPACE=(TRK,2) //SYSLIN DD UNIT=VIO,SPACE=(TRK,1),DISP=(,PASS) //* //CLEANUP EXEC PGM=IDCAMS //SYSPRINT DD DUMMY DELETE VSAMAIX.BIX.* SET MAXCC=0 //* //DEFINE EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEF CL(NAME(VSAMAIX.BIX.KSDS) RECORDS(100 50) RECSZ(80 80) KEYS(9 30) + NRUS) IF MAXCC > 4 THEN CANCEL ; DEF AIX(NAME(VSAMAIX.BIX.AIX) REL(VSAMAIX.BIX.KSDS) - KEYS(30 0) RECSZ(53 53) RECORDS(100 50) UNQK NUPG) IF MAXCC > 4 THEN CANCEL ; /*-+----1----+----2----+----3----+----4----+----5----+----6----+----7 REPRO IFILE(SYSIN) ODS(VSAMAIX.BIX.KSDS) COUNT(3) B33333333333333333333333333333A11111111 C222222222222222222 B22222222222222222222222222222A22222222 C111111111111111111 B11111111111111111111111111111A33333333 C333333333333333333 DEF PATH(NAME(VSAMAIX.BIX.PATH) PENT(VSAMAIX.BIX.AIX)) IF MAXCC > 4 THEN CANCEL ; /* //* //GO EXEC PGM=LOADER,PARM=NOPRINT //SYSLIN DD DSN=*.COB3.SYSLIN,DISP=(OLD,PASS) //SYSLIB DD DSN=CEE.SCEELKED,DISP=SHR //SYSLOUT DD SYSOUT=* //* //KSDS DD DSN=VSAMAIX.BIX.KSDS,DISP=SHR //AIX DD DSN=VSAMAIX.BIX.AIX,DISP=SHR //SORTWK01 DD SPACE=(CYL,1) //SYSOUT DD SYSOUT=* //* //LISTCAT EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* PRINT IDS(VSAMAIX.BIX.KSDS) CHAR PRINT IDS(VSAMAIX.BIX.PATH) CHAR PRINT IDS(VSAMAIX.BIX.AIX) DUMP LISTC ENT(VSAMAIX.BIX.KSDS VSAMAIX.BIX.AIX VSAMAIX.BIX.PATH) ALL DELETE VSAMAIX.BIX.* /*
//********************************************************************** //* * //* NONUNIQUEKEY OVERFLOW * //* * //* IDC1646I 1 EXCESS PRIME KEY VALUES FOR AIX KEY C1 * //* * //********************************************************************** //CLEANUP EXEC PGM=IDCAMS //SYSPRINT DD DUMMY DELETE VSAMAIX.BIX.* SET MAXCC=0 //* //IEBDG EXEC PGM=IEBDG //SYSPRINT DD SYSOUT=* //SYSUT2 DD DSN=VSAMAIX.BIX.FLAT,DISP=(,CATLG),RECFM=FB,LRECL=3 //SYSIN DD * DSD OUTPUT=(SYSUT2) FD NAME=FIELD1,LENGTH=2,FORMAT=BI,INDEX=1 CREATE QUANTITY=32767,NAME=(FIELD1),FILL='A' END /* //BIXKSDS EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEF CL(NAME(VSAMAIX.BIX.KSDS) TRACKS(10,5) RECSZ(3,3) KEY(2,0) NRUS) IF MAXCC > 0 THEN CANCEL ; REPRO IDS(VSAMAIX.BIX.FLAT) ODS(VSAMAIX.BIX.KSDS) IF MAXCC > 0 THEN CANCEL ; DEF AIX(NAME(VSAMAIX.BIX.AIX) REL(VSAMAIX.BIX.KSDS) - RECSZ(4086 66000) KEYS(1 2) TRACKS(1 1) NUNQK) IF MAXCC > 0 THEN CANCEL ; BLDINDEX IDS(VSAMAIX.BIX.KSDS) ODS(VSAMAIX.BIX.AIX) NOSORTCALL IF MAXCC > 4 THEN CANCEL ; LISTC ENT(VSAMAIX.BIX.KSDS VSAMAIX.BIX.AIX ) ALL PRINT IDS(VSAMAIX.BIX.KSDS) DUMP COUNT(20) PRINT IDS(VSAMAIX.BIX.AIX) DUMP DELETE VSAMAIX.BIX.* /* //* //* SECOND PART: ESDS //* //IEBDG2 EXEC PGM=IEBDG //SYSPRINT DD SYSOUT=* //SYSUT2 DD DSN=VSAMAIX.BIX.FLAT,DISP=(,CATLG),RECFM=FB,LRECL=7 //SYSIN DD * DSD OUTPUT=(SYSUT2) FD NAME=FIELD1,LENGTH=4,FORMAT=ZD,INDEX=1 CREATE QUANTITY=9999,NAME=(FIELD1),FILL='A' END /* //BIXESDS EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEF CL(NAME(VSAMAIX.BIX.ESDS) TRACKS(10 5) RECSZ(8 8) NIXD NRUS) IF MAXCC > 0 THEN CANCEL ; REPRO IDS(VSAMAIX.BIX.FLAT) ODS(VSAMAIX.BIX.ESDS) IF MAXCC > 0 THEN CANCEL ; DEF AIX(NAME(VSAMAIX.BIX.AIX) REL(VSAMAIX.BIX.ESDS) - RECSZ(4086 240000) KEYS(3 4) TRACKS(5 5) NUNQK) IF MAXCC > 0 THEN CANCEL ; BLDINDEX IDS(VSAMAIX.BIX.ESDS) ODS(VSAMAIX.BIX.AIX) NOSORTCALL IF MAXCC > 4 THEN CANCEL ; LISTC ENT(VSAMAIX.BIX.ESDS VSAMAIX.BIX.AIX ) ALL PRINT IDS(VSAMAIX.BIX.ESDS) DUMP COUNT(20) PRINT IDS(VSAMAIX.BIX.AIX) DUMP DELETE VSAMAIX.BIX.* /*
PRINT IDS(VSAMAIX.BIX.AIX) DUMP -LISTING OF DATA SET -VSAMAIX.BIX.AIX 0KEY OF RECORD - C1C1C1 000000 0004270F 03C1C1C1 00000000 00000007 0000000E 00000015 0000001C 00000023 000020 0000002A 00000031 00000038 0000003F 00000046 0000004D 00000054 0000005B 000040 00000062 00000069 00000070 00000077 0000007E 00000085 0000008C 00000093 . . . . . . . 009C00 0001111F 00011126 0001112D 00011134 0001113B 00011142 00011149 00011150 009C20 00011157 0001115E 00011165 0001116C 00011173 0001117A 00011181 00011188 009C40 0001118F 0IDC0005I NUMBER OF RECORDS PROCESSED WAS 1 0IDC0001I FUNCTION COMPLETED, HIGHEST CONDITION CODE WAS 0