OBJSTMT Back to Index page
 
Prolog 
Control Block Contents 
   OBJSTMT DSECT
Storage Layout 
Cross Reference (Contains links to field and bit definitions)
Programming Interface Information:
This information is NOT intended to be
used as Programming Interfaces of z/VM.


  OBJSTMT Prolog Top of page
 
 NAME       : HCPOBJCT
 DESCRIPTION: Various object deck record formats.
 DSECT      : OBJSTMT
 FUNCTION   : Map the various object deck record formats.
 LOCATED BY : None
 CREATED BY : None
 DELETED BY : None
 SERIALIZED : None.
 RELOCATION CONSIDERATIONS : None
 
 
  OBJSTMT Control Block Content Top of page
 

 OBJSTMT DSECT Top of page
Hex Dec Type/Val Lng Label (dup) Comments ---- ---- --------- ---- -------------- -------- 0000 0 Structure OBJSTMT Various object deck record formats. 0000 0 Character 80 OBJ80COL 0000 0 Bitstring 1 OBJCOL1 0001 1 Character 3 OBJCOL2 0000 0 Bitstring 1 * Col 1 X'02' 0001 1 Character 3 * Col 2 C'CPB' 0004 4 Character 68 OBJCPBPZ Col 5 Page size 0048 72 Character 8 * Col 73 Sequence field 0000 0 Bitstring 1 * Col 1 X'02' 0001 1 Character 3 * Col 2 C'DEL' 0004 4 Character 68 OBJDELNM Col 5 ESD names to delete 0048 72 Character 8 * Col 73 Sequence field 0000 0 Bitstring 1 * Col 1 X'02' 0001 1 Character 3 * Col 2 C'END' 0004 4 Character 1 * Col 5 Blanks 0005 5 Address 3 OBJENDAD Col 6 Address of ep 0008 8 Character 6 * Col 9 Blanks 000E 14 Signed 2 OBJENDEI Col 15 Id # of ESD containing ep 0010 16 Character 12 * Col 17 Blanks 001C 28 Bitstring 1 OBJEND29 Col 29 001D 29 Signed 3 OBJENDEL Col 30 Length of ESD 0020 32 Character 40 * Col 33 Blanks 0048 72 Character 8 * Col 73 Sequence field 0000 0 Bitstring 1 * Col 1 X'02' 0001 1 Character 3 * Col 2 C'ESD' 0004 4 Character 6 * Col 5 Blanks 000A 10 Signed 2 OBJESDLL Col 11 Data bytes in this stmt 000C 12 Character 2 * Col 13 Blanks 000E 14 Signed 2 OBJESDEI Col 15 Id # of 1st ESD entry 0010 16 Bitstring 48 OBJESDNT Col 17 Up to 3 OBJESDNn entries 0040 64 Character 8 * Col 65 Blanks 0048 72 Character 8 * Col 73 Sequence field 0010 16 Bitstring 16 OBJESDN1 Col 17 One ESD TEXT deck entry 0020 32 Bitstring 16 OBJESDN2 Col 33 One ESD TEXT deck entry 0030 48 Bitstring 16 OBJESDN3 Col 49 One ESD TEXT deck entry 0010 16 Character 8 OBJESDEN Byte 00 External name For PC, name is blank 0018 24 Bitstring 1 OBJESDET Byte 08 Type of external def'n 00000000 OBJESDSD X'00' OBJESDSD SD Segment Definition 00000001 OBJESDLD X'01' OBJESDLD LD Label Definition 00000002 OBJESDER X'02' OBJESDER ER External Reference 00000004 OBJESDPC X'04' OBJESDPC PC Private Control section 00000005 OBJESDCM X'05' OBJESDCM CM Common section 00000006 OBJESDXD X'06' OBJESDXD XD Dummy External DSECT 0000000A OBJESDWX X'0A' OBJESDWX WX Weak External reference 000000FF OBJESDUN X'FF' OBJESDUN UN ESD type not determined yet 0019 25 Address 3 OBJESDE@ Byte 09 Use depends on ESD entry: For SD, PC, LD address is assigned by the assembler For ER For WX For XD For CM 001C 28 Bitstring 1 OBJESDFL Byte 0C Use depends on ESD entry: For SD or PC or CM .... .1.. OBJESDRM X'04' OBJESDRM RMODE: Residency Mode bit . .0 RMODE 24 . .1 RMODE ANY .... ..11 OBJESDAM X'03' OBJESDAM AMODE: Addressing Mode bits . 00 AMODE 24 . 01 AMODE 24 . 10 AMODE 31 . 11 AMODE ANY 001D 29 Signed 3 OBJESDEL Byte 0D Use depends on ESD entry: For SD 0 if length of the SD is on the END card For SD, PC or CM length of the CSECT For LD esdid of the SD that contains the label For ER, WX blank For PR length of pseudo-register 0000 0 Bitstring 1 * Col 1 X'02' 0001 1 Character 3 * Col 2 C'ICS' 0004 4 Character 68 OBJICSDT Col 5 ESD name and its new size 0048 72 Character 8 * Col 73 Sequence field 0000 0 Bitstring 1 * Col 1 X'02' 0001 1 Character 3 * Col 2 C'LDT' 0004 4 Character 68 OBJLDTDT Col 5 ESD name 0048 72 Character 8 * Col 73 Sequence field 0000 0 Bitstring 1 * Col 1 X'02' 0001 1 Character 3 * Col 2 C'PAD' 0004 4 Character 68 OBJPADDT Col 5 PAD definition 0048 72 Character 8 * Col 73 Sequence field 0000 0 Bitstring 1 * Col 1 X'02' 0001 1 Character 3 * Col 2 C'PRM' 0004 4 Character 68 OBJPRMDT Col 5 PRM definition 0048 72 Character 8 * Col 73 Sequence field 0000 0 Bitstring 1 * Col 1 X'02' 0001 1 Character 3 * Col 2 C'PRT' 0004 4 Character 68 OBJPRTDT Col 5 PRT definition 0048 72 Character 8 * Col 73 Sequence field 0000 0 Bitstring 1 * Col 1 X'02' 0001 1 Character 3 * Col 2 C'REP' 0004 4 Character 2 * Col 5 Blanks 0006 6 Character 6 OBJREPAD Col 7 Address of data to verify 000C 12 Character 2 * Col 13 Blanks 000E 14 Character 2 OBJREPEI Col 15 Id # of ESD containing TXT 0010 16 Character 54 OBJREPDT Col 17 Data (4 chars + comma) 0046 70 Character 2 * Col 71 Blanks 0048 72 Character 8 * Col 73 Sequence field 0000 0 Bitstring 1 * Col 1 X'02' 0001 1 Character 3 * Col 2 C'RLD' 0004 4 Character 6 * Col 5 Blanks 000A 10 Signed 2 OBJRLDLL Col 11 Length of OBJRLDDT 000C 12 Character 4 * Col 13 Blanks 0010 16 Bitstring 56 OBJRLDDT Col 17 Rld entries, 8|4 bytes ea 0048 72 Character 8 * Col 73 Sequence field 0010 16 Signed 2 OBJRLD1R Byte 00 Relocation ESDID 0012 18 Signed 2 OBJRLD1P Byte 02 Position ESDID 0014 20 Bitstring 1 OBJRLD1F Byte 04 Flag Byte 0015 21 Address 3 OBJRLD1A Byte 05 Absolute address to be relocated 00000018 OBJRLD1N * 0010 16 Bitstring 1 OBJRLD2F Byte 00 Flag Byte ..11 .... OBJRLDTP X'30' OBJRLDTP RLD type 00 . A-type or Y-type constant 01 . V-type address constant 10 . Q-type address constant 11 . CXD type entry .1.. 11.. OBJRLDTL X'4C' OBJRLDTL RLD entry length .1 . 4 bytes additional . 00 1 byte . 01 2 bytes . 10 3 bytes . 11 4 bytes .... ..1. OBJRLDTS X'02' OBJRLDTS RLD relocation sign . 0. add . 1. subtract .... ...1 OBJRLDTT X'01' OBJRLDTT RLD next entry type . 0 has P & R, use RLDT1DAT . 1 no P & R, use RLDT2DAT 0011 17 Address 3 OBJRLD2A Byte 01 Absolute address to be relocated 00000014 OBJRLD2N * x . Reserved 0000 0 Bitstring 1 * Col 1 X'02' 0001 1 Character 3 * Col 2 C'SLC' 0004 4 Character 68 OBJSLCDT Col 5 SLC definition 0048 72 Character 8 * Col 73 Sequence field 0000 0 Bitstring 1 * Col 1 X'02' 0001 1 Character 3 * Col 2 C'SPB' 0004 4 Character 68 OBJSPBPZ Col 5 Page size 0048 72 Character 8 * Col 73 Sequence field 0000 0 Bitstring 1 * Col 1 X'02' 0001 1 Character 3 * Col 2 C'SYM' 0004 4 Character 6 * Col 5 Blanks 000A 10 Signed 2 OBJSYMLL Col 11 Length of data in SYMDATA 000C 12 Character 4 * Col 13 Blanks 0010 16 Character 56 OBJSYMDT Col 17 SYM definition 0048 72 Character 8 * Col 73 Sequence field 0000 0 Bitstring 1 * Col 1 X'02' 0001 1 Character 3 * Col 2 C'SYS' 0004 4 Character 68 OBJSYSDT Col 5 SYS definition 0048 72 Character 8 * Col 73 Sequence field 0000 0 Bitstring 1 * Col 1 X'02' 0001 1 Character 3 * Col 2 C'TXT' 0004 4 Character 1 * Col 5 Blanks 0005 5 Address 3 OBJTXTAD Col 6 Address w/in CSECT 0008 8 Character 2 * Col 9 Blanks 000A 10 Signed 2 OBJTXTLL Col 11 Length of OBJTXTDT 000C 12 Character 2 * Col 13 Blanks 000E 14 Signed 2 OBJTXTEI Col 15 Id # of ESD containing TXT 0010 16 Bitstring 56 OBJTXTDT Col 17 0048 72 Character 8 * Col 73 Sequence field 0000 0 Bitstring 1 * Col 1 X'02' 0001 1 Character 3 * Col 2 C'UPB' 0004 4 Character 68 OBJUPBPZ Col 5 Page size 0048 72 Character 8 * Col 73 Sequence field 0000 0 Bitstring 1 * Col 1 X'02' 0001 1 Character 3 * Col 2 C'VER' 0004 4 Character 2 * Col 5 Blanks 0006 6 Character 6 OBJVERAD Col 7 Address of data to verify 000C 12 Character 2 * Col 13 Blanks 000E 14 Character 2 OBJVEREI Col 15 Id # of ESD containing TXT 0010 16 Character 54 OBJVERDT Col 17 Data (4 chars + comma) 0046 70 Character 2 * Col 71 Blanks 0048 72 Character 8 * Col 73 Sequence field
 
 
  OBJSTMT Storage Layout Top of page
 
          
