I have the map from the compile but for the FCB all I see is where the
FCB is and not the fields within it.  Am I looking at the wrong thing?

                                               IN TGT
                                                     
RESERVED - 72 BYTES                            00000
TGT IDENTIFIER                                 00048
RESERVED - 4 BYTES                             0004C
TGT LEVEL INDICATOR                            00050
32 BIT SWITCH                                  00054
POINTER TO RUNCOM                              00058
POINTER TO COBVEC                              0005C
POINTER TO PROGRAM DYNAMIC BLOCK TABLE         00060
NUMBER OF FCB'S                                00064
WORKING-STORAGE LENGTH                         00068
ADDRESS OF IGZESMG WORK AREA                   00070
ADDRESS OF 1ST GETMAIN BLOCK (SPACE MGR)       00074
RESERVED - 2 BYTES                             00078
MERGE FILE NUMBER                              0007E
ADDRESS OF CEL COMMON ANCHOR AREA              00080
LENGTH OF TGT                                  00084
RESERVED - 1 SINGLE BYTE FIELD                 00088
PROGRAM MASK USED BY THIS PROGRAM              00089
RESERVED - 2 SINGLE BYTE FIELDS                0008A
NUMBER OF SECONDARY FCB CELLS                  0008C
LENGTH OF THE ALTER VN(VNI) VECTOR             00090
COUNT OF NESTED PROGRAMS IN COMPILE UNIT       00094
DDNAME FOR DISPLAY OUTPUT                      00098
RESERVED - 8 BYTES                             000A0
POINTER TO COM-REG SPECIAL REGISTER            000A8
ALTERNATE COLLATING SEQUENCE TABLE PTR.        000E0
ADDRESS OF SORT G.N. ADDRESS BLOCK             000E4
ADDRESS OF PGT                                 000E8
POINTER TO 1ST IPCB                            000F0
ADDRESS OF THE CLLE FOR THIS PROGRAM           000F4
POINTER TO ABEND INFORMATION TABLE             000F8
POINTER TO TEST INFO FIELDS IN THE TGT         000FC
ADDRESS OF START OF COBOL PROGRAM              00100
POINTER TO ALTER VNI'S IN CGT                  00104
POINTER TO ALTER VN'S IN TGT                   00108
POINTER TO FIRST PBL IN THE PGT                0010C
POINTER TO FIRST FCB CELL                      00110
WORKING-STORAGE ADDRESS                        00114
POINTER TO FIRST SECONDARY FCB CELL            00118
POINTER TO STATIC CLASS INFO BLOCK 1           0011C
                                                    
*** VARIABLE PORTION OF TGT ***                     
                                                    
BASE LOCATORS FOR SPECIAL REGISTERS            00124
BASE LOCATORS FOR WORKING-STORAGE              0012C
BASE LOCATORS FOR LINKAGE-SECTION              00140
BASE LOCATORS FOR FILES                        00148
CLLE ADDR. CELLS FOR CALL LIT. SUB-PGMS        0016C
INDEX CELLS                                    00178
FCB CELLS                                      00184
TGT      WILL BE ALLOCATED FOR 000001BC BYTES
FCB00001 WILL BE ALLOCATED FOR 00000114 BYTES
FCB00002 WILL BE ALLOCATED FOR 00000114 BYTES
DCB00003 WILL BE ALLOCATED FOR 00000060 BYTES
FCB00003 WILL BE ALLOCATED FOR 00000114 BYTES
DCB00004 WILL BE ALLOCATED FOR 00000060 BYTES
FCB00004 WILL BE ALLOCATED FOR 00000114 BYTES
DCB00005 WILL BE ALLOCATED FOR 00000060 BYTES
FCB00005 WILL BE ALLOCATED FOR 00000114 BYTES
DCB00006 WILL BE ALLOCATED FOR 00000060 BYTES
FCB00006 WILL BE ALLOCATED FOR 00000114 BYTES
DCB00007 WILL BE ALLOCATED FOR 00000060 BYTES
FCB00007 WILL BE ALLOCATED FOR 00000114 BYTES
DCB00008 WILL BE ALLOCATED FOR 00000060 BYTES
FCB00008 WILL BE ALLOCATED FOR 00000114 BYTES
DCB00009 WILL BE ALLOCATED FOR 00000060 BYTES
FCB00009 WILL BE ALLOCATED FOR 00000114 BYTES
GDT00001 WILL BE ALLOCATED FOR 000000A0 BYTES
RCD00001 WILL BE ALLOCATED FOR 00000050 BYTES
RCD00002 WILL BE ALLOCATED FOR 000000D0 BYTES
SPEC-REG WILL BE ALLOCATED FOR 0000007E BYTES
WRK-STOR WILL BE ALLOCATED FOR 00004BC8 BYTES
DSA      WILL BE ALLOCATED FOR 000001D8 BYTES

-----Original Message-----
Eugene S.Hudders

Hi Ken:

You get a copy of the TGT and DSA maps at the end of the compilation.
You may want to check your options (CBL) to make sure that the maps are
being requested.

Regards,
Gene



----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to