bdfu1m18Utilities

ZUDFM OA*-Display LRECS in a Subfile

Use this command to display the contents of block headers or logical records (LRECs) in various formats using different types of search criteria.

Requirements and Restrictions

Before using this command, you must first link to the file that you want to access.

Format




Note:
You can use either the ZUDFM OA* or the ZUDFM DISPLAY command.

D
displays the file address and displacement (in the block) of each LREC and the contents of each LREC in character format.

H
displays the file address and displacement (in the block) of each LREC and the contents of each LREC in hexadecimal format.

L
displays the contents of each field in each LREC together with their DSECT labels.
Note:
When using this parameter, you must build a macro label set (MLS) using MLS support.

T
displays technical LRECs (TLRECs).

KEYn
specifies a search of LRECs where n is the key parameter from 1-6. Separate each set of key parameters from the next by using the @ symbol. Combining keys allows you to make very specific LREC retrievals.

R-D/displacement
specifies the displacement of a field in the LREC that is to be used as a key field. You cannot use a displacement of 0 on a variable format LREC.

R-L/label
specifies a label, as defined in the DSECT macro, of a field in the LREC that is used as a key field.
Note:
When using this parameter, you must build a macro label set (MLS) using MLS support. Do not include the first 4 characters of the label.

.S-searcharg
specifies a search key to match against the contents of the key field specified by one of the R subparameters. The search key cannot be longer than 49 bytes.
Note:
This variable can contain a mixture of hexadecimal and character data. To switch between these types of data, use the vertical bar (|) as a delimiter. The following example shows how the types of data can be mixed:
     8013B4|THIS IS CHARACTER DATA|4A5F90

The TPFDF product assumes that the variable starts with hexadecimal data. To start with character data, place a vertical bar at the beginning of the variable. For example:

     |STARTING WITH CHARACTER DATA|1F2E3D4E

You can use a different delimiter by setting variable #DBENUFB in the ACPDBE macro. See TPFDF Installation and Customization for more information about the ACPDBE macro.

.M-mask
specifies a 1-byte hexadecimal mask that is matched against the contents of the key field specified by one of the R subparameters.

.O-fileorg
specifies the organization of the subfile. The values for subfile organization are UP, DOWN, and NOORG.

.C-condition
specifies the comparison operator between the LREC field and search argument specified. You can use the following values:
Value
Condition
GT
Greater than
LT
Less than
NE
Not equal
EQ
Equal (this is the default)
NH
Not high
NL
Not low
GE
Greater than or equal
LE
Less than or equal
Z
Zeros
O
Ones
M
Mixed
NZ
Not zeros
NO
Not ones
NM
Not mixed.

lrecnum
is the sequence number of the LREC. The sequence numbers start at 1.

lrecnum-lrecnum
is a range of LRECs in a subfile.

lrecnum-LAST
is a range of LRECs from the specified LREC to the last LREC, inclusively, in the subfile.

D/HDR
displays the subfile block header in character format.

H/HDR
displays the subfile block header in hexadecimal format.

Additional Information

Examples

The following example displays all the LRECs in the subfile. Each line in the display shows the following information:

+--------------------------------------------------------------------------------+
|User:   ZUDFM OA*                                                               |
|                                                                                |
|System: UDFM0001I          TPFDF LREC DISPLAY                                   |
|        F.A. F404E801                                                           |
|        000001 001480 E  L M   S  T R E E  T         682186                     |
|        000002 001480 M  A I N    S T R E  E T       469089                     |
|        000003 001480 P  O S T    R O A D            214968                     |
|        000004 001480 C  I R C L  E   L A  N E       326588                     |
+--------------------------------------------------------------------------------+

The following example displays a range of LRECs in character format.

+--------------------------------------------------------------------------------+
|User:   ZUDFM OA*D2-3                                                           |
|                                                                                |
|System: UDFM0001I          TPFDF LREC DISPLAY                                   |
|        F.A. F404E801                                                           |
|        F.A. F404E801 002E                                                      |
|        000002 001480 M  A I N    S T R E  E T       469089                     |
|        F.A. F404E801 0042                                                      |
|        000003 001480 P  O S T    R O A D            214968                     |
+--------------------------------------------------------------------------------+

The following example displays a range of LRECs in hexadecimal format.

+--------------------------------------------------------------------------------+
|User:   ZUDFM OA*H1-2                                                           |
|                                                                                |
|System: UDFM0001I          TPFDF LREC DISPLAY                                   |
|        F.A. F404E801                                                           |
|        F.A. F404E801 001A                                                      |
|        000001 001480C5 D3D440E2 E3D9C5C5 E3404040 40682186                     |
|        F.A. F404E801 002E                                                      |
|        000002 001480D4 C1C9D540 E2E3D9C5 C5E34040 40469089                     |
+--------------------------------------------------------------------------------+

The following example displays the DSECT labels of the LREC fields with the contents of each field for the first LREC.

