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.

OBJSTMT

Prolog  

Control Block Contents  

OBJSTMT DSECT

Storage Layout  

Cross Reference (Contains links to field and bit definitions)  

OBJSTMT Prolog

 NAME       : HCPOBJCT
 STATUS     : VM/ESA Version 2, Release 4.0
 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.

 

OBJSTMT Control Block Content


OBJSTMT DSECT

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' SD Segment Definition 00000001 OBJESDLD X'01' LD Label Definition 00000002 OBJESDER X'02' ER External Reference 00000004 OBJESDPC X'04' PC Private Control section 00000005 OBJESDCM X'05' CM Common section 00000006 OBJESDXD X'06' XD Dummy External DSECT 0000000A OBJESDWX X'0A' WX Weak External reference 000000FF OBJESDUN X'FF' 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' RMODE: Residency Mode bit .... .0.. RMODE 24 .... .1.. RMODE ANY .... ..11 OBJESDAM X'03' 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 1111 .... OBJRLDTP X'F0' RLD type 0000 .. A-type or Y-type constant 0001 .. V-type address constant 0010 .. Q-type address constant 0011 .. CXD type entry .... 11.. OBJRLDTL X'0C' RLD entry length .... 00.. 1 byte .... 01.. 2 bytes .... 10.. 3 bytes .... 11.. 4 bytes .... ..1. OBJRLDTS X'02' RLD relocation sign .... 0. add .... 1. subtract .... ...1 OBJRLDTT X'01' 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 * 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

*** 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

(contains links to field and bit definitions)
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 0C

OBJRLDTP 0010 F0

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 VM/ESA 2.4.0.
Last updated on 3 Aug 1999 at 12:18:09 EDT.
Copyright IBM Corporation, 1990, 1999