*** OBJSTMT - Various object deck record formats.
*
*     +-------------------------------------------------------+
*   0 |                                                       |
*     =                       OBJ80COL                        =
*     |                                                       |
*     +-------------------------------------------------------+
*  50
*
*** OBJSTMT - Various object deck record formats.
          
*** Overlay for OBJ80COL in OBJSTMT
*
*     +------+--------------------+
*   0 |:COL1 |      OBJCOL2       | 4
*     +------+--------------------+
*
*** Overlay for OBJ80COL in OBJSTMT
          
*** Overlay for OBJ80COL in OBJSTMT
*
*     +------+--------------------+---------------------------+
*   0 |//////|////////////////////|                           |
*     +------+--------------------+                           |
*   8 |                                                       |
*     =                       OBJCPBPZ                        =
*     |                                                       |
*     +-------------------------------------------------------+
*  48 |///////////////////////////////////////////////////////|
*     +-------------------------------------------------------+
*  50
*
*** Overlay for OBJ80COL in OBJSTMT
          
*** Overlay for OBJ80COL in OBJSTMT
*
*     +------+--------------------+---------------------------+
*   0 |//////|////////////////////|                           |
*     +------+--------------------+                           |
*   8 |                                                       |
*     =                       OBJDELNM                        =
*     |                                                       |
*     +-------------------------------------------------------+
*  48 |///////////////////////////////////////////////////////|
*     +-------------------------------------------------------+
*  50
*
*** Overlay for OBJ80COL in OBJSTMT
          
