Programming Interface Information: This information is NOT intended to be
used as Programming Interfaces of VM/ESA. It is to be used for diagnosis only.

PDSBK

Prolog  

Control Block Contents  

PDSBK DSECT

Storage Layout  

Cross Reference (Contains links to field and bit definitions)  

PDSBK Prolog

 Name       : HCPPDSBK
 Description: Partitioned Data Set Block
 STATUS     : VM/ESA VERSION 2, RELEASE 1.0
 DSECT      : PDSBK
 Function   : The PDSBK describes the contents of CMS partitioned
              data set headers.
 Located by : It is record number 1 of the CMS file
 Created by : None
 Deleted by : None
 Notes      : This description of the PDS directory description
              record was extracted from the CMS file PDSSECT MACRO.
              The CMS definitions are shown here, too.  It makes for
              cluttered listing, but it helps to see the CMS
              original definitions.

 

PDSBK Control Block Content


PDSBK DSECT

Hex Dec Type/Val Lng Label (dup) Comments ---- ---- --------- ---- -------------- -------- 0000 0 Structure PDSBK Partitioned Data Set Block LIBPDS format 0000 0 Character 6 PDSNID LIBPDS (NEW FORMAT) ID 000000D7 PDSNFNEW C'P' Check PDSNID+3, old vs new. 0006 6 Bitstring 1 PDSNFLG1 Flag1. 0000005B PDSNTEMPF C'$' Dir is in $PDSTEMP file. 0007 7 Bitstring 1 PDSNFLG2 Flag2. 0008 8 Signed 4 PDSNDRSZ Directory size in bytes 000C 12 Signed 4 PDSNDST Directory starts at this record number 0010 16 Signed 4 PDSNNTSZ Each directory entry is this number of bytes long 00000014 PDSNSZ *-PDSBK Size for LIBPDS format Old DMSLIB format 0000 0 Character 6 PDSOID DMSLIB (OLD FORMAT) ID 0006 6 Signed 2 PDSODST Directory starts at this record number 0008 8 Signed 1 * 0009 9 Signed 1 * 000A 10 Signed 2 PDSODRSZ Directory size in bytes 000C 12 Signed 2 * 000E 14 Signed 1 * 000F 15 Signed 1 * 0010 16 Signed 4 PDSODRLN Each entry size in bytes 00000014 PDSOSZ *-PDSBK Size for CMSLIB format Old MACLIB format 0000 0 Character 6 PDSMID MACLIB (OLD FORMAT) ID 0006 6 Signed 2 PDSMDST Directory starts at this record number 0008 8 Signed 2 PDSMDRSZ Directory size in bytes 000A 10 Signed 2 DIRNAME (3) MACLIB IDENTIFIER 0010 16 Signed 2 DIRPTR ITEM PTR TO START OF DIRECTORY 0012 18 Bitstring 1 TEMPBYTE IF $ , THEN PDS IS IN $PDSTEMP FILE 0013 19 Bitstring 1 NEWBLKS NO. NEW BLKS ADDED TO PDS BY STOW 0014 20 Signed 2 CORESIZE SIZE OF DICTIONARY IN BYTES 0016 22 Signed 2 PDSBLKSI BLOCKSIZE OF DICTIONARY 0018 24 Bitstring 1 CHNGBYTE INDICATES UPDATES TO DICTIONARY 0019 25 Bitstring 1 * NOT USED - 0000001A PDSMSZ *-PDSBK Size for MACLIB format End of PDS formats 00000004 PDSBKSZ (*-PDSBK+7)/8 Max size of PDSBK (d-words)

 

PDSBK Storage Layout

*** PDSBK - Partitioned Data Set Block
*
*     +-------------------------------------------------------+
*   0 |                                                       |
*     =                        PDSBK                          =
*     |                                                       |
*     +-------------------------------------------------------+
*
*** PDSBK - Partitioned Data Set Block
*** Overlay for PDSBK in PDSBK
*
*     +-----------------------------------------+------+------+
*   0 |                 PDSNID                  |:NFLG1|:NFLG2|
*     +---------------------------+-------------+------+------+
*   8 |         PDSNDRSZ          |         PDSNDST           |
*     +---------------------------+---------------------------+
*  10 |         PDSNNTSZ          | 14
*     +---------------------------+
*
*** Overlay for PDSBK in PDSBK
*** Overlay for PDSBK in PDSBK
*
*     +-----------------------------------------+-------------+
*   0 |                 PDSOID                  |  PDSODST    |
*     +------+------+-------------+-------------+------+------+
*   8 |//////|//////|  PDSODRSZ   |/////////////|//////|//////|
*     +------+------+-------------+-------------+------+------+
*  10 |         PDSODRLN          | 14
*     +---------------------------+
*
*** Overlay for PDSBK in PDSBK
*** Overlay for PDSBK in PDSBK
*
*     +-----------------------------------------+-------------+
*   0 |                 PDSMID                  |  PDSMDST    |
*     +-------------+---------------------------+-------------+
*   8 |  PDSMDRSZ   |                DIRNAME                  |
*     +-------------+------+------+-------------+-------------+
*  10 |   DIRPTR    |:PBYTE|:BLKS |  CORESIZE   |  PDSBLKSI   |
*     +------+------+------+------+-------------+-------------+
*  18 |:GBYTE|//////| 1A
*     +------+------+
*
*** Overlay for PDSBK in PDSBK

 

PDSBK Cross Reference

(contains links to field and bit definitions)
Symbol         Dspl Value
-------------- ---- -----

CHNGBYTE 0018

CORESIZE 0014

DIRNAME 000A

DIRPTR 0010

NEWBLKS 0013

PDSBKSZ 0019 00000004

PDSBLKSI 0016

PDSMDRSZ 0008

PDSMDST 0006

PDSMID 0000

PDSMSZ 0019 0000001A

PDSNDRSZ 0008

PDSNDST 000C

PDSNFLG1 0006

PDSNFLG2 0007

PDSNFNEW 0000 000000D7

PDSNID 0000

PDSNNTSZ 0010

PDSNSZ 0010 00000014

PDSNTEMPF 0006 0000005B

PDSODRLN 0010

PDSODRSZ 000A

PDSODST 0006

PDSOID 0000

PDSOSZ 0010 00000014

TEMPBYTE 0012


This information is based on VM/ESA 2.4.0.
Last updated on 3 Aug 1999 at 12:21:29 EDT.
Copyright IBM Corporation, 1990, 1999