InterTest™ and SymDump ® 11.0
 File Statistics for CA.TEST.PROTDMP

 265 total records, 199 records used, 66 records free in 2 blocks
 63 continuous records in largest block
 Record size is 8,185

 CICS       DATE         TIME      ABEND   PROGRAM   TRANSID TERMID  STATUS
--------------------------------------------------------------------------------
 A31IC9N8   11/19/2007   10.00.23   ASRA   ASMDEMO    DEMA   U035
 A31IC9N8   11/19/2007   10.00.30   ASRA   PL1DEMO    DEMP   U035
 A31IC9N8   11/19/2007   10.00.40   ASRA   COBDEMO    DEMC   U035
 A31IC9N8   11/19/2007   10.00.44   ASRA   ASMDEMO    DEMA   U035
 A31IC9N8   11/19/2007   10.01.00   ASRA   ASMDEMO    DEMA   U035
 A31IC9N8   11/20/2007   09.12.04   ASRA   COBDEMO    DEMC   U032
 A31IC9N8   11/20/2007   09.12.14   ASRA   PL1DEMO    DEMP   U032
 LIST DATE EQ 11202007

 File Statistics for CA.TEST.PROTDMP

 265 total records, 199 records used, 66 records free in 2 blocks
 63 continuous records in largest block


63 continuous records in largest block
 Record size is 8,185

 CICS       DATE         TIME      ABEND   PROGRAM   TRANSID TERMID  STATUS
--------------------------------------------------------------------------------
 A31IC9N8   11/20/2007   09.12.04   ASRA   COBDEMO    DEMC   U032
 A31IC9N8   11/20/2007   09.12.14   ASRA   PL1DEMO    DEMP   U032
OPT ALL
Suppress AP0001 dumps:        Y (Y,N)  Messages to operator:      Y (Y,N)
Suppress transaction dumps:   Y (Y,N)  Capture exec cics dumps:   Y (Y,N)
Automatic purge of dumps:     N (Y,N)  Use previous abend code:   Y (Y,N)
Automatic purge hold days:   39 (0-99) Dump only current program: Y (Y,N)
Dynamic purge of oldest dump: N (Y,N)  Dump select start date: 13/06/2005)
Suppress duplicate dumps:     Y (Y,N)  (CURRDATE or MM/DD/YYYY)
Duplicate dump limit:       016 (1-999)

Enter abend codes to be excluded:  '*' is generic character
....       ATNI       ASRA       ATND      ....
....       AZTQ       AZCT       ATCV      ....
Printing Dumps
The SymDump  for CICS batch print facility (IN##PDMP where ## indicates a two digit number that represents the CICS
release) lets you specify criteria to determine which dumps to print, just as you specify criteria to select dumps for the


SymDump  for CICS Selection List. Dumps printed using IN##PDMP contain most of the storage areas and summary
information that appears when an actual CICS transaction dump is printed using the CICS DFHDUP utility program.
Sample JCL for program IN##PDMP can be found in CAI.CAVHJCL member SYMPDMP.  Customize this member using
the instructions provided at the top.
 1308


InterTest™ and SymDump ® 11.0
NOTE
In an exceptional situation when IN##PDMP does not provide the information you require, take a CICS
transaction dump and format it using the CICS DFHDUP utility program.
PRINT and INDEX Commands
Use the following format to specify the PRINT command in the SYSIN data set to request printouts of the dumps that meet
the criteria specified by the parameters:
 PRINT parameters

Use the following format to specify the INDEX command in the SYSIN data set to request a list of the dumps that meet the
criteria specified by the parameters:
 INDEX parameters

Observe the following rules:
•Specify the PRINT or INDEX command in any column.
•You can specify multiple PRINT and INDEX commands; however, enter each specification on a new line.
•Specify at least one parameter for the PRINT command. Specify the INDEX command without parameters to print the
complete index of the SymDump  for CICS data set.
•Separate parameters with commas.
•You can enter parameters on multiple lines. To continue a command specification, end the line with a comma and
begin the continuation in any column on the next line.
•To include a comment, leave one blank space after the last parameter on a line, and then specify the comment.
NOTE
If the INDEX command is specified without parameters, a comment is not allowed.
•A JCL DD statement must identify the SymDump  for CICS data set from which the dumps are to be selected.
NOTE
A sample job stream follows the description of the command parameters.
The following list defines the parameters for the PRINT and INDEX commands.
Parameter Description Format Default
FROMDATE= The beginning date from which
dumps are selected; if omitted,
all dates usedmmddyyyy None
FROMTIME= The beginning time from which
dumps are selectedhhmmss 000000


FROMTIME= The beginning time from which
dumps are selectedhhmmss 000000
TODATE= The ending date up to which
dumps are selectedmmddyyyy Current system date
TOTIME= The ending time up to which
dumps are selectedhhmmss 235959
CICS= The applid of the CICS region
from which dumps are selectedapplid None
DUMP= The dump code for which
dumps are selectedxxxx None
 1309


InterTest™ and SymDump ® 11.0
PROGRAM= The program name for which
dumps are selectedxxxxxxxx Nnoe
TRANSID= The transaction ID for which
dumps are selectedxxxx None
TERMID The terminal ID for which dumps
are selectedxxxx None
USERID The CICS userid for which
dumps are selectedxxxxxxxx None
ALL All dumps are printed ALL None
Note:  Be aware of these considerations when specifying parameters:
•You cannot specify the ALL parameter with any other parameter.
•For the FROMTIME and TOTIME parameters to limit the dumps that are printed, they must be specified with the
FROMDATE parameter. If the TODATE parameter is omitted, it defaults to the current day.
Job Stream to Print Dumps and Source Listing
The following sample job stream prints selected dumps for program COBDEMO and uses InterTest for CICS to print the
program's source listing. The first step prints the requested dumps and the index of the dump data set; the second step
prints the saved listing for program COBDEMO.
NOTE
The SymDump  for CICS load library must be the first library in STEPLIB.
 //YOURNAME      JOB YOURJOBINFO
 //*Step 1 prints dumps for COBDEMO and lists all dumps in the data set
 //STEP1    EXEC PGM=IN##PDMP,REGION=4M           ## = CICS release eg. 66,67...
 //STEPLIB  DD  DSN=CAI.CAVHLOAD,DISP=SHR         CA SymDump for CICS load library
 //         DD  DSN=your.CICS.LOADLIB,DISP=SHR    CICS load library
 //PROTDMP  DD  DSN=SYMDUMP.PROTDMP,DISP=SHR      CA SymDump for CICS data set