+--------------------------------------------------------------------------------+
|User:   ZUDFM OA*L1                                                             |
|                                                                                |
|System: UDFM0001I          TPFDF LREC DISPLAY                                   |
|        F.A. F404F8F4                                                           |
|        F.A. F404F8F4 001A ITMNBR 000001 SIZE 0036  KEY 80                      |
|        IR75A80               0003 0019  A 0 0 0 1 B 0 0 0 1 C 0 0 0 1 D        |
|                                         0 0 0 1 E 0 0 0 1                      |
|        IR75AK                0003 0005  A 0 0 0 1                              |
|        IR75BK                0008 0005  B 0 0 0 1                              |
|        IR75CK                000D 0005  C 0 0 0 1                              |
|        IR75DK                0012 0005  D 0 0 0 1                              |
|        IR75EK                0017 0005  E 0 0 0 1                              |
|        IR75AL                001C 0001  J                                      |
|        IR75TXT               001D 0019  T H I S40 I S40 A40 T E S T40 L        |
|                                         R E C404040400001                      |
|        IR75DAT               001D 0017  T H I S40 I S40 A40 T E S T40 L        |
|                                         R E C40404040                          |
|        IR75RCN               0034 0002 0001                                    |
+--------------------------------------------------------------------------------+

The following example displays the contents of the header for each prime and overflow block in the subfile in character format.

+--------------------------------------------------------------------------------+
|User:   ZUDFM OA*D/HDR                                                          |
|                                                                                |
|System: UDFM0002I          TPFDF BLOCK HEADER DISPLAY                           |
|        F.A.  F404F8F4  BID- B075   CHK- 00    CTL- 00   PGM-  Q X D G          |
|                        FCH- 000806B4   BCH- 000806BC   NAB- 00BC               |
|                        SEQ- 0002   SBA- 00000000   SBC- 00   AUT- 00           |
|                                                                                |
|        F.A.  000806B4  BID- B075   CHK- 00    CTL- 08   PGM-  Q X D G          |
|                        FCH- 000806B8   BCH- 00000000   NAB- 00BC               |
|                        SEQ- 0002   SBA- 00000000   SBC- 00   AUT- 00           |
|                                                                                |
|        F.A.  000806B8  BID- B075   CHK- 00    CTL- 08   PGM-  Q X D G          |
|                        FCH- 000806BC   BCH- 00000000   NAB- 00BC               |
|                        SEQ- 0002   SBA- 00000000   SBC- 00   AUT- 00           |
|                                                                                |
|        F.A.  000806BC  BID- B075   CHK- 00    CTL- 08   PGM-  Q X D G          |
|                        FCH- 00000000   BCH- 00000000   NAB- 0050               |
|                        SEQ- 0002   SBA- 00000000   SBC- 00   AUT- 00           |
+--------------------------------------------------------------------------------+

 BID 
File ID

 CHK 
Record code check

 CTL 
Control byte

 PGM 
Last program that updated the block

 FCH 
Forward chain file address

 BCH 
Backward chain file address

 NAB 
Next available byte

 SBA 
Subfile block address.
Note:
For a B+Tree data file, the SBA of the prime block contains the address of the root node of the B+Tree index file. If the value is zero, no B+Tree index exists for this subfile.

The remaining fields are used internally by the TPFDF product.

The following example displays two LRECs that satisfy the search criteria using one key. The display is in hexadecimal format. Byte 12 of each LREC is examined for an equal match with search argument X'E7'.

+--------------------------------------------------------------------------------+
|User:   ZUDFM OA*H/KEY1-R-D/12.S-E7.C-EQ                                        |
|                                                                                |
|System: UDFM0001I          TPFDF LREC DISPLAY                                   |
|        F.A. F404E801                                                           |
|        F.A. F404E801 001A                                                      |
|        000001 000E8040 E3C5E2E3 D3D9C5C3 E701                                  |
|        F.A. F404E801 0044                                                      |
|        000004 000E9040 E3C5E2E3 D3D9C5C3 E701                                  |
+--------------------------------------------------------------------------------+

The following example displays two LRECs that satisfy search criteria using two keys. The display is in character format. KEY1 examines byte 2 of each LREC (the primary key) for an equal match with search argument X'80'. KEY2 examines byte 12 of each LREC for a "greater than or equal to" match with search argument character 'Y'.

+--------------------------------------------------------------------------------+
|User:   ZUDFM OA*D/KEY1-R-D/2.S-80.C-EQ@KEY2-R-D/12.S-|Y.C-GE                   |
|                                                                                |
|System: UDFM0001I          TPFDF LREC DISPLAY                                   |
|        F.A. F404E801                                                           |
|        F.A. F404E801 0028                                                      |
|        000002 000E80    T E S T  L R E C  Y02                                  |
|        F.A. F404E801 0036                                                      |
|        000003 000E80    T E S T  L R E C  Z03                                  |
+--------------------------------------------------------------------------------+

References