*** Overlay for OBJ80COL in OBJSTMT
*
*     +------+--------------------+------+--------------------+
*   0 |//////|////////////////////|//////|     OBJENDAD       |
*     +------+--------------------+------+------+-------------+
*   8 |/////////////////////////////////////////|  OBJENDEI   |
*     +-----------------------------------------+-------------+
*  10 |///////////////////////////////////////////////////////|
*     |///////////////////////////+------+--------------------+
*  18 |///////////////////////////|:END29|     OBJENDEL       |
*     +---------------------------+------+--------------------+
*  20 |///////////////////////////////////////////////////////|
*     =///////////////////////////////////////////////////////=
*     |///////////////////////////////////////////////////////|
*     +-------------------------------------------------------+
*  48 |///////////////////////////////////////////////////////|
*     +-------------------------------------------------------+
*  50
*
*** Overlay for OBJ80COL in OBJSTMT
          
*** Overlay for OBJ80COL in OBJSTMT
*
*     +------+--------------------+---------------------------+
*   0 |//////|////////////////////|///////////////////////////|
*     +------+------+-------------+-------------+-------------+
*   8 |/////////////|  OBJESDLL   |/////////////|  OBJESDEI   |
*     +-------------+-------------+-------------+-------------+
*  10 |                                                       |
*     =                       OBJESDNT                        =
*     |                                                       |
*     +-------------------------------------------------------+
*  40 |///////////////////////////////////////////////////////|
*     +-------------------------------------------------------+
*  48 |///////////////////////////////////////////////////////|
*     +-------------------------------------------------------+
*  50
*
*** Overlay for OBJ80COL in OBJSTMT
          
