Previous Topic: Change the Value in TASKNUM DynamicallyNext Topic: Control Program Execution

Basic Demo Session › Structured Storage Display

Structured Storage Display

Now we request a structured storage display of TASKNUM and all the fields below it in the same DSECT.

  1. Type d to the left of TASKNUM in the Keep window, and press Enter. 
    CA InterTest for CICS Release 9.1.00   - PROTSYM FILE  ABEND DETECTED BREAKPOINT         
COMMAND ===>                                                                    
Program= ASMDEMO  Option #       Stmt #        Displacement=        Margin= 01  
                                        Search=                                 
------------------------------------------------------------------------------- 
 d____ R13.TASKNUM                     |  00000.                                
---------++-------------------------------------------------------------------- 
     Loc  Object Code    Addr1 Addr2  Stmt        Source Statement              
 _ 000192 4050 D1B0            001B0  1456          STH   R5,MSGLEN             
 A 000196 FA20 D189 4AE8 00189 02AE8   ==>          AP    TASKNUM,=P'1'         
 _ 00019C F920 D189 4AE9 00189 02AE9  1458          CP    TASKNUM,=P'2'         
 _ 0001A2 4720 2328            00328  1459          BH    ENDMSG                
 _ 0001A6 F920 D189 4AE8 00189 02AE8  1460          CP    TASKNUM,=P'1'         
 _ 0001AC 4780 227E            0027E  1461          BE    SENDSCR4              
 _ 0001B0 47F0 2328            00328  1462          B     ENDMSG                
 _ 0001B4                             1464 RETURN   DS    0H                    
                                      1465 *        EXEC CICS SEND FROM(OUTMSG  
                                      1466          DFHECALL =X'04043000080000  
   0001B4 4110 D068            00068                      ),(FB_2,OUTLEN)       
                                      1482 *        EXEC CICS SEND FROM(SCREEN  
                                      1483          DFHECALL =X'04043000080000  
   0001DA 4110 D068            00068                      2),(FB_2,MSGLEN)      
                                      1499 *        EXEC CICS RETURN            
                                      1500 *              TRANSID(EIBTRNID)

    The following screen appears. On the left are the Assembler labels; on the right are the hexadecimal values and corresponding character representations of each field. 

    CA InterTest for CICS Release 9.1.00   - MAIN STORAGE UTILITY - Termid = U026        
                                                                                
Starting at Address =  105018  Disp   Structure Display Format                  
TASKNUM                         189 |  00000.                    |              
TSTEXT                          18C | ............               |              
                                    | ............               |              
                                    | ........                   |              
MSGNAME                         1AC |  0000000000.               |              
MSGLEN                          1B0 | +00469.                    |              
RECRBA                          1B2 | ......                     |              
RECPONT                         1B8 |  0000000000.               |              
                                1BC |  00000.                    |              
DMAP04AS                        1BC |                            |              
                                1BC | ............               |              
RECOUT1L                        1C8 | ..                         |              
RECOUT1F                        1CA | .                          |              
RECOUT1A                        1CA | .                          |              
RECOUT1I                        1CB | .                          |              
RECOUT1O                        1CB | ............               |              
 ------------------------------------------------------------------------------ 
 PF1 Help       2            3 End        4 Return     5            6 Dump      
 PF7 Backward   8 Forward    9 Caps Off  10           11 Redisplay 12 Structure 
 CORE='R13.TASKNUM'                                                             
 CAIN4713 R13 not found - have assumed its register value

    The structured format of the main storage display is much easier to use than a traditional dump‑formatted display. Since the application displays only those bytes belonging to a field, you do not have to know or remember the lengths of the fields to determine their contents.

    Note: You can change the contents of any field by overtyping the desired bytes on the main storage display. By default the application data appropriate translated values for each field. If you prefer you may toggle to hex/char display mode by hitting the PF12 key, data alteration is allowed in either mode.

    Now we return to the program listing so we can continue to test ASMDEMO.

  2. Press Clear or PF3.

    The breakpoint screen redisplays.