The Source Listing Facility › Source Selection List › How You Search for Data › Modify and Locate Program Registers

Modify and Locate Program Registers

If Display Titles=R on the Profile screen, the title lines are replaced with the contents of your program's registers, as shown in the following sample screen.

                CA INTERTEST - PROTDEM FILE SOURCE LISTING DISPLAY
 Command ==>
 Program= COBDEMO  Option #       Stmt #                              Margin= 01
                                        Search=                             
 ---------------------------------------------------------------\-----------------
  R0-R7  00000002 00217484 002EDBCA 002ED534 0020831C FF004000 0021504C 0\-021604C
  R8-R15 0021704C 002EEF96 002EB020 002EB020 002ED520 002171D4 002\-083D0 002EF038 
  Cond. Code = 2    Amode = 24 
 ---------------------------------------------------------------\-----------------
   _ 01050      MOVE '               ' TO DFHEIV0 CALL 'DFHEI1' USING           
   _ 01051      DFHEIV0.                                                        
   _ 01052     IF EIBAID = DFHCLEAR GO TO SEND-END-MSG.                         
   _ 01053     IF EIBAID = DFHPF3 GO TO SEND-END-MSG.                           
   _ 01054     IF EIBAID = DFHPF12 GO TO EXPANDED-DEMO.                         
   _ 01055 CONTINUE-TASK.                                                       
     01056**** TASKNUM *NOTE* FIELD MUST BE INITIALIZED                         
   A   ==>     ADD +1 TO TASKNUM.                                               
   _ 01058     IF TASKNUM = 1                                                   
   _ 01059         MOVE THIRD-SCREEN-TEXT TO MSG-SCREEN-TEXT                    
   _ 01060         MOVE THIRD-SCREEN-LEN TO MSG-SCREEN-LEN.                     
   _ 01061     IF TASKNUM = 2                                                   
   _ 01062         MOVE FOURTH-SCREEN-TEXT TO MSG-SCREEN-TEXT                   
   _ 01063         MOVE FOURTH-SCREEN-LEN TO MSG-SCREEN-LEN.    
   _ 01064     IF TASKNUM GREATER 2

When registers display, the line below the registers contains:

Cond. Code

Reveals the current condition code and lets you know what branch is about to execute before it actually occurs.

Amode

Displays the current addressing mode of the program. Valid values are 24 and 31.

ExecKey

Displays the current ExecKey for the abending program if the CICS Storage Protection Option is active, depending on the option specified in the program definition. User or CICS are valid values. (This option is not shown in the example.)

TransIsolate

Displays the abending task's transaction isolation option if the CICS Transaction Isolation Option is active. (This option is not shown in the example.)

To modify the program's registers

1. Overtype the displayed contents with the desired value.
2. Press Enter. Your changes take effect immediately.

To view the area pointed to by a register:

1. Overtype the first displayed character of the register with either an at (@) sign, (for a 24‑bit address) or a percent sign, % (for a 31‑bit address).
2. Press Enter to display the area pointed to by the specified register.