*** Overlay for OBJESDNT in OBJSTMT
*
*     +-------------------------------------------------------+
*  10 |                       OBJESDN1                        |
*     |                                                       |
*     +-------------------------------------------------------+
*  20 |                       OBJESDN2                        |
*     |                                                       |
*     +-------------------------------------------------------+
*  30 |                       OBJESDN3                        |
*     |                                                       |
*     +-------------------------------------------------------+
*  40
*
*** Overlay for OBJESDNT in OBJSTMT
          
*** Overlay for OBJESDN1 in OBJSTMT
*
*     +-------------------------------------------------------+
*  10 |                       OBJESDEN                        |
*     +------+--------------------+------+--------------------+
*  18 |:ESDET|     OBJESDE@       |:ESDFL|     OBJESDEL       |
*     +------+--------------------+------+--------------------+
*  20
*
*** Overlay for OBJESDN1 in OBJSTMT
          
*** Overlay for OBJ80COL in OBJSTMT
*
*     +------+--------------------+---------------------------+
*   0 |//////|////////////////////|                           |
*     +------+--------------------+                           |
*   8 |                                                       |
*     =                       OBJICSDT                        =
*     |                                                       |
*     +-------------------------------------------------------+
*  48 |///////////////////////////////////////////////////////|
*     +-------------------------------------------------------+
*  50
*
*** Overlay for OBJ80COL in OBJSTMT
          
*** Overlay for OBJ80COL in OBJSTMT
*
*     +------+--------------------+---------------------------+
*   0 |//////|////////////////////|                           |
*     +------+--------------------+                           |
*   8 |                                                       |
*     =                       OBJLDTDT                        =
*     |                                                       |
*     +-------------------------------------------------------+
*  48 |///////////////////////////////////////////////////////|
*     +-------------------------------------------------------+
*  50
*
*** Overlay for OBJ80COL in OBJSTMT
          
*** Overlay for OBJ80COL in OBJSTMT
*
*     +------+--------------------+---------------------------+
*   0 |//////|////////////////////|                           |
*     +------+--------------------+                           |
*   8 |                                                       |
*     =                       OBJPADDT                        =
*     |                                                       |
*     +-------------------------------------------------------+
*  48 |///////////////////////////////////////////////////////|
*     +-------------------------------------------------------+
*  50
*
*** Overlay for OBJ80COL in OBJSTMT
          
*** Overlay for OBJ80COL in OBJSTMT
*
*     +------+--------------------+---------------------------+
*   0 |//////|////////////////////|                           |
*     +------+--------------------+                           |
*   8 |                                                       |
*     =                       OBJPRMDT                        =
*     |                                                       |
*     +-------------------------------------------------------+
*  48 |///////////////////////////////////////////////////////|
*     +-------------------------------------------------------+
*  50
*
*** Overlay for OBJ80COL in OBJSTMT
          
