You can set unconditional breakpoints at all references to a data name from the Cross Reference section.
CA InterTest for CICS V9.1 - PROTSYM FILE SOURCE LISTING DISPLAY COMMAND ===> l .dx Program= COBDEMO Option # Stmt # Margin= 01 Search= OPTS 1 Proc div 2 Work-stor 3 Link sect 4 D-map 5 Clst/Pmap More: + 6 Data xref 7 Proc xref 8 Err msgs 9 Srch fwd 10 Srch bwd PFKS 1 Help 2 3 End 4 Profile 5 Monitor 6 Menu 7 Backward 8 Forward 9 10 11 12 Status ------------------------------------------------------------------------------- _ 000477 CONTINUE-TASK. 000478**** TASKNUM *NOTE* FIELD MUST BE INITIALIZED _ 000479 ADD +1 TO TASKNUM. . . .
CA InterTest displays the Dataname Cross Reference section, as shown next.
CA InterTest for CICS V9.1 - PROTSYM FILE SOURCE LISTING DISPLAY COMMAND ===> Program= COBDEMO Option # Stmt # Margin= 01 Search= OPTS 1 Proc div 2 Work-stor 3 Link sect 4 D-map 5 Clst/Pmap More: + 6 Data xref 7 Proc xref 8 Err msgs 9 Srch fwd 10 Srch bwd PFKS 1 Help 2 3 End 4 Profile 5 Monitor 6 Menu 7 Backward 8 Forward 9 10 11 12 Status ----------------------------------------+-------------------------------------- _ DEF DATA NAMES REFERENCES _ 32 TASK-PROTCPF M421 909 919 _ 33 TASK-PROTHLF M422 761 _ 47 TASK-SL1 _ 49 TASK-SL2 u 30 TASK-STRUCTURE 391 448 496 520 658 867 879 925 993 _ 51 TASK-STRUCTURE-2 659 u 34 TASK-SWITCH 398 M438 M556
According to the previous example, CA InterTest will set breakpoints at every statement that references data names TASK‑STRUCTURE and TASK‑SWITCH.
If your source listing does not include the Cross Reference section, you can also set a breakpoint at all references to a data name from the Working‑Storage section where the data name is defined.
CA InterTest for CICS V9.1 - PROTSYM FILE SOURCE LISTING DISPLAY COMMAND ===> Program= COBDEMO Option # Stmt # Margin= 01 Search= OPTS 1 Proc div 2 Work-stor 3 Link sect 4 D-map 5 Clst/Pmap More: + 6 Data xref 7 Proc xref 8 Err msgs 9 Srch fwd 10 Srch bwd PFKS 1 Help 2 3 End 4 Profile 5 Monitor 6 Menu 7 Backward 8 Forward 9 10 11 12 Status ------------------------------------------------------------------------------- _ 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. . . .
In this example, CA InterTest sets breakpoints at all references to TASKNUM.
|
Copyright © 2014 CA Technologies.
All rights reserved.
|
|