Process-level data

Start of changeThe Process Control Block section of the dump, shown in Figure 1, displays COBOL process-level control blocks THDCOM, COBCOM, COBVEC, and ITBLK. For Enterprise COBOL V5.1 and later releases, the process-level control blocks are COBPCB (corresponds to THDCOM), COBRCB (corresponds to COBCOM) and LIBVEC (corresponds to COBVEC). The control blocks are dumped for IBM® service personnel use. In a non-CICS environment, the ITBLK control block only appears when a VS COBOL II program is active. In a CICS® environment, the ITBLK control block always appears. End of change

Figure 1. Process-level control blocks for COBOL programs
Process Control Blocks:      THDCOM: 00016A80                                                                                                                  
    +000000 00016A80  C3F3E3C8 C4C3D6D4 000001E8 81000000  00000100 00000000 00016108 000161BC  |C3THDCOM...Ya............./.../.|  
    +000020 00016AA0  11480100 00000000 C3D6C2C4 E4D4D7F1  00000000 00000000 00000000 00000000  |........COBDUMP1................|  
    +000040 00016AC0  00000000 00000000 00000000 00000000  00000000 00000000 00000000 00000000  |................................|  
    +000060 00016AE0 - +00007F 00016AFF             same as above                                                                   
⋮                                                                                                                                 
  COBCOM: 00016108                                                                                                                  
    +000000 00016108  C3F3C3D6 C2C3D6D4 00000978 00000000  00000000 00000000 00000000 00000000  |C3COBCOM........................|  
    +000020 00016128  00000000 00000000 00000000 00000000  00000000 00000000 00000000 00000000  |................................|  
    +000040 00016148  00000000 00000000 00000000 00000000  00000000 1140AE68 906000D6 000161BC  |..................... ...-.O../.|  
    +000060 00016168  000167FC 00000100 00820000 00000000  00008000 08000000 00016A80 00000000  |.........b......................|  
⋮                                                                                                                                   
  COBVEC: 000161BC                                                                                                                  
    +000000 000161BC  0001643C 00016442 00016448 0001644E  00016454 0001645A 00016460 00016466  |...............+.......!...-....|  
    +000020 000161DC  0001646C 00016472 00016478 0001647E  00016484 0001648A 00016490 00016496  |...%...........=...d...........o|  
    +000040 000161FC  0001649C 000164A2 000164A8 000164AE  000164B4 000164BA 000164C0 000164C6  |.......s...y...................F|  
    +000060 0001621C  000164CC 000164D2 000164D8 000164DE  000164E4 000164EA 000164F0 000164F6  |.......K...Q.......U.......0...6|  
⋮