*** Overlay for OBJ80COL in OBJSTMT
*
*     +------+--------------------+---------------------------+
*   0 |//////|////////////////////|                           |
*     +------+--------------------+                           |
*   8 |                                                       |
*     =                       OBJPRTDT                        =
*     |                                                       |
*     +-------------------------------------------------------+
*  48 |///////////////////////////////////////////////////////|
*     +-------------------------------------------------------+
*  50
*
*** Overlay for OBJ80COL in OBJSTMT
          
*** Overlay for OBJ80COL in OBJSTMT
*
*     +------+--------------------+-------------+-------------+
*   0 |//////|////////////////////|/////////////|   (006)-    |
*     +------+--------------------+-------------+-------------+
*   8 |        -OBJREPAD          |/////////////|  OBJREPEI   |
*     +---------------------------+-------------+-------------+
*  10 |                                                       |
*     =                       OBJREPDT                        =
*     |                                         +-------------+
*  40 |                                         |/////////////|
*     +-----------------------------------------+-------------+
*  48 |///////////////////////////////////////////////////////|
*     +-------------------------------------------------------+
*  50
*
*** Overlay for OBJ80COL in OBJSTMT
          
*** Overlay for OBJ80COL in OBJSTMT
*
*     +------+--------------------+---------------------------+
*   0 |//////|////////////////////|///////////////////////////|
*     +------+------+-------------+---------------------------+
*   8 |/////////////|  OBJRLDLL   |///////////////////////////|
*     +-------------+-------------+---------------------------+
*  10 |                                                       |
*     =                       OBJRLDDT                        =
*     |                                                       |
*     +-------------------------------------------------------+
*  48 |///////////////////////////////////////////////////////|
*     +-------------------------------------------------------+
*  50
*
*** Overlay for OBJ80COL in OBJSTMT
          
*** Overlay for OBJRLDDT in OBJSTMT
*
*     +-------------+-------------+------+--------------------+
*  10 |  OBJRLD1R   |  OBJRLD1P   |:RLD1F|     OBJRLD1A       |
*     +-------------+-------------+------+--------------------+
*  18
*
*** Overlay for OBJRLDDT in OBJSTMT
          
*** Overlay for OBJRLDDT in OBJSTMT
*
*     +------+--------------------+
*  10 |:RLD2F|     OBJRLD2A       | 14
*     +------+--------------------+
*
*** Overlay for OBJRLDDT in OBJSTMT
          
*** Overlay for OBJ80COL in OBJSTMT
*
*     +------+--------------------+---------------------------+
*   0 |//////|////////////////////|                           |
*     +------+--------------------+                           |
*   8 |                                                       |
*     =                       OBJSLCDT                        =
*     |                                                       |
*     +-------------------------------------------------------+
*  48 |///////////////////////////////////////////////////////|
*     +-------------------------------------------------------+
*  50
*
*** Overlay for OBJ80COL in OBJSTMT
          
*** Overlay for OBJ80COL in OBJSTMT
*
*     +------+--------------------+---------------------------+
*   0 |//////|////////////////////|                           |
*     +------+--------------------+                           |
*   8 |                                                       |
*     =                       OBJSPBPZ                        =
*     |                                                       |
*     +-------------------------------------------------------+
*  48 |///////////////////////////////////////////////////////|
*     +-------------------------------------------------------+
*  50
*
*** Overlay for OBJ80COL in OBJSTMT
          
*** Overlay for OBJ80COL in OBJSTMT
*
*     +------+--------------------+---------------------------+
*   0 |//////|////////////////////|///////////////////////////|
*     +------+------+-------------+---------------------------+
*   8 |/////////////|  OBJSYMLL   |///////////////////////////|
*     +-------------+-------------+---------------------------+
*  10 |                                                       |
*     =                       OBJSYMDT                        =
*     |                                                       |
*     +-------------------------------------------------------+
*  48 |///////////////////////////////////////////////////////|
*     +-------------------------------------------------------+
*  50
*
*** Overlay for OBJ80COL in OBJSTMT
          
*** Overlay for OBJ80COL in OBJSTMT
*
*     +------+--------------------+---------------------------+
*   0 |//////|////////////////////|                           |
*     +------+--------------------+                           |
*   8 |                                                       |
*     =                       OBJSYSDT                        =
*     |                                                       |
*     +-------------------------------------------------------+
*  48 |///////////////////////////////////////////////////////|
*     +-------------------------------------------------------+
*  50
*
*** Overlay for OBJ80COL in OBJSTMT
          
