The following example shows LIST output for the task global table (TGT) with information about the environment in which your program runs.
DATA VALIDATION AND UPDATE PROGRAM IGYTCARA Date 12/30/2007 Time 10:48:16 *** TGT MEMORY MAP *** (1) (2) TGTLOC 000000 RESERVED - 72 BYTES 000048 TGT IDENTIFIER 00004C RESERVED - 4 BYTES 000050 TGT LEVEL INDICATOR 000051 RESERVED - 3 BYTES 000054 32 BIT SWITCH 000058 POINTER TO RUNCOM 00005C POINTER TO COBVEC 000060 POINTER TO PROGRAM DYNAMIC BLOCK TABLE 000064 NUMBER OF FCB'S 000068 WORKING-STORAGE LENGTH 00006C RESERVED - 4 BYTES 000070 ADDRESS OF IGZESMG WORK AREA 000074 ADDRESS OF 1ST GETMAIN BLOCK (SPACE MGR) 000078 RESERVED - 2 BYTES 00007A RESERVED - 2 BYTES 00007C RESERVED - 2 BYTES 00007E MERGE FILE NUMBER 000080 ADDRESS OF CEL COMMON ANCHOR AREA 000084 LENGTH OF TGT 000088 RESERVED - 1 SINGLE BYTE FIELD 000089 PROGRAM MASK USED BY THIS PROGRAM 00008A RESERVED - 2 SINGLE BYTE FIELDS 00008C NUMBER OF SECONDARY FCB CELLS 000090 LENGTH OF THE ALTER VN(VNI) VECTOR 000094 COUNT OF NESTED PROGRAMS IN COMPILE UNIT 000098 DDNAME FOR DISPLAY OUTPUT 0000A0 RESERVED - 8 BYTES 0000A8 POINTER TO COM-REG SPECIAL REGISTER 0000AC RESERVED - 52 BYTES 0000E0 ALTERNATE COLLATING SEQUENCE TABLE PTR. 0000E4 ADDRESS OF SORT G.N. ADDRESS BLOCK 0000E8 ADDRESS OF PGT 0000EC RESERVED - 4 BYTES 0000F0 POINTER TO 1ST IPCB 0000F4 ADDRESS OF THE CLLE FOR THIS PROGRAM 0000F8 POINTER TO ABEND INFORMATION TABLE 0000FC POINTER TO TEST INFO FIELDS IN THE TGT 000100 ADDRESS OF START OF COBOL PROGRAM 000104 POINTER TO ALTER VNI'S IN CGT 000108 POINTER TO ALTER VN'S IN TGT 00010C POINTER TO FIRST PBL IN THE PGT 000110 POINTER TO FIRST FCB CELL 000114 WORKING-STORAGE ADDRESS 000118 POINTER TO FIRST SECONDARY FCB CELL 00011C POINTER TO STATIC CLASS INFO BLOCK 1 000120 POINTER TO STATIC CLASS INFO BLOCK 2 *** VARIABLE PORTION OF TGT *** 000124 BASE LOCATORS FOR SPECIAL REGISTERS 00012C BASE LOCATORS FOR WORKING-STORAGE (3) 000134 BASE LOCATORS FOR LINKAGE-SECTION 000138 BASE LOCATORS FOR FILES 00014C CLLE ADDR. CELLS FOR CALL LIT. SUB-PGMS. 000170 INDEX CELLS 000194 FCB CELLS 0001A8 INTERNAL PROGRAM CONTROL BLOCKS