Select the Source Program from the ITST Menus

PL/I Basic Demo Session › Select the Source Program from the ITST Menus

Select the Source Program from the ITST Menus

Start your session by selecting the source listing of the CA InterTest for CICS demonstration program from the ITST Primary Option Menu.

Sign on to CICS.
Type ITST on a clear screen.

Press Enter.

The Primary Option Menu appears.

‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑ CA InterTest for CICS Release 9.1.00 PRIMARY OPTION MENU ‑‑‑‑‑‑‑‑‑‑‑‑‑‑ OPTION ===> 1 Source ‑ Display/select program source files/listings 2 Monitoring ‑ Display/modify CA InterTest monitoring/activity 3 Main storage ‑ Display/modify CICS storage areas 4 Auxiliary storage ‑ Display/access databases/files/queues 5 Dump analysis ‑ Invoke CA SymDump CICS dump/trace capture facility 6 Product help ‑ Invoke CA InterTest product help facility 7 Status/Maintenance ‑ Product status and maintenance functions 8 What's new? ‑ Display information about CA InterTest Release 9.1.00 X Exit ‑ Terminate menu processing CA InterTest for CICS Release 9.1.00 Copyright © 2014 CA. All rights reserved. PF1 Help 2 3 End 4 Return 5 6 PF7 8 9 10 11 12

Notice the PF keys have conventional assignments for ISPF‑like navigation:

PF1 Help accesses online help
PF3 End returns one panel
PF4 Return returns to the top‑level menu

Now we can look at the source listing of the program we will debug.

Type 1 in the Option field.

Press Enter.

The CA InterTest for CICS Source Menu appears.

‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑ CA InterTest for CICS Release 9.1.00 SOURCE MENU ‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑ OPTION ===> 1 Select a member list type, specifying optional criteria below. 1 Source listings ‑ Display/select program source listings 2 Symbolic files ‑ Display/select program source SYMBOLIC files Type specific or generic program/file name(s): (Valid mask characters are * and/or +) p*______ ________ ________ ________ ________ ________ ________ ________ . . .

Type 1 in the Option field to search for program listings.
Tab to the first entry field for file/program names, and type p*. The asterisk is a generic or wildcard character. It indicates that anything from this point on in a file name will satisfy the search criteria.

Press Enter.

The Source Listing Selection screen displays. It lists all program Source Listings beginning with the letter P, in all symbolic files. Your list might have fewer or more entries.

------------ CA InterTest for CICS Release 9.1.00 SOURCE LISTING SELECTION ------------ COMMAND ===> Type S to select a source listing. Name File Created Size Attributes _ PLIDEML PROTSYM 09/06/2013 14:03 43 PL/I 3.2, composite _ PLIDEMO PROTSYM 09/06/2013 14:01 268 PL/I 3.2 _ PROTCI63 PROTSYM 05/25/2013 12:53 637 HLASM 5.0, no purge _ PROTCI64 PROTSYM 05/25/2013 12:53 642 HLASM 5.0, no purge _ PROTIN62 PROTSYM 05/25/2013 12:53 257 HLASM 5.0, no purge _ PROTIN63 PROTSYM 05/25/2013 12:53 258 HLASM 5.0, no purge _ PROTIN64 PROTSYM 05/25/2013 12:54 259 HLASM 5.0, no purge _ PSBIN25 PROTSYM 09/06/2013 16:15 25 PL/I 3.2 *** End of data *** PF1 Help 2 Refresh 3 End 4 Return 5 6 PF7 Backward 8 Forward 9 10 11 12

Locate the demo program, PLIDEMO, in the Selection List. You might need to scroll the file list using PF7 and PF8. Optionally, you can use the command:
```
LOCATE program‑name
```
Note: If the file list does not contain the name of the demo program indicated above, it could be because the person who installed CA InterTest for CICS changed the name of the CA InterTest for CICS sample programs available to you. Check with that person to find out the correct names.
Type an s in the field to the left of the program name to select it for Source Listing Display.

Press Enter.

CA InterTest for CICS displays the PROTSYM File Source Listing Display, which shows the compiled listing of PLIDEMO.

The top half of the display identifies the program and provides fields for entering commands, option numbers (to jump to different parts of your source listing), statement numbers, and search criteria.
Depending on your session defaults, you might not see lines identifying the PF key and Option # field titles. These were omitted from the images in this guide for clarity.

The bottom half of the display contains the source listing.

CA InterTest for CICS Release 9.1.00   - PROTSYM FILE  SOURCE LISTING DISPLAY            
COMMAND ===>                                                                    
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),

Note: The statement numbers on your screen might not match those shown in the illustrations. This will not hinder you from performing the test session.