//DFHDMPDS DD  DSN=&SYMDFILE,DISP=(,PASS),UNIT=SYSDA,
 //             DCB=(RECFM=VB,LRECL=4092,BLKSIZE=4096),
 //             SPACE=(CYL,(3,1))
 //DFHPRINT DD  SYSOUT=*
 //SYSPRINT DD  SYSOUT=*
 //REPORT   DD  SYSOUT=*                          Output data set
 //SYSIN    DD  DUMMY,DCB=BLKSIZE=80
 //DFHTINDX DD  SYSOUT=*
 //SYMSYSIN DD  *
 PRINT FROMDATE=03012014,TODATE=03042014,PROGRAM=COBDEMO   Print specifications
 INDEX                                                     Index specifications
 /*
 //*Step 2 prints the program listing for COBDEMO
 //STEP2    EXEC    PGM=IN25UTIL
 //STEPLIB  DD  DSN=CAI.CAVHLOAD,DISP=SHR      CA InterTest load library
 //SYSUDUMP DD  SYSOUT=*
 //MESSAGE  DD  SYSOUT=*
 //OUTPUT   DD  SYSOUT=*,                         Output data set
 //             DCB=(RECFM=FBA,LRECL=121,BLKSIZE=2420)
 //PROTSYM  DD  DSN=INTRTST.PROTSYM,DISP=SHR
 //CARDS    DD  *
 PRINT=COBDEMO
 1310


InterTest™ and SymDump ® 11.0
 /*
 //

In the previous example:
•The PROTDMP DD statement names the SymDump  for CICS data set
•The REPORT DD statement names the data set to which the dumps are to be written
•The PRINT parameters specify that all dumps be printed that were generated from 3/1/2014 to 3/4/2014 for program
COBDEMO
•The INDEX command specifies that a complete index of the dump data set be printed because there are no
parameters to limit the listing
•The OUTPUT DD statement identifies the data set to which the COBDEMO listing will be written
Sample Index of a CICS Data Set
The following example shows a sample index of all of the dumps in the PROTDMP dump data set.
 REPORT IN64PDMP            C A   S Y M D U M P                  DATE:03/05/2014
                                                                 TIME:  14:57:18
                          D U M P   F I L E   I N D E X          PAGE:         1
   FILE      CICS     DATE       TIME      ABEND    PROGRAM    TRANSID    TERMID
 -------------------------------------------------------------------------------
  PROTDMP     C2AG   03/05/2014  16:29:03    ATCH     INVNTRY     INVT      E066
  PROTDMP     C2AG   03/05/2014  14:54:16    ASRA     COBDEMO     DEMC      E058
  PROTDMP     C2AG   03/05/2014  13:55:28    ASRA     COBDEMO     DEMC      E098


PROTDMP     C2AG   03/05/2014  13:05:23    AEIL     COBDEMO     DEMC      E058
  PROTDMP     C2AG   03/05/2014  12:07:44    USR1     PAYROLL     PYRL      E125
  PROTDMP     C2AG   03/05/2014  10:14:21    USR2     PL1DEMO     DEMP      E008
  PROTDMP     C2AG   03/05/2014  09:29:08    ASRA     ASMDEMO     DEMA      E139
  PROTDMP     C2AG   03/03/2014  18:13:12    AEIL     FEDTAX      FTAX      E127
  PROTDMP     C2AG   03/03/2014  16:04:02    ASRA     SALESTOT    SLST      E244

For each dump, SymDump  for CICS provides the following information:
CICS
CICS region where the dump was produced.
Date
Date the dump was produced.
Time
Time the dump was produced.
Abend
Code identifying the type of dump.
Program
Program that produced the dump.
Transid
Transaction that produced the dump.
Termid
Terminal ID that produced the dump.
 1311


InterTest™ and SymDump ® 11.0
Production Strategies
This article describes how to debug production dumps in:
•Your production region with symbolic support
•Your test region with symbolic support
•Your production or test region without symbolic support
You will also learn how to capture the CICS Internal Trace to analyze program flow and performance problems in either
test or production regions.
All these scenarios assume that there is only one production region and one test region. However, you can expand the
examples to include multiple production and test regions.
Symbolic Support
To take full advantage of SymDump  for CICS, you need an up-to-date symbolic listing of the application programs that
execute in your test or production CICS regions. When you are ready to move a program from test to production, ensure
you save its symbolic listing so it is available if the program needs further debugging.
To get an up-to-date symbolic listing of the application programs that execute in your test or production CICS regions:
1.Move the listing to a separate production symbolic file.
2.Use the IN25UTIL batch program to unload the listing from the test symbolic file to an intermediate data se
3.Reload it to the production symbolic file. For more information, see Maintaining a PROTSYM File.
The examples in the following areas detail transaction dump analysis with symbolic support and assume that there are:
•Multiple symbolic files (For information on defining and maintaining multiple files, see Allocate Files.
•Up-to-date symbolic listings of production programs
You might have several different versions of a program and, consequently, several different symbolic listings on various
symbolic files.
•For COBOL and COBOL II programs, SymDump  for CICS automatically finds the right symbolic listing for the program
version you are debugging, if it exists


version you are debugging, if it exists
•For PL/I and Assembler programs, and for COBOL and COBOL II programs that do not have matching listings,
SymDump  for CICS displays all of the symbolic files containing listings for the program so you can select the one you
want
If you do not have an up-to-date symbolic listing for the program, you can get symbolics by recompiling or reassembling
the program with the appropriate post-processor program after the dump is generated, but before you examine it online.
For more information, see Symbolic Support .
How You Analyze Production Transaction Dumps
This example assumes that you want to analyze production transaction dumps in your production region with symbolic
support. We recommend this method because you can take advantage of the full power of SymDump  for CICS by using
the symbolic program feature to quickly analyze and resolve abends.
When a production program abends, you can use all of the SymDump  for CICS options to examine the dump. Because
the current symbolic listing is available, you can inspect the instruction that triggered the abend, examine the contents of
data items, and scroll through the abending program listing.
With InterTest for CICS available in production, you can also set the following:
•Monitoring from SymDump  for CICS and re-execute the program
•Breakpoints or other InterTest for CICS options before re-executing the program
 1312


InterTest™ and SymDump ® 11.0
Now when the program abends, you can inspect the statement backtrace table to determine the program's logic flow. After
InterTest for CICS halts the program at a breakpoint, you can do the following:
•More easily determine the cause of the error
•Fix it dynamically
•Continue program execution to make sure the program completes as expected
How You Analyze Production Dumps from Your Test Regions
This scenario assumes that you want to analyze production dumps in your test region with symbolic support. You may
prefer this method if you want to take advantage of the combined symbolic capabilities of SymDump  for CICS without
running the SymDump  for CICS dump analysis component in production.
To analyze production dumps from your test regions, you need to meet the following requirements:
•Have read access to the production symbolic file and SymDump  for the CICS dump data set from a test region
•Have running the complete version of SymDump  for CICS in test region
•Ensure that the SymDump  for CICS application that executes in production only captures the transaction dumps in the
production region
•Ensure that the SymDump  for CICS in the test region captures its own transaction dumps, but can display the dumps
captured by both production and test regions
•Have loaded the CICS file definitions in the test region that reference the production symbolic file and the SymDump
for CICS dump data set (see Define CICS File Entries)
Define CICS File Entries
Each region for which you want SymDump  for CICS to capture dumps needs its own SymDump  for CICS dump data set.
Regions can share a dump data set only if they are not active at the same time.
Each region must have a FILE definition for its own SymDump  for CICS dump data set. If you want to analyze production


dumps in test regions, your test region requires extra FILE definitions for any production symbolic files and dump data
sets you want to access. The following lists detail how these entries can be defined.
Production Region FCT name DSNAME
Production Dump Data Set: PROTDMP SYMDUMP.PROD.FILE
Production Symbolic File: PROTSYM .PROD.SYMBOLIC
Test Region FCT name DSNAME
Test Dump Data Set: PROTDMP SYMDUMP.TEST.FILE
Test Symbolic File: PROTSYM TEST.SYMBOLIC
Additional FILE Definitions DMPPROD SYMDUMP.PROD.FILE
SYMPROD .PROD.SYMBOLIC
•The DMPPROD FILE definition in test references the SymDump  for CICS production dump data set.
•The SYMPROD FILE definition in test references the production symbolic file.
Note: The symbolic file ddnames must also be defined in the IN25OPTS module of the CICS region that references them.
Access Production Dumps
Follow these steps:
1.Enter SYMD  from your test region. SymDump  for CICS displays the Primary Option menu.
2.Select option 1 Analysis on the Primary Option menu to display the SymDump  for CICS Dump/Trace Analysis screen.
The Dump/Trace Analysis screen lets you select dumps from the SymDump  for CICS data set.
 1313


InterTest™ and SymDump ® 11.0
-----------  CA SymDump for CICS PRIMARY OPTION MENU  ---------------------
 OPTION  ===>
1 Analysis           - Display/select captured CICS dumps/traces
2 Tracing            - Capture CICS internal trace for analysis
3 Configuration      - Display/modify CA SymDump initialization parameters
4 Start              - Start dump capture facility
5 Stop               - Stop dump capture facility
6 Source             - Display/select program source files/listings
7 Status/Maintenance  -  Product status and maintenance functions
8 What's new?        - Display information about CA SymDump for CICS
X Exit               - Terminate CA SymDump for CICS menu processing

                       CA SymDump for CICS V10.0
             Copyright © 2016 CA.  All rights reserved.

 PF1 Help       2            3 End        4 Return     5            6
 PF7            8            9           10           11           12
NOTE
The Dump File ID parameter, by default, references the SymDump  for CICS dump data set for the current
CICS region.
------------  CA SymDump for CICS DUMP/TRACE ANALYSIS  --------------------
 COMMAND ===>
   Type captured dump/trace selection criteria, then press ENTER.
   Dump File ID PROTDMP_          (Required, mask characters '*' and/or '+'
   CICS applid  ________          VTAM specific application ID
   User ID  . . ________
   Program  . . ________
   Transaction  ____
   Dump code  . ____
   Terminal . . ____
   Start date . 01/01/1999        mm/dd/yyyy
   Start time . 00                he


Start time . 00                he
   End date . . 04/23/2006        mm/dd/yyyy
   End time . . 24                he

 PF1 Help       2            3 End        4 Return     5            6
 PF7            8            9           10           11           12
3.To access dumps from the production dump data set, overtype the Dump File ID name with the test region's FILE
definition for the production dump data set. For example, overtype PROTDMP with DMPPROD as shown in the
following screen.
-----------  CA SymDump for CICS DUMP/TRACE ANALYSIS  ---------------------
 COMMAND ===>
   Type captured dump/trace selection criteria, then press ENTER.
   Dump File ID DMPPROD_          Required, mask characters '*' and/or '+'
   CICS applid  ________          VTAM specific application ID
   User ID  . . ________
   Program  . . ________
   Transaction  ____
   Dump code  . ____
   Terminal . . ____
 1314


InterTest™ and SymDump ® 11.0
   Start date . 01/01/2003        mm/dd/yyyy
   Start time . 00                he
   End date . . 04/23/2006        mm/dd/yyyy
   End time . . 24                he

 PF1 Help       2            3 End        4 Return     5            6
 PF7            8            9           10           11           12
SymDump  for CICS lists all the dumps from DMPPROD (the production dump data set) meeting the other selection
criteria specified on this menu.
Now you can analyze the production dump in your test region using all of the symbolic capabilities of SymDump  for CICS.
If you need to do further debugging on the abending program and you also have InterTest for CICS installed, you can go
back to the production region and set appropriate breakpoints.
Analyze Dumps Without Symbolic Support
This scenario assumes that you want to analyze production dumps without symbolic support. You may prefer this method
if you do not want to maintain symbolic listings of production programs, but want to use the powerful SymDump  for CICS
non-symbolic online capabilities.
To debug in production, you need the following:
•The complete version of SymDump  for CICS
•An up-to-date hardcopy program listing
To analyze the dump in your test region, see How You Analyze Production Dumps from Your Test Regions. You will
need all of the requirements outlined there except the symbolic listings of your production programs. Follow the steps for
defining FILE definitions and accessing production dumps described in that scenario.
Analyze the Problem
When a production program abends, all of the SymDump  for CICS options except the ability to examine the abending


programs source listing are available to help you resolve the problem. Using SymDump  for CICS is much easier than
deciphering a hexadecimal dump because you can:
•Display all formatted dump areas except for the source listing entry to identify where the abend occurred. The displays
identify the instruction, displacement, register contents, and storage values at the abend. Most of the time, the dump
analysis also identifies the cause of the abend. Use your hardcopy listing to determine how to fix the problem.
•Examine formatted CICS areas; for example, system and user TCA, CSA, TCTTE, and so on. You do not have to
compute offsets because these areas are formatted by data name.
•Display the formatted trace table, beginning with the first entry for the abended task. SymDump  for CICS trace table
options let you list:
–Entries for all tasks or just the abended task
–All entries or just EIP entries
–Entries in text or hexadecimal format
If you need more help, you can move the program back to the test region and monitor it there with InterTest for CICS.
Capture the CICS Internal Trace Table
With SymDump  for CICS, you can capture and review the CICS Internal Trace Table at any time. The SymDump  for CICS
online formatted trace utility captures an image of the CICS Internal Trace Table, and can replace the AUX TRACE facility
for debugging system performance problems in many cases.
 1315


InterTest™ and SymDump ® 11.0
Before you capture and review your trace, complete the following:
1.Ensure that you have sufficient space on your PROTDMP file. The larger the CICS Internal Trace Table, the more
space you need.
2.Expand your extended DSA allocation to accommodate the size of the trace you will review. You will need additional
DSA of approximately twice the size of the CICS Internal Trace Table for each trace being viewed.
3.Expand the size of your CICS Internal Trace Table so you will not lose entries you may be trying to capture when the
table wraps. To do this, use the CICS CETR transaction or modify the size of the CICS Internal Trace Table using the
SIT TRTABSZ parameter.
Once you complete these steps, execute the transaction you want to trace. When you reach a point where enough trace
entries exist, you have two methods available for capturing the trace with SymDump  for CICS.
Capture the CICS Internal Trace Table from the Primary Option Menu
Follow these steps:
1.Display the SymDump  for CICS Primary Option menu by entering the SYMD transaction identifier from CICS.
You can also select option 5 Dump Analysis  from the InterTest for CICS Primary Option menu.
-----------  CA SymDump for CICS PRIMARY OPTION MENU  ---------------------
 OPTION  ===>
1 Analysis           - Display/select captured CICS dumps/traces
2 Tracing            - Capture CICS internal trace for analysis
3 Configuration      - Display/modify CA SymDump initialization parameters
4 Start              - Start dump capture facility
5 Stop               - Stop dump capture facility
6 Source             - Display/select program source files/listings
7 Status/Maintenance  -  Product status and maintenance functions
8 What's new?        - Display information about CA SymDump for CICS


8 What's new?        - Display information about CA SymDump for CICS
X Exit               - Terminate CA SymDump for CICS menu processing

 PF1 Help       2            3 End        4 Return     5            6
 PF7            8            9           10           11           12
2.Select option 4 Start to start the SymDump  for CICS dump capture facility.
3.Select option 2 Tracing to capture the trace table and write it to the PROTDMP file.
4.Select option 1 Analysis to select the captured trace for display.
5.On the Dump/Trace Analysis screen, enter *trace*  in the Program field to limit your selection criteria to traces.
All traces appear on the Dump/Selection List screen with the keyword *TRACE* in the Program field.
6.Select your trace by creation time and SymDump  for CICS displays the Formatted Trace Table display.
Capture the CICS Internal Trace Table from CICS
To capture the CICS Internal Trace table from CICS
1.Execute the SYMT  transaction from CICS. SymDump  for CICS writes the complete CICS Internal Trace out to the
PROTDMP file.
2.To select your trace for analysis, execute the SYMD  transaction.
You can invoke SymDump  for CICS from the InterTest for CICS Primary Option menu.
3.Select option 1 Analysis to select the captured trace for display.
 1316


InterTest™ and SymDump ® 11.0
4.On the Dump/Trace Analysis screen, enter *trace*  in the Program field to limit your selection criteria to traces.
All traces display on the Dump/Selection List screen with the keyword *TRACE* in the Program field.
5.Select your trace by creation time and SymDump  for CICS displays the Formatted Trace Table display.
Example How to Use the Trace Capturing Option
The following is an example of how to use the trace capturing option.
To use the trace capturing option
1.Use the CETR transaction to ensure that the trace table is large enough and will not wrap. 1000 KB should be enough
for this example. On heavily used systems, higher values may be appropriate.
2.Execute the Assembler demo program, DEMA . You should see a Welcome to the InterTest Demo Session welcome
screen.
–If you see this screen, proceed to Step 3.
–If you do not, then the DEMA test transaction abended on a previous step, and you need to clean out the temp
storage record left over from this abend by using the CECI transaction.
•Type CECI DELETEQ TS QUEUE(Demotte) to replace the value with your current terminal ID.
•Run the DEMA transaction again.
3.Allow the DEMA transaction to abend.
4.Type SYMT  from CICS or select option  2 Tracing from the SymDump  for CICS Primary Option menu. The following
message appears:
CASD6375 CICS internal trace has been captured by SymDump  for CICS.
NOTE
If you receive the following message, start the SymDump  for CICS dump capture facility by selecting option 4
Start  from the SymDump  for CICS Primary Option menu.


Start  from the SymDump  for CICS Primary Option menu.
CASD6377 CA SymDump for CICS not started, trace capture not performed
5.Press Clear , type SYMD , and press Enter to display the Primary Option menu, if you captured the table with the SYMT
transaction.
6.Select option 1 Analysis . SymDump  for CICS displays the Dump/Trace Analysis menu.
7.Specify appropriate options on the Dump/Trace Analysis menu, as shown in the following sample screen, and press
Enter.
8.Use the Program entry *trace*  to limit the selection to traces only. The other information shown on the following screen
is for illustration only. You need to substitute your specific dump file name and date and time information.
-----------  CA SymDump for CICS DUMP/TRACE ANALYSIS  ---------------------
 COMMAND ===>

   Type captured dump/trace selection criteria, then press ENTER.

   Dump File ID PROTDMP_          Required, mask characters '*' and/or '+'
   CICS applid  ________          VTAM specific application ID
   User ID  . . ________
   Program  . . *trace*_
   Transaction  ____
   Dump code  . ____
   Terminal . . ____
   Start date . 07/24/2006        mm/dd/yyyy
   Start time . 00                he
   End date . . 07/24/2006        mm/dd/yyyy
   End time . . 24                he
 1317


InterTest™ and SymDump ® 11.0
9.Select the trace entry. Notice traces are captured under the SYMD transaction with the program name *TRACE* and
an abend code of SYMT.
-----------  CA SymDump for CICS DUMP/TRACE SELECTION  --------------------
 COMMAND ===>

   Type S select,  D delete, H hold, R release, I history

     Dumpfile  Tran  Program   Offset  Abend       Created        # Dups  Status
 s - PROTDMP   SYMD  *TRACE*           SYMT  07/24/2006 11:00:10
   *** End of data ***
Before selecting and viewing a TRACE captured with SymDump  for CICS, the TRACE FORMAT REGION must have
been started. For more information, see Activate Your Product.
SymDump  for CICS displays the trace in a Formatted Trace Table.
--------------  CA SymDump for CICS   FORMATTED TRACE TABLE  --------------
COMMAND ===>                                             MODE: A SCROLL: PAGE
000001 00028 QR    TR 0202 TRSR  EXIT  SET_INTERNAL_TABLE_SIZE/OK

000002 00028 QR    AP 00E1 EIP   EXIT  SET-TRACEDEST         OK
 00F4,00000000 ....,00007804 ....
000003 00028 QR    AP 00E1 EIP   ENTRY HANDLE-CONDITION                                  0004,2004E018 ..
\.,08000204 ....
000004 00028 QR    PG 0700 PGHM  ENTRY SET_CONDITIONS        1FEFE789,1FEFE786

000005 00028 QR    PG 0701 PGHM  EXIT  SET_CONDITIONS/OK     0


000006 00028 QR    AP 00E1 EIP   EXIT  HANDLE-CONDITION      OK
 00F4,00000000 ....,00000204 ....
000007 00028 QR    AP 00E1 EIP   ENTRY INQUIRE-TRACEDEST                                 0004,2004E018 ..
\.,08007802 ....
000008 00028 QR    TR 0201 TRSR  ENTRY INQUIRE_INTERNAL_TRACE

000009 00028 QR    TR 0202 TRSR  EXIT  INQUIRE_INTERNAL_TRACE/OK STARTED,1F4

000010 00028 QR    AP 00E1 EIP   EXIT  INQUIRE-TRACEDEST     OK
 00F4,00000000 ....,00007802 ....   000011
00028 QR    AP 00E1 EIP   ENTRY INQUIRE-TRACEFLAG                                 0004,2004E018 ..
\.,08007812 ....
000012 00028 QR    KE 0201 KEDD  ENTRY INQUIRE_GLOBAL_TRACE

000013 00028 QR    KE 0202 KEDD  EXIT  INQUIRE_GLOBAL_TRACE/OK ON

000014 00028 QR    AP 00E1 EIP   EXIT  INQUIRE-TRACEFLAG     OK
 00F4,00000000 ....,00007812 ....
000015 00028 QR    AP 00E1 EIP   ENTRY INQUIRE-TRACEFLAG                                 0004,2004E018 ..
\.,08007812 ....
000016 00028 QR    AP 00E1 EIP   EXIT  INQUIRE-TRACEFLAG     OK
 00F4,00000000 ....,00007812 ....


00F4,00000000 ....,00007812 ....
000017 00028 QR    AP 00E1 EIP   ENTRY INQUIRE-TRACEDEST                                 0004,2004E018 ..
\.,08007802 ....
000018 00028 QR    TR 0201 TRSR  ENTRY INQUIRE_INTERNAL_TRACE

 1318


InterTest™ and SymDump ® 11.0
000020 00028 QR    AP 00E1 EIP   EXIT  INQUIRE-TRACEDEST     OK
 00F4,00000000 ....,00007802 ....
000021 00028 QR    AP 00E1 EIP   ENTRY INQUIRE-TRACEDEST                                 0004,2004E018 ..
\.,08007802 ....

PF1 Help       2            3 End         4 Mask      5 Repeat     6 Return On

PF7 Backward   8 Forward    9 All Trace  10 Left     11 Right     12 Retrieve
10. Type the FIND DEMA on the Command line, and then press Enter. SymDump  for CICS displays the following screen.
--------------  CA SymDump for CICS   FORMATTED TRACE TABLE  --------------
COMMAND ===>                                             MODE: A SCROLL: PAGE

CASD6247 DEMA found in entry 001396
001396 TCP   QR    XM 1101 XMAT  ENTRY ATTACH                DEMA,0,T,NO,YES,TERMINAL,2005F930 , 02400000

001397 TCP   QR    XM 0401 XMLD  ENTRY LOCATE_AND_LOCK_TRANDEF DEMA,YES

001398 TCP   QR    DD 0301 DDLO  ENTRY LOCATE                1F500040,2153A38C,TXD,DEMA
001399 TCP   QR    DD 0302 DDLO  EXIT  LOCATE/OK             200F9AB0 , D7000000


001400 TCP   QR    XM 0402 XMLD  EXIT  LOCATE_AND_LOCK_TRANDEF/OK 200FBAC0 , 000000B9,DEMA

001401 TCP   QR    DS 0002 DSAT  ENTRY ATTACH                1F509DF8,0,1,NON_SYSTEM,1F509DF8 , 0000030C

001402 TCP   QR    DS 0003 DSAT  EXIT  ATTACH/OK             03840009
001403 TCP   QR    XM 1102 XMAT  EXIT  ATTACH/OK             1F509DF8 , 0000030C,0000030C

001404 TCP   QR    AP FD91 ZATT  EXIT  ATTACH
001405 TCP   QR    AP 4D00 CQCQ  ENTRY MERGE_CIB_QUEUES
001406 TCP   QR    AP 4D01 CQCQ  EXIT  MERGE_CIB_QUEUES/OK
001407 TCP   QR    AP 4D00 CQCQ  ENTRY GET_CIB

001408 TCP   QR    AP 4D01 CQCQ  EXIT  GET_CIB/EXCEPTION     CIB_QUEUE_EMPTY,00000000,00000000

001409 TCP   QR    DS 0004 DSSR  ENTRY WAIT_OLDW             TCP_NORM,00059DD0,CSTP,NO,IDLE,DFHZDSP

001410 XM    QR    DS 0012 DSKE  ENTRY TASK_REPLY            1FFEC780,1F4BF380

001411 XM    QR    XM 1305 XMTA  ENTRY TASK_REPLY            1F509DF8,03840009,03840009


001412 XM    QR    SM 0F01 SMAR  ENTRY ALLOCATE_TRANSACTION_STG BELOW,USER,YES,NO,NO

001413 XM    QR    SM 0F02 SMAR  EXIT  ALLOCATE_TRANSACTION_STG/OK

001414 XM    QR    PG 0801 PGXM  ENTRY INITIALIZE_TRANSACTION

001415 XM    QR    PG 0802 PGXM  EXIT  INITIALIZE_TRANSACTION/OK

001416 XM    QR    AP 0590 APXM  ENTRY INIT_XM_CLIENT        YES

 1319


InterTest™ and SymDump ® 11.0
PF1 Help       2            3 End         4 Mask      5 Repeat     6 Return On

PF7 Backward   8 Forward    9 All Trace  10 Left     11 Right     12 Retrieve
11. Press PF4,  and specify a filter mask to display entries for task 00031 only.
--------------  CA SymDump for CICS   FORMATTED TRACE TABLE  --
 TASK  TCB   DM ID   MOD   TYPE OR DATA
 00031 *     *  *    *     *

 PF1 Help       2            3 End         4           5            6
 PF7            8            9 All Trace  10          11           12
12. Press PF3 to activate the filter. The following screen appears.
--------------  CA SymDump for CICS   FORMATTED TRACE TABLE  -------------
 COMMAND ===>                                             MODE: A SCROLL: PAGE
 001698 00031 QR    AP EA00 TMP   ENTRY LOCATE                PFT,DFHCICST
 001699 00031 QR    AP EA01 TMP   EXIT  LOCATE                PFT,DFHCICST,1F5ACB20,NORMAL
 001700 00031 QR    AP 0591 APXM  EXIT  INIT_XM_CLIENT/OK
 001701 00031 QR    AP 1790 TFXM  ENTRY INIT_XM_CLIENT        2005F930 , 02400000
 001702 00031 QR    XM 1001 XMIQ  ENTRY SET_TRANSACTION       TERMINAL,2005F930


001703 00031 QR    XM 1002 XMIQ  EXIT  SET_TRANSACTION/OK
 001704 00031 QR    AP 1791 TFXM  EXIT  INIT_XM_CLIENT/OK     00000000,00000000,YES,NO
 001705 00031 QR    US 0401 USXM  ENTRY INIT_TRANSACTION_USER 00000000,YES
 001706 00031 QR    XS 0401 XSXM  ENTRY ADD_TRANSACTION_SECURITY 00000000 , 00000000
 001707 00031 QR    XS 0402 XSXM  EXIT  ADD_TRANSACTION_SECURITY/OK
 001708 00031 QR    US 0402 USXM  EXIT  INIT_TRANSACTION_USER/OK 1F52409F , 1F526090,0
 001709 00031 QR    DS 0002 DSAT  ENTRY SET_PRIORITY          1
 001710 00031 QR    DS 0003 DSAT  EXIT  SET_PRIORITY/OK
 001711 00031 QR    KE 0201 KEDD  ENTRY INQUIRE_ANCHOR        0000002C
 001712 00031 QR    KE 0202 KEDD  EXIT  INQUIRE_ANCHOR/OK     1F58A000
 001713 00031 QR    KE 0201 KEDD  ENTRY INQUIRE_ANCHOR        00000010
 001714 00031 QR    KE 0202 KEDD  EXIT  INQUIRE_ANCHOR/OK     800513B0                    001715 00031 QR
 DP 0900 DPXM  ENTRY
INIT_XM_CLIENT


DP 0900 DPXM  ENTRY
INIT_XM_CLIENT
 001716 00031 QR    SM 0301 SMGF  ENTRY GETMAIN               2156950C , 00000060,NO,00,DPTA
 001717 00031 QR    SM 0302 SMGF  EXIT  GETMAIN/OK            2002C0F0
 001718 00031 QR    DP 0901 DPXM  EXIT  INIT_XM_CLIENT/OK

 PF1 Help       2            3 End         4 Mask      5 Repeat     6 Return On
 PF7 Backward   8 Forward    9 All Trace  10 Left     11 Right     12 Retrieve
13. Type the FIND command f *exc to identify the first exception record as shown in Step 13.
14. Press Enter to find the first exception record. SymDump  for CICS displays the following.
--------------  CA SymDump for CICS   FORMATTED TRACE TABLE  --------
 COMMAND ===>                                             MODE: A SCROLL: PAGE

 1320


InterTest™ and SymDump ® 11.0
 CASD6247 *EXC found in entry 001760

 001760 00031 QR    AP 1942 APLI  *EXC* Program-Check
 START_PROGRAM,ASMDEMO,CEDF,FULLAPI,EXEC,NO,200C70D0,00000000 , 000000
 001761 00031 QR    AP 0790 SRP   *EXC* PROGRAM_CHECK

 001762 00031 QR    DS 0010 DSBR  ENTRY INQUIRE_TASK

 001763 00031 QR    DS 0011 DSBR  EXIT  INQUIRE_TASK/OK       ESSENTIAL_YES

 001764 00031 QR    DS 0002 DSAT  ENTRY CHANGE_MODE           QR

 001765 00031 QR    DS 0003 DSAT  EXIT  CHANGE_MODE/OK        1F503030 , 00000001

 001766 00031 QR    PG 0500 PGIS  ENTRY INQUIRE_CURRENT_PROGRAM

 001767 00031 QR    PG 0501 PGIS  EXIT  INQUIRE_CURRENT_PROGRAM/OK 2C88,20D00A20,ASMDEMO

 001768 00031 QR    AP 0781 SRP   *EXC* ABEND_ASRA            ASMDEMO,0000019C,CICS

 001769 00031 QR    ME 0301 MEME  ENTRY SEND_MESSAGE          1,AP0001,0005D370 , 00000008,0005D378 ,
 00000004,0005D368 , 00000008


00000004,0005D368 , 00000008
 001770 00031 QR    SM 0301 SMGF  ENTRY GETMAIN               1F44A0D4 , 00000018,1000,YES,KESTACKS

 001771 00031 QR    SM 0302 SMGF  EXIT  GETMAIN/OK            0004A000

 001772 00031 QR    KE 0101 KETI  ENTRY INQ_LOCAL_DATETIME_DECIMAL

 001773 00031 QR    KE 0102 KETI  EXIT  INQ_LOCAL_DATETIME_DECIMAL/OK 11172004,143250,063745,MMDDYYYY

 001774 00031 QR    KE 0401 KEGD  ENTRY INQUIRE_KERNEL

 001775 00031 QR    KE 0402 KEGD  EXIT  INQUIRE_KERNEL/OK     A11IC9N3,CICS

 001776 00031 QR    ME 0312 MEME  EVENT ISSUE-MVS-GETMAIN

 001777 00031 QR    ME 0313 MEME  EVENT MVS-GETMAIN-COMPLETE

 001778 00031 QR    ME FF45 MEWS  *EXC* SYMREC-ERROR

 001779 00031 QR    ME FF00 SUWT  ENTRY SEND_DIRECT           2000292B , 00000002,20002B0C ,
 00000001,DFHAP0001 A11IC9N3
 001780 00031 QR    ME FF02 SUWT  EVENT BEFORE-MVS-WTO


PF1 Help       2            3 End         4 Mask      5 Repeat     6 Return On

 PF7 Backward   8 Forward    9 All Trace  10 Left     11 Right     12 Retrieve
15. Specify TOP in the command line, as shown in Step 15, and press Enter to position the display at the beginning of the
trace.
16. Press PF4 and specify a filter selection mask to show only EIP entries for task 00031 as shown next.
 1321


InterTest™ and SymDump ® 11.0
--------------  CA SymDump for CICS   FORMATTED TRACE TABLE
 TASK  TCB   DM ID   MOD   TYPE OR DATA
 00031 *     *  *    EIP   *

 PF1 Help       2            3 End         4           5            6
 PF7            8            9 All Trace  10          11           12
17. Press PF3 to activate the filter selection mask.
--------------  CA SymDump for CICS   FORMATTED TRACE TABLE  --------------

 COMMAND ===>                                             MODE: A SCROLL: PAGE

 001750 00031 QR    AP 00E1 EIP   ENTRY HANDLE-CONDITION
 0004,00140488 ...h,08000204 ....
 001753 00031 QR    AP 00E1 EIP   EXIT  HANDLE-CONDITION      OK
 00F4,00000000 ....,00000204 ....
 001754 00031 QR    AP 00E1 EIP   ENTRY READQ-TS
 0004,00140488 ...h,08000A04 ....
 001759 00031 QR    AP 00E1 EIP   EXIT  READQ-TS              OK
 00F4,00000000 ....,00000A04 ....
 001824 00031 QR    AP 00E1 EIP   ENTRY ADDRESS
 0004,1F264270 ....,08000202 ...      *
 001825 00031 QR    AP 00E1 EIP   EXIT  ADDRESS               OK
 00F4,00000000 ....,00000202 ....


00F4,00000000 ....,00000202 ....
 001826 00031 QR    AP 00E1 EIP   ENTRY INQUIRE-SYSTEM
 0004,1F264270 ....,08005402 ....
 001833 00031 QR    AP 00E1 EIP   EXIT  INQUIRE-SYSTEM        OK
 00F4,00000000 ....,00005402 ....
 001834 00031 QR    AP 00E1 EIP   ENTRY LOAD
 0004,1F264270 ....,08000E06 ....
 001864 00031 QR    AP 00E1 EIP   ENTRY RETURN
 0004,20100018 ....,08000E08 ....
 001952 00031 QR    AP 00E1 EIP   EXIT  LOAD                  OK
 00F4,00000000 ....,00000E06 ....
 001953 00031 QR    AP 00E1 EIP   ENTRY GETMAIN
 0004,1F264270 ....,08000C02 ....
 001956 00031 QR    AP 00E1 EIP   EXIT  GETMAIN               OK
 00F4,00000000 ....,00000C02 ....
 001957 00031 QR    AP 00E1 EIP   ENTRY LOAD
 0004,1F264270 ....,08000E06 ....
 001964 00031 QR    AP 00E1 EIP   EXIT  LOAD                  OK
 00F4,00000000 ....,00000E06 ....
 001965 00031 QR    AP 00E1 EIP   ENTRY GETMAIN


001965 00031 QR    AP 00E1 EIP   ENTRY GETMAIN
 0004,1F264270 ....,08000C02 ....
 001968 00031 QR    AP 00E1 EIP   EXIT  GETMAIN               OK
 00F4,00000000 ....,00000C02 ....
 001969 00031 QR    AP 00E1 EIP   ENTRY GETMAIN
 0004,1F264270 ....,08000C02 ....
 1322


InterTest™ and SymDump ® 11.0
 001972 00031 QR    AP 00E1 EIP   EXIT  GETMAIN               OK
 00F4,00000000 ....,00000C02 ....
 001973 00031 QR    AP 00E1 EIP   ENTRY PUSH
 0004,1F264270 ....,0800020C ....
 001978 00031 QR    AP 00E1 EIP   EXIT  PUSH                  OK
 00F4,00000000 ....,0000020C ....

 PF1 Help       2            3 End         4 Mask      5 Repeat     6 Return On

 PF7 Backward   8 Forward    9 All Trace  10 Left     11 Right     12 Retrieve
18. Press  PF9  to turn off filtering and to display all the entries at this point. As shown in the following screen, there was a
READQ for QID DEMAG001 followed by a Program Check in program ASMDEMO.
19. Press PF6 to show the Program name for all programs that made trace entries. You can see that ASMDEMO issued
the READQ request.
--------------  CA SymDump for CICS   FORMATTED TRACE TABLE  --------------

 COMMAND ===>                                             MODE: A SCROLL: PAGE

 001750 00031 QR    AP 00E1 EIP   ENTRY HANDLE-CONDITION
 0004,00140488 ...h,08000 ASMDEMO +000000A0
 001751 00031 QR    PG 0700 PGHM  ENTRY SET_CONDITIONS


001751 00031 QR    PG 0700 PGHM  ENTRY SET_CONDITIONS
 20D033BD,20D033BA,001404F4,00140488,ASSEMBLER,80,AMO DFHEEI  +00000328
 001752 00031 QR    PG 0701 PGHM  EXIT  SET_CONDITIONS/OK     0
      DFHEEI  +00000328
 001753 00031 QR    AP 00E1 EIP   EXIT  HANDLE-CONDITION      OK
 00F4,00000000 ....,00000 DFHEEI  +00000328
 001754 00031 QR    AP 00E1 EIP   ENTRY READQ-TS
 0004,00140488 ...h,08000 ASMDEMO +000000CC
 001755 00031 QR    TS 0C01 TSMB  ENTRY MATCH                 DEMAU010
      DFHEITS +00000292
 001756 00031 QR    TS 0C02 TSMB  EXIT  MATCH/OK              ,,,DEMAU010,,00000000,,ANY,NO,NO
      DFHEITS +00000292
 001757 00031 QR    TS 0201 TSQR  ENTRY READ_INTO             DEMAU010,00140610 , 00000000 , 00000024,1,EXEC
      DFHEITS +0000097A
 001758 00031 QR    TS 0202 TSQR  EXIT  READ_INTO/OK          00140610 , 00000024 , 00000024,1,NO
      DFHEITS +0000097A
 001759 00031 QR    AP 00E1 EIP   EXIT  READQ-TS              OK


00F4,00000000 ....,00000 DFHAIP  +000008C2
 001760 00031 QR    AP 1942 APLI  *EXC* Program-Check
 START_PROGRAM,ASMDEMO,CEDF,FULLAPI,EXEC,NO,200C70D0, DFHPGDM +0000C618
 001761 00031 QR    AP 0790 SRP   *EXC* PROGRAM_CHECK
      DFHSRP  +0000050E
 001762 00031 QR    DS 0010 DSBR  ENTRY INQUIRE_TASK
      DFHSRP  +00002F08
 001763 00031 QR    DS 0011 DSBR  EXIT  INQUIRE_TASK/OK       ESSENTIAL_YES
      DFHSRP  +00002F08
 001764 00031 QR    DS 0002 DSAT  ENTRY CHANGE_MODE           QR
      DFHSRP  +00002F54
 001765 00031 QR    DS 0003 DSAT  EXIT  CHANGE_MODE/OK        1F503030 , 00000001
      DFHSRP  +00002F54
 1323


InterTest™ and SymDump ® 11.0
 001766 00031 QR    PG 0500 PGIS  ENTRY INQUIRE_CURRENT_PROGRAM
      DFHSRP  +000026DA
 001767 00031 QR    PG 0501 PGIS  EXIT  INQUIRE_CURRENT_PROGRAM/OK 2C88,20D00A20,ASMDEMO
      DFHSRP  +000026DA
 001768 00031 QR    AP 0781 SRP   *EXC* ABEND_ASRA            ASMDEMO,0000019C,CICS
      DFHSRP  +0000050E
 001769 00031 QR    ME 0301 MEME  ENTRY SEND_MESSAGE          1,AP0001,0005D370 , 00000008,0005D378 ,
 00000004,000 DFHSRP  +00003C72
 001770 00031 QR    SM 0301 SMGF  ENTRY GETMAIN               1F44A0D4 , 00000018,1000,YES,KESTACKS
      DFHSIP  +00054454

 PF1 Help       2            3 End         4 Mask      5 Repeat     6 Return Off

 PF7 Backward   8 Forward    9 Filter     10 Left     11 Right     12 Retrieve
20. Type HILITE ASMDEMO  to highlight all entries containing ASMDEMO.
21. Type F HILITE FIRST   to locate the first HIGHLIGHTED entry in the trace.
--------------  CA SymDump for CICS   FORMATTED TRACE TABLE  --------------

 COMMAND ===>                                             MODE: A SCROLL: PAGE

 CASD6247 HILITE found in entry 001456


CASD6247 HILITE found in entry 001456

 001456 00030 QR    AP 1791 TFXM  EXIT  BIND_XM_CLIENT/OK     YES,ASMDEMO,YES
      DFHSIP  +0003F7A6
 001457 00030 QR    AP 0590 APXM  ENTRY RMI_START_OF_TASK
      DFHSIP  +0003F83E
 001458 00030 QR    AP 2520 ERM   ENTRY CALL-TRUES-FOR-TASK-START
      DFHAPXM +00000BAA
 001459 00030 QR    SM 0301 SMGF  ENTRY GETMAIN               1F44A0D4 , 00000018,1000,YES,KESTACKS
      DFHCSA  +00001894
 001460 00030 QR    SM 0302 SMGF  EXIT  GETMAIN/OK            0004A000
      DFHCSA  +00001894
 001461 00030 QR    AP F000 XCP   ENTRY ENQ
      DFHERM  +00004B3A
 001462 00030 QR    NQ 0301 NQED  ENTRY ENQUEUE               1F551200,0005D094 , 00000004,YES,UOW,..-.
      DFHKCP  +000003D0
 001463 00030 QR    NQ 0302 NQED  EXIT  ENQUEUE/OK            NO
      DFHKCP  +000003D0
 001464 00030 QR    AP F001 XCP   EXIT  ENQ
      DFHERM  +00004B3A


DFHERM  +00004B3A
 001465 00030 QR    SM 0201 SMAD  ENTRY ADD_SUBPOOL           80,8,0,IN25STRU,DOMAIN,FIXED,NO,BELOW,YES
      DFHERM  +00004C4E
 001466 00030 QR    CC 2010 CCCC  ENTRY GET                   20001851 , 00000000 , 00000010,SMSUBPOL,IN25STRU
     DFHSIP  +000E8922
 001467 00030 QR    DS 0004 DSSR  ENTRY WAIT_MVS              CCVSAMWT,1F2C14C0,NO,IO,ASYNRESP
      DFHSIP  +0006C760
 001468 00030 QR    DS 0005 DSSR  EXIT  WAIT_MVS/OK
      DFHSIP  +0006C760
 001469 00030 QR    CC 2050 CCCC  EXIT  GET/EXCEPTION         RECORD_NOT_FOUND,20001851 , 00000000 , 00000010
      DFHSIP  +000E8922
 1324


InterTest™ and SymDump ® 11.0
 001470 00030 QR    LM 0003 LMLM  ENTRY ADD_LOCK              SUBPOOL
      DFHSIP  +000E9C06
 001471 00030 QR    LM 0004 LMLM  EXIT  ADD_LOCK/OK           1F495448
      DFHSIP  +000E9C06
 001472 00030 QR    LM 0003 LMLM  ENTRY UNLOCK                1F495448,EXCLUSIVE
      DFHSIP  +000E9C52
 001473 00030 QR    LM 0004 LMLM  EXIT  UNLOCK/OK
      DFHSIP  +000E9C52
 001474 00030 QR    SM 0202 SMAD  EXIT  ADD_SUBPOOL/OK        1F484C14 , 0000013D
      DFHERM  +00004C4E
 001475 00030 QR    AP F000 XCP   ENTRY DEQ
      DFHERM  +00004C96
 001476 00030 QR    NQ 0301 NQED  ENTRY DEQUEUE               1F551200,0005D094 , 00000004,UOW,..-.
      DFHKCP  +00000546

 PF1 Help       2            3 End         4 Mask      5 Repeat     6 Return Off

 PF7 Backward   8 Forward    9 Filter     10 Left     11 Right     12 Retrieve
22. Type TOP on the command line and press Enter to reposition the trace.


22. Type TOP on the command line and press Enter to reposition the trace.
23. Press PF4 and specify a filter selection mask to show only READQ entries for task 00031as shown next.
--------------  CA SymDump for CICS   FORMATTED TRACE TABLE  -
 TASK  TCB   DM ID   MOD   TYPE OR DATA
 00031 *     *  *    EIP   READQ

 PF1 Help       2            3 End         4           5            6
 PF7            8            9 All Trace  10          11           12
24. Press PF9 to activate the filter.
--------------  CA SymDump for CICS   FORMATTED TRACE TABLE  --------------

 COMMAND ===>                                             MODE: A SCROLL: PAGE

 CASD6229 Bottom of data

 001754 00031 QR    AP 00E1 EIP   ENTRY READQ-TS
 0004,00140488 ...h,08000 ASMDEMO +000000CC
 001759 00031 QR    AP 00E1 EIP   EXIT  READQ-TS              OK
 00F4,00000000 ....,00000 DFHAIP  +000008C2

 PF1 Help       2            3 End         4 Mask      5 Repeat     6 Return Off

 PF7 Backward   8 Forward    9 All Trace  10 Left     11 Right     12 Retrieve
 1325


InterTest™ and SymDump ® 11.0
25. Press  PF9  to turn off the filter.
--------------  CA SymDump for CICS   FORMATTED TRACE TABLE  --------------

COMMAND ===>                                             MODE: A SCROLL: PAGE

001754 00031 QR    AP 00E1 EIP   ENTRY READQ-TS
 0004,00140488 ...h,08000 ASMDEMO +000000CC
001755 00031 QR    TS 0C01 TSMB  ENTRY MATCH                 DEMAU010
     DFHEITS +00000292
001756 00031 QR    TS 0C02 TSMB  EXIT  MATCH/OK              ,,,DEMAU010,,00000000,,ANY,NO,NO
     DFHEITS +00000292
001757 00031 QR    TS 0201 TSQR  ENTRY READ_INTO             DEMAU010,00140610 , 00000000 , 00000024,1,EXEC
     DFHEITS +0000097A
001758 00031 QR    TS 0202 TSQR  EXIT  READ_INTO/OK          00140610 , 00000024 , 00000024,1,NO
     DFHEITS +0000097A
001759 00031 QR    AP 00E1 EIP   EXIT  READQ-TS              OK
 00F4,00000000 ....,00000 DFHAIP  +000008C2
001760 00031 QR    AP 1942 APLI  *EXC* Program-Check
 START_PROGRAM,ASMDEMO,CEDF,FULLAPI,EXEC,NO,200C70D0, DFHPGDM +0000C618


001761 00031 QR    AP 0790 SRP   *EXC* PROGRAM_CHECK
     DFHSRP  +0000050E
001762 00031 QR    DS 0010 DSBR  ENTRY INQUIRE_TASK
     DFHSRP  +00002F08
001763 00031 QR    DS 0011 DSBR  EXIT  INQUIRE_TASK/OK       ESSENTIAL_YES
     DFHSRP  +00002F08
001764 00031 QR    DS 0002 DSAT  ENTRY CHANGE_MODE           QR
     DFHSRP  +00002F54
001765 00031 QR    DS 0003 DSAT  EXIT  CHANGE_MODE/OK        1F503030 , 00000001
     DFHSRP  +00002F54
001766 00031 QR    PG 0500 PGIS  ENTRY INQUIRE_CURRENT_PROGRAM
     DFHSRP  +000026DA
001767 00031 QR    PG 0501 PGIS  EXIT  INQUIRE_CURRENT_PROGRAM/OK 2C88,20D00A20,ASMDEMO
     DFHSRP  +000026DA
001768 00031 QR    AP 0781 SRP   *EXC* ABEND_ASRA            ASMDEMO,0000019C,CICS
     DFHSRP  +0000050E
001769 00031 QR    ME 0301 MEME  ENTRY SEND_MESSAGE          1,AP0001,0005D370 , 00000008,0005D378 ,
 00000004,000 DFHSRP  +00003C72


00000004,000 DFHSRP  +00003C72
001770 00031 QR    SM 0301 SMGF  ENTRY GETMAIN               1F44A0D4 , 00000018,1000,YES,KESTACKS
     DFHSIP  +00054454
001771 00031 QR    SM 0302 SMGF  EXIT  GETMAIN/OK            0004A000
     DFHSIP  +00054454
001772 00031 QR    KE 0101 KETI  ENTRY INQ_LOCAL_DATETIME_DECIMAL
     DFHSIP  +000821F4
001773 00031 QR    KE 0102 KETI  EXIT  INQ_LOCAL_DATETIME_DECIMAL/OK 11172004,143250,063745,MMDDYYYY
     DFHSIP  +000821F4
001774 00031 QR    KE 0401 KEGD  ENTRY INQUIRE_KERNEL
     DFHSIP  +000822D6

PF1 Help       2            3 End         4 Mask      5 Repeat     6 Return Off

PF7 Backward   8 Forward    9 Filter     10 Left     11 Right     12 Retrieve
26. Type L 1750  to position the trace to line 1750 and press Enter.
 1326


InterTest™ and SymDump ® 11.0
--------------  CA SymDump for CICS   FORMATTED TRACE TABLE  --------------

 COMMAND ===>                                             MODE: A SCROLL: PAGE

 001750 00031 QR    AP 00E1 EIP   ENTRY HANDLE-CONDITION
 0004,00140488 ...h,08000 ASMDEMO +000000A0
 001751 00031 QR    PG 0700 PGHM  ENTRY SET_CONDITIONS
 20D033BD,20D033BA,001404F4,00140488,ASSEMBLER,80,AMO DFHEEI  +00000328
 001752 00031 QR    PG 0701 PGHM  EXIT  SET_CONDITIONS/OK     0
      DFHEEI  +00000328
 001753 00031 QR    AP 00E1 EIP   EXIT  HANDLE-CONDITION      OK
 00F4,00000000 ....,00000 DFHEEI  +00000328
 001754 00031 QR    AP 00E1 EIP   ENTRY READQ-TS
 0004,00140488 ...h,08000 ASMDEMO +000000CC
 001755 00031 QR    TS 0C01 TSMB  ENTRY MATCH                 DEMAU010
      DFHEITS +00000292
 001756 00031 QR    TS 0C02 TSMB  EXIT  MATCH/OK              ,,,DEMAU010,,00000000,,ANY,NO,NO
      DFHEITS +00000292
 001757 00031 QR    TS 0201 TSQR  ENTRY READ_INTO             DEMAU010,00140610 , 00000000 , 00000024,1,EXEC


DFHEITS +0000097A
 001758 00031 QR    TS 0202 TSQR  EXIT  READ_INTO/OK          00140610 , 00000024 , 00000024,1,NO
      DFHEITS +0000097A
 001759 00031 QR    AP 00E1 EIP   EXIT  READQ-TS              OK
 00F4,00000000 ....,00000 DFHAIP  +000008C2
 001760 00031 QR    AP 1942 APLI  *EXC* Program-Check
 START_PROGRAM,ASMDEMO,CEDF,FULLAPI,EXEC,NO,200C70D0, DFHPGDM +0000C618
 001761 00031 QR    AP 0790 SRP   *EXC* PROGRAM_CHECK
      DFHSRP  +0000050E
 001762 00031 QR    DS 0010 DSBR  ENTRY INQUIRE_TASK
      DFHSRP  +00002F08
 001763 00031 QR    DS 0011 DSBR  EXIT  INQUIRE_TASK/OK       ESSENTIAL_YES
      DFHSRP  +00002F08
 001764 00031 QR    DS 0002 DSAT  ENTRY CHANGE_MODE           QR
      DFHSRP  +00002F54
 001765 00031 QR    DS 0003 DSAT  EXIT  CHANGE_MODE/OK        1F503030 , 00000001
      DFHSRP  +00002F54
 001766 00031 QR    PG 0500 PGIS  ENTRY INQUIRE_CURRENT_PROGRAM
      DFHSRP  +000026DA


DFHSRP  +000026DA
 001767 00031 QR    PG 0501 PGIS  EXIT  INQUIRE_CURRENT_PROGRAM/OK 2C88,20D00A20,ASMDEMO
      DFHSRP  +000026DA
 001768 00031 QR    AP 0781 SRP   *EXC* ABEND_ASRA            ASMDEMO,0000019C,CICS
      DFHSRP  +0000050E
 001769 00031 QR    ME 0301 MEME  ENTRY SEND_MESSAGE          1,AP0001,0005D370 , 00000008,0005D378 ,
 00000004,000 DFHSRP  +00003C72
 001770 00031 QR    SM 0301 SMGF  ENTRY GETMAIN               1F44A0D4 , 00000018,1000,YES,KESTACKS
      DFHSIP  +00054454

 PF1 Help       2            3 End         4 Mask      5 Repeat     6 Return Off

 PF7 Backward   8 Forward    9 Filter     10 Left     11 Right     12 Retrieve
 1327


InterTest™ and SymDump ® 11.0
27. Type MODE S  on the command line to change the mode of the trace to short. Now you can see the times that entries
were made.
--------------  CA SymDump for CICS   FORMATTED TRACE TABLE  --------------

 COMMAND ===>                                             MODE: S SCROLL: PAGE

 001750 00031 QR    AP 00E1 EIP   ENTRY HANDLE-CONDITION                     REQ(0004) FIELD-A(00140488 ...h)
 FIEL ASMDEMO +000000A0
                                                                                RET-A0D00AE8
 14:32:50.8825789560 00.0000021406 =
 001751 00031 QR    PG 0700 PGHM  ENTRY SET_CONDITIONS IDENTIFIERS(20D033BD) LABELS_FLAGS(20D033BA)
 LABELS(001404F DFHEEI  +00000328
                                        (00140488) LANGUAGE(ASSEMBLER) CURRENT_EXECUTION_KEY(80)
 AMODE(AMODE31)
                                                                                RET-9FC19028
 14:32:50.8825832685 00.0000043125 =
 001752 00031 QR    PG 0701 PGHM  EXIT  SET_CONDITIONS/OK FASTPATH_FLAGS(0)         RET-9FC19028
 14:32:50.88258664 DFHEEI  +00000328
 001753 00031 QR    AP 00E1 EIP   EXIT  HANDLE-CONDITION OK                  REQ(00F4) FIELD-A(00000000 ....)
 FIEL DFHEEI  +00000328
                                                                                RET-9FC19028
 14:32:50.8825877060 00.0000010625 =


14:32:50.8825877060 00.0000010625 =
 001754 00031 QR    AP 00E1 EIP   ENTRY READQ-TS                             REQ(0004) FIELD-A(00140488 ...h)
 FIEL ASMDEMO +000000CC
                                                                                RET-A0D00B14
 14:32:50.8825885185 00.0000008125 =
 001755 00031 QR    TS 0C01 TSMB  ENTRY MATCH QUEUE_NAME(DEMAU010)                  RET-9F92D9E2
 14:32:50.88259261 DFHEITS +00000292
 001756 00031 QR    TS 0C02 TSMB  EXIT  MATCH/OK TSMODEL_NAME() PREFIX() REMOTE_PREFIX() REMOTE_NAME(DEMAU010)
 POO DFHEITS +00000292
                                        (00000000) SYSID() MAIN(ANY) RECOVERABLE(NO) SECURITY(NO)

                                                                                RET-9F92D9E2
 14:32:50.8825972685 00.0000046562 =
 001757 00031 QR    TS 0201 TSQR  ENTRY READ_INTO QUEUE_NAME(DEMAU010) ITEM_BUFFER(00140610 , 00000000 ,
 00000024) DFHEITS +0000097A
                                        (EXEC)                                      RET-9F92E0CA
 14:32:50.8825997373 00.0000024687 =
 001758 00031 QR    TS 0202 TSQR  EXIT  READ_INTO/OK ITEM_BUFFER(00140610 , 00000024 , 00000024)
 TOTAL_ITEMS(1) FM DFHEITS +0000097A


TOTAL_ITEMS(1) FM DFHEITS +0000097A
                                                                                RET-9F92E0CA
 14:32:50.8826042685 00.0000045312 =
 001759 00031 QR    AP 00E1 EIP   EXIT  READQ-TS OK                          REQ(00F4) FIELD-A(00000000 ....)
 FIEL DFHAIP  +000008C2
                                                                                RET-800828C2
 14:32:50.8826051904 00.0000009218 =
 001760 00031 QR    AP 1942 APLI  *EXC* Program-Check   FUNCTION(START_PROGRAM) PROGRAM(ASMDEMO)
 CEDF_STATUS(CEDF) DFHPGDM +0000C618

 PF1 Help       2            3 End         4 Mask      5 Repeat     6 Return Off

 1328


InterTest™ and SymDump ® 11.0
 PF7 Backward   8 Forward    9 Filter     10 Left     11 Right     12 Retrieve
28. Tab to the MODE field to the right of the command line. Type F to place the trace into FULL mode and press Enter.
--------------  CA SymDump for CICS   FORMATTED TRACE TABLE  --------------

 COMMAND ===>                                             MODE: F SCROLL: PAGE

 001750 AP 00E1 EIP ENTRY HANDLE-CONDITION                    REQ(0004) FIELD-A(00140488 ...h) FIELD-
B(08000204 .. ASMDEMO +000000A0
        TASK-00031 KE_NUM-0039 TCB-QR   /007AAD08 RET-A0D00AE8 TIME-14:32:50.8825789560 INTERVAL-00.0000021406
        =001750=
 001751 PG 0700 PGHM  ENTRY - FUNCTION(SET_CONDITIONS) IDENTIFIERS(20D033BD) LABELS_FLAGS(20D033BA)
 LABELS(001404F DFHEEI  +00000328
             (00140488) LANGUAGE(ASSEMBLER) CURRENT_EXECUTION_KEY(80) AMODE(AMODE31)

        TASK-00031 KE_NUM-0039 TCB-QR   /007AAD08 RET-9FC19028 TIME-14:32:50.8825832685 INTERVAL-00.0000043125
        =001751=
          1-0000  00500000 0000009A 00000000 00000000  BC782200 00000000 01000100 20D033BD
 *.&...........................}..*


*.&...........................}..*
            0020  20D033BA 00E10478 0005D3A0 00000012  001404F4 00140488 01807F30 0005D5A4
 *.}........L........4...h.."...Nu*
            0040  20D033B8 001404F0 20000F02 01404040                                       *.}.....0.....
                *
 001752 PG 0701 PGHM  EXIT  - FUNCTION(SET_CONDITIONS) RESPONSE(OK) FASTPATH_FLAGS(0)
      DFHEEI  +00000328
        TASK-00031 KE_NUM-0039 TCB-QR   /007AAD08 RET-9FC19028 TIME-14:32:50.8825866435 INTERVAL-00.0000033750
        =001752=
          1-0000  00500000 0000009A 00000000 00000000  BC782200 00000000 01000100 20D033BD
 *.&...........................}..*
            0020  20D033BA 00E10478 0005D3A0 00000012  001404F4 00140488 01807F30 0005D5A4
 *.}........L........4...h.."...Nu*
            0040  20D033B8 00140000 20000F02 01404040                                       *.}...........
                *


*

        TASK-00031 KE_NUM-0039 TCB-QR   /007AAD08 RET-9FC19028 TIME-14:32:50.8825877060 INTERVAL-00.0000010625
        =001753=
 001754 AP 00E1 EIP ENTRY READQ-TS                            REQ(0004) FIELD-A(00140488 ...h) FIELD-
B(08000A04 .. ASMDEMO +000000CC
        TASK-00031 KE_NUM-0039 TCB-QR   /007AAD08 RET-A0D00B14 TIME-14:32:50.8825885185 INTERVAL-00.0000008125
        =001754=
 001755 TS 0C01 TSMB  ENTRY - FUNCTION(MATCH) QUEUE_NAME(DEMAU010)
      DFHEITS +00000292
        TASK-00031 KE_NUM-0039 TCB-QR   /007AAD08 RET-9F92D9E2 TIME-14:32:50.8825926123 INTERVAL-00.0000040937
        =001755=
          1-0000  00800000 0000016F 00000000 00000000  BFF70000 00000000 05000000 00000000
 *.......?.........7..............*
            0020  00000000 C4C5D4C1 E4F0F1F0 40404040  40404040 00000000 00000000 00000000  *....DEMAU010
    ............*

 PF1 Help       2            3 End         4 Mask      5 Repeat     6 Return Off


PF7 Backward   8 Forward    9 Filter     10 Left     11 Right     12 Retrieve
 1329


InterTest™ and SymDump ® 11.0
29. Tab to the Mode field and type A to place the trace back into ABBREVIATED mode and press Enter.
--------------  CA SymDump for CICS   FORMATTED TRACE TABLE  --------------

 COMMAND ===>                                             MODE: A SCROLL: PAGE

 001750 00031 QR    AP 00E1 EIP   ENTRY HANDLE-CONDITION
 0004,00140488 ...h,08000 ASMDEMO +000000A0
 001751 00031 QR    PG 0700 PGHM  ENTRY SET_CONDITIONS
 20D033BD,20D033BA,001404F4,00140488,ASSEMBLER,80,AMO DFHEEI  +00000328
 001752 00031 QR    PG 0701 PGHM  EXIT  SET_CONDITIONS/OK     0
      DFHEEI  +00000328
 001753 00031 QR    AP 00E1 EIP   EXIT  HANDLE-CONDITION      OK
 00F4,00000000 ....,00000 DFHEEI  +00000328
 001754 00031 QR    AP 00E1 EIP   ENTRY READQ-TS
 0004,00140488 ...h,08000 ASMDEMO +000000CC
 001755 00031 QR    TS 0C01 TSMB  ENTRY MATCH                 DEMAU010
      DFHEITS +00000292
 001756 00031 QR    TS 0C02 TSMB  EXIT  MATCH/OK              ,,,DEMAU010,,00000000,,ANY,NO,NO
      DFHEITS +00000292


DFHEITS +00000292
 001757 00031 QR    TS 0201 TSQR  ENTRY READ_INTO             DEMAU010,00140610 , 00000000 , 00000024,1,EXEC
      DFHEITS +0000097A
 001758 00031 QR    TS 0202 TSQR  EXIT  READ_INTO/OK          00140610 , 00000024 , 00000024,1,NO
      DFHEITS +0000097A
 001759 00031 QR    AP 00E1 EIP   EXIT  READQ-TS              OK
 00F4,00000000 ....,00000 DFHAIP  +000008C2
 001760 00031 QR    AP 1942 APLI  *EXC* Program-Check
 START_PROGRAM,ASMDEMO,CEDF,FULLAPI,EXEC,NO,200C70D0, DFHPGDM +0000C618
 001761 00031 QR    AP 0790 SRP   *EXC* PROGRAM_CHECK
      DFHSRP  +0000050E
 001762 00031 QR    DS 0010 DSBR  ENTRY INQUIRE_TASK
      DFHSRP  +00002F08
 001763 00031 QR    DS 0011 DSBR  EXIT  INQUIRE_TASK/OK       ESSENTIAL_YES
      DFHSRP  +00002F08
 001764 00031 QR    DS 0002 DSAT  ENTRY CHANGE_MODE           QR
      DFHSRP  +00002F54
 001765 00031 QR    DS 0003 DSAT  EXIT  CHANGE_MODE/OK        1F503030 , 00000001


DFHSRP  +00002F54
 001766 00031 QR    PG 0500 PGIS  ENTRY INQUIRE_CURRENT_PROGRAM
      DFHSRP  +000026DA
 001767 00031 QR    PG 0501 PGIS  EXIT  INQUIRE_CURRENT_PROGRAM/OK 2C88,20D00A20,ASMDEMO
      DFHSRP  +000026DA
 001768 00031 QR    AP 0781 SRP   *EXC* ABEND_ASRA            ASMDEMO,0000019C,CICS
      DFHSRP  +0000050E
 001769 00031 QR    ME 0301 MEME  ENTRY SEND_MESSAGE          1,AP0001,0005D370 , 00000008,0005D378 ,
 00000004,000 DFHSRP  +00003C72
 001770 00031 QR    SM 0301 SMGF  ENTRY GETMAIN               1F44A0D4 , 00000018,1000,YES,KESTACKS
      DFHSIP  +00054454

 PF1 Help       2            3 End         4 Mask      5 Repeat     6 Return Off

 PF7 Backward   8 Forward    9 Filter     10 Left     11 Right     12 Retrieve
 1330


InterTest™ and SymDump ® 11.0
30. Type L 1760  on the command line to position the trace to line 1760 and press Enter.
--------------  CA SymDump for CICS   FORMATTED TRACE TABLE  --------------

 COMMAND ===>                                             MODE: A SCROLL: PAGE

 001760 00031 QR    AP 1942 APLI  *EXC* Program-Check
 START_PROGRAM,ASMDEMO,CEDF,FULLAPI,EXEC,NO,200C70D0, DFHPGDM +0000C618
 001761 00031 QR    AP 0790 SRP   *EXC* PROGRAM_CHECK
      DFHSRP  +0000050E
 001762 00031 QR    DS 0010 DSBR  ENTRY INQUIRE_TASK
      DFHSRP  +00002F08
 001763 00031 QR    DS 0011 DSBR  EXIT  INQUIRE_TASK/OK       ESSENTIAL_YES
      DFHSRP  +00002F08
 001764 00031 QR    DS 0002 DSAT  ENTRY CHANGE_MODE           QR
      DFHSRP  +00002F54
 001765 00031 QR    DS 0003 DSAT  EXIT  CHANGE_MODE/OK        1F503030 , 00000001
      DFHSRP  +00002F54
 001766 00031 QR    PG 0500 PGIS  ENTRY INQUIRE_CURRENT_PROGRAM
      DFHSRP  +000026DA
 001767 00031 QR    PG 0501 PGIS  EXIT  INQUIRE_CURRENT_PROGRAM/OK 2C88,20D00A20,ASMDEMO
      DFHSRP  +000026DA


DFHSRP  +000026DA
 001768 00031 QR    AP 0781 SRP   *EXC* ABEND_ASRA            ASMDEMO,0000019C,CICS
      DFHSRP  +0000050E
 001769 00031 QR    ME 0301 MEME  ENTRY SEND_MESSAGE          1,AP0001,0005D370 , 00000008,0005D378 ,
 00000004,000 DFHSRP  +00003C72
 001770 00031 QR    SM 0301 SMGF  ENTRY GETMAIN               1F44A0D4 , 00000018,1000,YES,KESTACKS
      DFHSIP  +00054454
 001771 00031 QR    SM 0302 SMGF  EXIT  GETMAIN/OK            0004A000
      DFHSIP  +00054454
 001772 00031 QR    KE 0101 KETI  ENTRY INQ_LOCAL_DATETIME_DECIMAL
      DFHSIP  +000821F4
 001773 00031 QR    KE 0102 KETI  EXIT  INQ_LOCAL_DATETIME_DECIMAL/OK 11172004,143250,063745,MMDDYYYY
      DFHSIP  +000821F4
 001774 00031 QR    KE 0401 KEGD  ENTRY INQUIRE_KERNEL
      DFHSIP  +000822D6
 001775 00031 QR    KE 0402 KEGD  EXIT  INQUIRE_KERNEL/OK     A11IC9N3,CICS
      DFHSIP  +000822D6
 001776 00031 QR    ME 0312 MEME  EVENT ISSUE-MVS-GETMAIN


DFHSRP  +00003C72
 001777 00031 QR    ME 0313 MEME  EVENT MVS-GETMAIN-COMPLETE
      DFHSRP  +00003C72
 001778 00031 QR    ME FF45 MEWS  *EXC* SYMREC-ERROR
      DFHSIP  +0007D68C
 001779 00031 QR    ME FF00 SUWT  ENTRY SEND_DIRECT           2000292B , 00000002,20002B0C ,
 00000001,DFHAP0001 A1 DFHSIP  +000875C8
 001780 00031 QR    ME FF02 SUWT  EVENT BEFORE-MVS-WTO
      DFHSIP  +000875C8

 PF1 Help       2            3 End         4 Mask      5 Repeat     6 Return Off

 PF7 Backward   8 Forward    9 Filter     10 Left     11 Right     12 Retrieve
 1331


InterTest™ and SymDump ® 11.0
31. Tab to line 001760 on the left of the screen, and type F to override this line only to FULL mode, and press Enter.
--------------  CA SymDump for CICS   FORMATTED TRACE TABLE  --------------

 COMMAND ===>                                             MODE: A SCROLL: PAGE

 001760 AP 1942 APLI  *EXC* - Program-Check   FUNCTION(START_PROGRAM) PROGRAM(ASMDEMO) CEDF_STATUS(CEDF)
 EXECUTION DFHPGDM +0000C618
             ENVIRONMENT_TYPE(EXEC) SYNCONRETURN(NO) LANGUAGE_BLOCK(200C70D0) COMMAREA(00000000 , 00000000)
 LINK_LEVEL(1)
             SYSEIB_REQUEST(NO)

        TASK-00031 KE_NUM-0039 TCB-QR   /007AAD08 RET-9F794B08 TIME-14:32:50.8915181123 INTERVAL-00.0089289218
        =001760=
          1-0000  01A00000 000000DA 00000000 00000000  B81B4EA0 00000000 02000100 C1E2D4C4
 *..................+.........ASMD*
            0020  C5D4D640 200E0AF8 0000007C 200E0AF8  9F13A501 01D00202 20D00A20 200C70D0
 *EMO ...8...@...8..v..}...}.....}*


*EMO ...8...@...8..v..}...}.....}*
            0040  00002C88 00000000 00000000 00000000  00000000 00013202 00029620 80095E5A
 *...h......................o...;!*
            0060  0005D388 00000000 20020E00 00000400  02FEC780 00007000 00008258 92FF7EC4
 *..Lh..............G.......b.k.=D*
            0080  20001678 00095D68 20000990 00000000  E100C5D9 00000000 00000000 00000000
 *......)...........ER............*
            00A0  80000000 0004D030 20000C60 0014005C  80096778 A0051850 0009677E 0004D030
 *......}....-...*.......&...=..}.*
            00C0  1FFEC780 00095B72 00000000 00000000  000888C2 20000C60 000888D4 00000000  *..G...
$...........hB...-..hM....*
            00E0  00099620 00000000 800513B0 00000001  1F4BF380 80097464 00000000 20001308
 *..o...............3.............*


*..o...............3.............*
            0100  000888C2 0014005C 1F5460A0 20000C60  20000E00 0004C030 00083284 00099620
 *..hB...*..-....-......{....d..o.*
            0120  80095E5A 0005D388 0005D080 0004C030  800513B0 00000048 200FBAC0 000000B9  *..;!..Lh..}...
{............{....*
            0140  BC229A0D C4377F4C 1A11E4E2 C9D3C4C1  F0F14BC1 F5F5E3E4 F0F1F022 9A0DC437
 *....D."<..USILDA01.A55TU010...D.*
            0160  7F000100 20000F28 00000000 00000000  D8D9D8D9 00000000 00000000 00000000
 *"...............QRQR............*
            0180  00000001 00000001 00000000 00000000  00000000 00000000 00000000 01800080
 *................................*
          2-0000  F0C3F761 C1D2C5C1 018400C7 0000FFFF  C4C6C8C1 D7D3C9F1 1F8C43C0 1F4BF380  *0C7/


AKEA.d.G....DFHAPLI1...{..3.*
            0020  0005D080 1FFEC780 00000001 00000000  FF850007 00000000 078D0000 A0D00BBC
 *..}...G..........e...........}..*
            0040  00060007 00000000 A0D00BBC 80000000  20D00B36 001404F0 A0D00A48 A0D01A48
 *.........}.......}.....0.}...}..*
            0060  A0D02A48 000001D5 00000232 A0D03A48  00000000 00000000 20001760 001400D0
 *.}.....N.....}.............-...}*

 PF1 Help       2            3 End         4 Mask      5 Repeat     6 Return Off

 PF7 Backward   8 Forward    9 Filter     10 Left     11 Right     12 Retrieve
 1332


InterTest™ and SymDump ® 11.0
32. Type RESET OVERRIDES to reset all overrides.
--------------  CA SymDump for CICS FORMATTED TRACE TABLE  --------------

 COMMAND ===>                                             MODE: A SCROLL: PAGE

 001760 00031 QR    AP 1942 APLI  *EXC* Program-Check
 START_PROGRAM,ASMDEMO,CEDF,FULLAPI,EXEC,NO,200C70D0, DFHPGDM +0000C618
 001761 00031 QR    AP 0790 SRP   *EXC* PROGRAM_CHECK
      DFHSRP  +0000050E
 001762 00031 QR    DS 0010 DSBR  ENTRY INQUIRE_TASK
      DFHSRP  +00002F08
 001763 00031 QR    DS 0011 DSBR  EXIT  INQUIRE_TASK/OK       ESSENTIAL_YES
      DFHSRP  +00002F08
 001764 00031 QR    DS 0002 DSAT  ENTRY CHANGE_MODE           QR
      DFHSRP  +00002F54
 001765 00031 QR    DS 0003 DSAT  EXIT  CHANGE_MODE/OK        1F503030 , 00000001
      DFHSRP  +00002F54
 001766 00031 QR    PG 0500 PGIS  ENTRY INQUIRE_CURRENT_PROGRAM
      DFHSRP  +000026DA
 001767 00031 QR    PG 0501 PGIS  EXIT  INQUIRE_CURRENT_PROGRAM/OK 2C88,20D00A20,ASMDEMO
      DFHSRP  +000026DA


DFHSRP  +00003C72
 001777 00031 QR    ME 0313 MEME  EVENT MVS-GETMAIN-COMPLETE
      DFHSRP  +00003C72
 001778 00031 QR    ME FF45 MEWS  *EXC* SYMREC-ERROR
      DFHSIP  +0007D68C
 001779 00031 QR    ME FF00 SUWT  ENTRY SEND_DIRECT           2000292B , 00000002,20002B0C ,
 00000001,DFHAP0001 A1 DFHSIP  +000875C8
 001780 00031 QR    ME FF02 SUWT  EVENT BEFORE-MVS-WTO
      DFHSIP  +000875C8

 PF1 Help       2            3 End         4 Mask      5 Repeat     6 Return Off
 PF7 Backward   8 Forward    9 Filter     10 Left     11 Right     12 Retrieve
33. Type RESET HILITE  to reset all HILIGHTS.
 1333


InterTest™ and SymDump ® 11.0
34. Press  PF3  End Trace to exit the Formatted Trace Table facility. Use PF3 again to exit the menus.
Using InterTest for CICS to Find Errors
If you also have InterTest for CICS, you can use it to locate errors. This article explains how to locate errors using
InterTest for CICS.
The example here lets you find and correct the error without re-executing the program. However, sometimes you will want
to monitor the program with InterTest for CICS to learn more about what caused the error. You can turn monitoring on
directly from the Source Listing Dump Analysis screen by entering MONITOR in the command line or pressing PF5. You
can also set breakpoints or other monitoring options from this display, and then all you have to do is exit from SymDump
for CICS and re-execute the transaction.
When InterTest for CICS halts the program at an automatic breakpoint or at a breakpoint you set, you can use the full
power of InterTest for CICS to debug the program. For example, you can:
•Examine the backtrace to determine the logic flow up to that point
•Dynamically correct the problem and resume execution
With both SymDump  for CICS and InterTest for CICS, you have all the tools you need to find and correct a problem.
View the Breakpoint at the Triggering Source Statement
InterTest for CICS makes it easy to find the error that caused the abend. This example shows you how to use InterTest for
CICS facilities while viewing a dump.
To see the InterTest for CICS breakpoint at the source statement that triggered the abend, select the Source display from
the Display Selection screen (see View a Dump and Its Information). The following screen appears:


the Display Selection screen (see View a Dump and Its Information). The following screen appears:
                    CA InterTest - SOURCE LISTING DUMP ANALYSIS
COMMAND ===>
Program= COBDEMO  Option #       Stmt #                             Margin= 01
                                        Search=
-------------------------------------------------------------------------------
 _ 00880 CONTINUE-TASK.
   00881**** TASKNUM *NOTE* FIELD MUST BE INITIALIZED
 A   ==>     ADD +1 TO TASKNUM.
     ==>
     ==> ABEND/DUMP CODE: ASRA
     ==>
     ==>      Press PF1 for a detailed description.
     ==>
 _ 00883     IF TASKNUM = 1
 .
 .
 .
The A to the left of statement 882 indicates that the abend occurred at this statement. The ASRA was caused by
improperly formatted data. Because the statement ADD +1 TO TASKNUM triggered the abend, TASKNUM most likely
contains invalid data.
Redisplay the Abend
Even though a task abended, SymDump  for CICS lets you redisplay the abend that caused the dump at a breakpoint so
you can use InterTest for CICS to discover the reason for the abend.
 1334


InterTest™ and SymDump ® 11.0
To redisplay the abend that caused the dump at a breakpoint
1.Display the contents of TASKNUM by entering a d to the left of statement 882.
2.Place the cursor under any character in TASKNUM, and press Enter. The following InterTest for CICS screen appears.
The structured CORE display reveals that TASKNUM contains binary zeros instead of a valid packed decimal value.
              CA InterTest - MAIN STORAGE UTILITY - Termid = E024
Starting at Address =  1461A4                Hexadecimal            Character

 02 TASKNUM                           000000                       ...
 02 TASK-TEXT
  03 TASK-ID-NO                       000F                         ..
  03 FILLER                           40
  03 TASK-MESG                        E3C8C9E2 40C9E240 C140D4C5   THIS IS A ME
                                      E2E2C1C7 C5404040            SSAGE
  03 FILLER                           40
  03 TASK-DATE
   04 TASK-MM                         F0F9                         09
   04 TASK-SL1                        61                           /
   04 TASK-DD                         F1F5                         15
   04 TASK-SL2                        61                           /
   04 TASK-YY                         F9F3                         93
 ______________________________________________________________________________
  PF1 Help       2            3 End        4 Return     5            6
  PF7 Backward   8 Forward    9 Caps Off  10           11 Redisplay 12 Structure
 CORE='TASKNUM'
 CORE052 FIELD DOES NOT CONTAIN A VALID PACKED DECIMAL (COMP-3) VALUE
You can go one step further and see where TASKNUM was defined in your program.


You can go one step further and see where TASKNUM was defined in your program.
3.Press Clear  to return to the Source Listing Dump Analysis screen.
Locate Where TASKNUM Was Initialized
To see where TASKNUM was initialized, enter TASKNUM in the Search= field and press Enter. This instructs InterTest for
CICS to display the source statement defining TASKNUM. The following screen appears.
                    CA InterTest - SOURCE LISTING DUMP ANALYSIS
COMMAND ===>
Program= COBDEMO  Option #       Stmt #                             Margin= 01
                                        Search=
-------------------------------------------------------------------------------
   00445     03 TASK-SWITCH2          PIC 99.
   00446     03 TASK-SWITCH3          PIC X.
   00447     03 TASKNUM               PIC S9(5)  COMP-3.
   00448     03 TASK-TEXT.
 .
 .
 .
InterTest for CICS highlights statement number 447 in Working Storage, which defines TASKNUM as a COMP-3 field.
Notice that the VALUE clause needed to initialize TASKNUM is missing. Because TASKNUM never initialized, it does not
contain a valid packed decimal value. When the program tries to add one to this field, a data exception occurs.
Using InterTest for CICS to determine the cause of the abend makes it easy to correct the error. For example, in this case
you could initialize TASKNUM either by adding VALUE +0 to statement 447 or by coding the statement MOVE ZEROS TO
TASKNUM in the Procedure Division. Then recompile the program.
 1335


InterTest™ and SymDump ® 11.0
Using the CICS REST API
Use the SymDump CICS REST API Application Programming Interface (API) to perform the following actions:
•Display a report list
•Retrieve a report with index
•Lock a report
•Unlock a report
•Display PROTDMP Options
•Delete a report
For instructions to install the SymDump REST API, see Install Testing Tools Server and REST API.
Example Use Cases
As a developer or DevOps admin, you can use the SymDump CICS REST API for the following actions:
Reports
Displays a list of ABEND reports
Full Dump with index
Retrieves an ABEND analysis report with an index
LOCK
Locks an ABEND report to prevent accidental deletion
UNLOCK
Unlocks an ABEND report to allow deletion
DELETE
Deletes an ABEND report
OPTIONS
Displays the PROTDMP installation options
Authentication
REST API communication is secured through the HTTP or HTTPS protocol. The REST API server authenticates using the
Basic authentication type, and the mainframe username and password.
Troubleshoot Errors
For errors that occur during request processing, the API returns an HTTP status code to the calling client. An error is
indicated by a 4nn code or a 5nn code. For example:
Status: 400 Bad Request.
In addition, some errors might include a JSON object/response that contains a message that describes the error. Use this
information to diagnose the error.
CA SymDump Rest API
Please refer to the online format for OpenAPI content.
CICS REST API: Reports
Use the SymDump CICS REST API reports endpoint to display a report list.
 1336


InterTest™ and SymDump ® 11.0
HTTP Method and URI Path
The SymDump CICS REST API URI path for the Reports endpoint has the following format:
GET   http://host:port/symdump/api/v1/cics/protdmp/{protdmp}/reports
Where:
host
Specifies the address of the server that runs the REST API
port
Specifies the port of the server that runs the REST API
PROTDMP
Specifies the dump repository data set name
Headers
Authorization: Basic Auth with mainframe username and password
Example:  Retrieve a report list.
GET GET /symdump/api/v1/cics/protdmp/CAI.PROTDMP/reports
REST API Response and Return Codes
Expected Response
On completion, the service returns an HTTP response. This response includes a status code that indicates whether the
request completed. The status code 200 OK  indicates success.
Example:
{
  "data": [
    {
      "abend": "string",
      "date": "string",
      "jobName": "string",
      "key": "string",
      "lock": "string",
      "offset": "string",
      "program": "string",
      "stepName": "string",
      "system": "string",
      "time": "string",
      "userID": "string"
    }
  ],
  "messages": [
    {
      "messageContent": "string",
      "messageNumber": "string",
      "messageType": "string"
    }
  ],
  "metadata": [
    {
      "messageTime": "string",
 1337


InterTest™ and SymDump ® 11.0
      "messageVersion": "string",
      "serviceName": "string",
      "sessionID": "string"
    }
  ]
}
CICS REST API: Full Dump with Index
Use the SymDump CICS REST API full dump with index endpoint to retrieve a report.
HTTP Method and URI Path
The SymDump CICS REST API URI path for the full dump with index endpoint has the following format:
GET   http://host:port/symdump/api/v1/cics/protdmp/{protdmp}/reports/{key}/full-dump-with-index
Where:
host
Specifies the address of the server that runs the REST API
port
Specifies the port of the server that runs the REST API
PROTDMP
Specifies the dump repository data set name
Key
Report key used to locate a particular report from the report list
Headers
Authorization: Basic Auth with mainframe username and password
Example:  Retrieve a report
GET/symdump/api/v1/cics/protdmp/CAI.PROTDMP /reports/{key}/full-dump-with-index
REST API Response and Return Codes
Expected Response
On completion, the service returns an HTTP response. The response includes a status code that indicates whether the
request completed. The status code 200 OK  indicates success.
Example:
Example001:
{
  "data": "string",
  "dump": {
    "abend": "string",
    "date": "string",
    "jobName": "string",
    "key": "string",
    "lock": "string",
    "offset": "string",
    "program": "string",
    "stepName": "string",
 1338


InterTest™ and SymDump ® 11.0
    "system": "string",
    "time": "string",
    "userID": "string"
  },
  "index": [
    {
      "children": [
        "string"
      ],
      "description": "string",
      "lineNo": "string"
    }
  ],
  "messages": [
    {
      "messageContent": "string",
      "messageNumber": "string",
      "messageType": "string"
    }
  ],
  "metadata": [
    {
      "messageTime": "string",
      "messageVersion": "string",
      "serviceName": "string",
      "sessionID": "string"
    }
  ]
}
CICS REST API: Lock
Use the SymDump CICS REST API Lock endpoint to lock a report.
HTTP Method and URI Path
The SymDump CICS REST API URI path for the Lock endpoint has the following format:
POST   http://host:port/symdump/api/v1/cics/protdmp/{protdmp}/reports/{key}/lock
Where:
host
Specifies the address of the server that runs the REST API
port
Specifies the port of the server that runs the REST API
PROTDMP
Specifies the dump repository data set name
Key
Report key used to locate a particular report from the report list
Headers
Authorization: Basic Auth with mainframe username and password
 1339


InterTest™ and SymDump ® 11.0
Example:  Lock a report:
POST /symdump/api/v1/cics/protdmp/CAI.PROTDMP /reports/{key}/lock
REST API Response and Return Codes
Expected Response
On completion, the service returns an HTTP response. The response includes a status code that indicates whether the
request completed. The status code 200 OK  indicates success.
Example:
{
  "dump": {
    "abend": "string",
    "date": "string",
    "jobName": "string",
    "key": "string",
    "lock": "string",
    "offset": "string",
    "program": "string",
    "stepName": "string",
    "system": "string",
    "time": "string",
    "userID": "string"
  },
  "messages": [
    {
      "messageContent": "string",
      "messageNumber": "string",
      "messageType": "string"
    }
  ],
  "metadata": [
    {
      "messageTime": "string",
      "messageVersion": "string",
      "serviceName": "string",
      "sessionID": "string"
    }
  ]
}
}
CICS REST API: Unlock
Use the SymDump CICS REST API Unlock endpoint to unlock a report.
HTTP Method and URI Path
The SymDump CICS REST API URI path for the Unlock endpoint has the following format:
POST   http://host:port/symdump/api/v1/cics/protdmp/{protdmp}/reports/{key}/unlock
Where:
 1340


InterTest™ and SymDump ® 11.0
host
Specifies the address of the server that runs the REST API
port
Specifies the port of the server that runs the REST API
PROTDMP
Specifies the dump repository data set name
Key
Report key used to locate a particular report from the report list
Headers
Authorization: Basic Auth with mainframe username and password
Example:  Unlock a report:
POST /symdump/api/v1/cics/protdmp/CAI.PROTDMP/reports/{key}/unlock
REST API Response and Return Codes
Expected Response
On completion, the service returns an HTTP response. The response includes a status code that indicates whether the
request completed. The status code 200 OK  indicates success.
Example:

{
  "dump": {
    "abend": "string",
    "date": "string",
    "jobName": "string",
    "key": "string",
    "lock": "string",
    "offset": "string",
    "program": "string",
    "stepName": "string",
    "system": "string",
    "time": "string",
    "userID": "string"
  },
  "messages": [
    {
      "messageContent": "string",
      "messageNumber": "string",
      "messageType": "string"
    }
  ],
  "metadata": [
    {
      "messageTime": "string",
      "messageVersion": "string",
      "serviceName": "string",
      "sessionID": "string"
 1341


InterTest™ and SymDump ® 11.0
    }
  ]
}
CICS REST API: Delete
Use the SymDump  CICS REST API delete endpoint to delete a report.
HTTP Method and URI Path
The SymDump  CICS REST API URI path for the delete endpoint has the following format:
DELETE   http://host:port/symdump/api/v1/cics/protdmp/{protdmp}/reports/{key}
Where:
host
Specifies the address of the server that runs the REST API
port
Specifies the port of the server that runs the REST API
PROTDMP
Specifies the dump repository data set name
Key
Report key used to locate a specific report from the report list
Headers
Authorization: Basic Auth with mainframe username and password
Example:  Delete a report
DELETE /symdump/api/v1/cics/protdmp/CAI.PROTDMP/reports/{key}
REST API Response and Return Codes
Expected Response
Example:
{
  "dump": {
    "abend": "string",
    "date": "string",
    "jobName": "string",
    "key": "string",
    "lock": "string",
    "offset": "string",
    "program": "string",
    "stepName": "string",
    "system": "string",
    "time": "string",
    "userID": "string"
  },
  "messages": [
    {
      "messageContent": "string",
 1342


InterTest™ and SymDump ® 11.0
      "messageNumber": "string",
      "messageType": "string"
    }
  ],
  "metadata": [
    {
      "messageTime": "string",
      "messageVersion": "string",
      "serviceName": "string",
      "sessionID": "string"
    }
  ]
}
CICS REST API: Options
Use the SymDump  CICS REST API options endpoint to display PROTDMP installation options.
HTTP Method and URI Path
The SymDump  CICS REST API URI path for the options endpoint has the following format:
GET  http://host:port/symdump/api/v1/cics/protdmp/{protdmp}/options
Where:
host
Specifies the address of the server that runs the REST API
port
Specifies the port of the server that runs the REST API
Headers
Authorization: Basic Auth with mainframe username and password
Example:  Display installation options:
POST /symdump/api/v1/cics/protdmp/{protdmp}/options
REST API Response and Return Codes
Expected Response
On completion, the service returns an HTTP response. The response includes a status code that indicates whether the
request completed. The status code 200 OK  indicates success.
Example:
   {
   "data":"string",
   "messages":[
      {
         "messageContent":"string",
         "messageNumber":"string",
         "messageType":"string"
      }
   ],
 1343


InterTest™ and SymDump ® 11.0
   "metadata":[
      {
         "messageTime":"string",
         "messageVersion":"string",
         "serviceName":"string",
         "sessionID":"string"
      }
   ]
}
DWARF
NOTE
DWARF symbolic support is under incremental development. Not all features available for PROTSYM
processing are currently available for DWARF symbolic support. For more information on the limitations, see
DWARF Incremental Release State.
DWARF is a format of source-level debugging information which is stored within an object file in the target program.
InterTest for CICS supports DWARF debugging as an alternative to PROTSYM for COBOL 5 and above. DWARF
symbolic data is stored inside the target program object, and also read straight from the program object. When you use
DWARF debugging, it is not necessary to create a PROTSYM file.
DWARF symbolic data increases the size of the program object, but does not use more storage when you load the
program object.
The user experience using DWARF debugging on InterTest for CICS is designed to be largely similar to using PROTSYM.
Limitations
Unlike PROTSYM, DWARF debugging data is displayed as a copy of the source, rather than a listing, so some listing
functionality is not available. For more information on the limitations, see Source Listing Facility for InterTest.
The following Source Listing sections are not available with DWARF debugging:
•Data Division Map
•CLIST/Pmap
•Data Name XREF
•Procedure Cross Reference
•Error Messages
NOTE
Debugging using DWARF is only supported for COBOL programs in InterTest for CICS.
Usage Considerations


Usage Considerations
•The extended source code is part of the program object. Anyone with access to the program object has access to the
source code of the program. Consult your security policies before using DWARF.
•DWARF data increases the size of the program object. Ensure that load libraries have enough allocated space.
•Ensure you turn on DWARF symbolic support in the product. It is turned off by default. For more information, see
SYMBOLIC  in the IN25OPTS keywords.
There is no fundamental difference between using symbolics from PROTSYM or DWARF. For a practical walkthrough
demo, refer to COBOL Basic Demo Session for DWARF.
 1344


InterTest™ and SymDump ® 11.0
Advantages of DWARF over PROTSYM
•Because the DWARF extended source information is part of the load module itself, there is no mismatch between the
listing and load module.
•When you use DWARF, you do not need to maintain a separate symbolic repository (PROTSYM file).
Generate the DWARF Information
You generate the DWARF information by specifying the COBOL compiler option TEST(SOURCE). For more information,
refer to the IBM Enterprise COBOL documentation.
A sample JCL is available in the member CABADWCJ, in the CAI.CAVHPROC data set.
NOTE
It is currently not possible to save the DWARF data into a separate binary file.
Required COBOL Options
The following compiler options are required to load symbolic information for COBOL programs into the DWARF file:
OPT(0)
Produces breakpoints synchronized with the source.
NOTE
When a COBOL program is OPTIMIZED, the optimization adds or modifies the generated code, and it
might not be synchronized with the related source statements in the listing. Therefore the breakpoints
might be stopped in an unexpected location.
TEST(SOURCE)
Generates the DWARF debugging information including the expanded source code.
DWARF Lister Screen
With PROTSYM, symbolic information for individual programs is stored as separate PROTSYM entries in a PROTSYM
file. With DWARF, symbolic information is stored inside the program object. One program object can contain DWARF
symbolic information for multiple programs that are bound together using binder. Therefore, to retrieve DWARF symbolic
information, ensure that you provide both the program object (load module) and program (COBOL PROGRAM-ID) names.
Example: Source Listing Display


Example: Source Listing Display
CA InterTest for CICS - *DWARF* FILE  SOURCE LISTING DISPLAY
COMMAND ===>
Program= CSBIN25  Option #       Stmt #                           Margin= 07
                                              Search=
Load module= COBDEML
Symbolic file: *DWARF*  Timestamp: MATCH  Language: IBM COBOL  5.2.0
-------------------------------------------------------------------------------
Where:
Load module=
Specifies the name of the program object where the symbolic information is stored.
Program=
Specifies the COBOL PROGRAM-ID of the program you want to use.
To switch to another program in the scope of the same program object, change the Program= field only. To switch to
another program in a different program object, change the Load module= field.
 1345


InterTest™ and SymDump ® 11.0
Example: Open expanded source for COBDEML (in the COBDEML program object)
The command LIST=COBDEML produces the following:
CA InterTest for CICS - *DWARF* FILE  SOURCE LISTING DISPLAY
COMMAND ===>
Program= COBDEML  Option #       Stmt #                             Margin= 07
                                            Search=
Load module= COBDEML
Symbolic file: *DWARF*  Timestamp: MATCH  Language: IBM COBOL  5.2.0
-------------------------------------------------------------------------------
000001  ID DIVISION.
000002  PROGRAM-ID. COBDEML.
Example: Display CSBIN25 in the same program object.
Change the Program= field to CSBIN25:
CA InterTest for CICS - *DWARF* FILE  SOURCE LISTING DISPLAY
COMMAND ===>
Program= CSBIN25  Option #       Stmt #                            Margin= 07
                                                 Search=
Load module= COBDEML
Symbolic file: *DWARF*  Timestamp: MATCH  Language: IBM COBOL  5.2.0
-------------------------------------------------------------------------------
000001  ID DIVISION.
000002  PROGRAM-ID. COBDEML.
Result:
CA InterTest for CICS - *DWARF* FILE  SOURCE LISTING DISPLAY
COMMAND ===>
Program= CSBIN25  Option #       Stmt #                           Margin= 07
                                            Search=
Load module= COBDEML
Symbolic file: *DWARF*  Timestamp: MATCH  Language: IBM COBOL  5.2.0
-------------------------------------------------------------------------------
000001  ID DIVISION.


-------------------------------------------------------------------------------
000001  ID DIVISION.
000002  PROGRAM-ID. CSBIN25.
Example: Display expanded source for COBDEMO (in the COBDEMO program object)
Change the Load module= field to COBDEMO:
CA InterTest for CICS - *DWARF* FILE  SOURCE LISTING DISPLAY
COMMAND ===>
Program= CSBIN25  Option #       Stmt #                           Margin= 07
                                               Search=
Load module= COBDEMO
Symbolic file: *DWARF*  Timestamp: MATCH  Language: IBM COBOL  5.2.0
-------------------------------------------------------------------------------
000001  ID DIVISION.
000002  PROGRAM-ID. CSBIN25.
Result:
CA InterTest for CICS - *DWARF* FILE  SOURCE LISTING DISPLAY
COMMAND ===>
 1346


InterTest™ and SymDump ® 11.0
Program= COBDEMO  Option #       Stmt #                           Margin= 07
                                               Search=
Load module= COBDEMO
Symbolic file: *DWARF*  Timestamp: MATCH  Language: IBM COBOL  5.2.0
-------------------------------------------------------------------------------
000001  ID DIVISION.
000002  PROGRAM-ID. COBDEMO.
COBOL Basic Demo Session for DWARF
Symbolic Version Processing
During automatic breakpoint processing, if a program has no previously selected symbolic file, InterTest matches the date/
time of the load module to a symbolic file.
Ensure that the value of the SYMBOLIC option in IN25OPTS is set to enable DWARF symbolic data. For more information
see IN25OPTS Keywords. If the symbolic version list pops up, select *DWARF* as in the example below:
CA InterTest for CICS - SYMBOLIC VERSION LIST
   Program = COBDEMO     Load Module Date/Time =  01/10/2018 07:24:21
Loadlib = your.program.loadlib                      Volume = volser

File ID     Date       Time    Language     Comments
S *DWARF*  01/10/2018  07.24.21  IBM COBOL  DATE/TIME MATCH
_ PROTSYM  01/10/2018  07.24.21  IBMCOB 52  LATEST VERSION
_ PROTSYM  01/02/2018  11.14.03  IBMCOB 52
.
.
.
         S - Select which Symbolic file to use
-------------------------------------------------------------------------------


.
.
         S - Select which Symbolic file to use
-------------------------------------------------------------------------------
PFKEYS:  1 Help      2           3 No file   4           5           6
         7 Backward  8 Forward   9          10          11          12
NOTE
Once a symbolic file is selected for a program, InterTest continues to use the selected file and bypasses
subsequent date/time matching until all declared breakpoints and monitoring options are removed for the
program, or until a CNTL=NEW, PROG=program command is executed.
Demo Session Objectives
This demo session teaches you how to do the following:
•Select a source listing for a program from the ITST menus
•Inform InterTest that you want to test a program (set monitoring)
•Respond to the information provided when a program error is detected
•Examine the value of a data item
•Dynamically change the value of a data item
•Halt program execution at any point (set breakpoints)
•Resume program execution
 1347


InterTest™ and SymDump ® 11.0
Before You Start
Ensure that the COBOL test program COBDEMO is compiled with the compiler option TEST(SOURCE). A sample
compilation procedure, CABADWCJ, is described in Installation Verification.
Demo Session Scenario
The InterTest basic demo session takes you through the following scenario:
1.You use the ITST menus to select and view the source listing of the sample program to be executed. A sample IBM
Enterprise COBOL program named COBDEMO is provided for you to use.
2.You set monitoring for the sample program and view the status display of your monitoring request.
3.You exit the ITST menus and initiate COBDEMO by specifying the DEMC transaction.
4.InterTest for CICS intercepts and prevents an ASRA abend in COBDEMO. InterTest halts COBDEMO at an ADD
statement and displays a diagnostic message informing you that the problem was caused by improperly formatted
data.
5.You examine the current value of TASKNUM, the receiving field in the ADD statement which you suspect might be the
cause of the problem. You find that TASKNUM does not contain a valid packed decimal number.
6.You move a packed decimal zero into TASKNUM to correct the error.
7.You set a breakpoint to halt COBDEMO at another statement. This step is purely instructional and has nothing to do
with correcting the ASRA.
8.You resume program execution. InterTest halts the program at the breakpoint you set in Step 7. You can see that when
the ADD statement executed, the value of TASKNUM changed.
9.You clean up by removing the breakpoint you set. You then resume program execution and COBDEMO runs to
completion.
Select the Source Program from the ITST Menus


completion.
Select the Source Program from the ITST Menus
To begin your session, select the source listing of the COBDEMO demonstration program from the ITST Primary Option
Menu.
Follow these steps:
1.Sign on to CICS.
2.Type ITST on a clear screen.
3.Press Enter.
The InterTest for CICS Primary Option Menu displays.
CA InterTest for CICS 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 for CICS
X  Exit               - Terminate menu processing

 1348


InterTest™ and SymDump ® 11.0
PF1 Help       2            3 End        4 Return     5            6
PF7            8            9           10           11           12
The PF keys have conventional assignments for ISPF-like navigation:
PF1 (Help)
Accesses online help
PF3 (End)
Displays the previous panel
PF4 (Return)
Returns to the top-level menu
Next, open the source listing of the program you want to debug.
Follow these steps:
1.Type 1 in the Option field.
2.Press Enter.The InterTest Source Menu opens.
                 CA InterTest for CICS  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  +)
cobdemo_ ________ ________ ________ ________ ________ ________ ________
3.To search for program listings, type 1 in the Option field
4.Tab to the first entry field for file/program names
5.Enter
cobdemo
The Source Listing Selection screen lists all program Source Listings with the name COBDEMO.
                CA InterTest for CICS SOURCE LISTING
SELECTION
COMMAND
===>

   Type S to select a source listing.

Name     File         Created       Size
Attributes
s COBDEMO  *DWARF*  01/02/2018 07:27 ----- IBMCOB 6.1


_ COBDEMO  NDVRSYM  01/02/2018 07:27   145 IBMCOB 6.1
_ COBDEMO  NDVRSYM  08/04/2015 10:29   134 IBMCOB 4.2
*** End of data ***

PF1 Help       2 Refresh    3 End        4 Return     5            6
PF7 Backward   8 Forward    9           10           11           12
6.Type S in the field to the left of the program name on the line where *DWARF* is specified in the File column.
 1349


InterTest™ and SymDump ® 11.0
7.Press Enter.
NOTE
If the list does not contain the name of the previously indicated demo program, it might be because the user
who installed InterTest changed the name of the InterTest sample programs available to you. To find the
correct names, check with that user.
   CA InterTest for CICS - *DWARF* FILE  SOURCE LISTING DISPLAY
COMMAND ===>
Program= COBDEMO  Option #       Stmt #                             Margin=
07                                        Search=
-------------------------------------------------------------------------------
000001 ID DIVISION.
000002 PROGRAM-ID. COBDEMO.
000003 ENVIRONMENT DIVISION.
000004 DATA DIVISION.
_ 000005 WORKING-STORAGE SECTION.
_ 000006 77  S999-FIELD1             PIC S9(3).
_ 000007 77  S999-FIELD2             PIC S9(3)       VALUE +50.
_ 000008 77  999-FIELD1              PIC 9(3).
_ 000009 77  999-FIELD2              PIC 9(3)        VALUE 50.
_ 000010 77  COMMAREA-LEN            PIC S9(4) COMP  VALUE +59.
_ 000011 77  LINK-COMMAREA-LEN       PIC S9(4) COMP  VALUE +59.
_ 000012 77  TSQ-LEN                 PIC S9(4) COMP  VALUE +59.
_ 000013 77  REC-LEN                 PIC S9(4) COMP.
_ 000014 77  NUM-CHOICES             PIC S9(4) COMP  VALUE +7.