COMPARE PCB statement
The COMPARE PCB statement is optional. You can use it to compare values returned to the PCB by IMS or to print blocks or buffer pool.
The following table shows the format of the COMPARE PCB statement.
| Column | Function | Code | Description |
|---|---|---|---|
| 1 | Identifies control statement | E | COMPARE statement. |
| 2 | Hold compare option | H | Hold compare statement. |
| b | Reset hold condition for a single COMPARE statement. | ||
| 3 | Snap dump options (if compare was unequal) | b | Use default value. (You can change the default value or turn off the option by coding the value in an OPTION statement.) |
| 1 | The complete I/O buffer pool. | ||
| 2 | The entire region (batch regions only). | ||
| 4 | The DL/I blocks. | ||
| 8 | Terminate the job step on miscompare of DATA or PCB. | ||
| S | To SNAP subpools 0 through 127. Requests for multiple SNAP dump options can be obtained by summing their respective hexadecimal values. If anything other than a blank, 1-9, A-F, or S is coded in column 3, the SNAP dump option is ignored. | ||
| 4 | Extended SNAP1 options | b | Ignore extended option. |
| P | SNAP the complete buffer pool (batch). | ||
| S | SNAP subpools 0 through 127 (batch). An area is never snapped twice. The SNAP option is a combination of columns 3 (SNAP dump option) and 4 (extended SNAP option). |
||
| 5-6 | Segment level | nn | 'nn' is the segment level for COMPARE PCB. A leading zero is required. |
| 7 | Reserved | b | |
| 8-9 | Status code | b | Allow blank status code only. |
| xx | Allow specified status code only. | ||
| XX | Do not check status code. | ||
| OK | blank, GA, GC, or GK allowed. | ||
| 10 | Reserved | b | |
| 11-18 | Segment name |
xxxxxxxx | Segment name for DB PCB compare. |
| Logical terminal for I/O. | |||
| Destination for ALT PCB. | |||
| 19 | Reserved | b | |
| 20-23 | Length of key | nnnn | 'nnnn' is length of the feedback key. |
| 24-71 or | Concatenated key | Concatenated key feedback for DB PCB compare. | |
| 24-31 | User ID | User identification for TP PCB. | |
| 72 | Continuation column | b | If blank, key feedback is not continued. |
| x | If not blank, key feedback is continued, starting in columns 16-71 of subsequent statements. | ||
| 73-80 | Sequence indication | nnnnnnnn | For SYSIN2 statement override. |
| Note:
|
|||
Blank fields are not compared to the corresponding field in the PCB, except for the status code field. (Blanks represent a valid status code.) To accept the status codes blank, GA, GC, or GK as a group, put OK in columns 8 and 9. To stop comparisons of status codes, put XX in columns 8 and 9.
To execute the same compare after a series of calls, put an H in column 2. This executes the COMPARE statement after each call. This is particularly useful to compare to a blank status code only when loading a database. The H COMPARE statement stays in effect until another COMPARE PCB statement is read.