Previous Topic: Demo PreliminariesNext Topic: Set an Unconditional Breakpoint for a Label


Set Unconditional Breakpoints

To begin, you will need to bring up the Source Listing display for the PL/I demo program. This was covered in the basic demo session.

  1. Press PF4 to display the Profile panel. Verify that the Display titles is set to N and that the AutoKeep Display is ON. If not, change either or both of them and press Enter.

    CA InterTest for CICS Release 9.1.00 - PROTSYM FILE SOURCE LISTING PROFILE COMMAND ===> Program= PLIDEMO Option # Stmt # Margin= 01 Search= OPTS 1 Data xref 2 Aggregate 3 Stor reqs 4 Stat stor 5 Var stor More: + 6 Offsets 7 Gend code 8 Err msgs 9 Srch fwd 10 Srch bwd PFKS 1 Help 2 3 End 4 Auto prms 5 Monitor 6 Menu 7 Backward 8 Forward 9 10 11 12 Status ---------+--------------------------------------------------------------------- Display titles = N ç Y (Titles), N (No titles), or R (Registers) PF7/8 amount = PAGE PAGE, HALF, STOP, or a number from 1 to 9999 Step Timing = BEFORE Stop Before or After the next STMTS is executed Stepping amount = 001 The number of STMTS to execute Auto-stepping = OFF ON to activate; press PF4 to change values Source List BKPT = ON OFF to use the detailed breakpoint display From terminal ID = U006 Terminal ID where the program will execute BKPT terminal ID = U006 Terminal ID to receive the breakpoint displays User ID = .ANY User ID who will execute this program AutoKeep Display = ON ç OFF to deactivate Code Counting = OFF ON to activate Code Coverage SDF = DATA DATA for Structure Display Format

  2. Press PF3 to return to the listing.

    Now you will set unconditional breakpoints at three procedure names. Setting unconditional breakpoints lets you halt the program so that you can set options and check the contents of data items.

  3. Start by searching for the label READATA. Tab to the Search= field, type l readata in the command line and press Enter.

    CA InterTest for CICS Release 9.1.00 - PROTSYM FILE SOURCE LISTING DISPLAY COMMAND ===> l readata Program= PLIDEMO Option # Stmt # Margin= 01 Search= ------------------------------------------------------------------------------- _ 18.1 /* INTERTEST PL/I DEMO PROGRAM 10/01/89 3.1.200 _ 19.1 PLIDEMO: PROC(DFHEIPTR,COMMAREA_PTR) OPTIONS(MAIN REENT _ 20.1 1 DCL 1 DFHCNSTS STATIC, /* CONSTANTS USED BY TRANSLATOR _ 21.1 2 DFHLDVER CHAR(22) INIT('LD TABLE DFHEITAB 530. _ 22.1 2 DFHEIB0 FIXED BIN(15) INIT(0), _ 23.1 2 DFHEID0 FIXED DEC(7) INIT(0), _ 24.1 2 DFHEICB CHAR(8) INIT(' '); _ 25.1 1 DCL DFHEPI ENTRY, DFHEIPTR PTR; _ 26.1 1 DCL 1 DFHEIBLK BASED (DFHEIPTR), _ 27.1 02 EIBTIME FIXED DEC(7), _ 28.1 02 EIBDATE FIXED DEC(7), _ 29.1 02 EIBTRNID CHAR(4), _ 30.1 02 EIBTASKN FIXED DEC(7), _ 31.1 02 EIBTRMID CHAR(4), _ 32.1 02 EIBFIL01 FIXED BIN(15), _ 33.1 02 EIBCPOSN FIXED BIN(15), _ 34.1 02 EIBCALEN FIXED BIN(15), _ 35.1 02 EIBAID CHAR(1), _ 36.1 02 EIBFN CHAR(2),

    The READATA label appears.

    You will set unconditional breakpoints at the statement:

    GOTO SENDMP00
    
  4. Tab to the GOTO SENDMP00 statement.
  5. Type u to the left of the statement, and press Enter.

    CA InterTest for CICS Release 9.1.00 - PROTSYM FILE SOURCE LISTING DISPLAY COMMAND ===> Program= PLIDEMO Option # Stmt # Margin= 01 Search= ---------+--------------------------------------------------------------------- u 1308.1 1 GOTO SENDMP00; _ 1309.1 _ 1310.1 1 READATA: _ 1311.1 /* EXEC CICS HANDLE CONDITION DSIDERR _ 1312.1 ERROR (GENERR) _ 1313.1 NOTOPEN (NOPEN) * _ 1314.1 DO; . . .

    CA InterTest for CICS sets the breakpoint and redisplays the screen with an uppercase U.