The 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.
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|
⋮