*** Overlay for OBJ80COL in OBJSTMT
*
*     +------+--------------------+------+--------------------+
*   0 |//////|////////////////////|//////|     OBJTXTAD       |
*     +------+------+-------------+------+------+-------------+
*   8 |/////////////|  OBJTXTLL   |/////////////|  OBJTXTEI   |
*     +-------------+-------------+-------------+-------------+
*  10 |                                                       |
*     =                       OBJTXTDT                        =
*     |                                                       |
*     +-------------------------------------------------------+
*  48 |///////////////////////////////////////////////////////|
*     +-------------------------------------------------------+
*  50
*
*** Overlay for OBJ80COL in OBJSTMT
          
*** Overlay for OBJ80COL in OBJSTMT
*
*     +------+--------------------+---------------------------+
*   0 |//////|////////////////////|                           |
*     +------+--------------------+                           |
*   8 |                                                       |
*     =                       OBJUPBPZ                        =
*     |                                                       |
*     +-------------------------------------------------------+
*  48 |///////////////////////////////////////////////////////|
*     +-------------------------------------------------------+
*  50
*
*** Overlay for OBJ80COL in OBJSTMT
          
*** Overlay for OBJ80COL in OBJSTMT
*
*     +------+--------------------+-------------+-------------+
*   0 |//////|////////////////////|/////////////|   (006)-    |
*     +------+--------------------+-------------+-------------+
*   8 |        -OBJVERAD          |/////////////|  OBJVEREI   |
*     +---------------------------+-------------+-------------+
*  10 |                                                       |
*     =                       OBJVERDT                        =
*     |                                         +-------------+
*  40 |                                         |/////////////|
*     +-----------------------------------------+-------------+
*  48 |///////////////////////////////////////////////////////|
*     +-------------------------------------------------------+
*  50
*
*** Overlay for OBJ80COL in OBJSTMT
 
 
  OBJSTMT Cross Reference Top of page
 
 
Symbol         Dspl Value
-------------- ---- -----
OBJCOL1        0000
OBJCOL2        0001
OBJCPBPZ       0004
OBJDELNM       0004
OBJENDAD       0005
OBJENDEI       000E
OBJENDEL       001D
OBJEND29       001C
OBJESDAM       001C 03
OBJESDCM       0018 00000005
OBJESDE@       0019
OBJESDEI       000E
OBJESDEL       001D
OBJESDEN       0010
OBJESDER       0018 00000002
OBJESDET       0018
OBJESDFL       001C
OBJESDLD       0018 00000001
OBJESDLL       000A
OBJESDNT       0010
OBJESDN1       0010
OBJESDN2       0020
OBJESDN3       0030
OBJESDPC       0018 00000004
OBJESDRM       001C 04
OBJESDSD       0018 00000000
OBJESDUN       0018 000000FF
OBJESDWX       0018 0000000A
OBJESDXD       0018 00000006
OBJICSDT       0004
OBJLDTDT       0004
OBJPADDT       0004
OBJPRMDT       0004
OBJPRTDT       0004
OBJREPAD       0006
OBJREPDT       0010
OBJREPEI       000E
OBJRLDDT       0010
OBJRLDLL       000A
OBJRLDTL       0010 4C
OBJRLDTP       0010 30
OBJRLDTS       0010 02
OBJRLDTT       0010 01
OBJRLD1A       0015
OBJRLD1F       0014
OBJRLD1N       0015 00000018
OBJRLD1P       0012
OBJRLD1R       0010
OBJRLD2A       0011
OBJRLD2F       0010
OBJRLD2N       0011 00000014
OBJSLCDT       0004
OBJSPBPZ       0004
OBJSYMDT       0010
OBJSYMLL       000A
OBJSYSDT       0004
OBJTXTAD       0005
OBJTXTDT       0010
OBJTXTEI       000E
OBJTXTLL       000A
OBJUPBPZ       0004
OBJVERAD       0006
OBJVERDT       0010
OBJVEREI       000E
OBJ80COL       0000
 
This information is based on z/VM 7.3.0 Last updated on 22 Jun 2022 at 15:53:14 EDT.
Copyright IBM Corporation, 1990, 2022