Previous Topic: Inspect and Modify Main StorageNext Topic: Modify the Value of a Data Item

COBOL Debugging Programs › Inspect and Modify Main Storage › Display the Value of a Data Item

Display the Value of a Data Item

When you are stopped at a breakpoint, you can request the display of the value of a data item directly from the source listing.

  1. To display its value where it is defined, type a d to the left of the statement defining it and press Enter, as shown in the following screen. 
       CA InterTest for CICS V9.1   - PROTSYM FILE  UNCOND  BEFORE BREAKPOINT       
COMMAND ===>                                                                    
Program= COBDEMO  Option #       Stmt #                             Margin= 01  
                                        Search=                                 
------------------------------------------------------------------------------- 
 _____ TASKNUM                         | ?00000.                                
---------+--------------------------------------------------------------------- 
 _ 000035     03 TASK-SWITCH2          PIC 99.                                  
 _ 000036     03 TASK-SWITCH3          PIC X.                                   
 U 000037     03 TASKNUM               PIC S9(5)  COMP-3.                       
 _ 000038     03 TASKNUM-CHAR REDEFINES TASKNUM PIC X(3).                       
 _ 000039     03 TASK-TEXT.                                                     
 _ 000040        05 TASK-ID-NO         PIC 9(3)  COMP-3  VALUE 0. 
.
.
.
  2. To display the value of a data item where it is referenced, type a d to the left of the statement referencing it, place the cursor under any character in the data item, and press Enter.

    CA InterTest responds by displaying the contents of the data item in structured format, as shown next.

          CA InterTest for CICS V9.1   - MAIN STORAGE UTILITY - Termid = U087      
                                                                                
Starting at Address =2080A138         Structure Display Format                  
 02 TASKNUM                         | ?00000.                    |              
 02 TASKNUM-CHAR                    | ...                        |              
 02 TASK-TEXT                       |                            |              
  03 TASK-ID-NO                     |  000.                      |              
  03 FILLER                         |                            |              
  03 TASK-MESG                      | THIS IS A ME               |              
                                    | SSAGE                      |              
  03 FILLER                         |                            |              
  03 TASK-DATE                      |                            |              
   04 TASK-MM                       | 12                         |              
   04 TASK-SL1                      | /                          |              
   04 TASK-DD                       | 25                         |              
   04 TASK-SL2                      | /                          |              
   04 TASK-YY                       | 99                         |              
                                                                                
                                                                                
 ------------------------------------------------------------------------------ 
 PF1 Help       2            3 End        4 Return     5            6 Dump      
 PF7 Backward   8 Forward    9 Caps Off  10           11 Redisplay 12 Structure 
 CORE='TASKNUM'                                                                 
 CAIN0452 FIELD DOES NOT CONTAIN A VALID PACKED DECIMAL (COMP-3) VALUE

    Note: CA InterTest displays more than just the contents of the specified data item (TASKNUM); it also displays all the items below it in the same COBOL structure.

  3. Press Clear or PF3 to return to the source listing.