IT CICS Getting Started
IT CICS Getting Started
Getting Started
00-00-000-00000
This documentation and related computer software program (hereinafter referred to as the Documentation) is for the end users informational purposes only and is subject to change or withdrawal by Computer Associates International, Inc. (CA) at any time. This documentation may not be copied, transferred, reproduced, disclosed or duplicated, in whole or in part, without the prior written consent of CA. This documentation is proprietary information of CA and protected by the copyright laws of the United States and international treaties. Notwithstanding the foregoing, licensed users may print a reasonable number of copies of this documentation for their own internal use, provided that all CA copyright notices and legends are affixed to each reproduced copy. Only authorized employees, consultants, or agents of the user who are bound by the confidentiality provisions of the license for the software are permitted to have access to such copies. This right to print copies is limited to the period during which the license for the product remains in full force and effect. Should the license terminate for any reason, it shall be the users responsibility to return to CA the reproduced copies or to certify to CA that same have been destroyed. To the extent permitted by applicable law, CA provides this documentation as is without warranty of any kind, including without limitation, any implied warranties of merchantability, fitness for a particular purpose or noninfringement. In no event will CA be liable to the end user or any third party for any loss or damage, direct or indirect, from the use of this documentation, including without limitation, lost profits, business interruption, goodwill, or lost data, even if CA is expressly advised of such loss or damage. The use of any product referenced in this documentation and this documentation is governed by the end users applicable license agreement. The manufacturer of this documentation is Computer Associates International, Inc. Provided with Restricted Rights as set forth in 48 C.F.R. Section 12.212, 48 C.F.R. Sections 52.22719(c)(1) and (2) or DFARS Section 252.227-7013(c)(1)(ii) or applicable successor provisions.
Contents
Chapter 1: Introduction
Overview 11 ISPF-Like Menu Interface 11 Test and Debug Directly from Your Source Listing 11 Prevent Abends by Trapping All Application Errors Online 12 Set Breakpoints to Interrupt Program Execution 12 Control Program Execution to Test All Program Paths 13 CICSPlex Exploitation 13 Ease-of-Use Features 13 Symbolic Support Facilitates Problem Solving 14 Display and Update Data Values from Your Source Listing Display 14 View and Modify Storage/Files without Interrupting the Test Session 14 Structured File Display Makes Data Easy on the Eyes 14 Trace Program Execution 15 Code Coverage 15 Dynamically Change Program Execution 15 Monitoring by CICS User ID 15 Interactively Debug Applications That Access DB2 15 Helpful Diagnostic Information 16 Synchronized Processing 16 Immediate Support for CICS Releases 16 Debug Production Applications Symbolically from Any CICS Region 16
Global User Exits 35 TIOA Compression Routine Users 35 CICSPlex Support 36 CA-ACF2 and RACF Users 37 CA-Realia II Workbench For OS/390 CICS Users 37 Database Support 37 HOGAN Users 38 MRO Users 38 Omegamon Users 38 TMON Users 38 User CORE Commands 38 User Macros and Software Calls Support 38 Advantage CA-InterTest 6.1 Migration Considerations 39 Advantage CA-InterTest 6.0 to 6.1 Migration Considerations 39
Example 726 Declaring User-Defined CORE Commands 730 The CORUCOM Macro 730 Coding the CORUCOM Macros 730 Sample JCL for Assembling IN25UCOM 732 Adding Assembler DSECTs to the Symbolic File 732 Sample JCL for Adding Members to the Symbolic File 733 Sample JCL for Defining CORE Keywords 734 Unprotecting Main Storage with the User Exit IN25LETX 734 The IN25LETX COMMAREA 735 The LETX Table 735 Sample IN25LETX Program 736 Disabling IN25LETX 737 Adding COBOL File Structures to the Symbolic File 738 Specifying Abend Codes That Should Not Be Intercepted 739 Customizing Help for Abend Codes 741
1 Introduction
Chapter
Overview
dvantage CA-InterTest for CICS is a powerful interactive tool for testing and debugging CICS COBOL, PL/I, and Assembler programs. Testing and debugging is one of the most time-consuming and important phases of application development. The interactive testing facilities of Advantage CAInterTest dramatically improve testing efficiency and application quality. Advantage CA-InterTest works online to trap all application errors known to CICS. It lets you resolve multiple errors interactively as they occur, without having to recompile or end the test session.
11
Overview You never have to wait for printouts because Advantage CA-InterTest provides immediate, online access to your program's source listing and compiler information such as maps, cross-reference tables, and messagesinformation your online editor cannot provide.
12
Overview
CICSPlex Exploitation
Advantage CA-InterTest exploits the CICSPlex environment by monitoring a program wherever it executes in the CICSPlex. Breakpoint and other debugging information is sent to you, regardless of the region in which the program actually executes. Advantage CA-InterTest also supports non-CICSPlex MRO/ISC configurations.
Ease-of-Use Features
CICS programmers can quickly benefit from the many features of Advantage CAInterTest because it so easy to learn and use. Here are some of the reasons High-level, ISPF-like menu interface. Online access to source listings and compiler output The ability to perform most tasks directly from source listing displays A "fast path" for experienced users No need to worry about displacement or address changes after recompiling because all locations can be referenced by program-defined names (symbolic reference). A comprehensive Help facility that is available from every Advantage CAInterTest screen and directly from CICS, which includes detailed information about all CICS abend codes and Advantage CA-InterTest error messages. Demo sessions for COBOL, COBOL II, COBOL/370, PL/I, and Assembler users that demonstrate key Advantage CA-InterTest features and help train new users.
13
Overview
Display and Update Data Values from Your Source Listing Display
You can display and update any data values from the convenience of the Advantage CA-InterTest source code display without having to interrupt or leave your test session. Advantage CA-InterTest lets you invoke Keep windows from the Source Listing. These specialized windows display user-specified data values, registers, or storage area contents at breakpoints. You can also use the Keep window to automatically display the contents of all data items on the current program statement. From within the Keep window you can easily change any of the displayed items by simply overtyping their contents.
14
Overview
Code Coverage
The Code Coverage (or COUNTS) feature lets you view the number of times each program statement was executed during your program testing. This feature makes it easy to identify program statements that were or were not executedquickly identifying untested code. You can accumulate program statement counts across multiple executions of the same program.
15
Overview
Synchronized Processing
To ensure that the correct version of your source code is used, Advantage CAInterTest provides symbolic file and load module synchronization. When a program is selected for testing, Advantage CA-InterTest compares the date and time in the source listing to the date and time in the load module. If no matching files are found, Advantage CA-InterTest displays a File Selection List from which you can select the correct file.
16
Overview
his guide is for OS/390 systems running under CICS Releases 4.1 and above. It explains how to:
Install: Advantage CA-InterTest The Advantage CA-InterTest PL/I option COBOL Assembler PL/I
Apply maintenance and get support Do not use this guide to install Advantage CA-InterTest on: VSE systems OS/390 systems running CICS releases below 4.1 Separate installation tapes and guides are available for these systems. For additional information, contact Computer Associates. Contact information is in the Customer Support chapter.
21
1.
DSN=CAI.SAMPJCL (File number 9): This is an unloaded PDS containing all of the sample JCL referred to in this document that pertains to the installation and execution of Advantage CA-InterTest. Load using IEBCOPY. DSN=SMPMCS (File number 32): This file contains the SMP modification control statements (MCS) used by SMP to install Advantage CA-InterTest. Files beyond 32 are the SMP RELFILES, which SMP downloads to disk during RECEIVE processing. Comprehensive documentation that explains how to use, install, customize, and maintain Advantage CA-InterTest.
2. 3.
Tape Contents and Format The machine-readable program materials required for installation are distributed as a multifile installation tape in SMP format. This tape contains all of the necessary data to install and execute Advantage CA-InterTest. Distribution tapes contain pregenerated versions of Advantage CA-InterTest. The pregenerated versions use all of the default installation options. If you think you need to customize the product for a particular need, see the chapters on Advantage CAInterTetst for CICS and Additional Advantage CA-InterTest. Use the IBM-supplied System Modification Program/Extended (SMP/E) to install, customize, and maintain Advantage CA-InterTest. This program lets you control these activities in a consistent manner.
22
Summary of Changes for This Release Usability Enhancements - The CORE transaction now supports a new 'DUMP' pfkey which provides 'point and shoot' capability on address pointers which are displayed in the CORE menu. The Source/Load module date/time mismatch screen has been enhanced to show the load library name and volume of the mismatching load module for faster resolutiion of module date/time mismatches. Cursor Position scrolling is supported by the Source Listing Display transaction.
23
CNTL Menus
The CNTL menus are integrated with the new ITST Option 2 monitoring menus. However, the CNTL transaction is still available for existing users and accesses the CNTL Monitoring Command Builder menu. Regardless of access path, the CNTL menus remain essentially unchanged, with the following exceptions: A new USER ID field to limit monitoring to a specific user ID Removal of many PF key assignments, which affects your test session navigation Because many PF keys were removed, the CNTL menus cannot be used as the access path to other Advantage CA-InterTest functions. Use either the ITST menu options or the new Source Listing commands to access other Advantage CA-InterTest facilities.
24
25
3 Systemem Requirements
Chapter
his chapter helps you prepare for installation by listing the hardware and software components needed to install and operate Advantage CA-InterTest for CICS and by discussing cross-product considerations.
Topics discussed include: Operating environments Unicenter TNG Framework for OS/390 Common Services Hardware requirements for distribution and target libraries Special considerations Migration considerations
Operating Environments
The pregenerated versions provided on this tape support any MVS/ESA operating system running on any hardware with CICS Release 4.1 or above. This tape includes pregenerated versions of Advantage CA-InterTest for: CICS 4.1 CICS TS 1.2, 1.3, 2.1, and 2.2 Database management systems DL/I, DB2, and ADABAS are fully supported by the pregenerated versions without modification. If you need to support other systems (such as TOTAL, CA-IDMS or CA-Datacom) or calls to software that should not be monitored by Advantage CA-InterTest, see the chapter Handling Special Situations.
Unicenter TNG Framework for OS/390 Common Services Requirements The Unicenter TNG Framework for OS/390 Common Services must be installed or maintained at the genlevel indicated on the cover letter for the product. If you have other CA products installed at your site, some of these services may already be installed. If the Unicenter TNG Framework for OS/390 Common Services have not been installed already on your system, you must do so before proceeding with this installation. Refer to the Unicenter TNG Framework for OS/390 Getting Started guide for more information about Unicenter TNG Framework for OS/390 Common Services and for detailed installation instructions.
CAIRIM
CAIRIM, CAI Resource Initialization Manager, is the common driver for a collection of dynamic initialization routines that eliminate the need for user SVCs, SMF exits, subsystems, and other installation requirements commonly encountered when installing systems software. Some of the features of CAIRIM are: Obtaining SMF data Verification of proper software installation Installation of MVS interfaces Automatic startup of Computer Associates and other vendor products
CA LMP
The CA License Management Program provides a standardized and automated approach to the tracking of licensed software. It uses common realtime enforcement software to validate the users configuration. CA LMP reports on activities related to the license, usage, and financials of program solutions. CA LMP features include: A common Key Data Set that can be shared among many CPUs Using check digits to detect errors in transcribing key information Execution Keys can be entered without affecting any CA software solution already running
32
CA-Hardware Requirements
CAICCI
Advantage CA-InterTest installations that do not require CICSPlex support do not need to install CAICCI. However, if you plan to use Advantage CA-InterTest support for CICSPlex environments, CAICCI for MVS is required. For CICSPlex support, CAICCI must be installed in each MVS/CICS region that is a CICSPlex family member. CAICCI (CAI Common Communications Interface) enables Computer Associates products to communicate with one another. This facility provides a layer that isolates application software from the specifics of the communications environment. CAICCI is a started task used for sending messages between Computer Associates products. It usually runs continuously whenever the operating system is active. Advantage CA-InterTest uses CAICCI to facilitate testing and debugging in CICSPlex environments. In particular, it uses CAICCI to send and receive the monitoring commands to and from the CICSPlex family member CICS regions. This automatically propagates monitoring activity to all regions participating in the CICSPlex environment.
CA-Hardware Requirements
Distribution Libraries
Estimates for the amount of disk space needed to install Advantage CA-InterTest follow.
The following table estimates disk space for the distribution libraries required to install Advantage CA-InterTest. Name CAI.CBA6141D CAI.CBA6152D CAI.CBA6153D CAI.CBA6161D CAI.CBA6162D CAI.CBA60SLD Blksize 6144 6144 6144 6144 6144 3120 Blocks Dir. Blks. 600 600 600 600 600 250 50 50 50 50 50 30 Description Load modules CICS 4.1 Load modules CICS TS 1.2 Load modules CICS TS 1.3 Load modules CICS TS 2.1 Load modules CICS TS 2.2 Sample source and JCL
33
Special Considerations
Target Libraries
The following table estimates disk space for the target libraries required to install Advantage CA-InterTest. These libraries must be allocated if they do not already exist for some other Computer Associates product at your site. Name CAI.SAMPLIB CAI.CACICS41 CAI.CACICS52 CAI.CACICS53 CAI.CACICS61 CAI.CACICS62 CAI.PROTHLF CAI.PROTUHF CAI.PROTSYM CAI.PROTCPF Blksize 3120 6144 6144 6144 6144 6144 4096(CI) 4096(CI) 2048(CI) 4096(CI) Blocks Dir. Blks. 250 600 600 600 600 600 1000 1000 4500 5 30 50 50 50 50 50 N/A N/A N/A N/A Description Sample source library CICS 4.1 load library CICS TS 1.2 load library CICS TS 1.3 load library CICS TS 2.1 load library CICS TS 2.2 load library Help file (VSAM) User-defined help file for abend codes (VSAM) Symbolic file (VSAM) Checkpoint file (VSAM)
Special Considerations
Additional considerations apply under the circumstances described next.
PL/I Programs
PL/I programs that contain arrays must be recompiled with the IN25SYMP post-processor provided with version 6.1, or above, if the support for complex arrays is to be available.
34
Special Considerations
To disable Advantage CA-InterTest you must use the CNTL=END command. Failure to observe the above rules will disable monitoring. For example, Advantage CA-InterTest monitoring is not performed if another exit receives control before Advantage CA-InterTest and passes on a modified return code or entry point.
35
Special Considerations
CICSPlex Support
Advantage CA-InterTest provides special, optional support for CICS regions participating in a CICSPlex environment. If Advantage CA-InterTest is installed with CICSPlex support, participating CICS regions have Advantage CA-InterTest commands and breakpoints automatically propagated to all regions in the CICSPlex. This allows for easier debugging of dynamically routed transactions and programs. For details on which commands are propagated across a CICSPlex, refer to the Advantage CA-InterTest for CICS User Guide.
CPLXCKPI=hhmm (a checkpoint interval) For details on setting these options, see the chapter Modifying CA-InterTest for CICS Options.
NOTE: Support for multiple CICSPlex families within or across multiple MVS regions can be obtained by changing the CPLXFMID family name associated with each region.
36
Special Considerations
Database Support
Database management systems DL/I, DB2, and ADABAS are fully supported by the pregenerated versions without modification. If you need to support other systems (such as CA-IDMS, CA-Datacom, or TOTAL) or calls to software that should not be monitored by Advantage CA-InterTest, see the chapter Handling Special Situations
HOGAN Users
If you want Advantage CA-InterTest to support HOGAN, see the chapter Handling Special Situations for detailed instructions.
37
MRO Users
If you want Advantage CA-InterTest to support MRO, see the chapter Handling Special Situations for detailed instructions.
Omegamon Users
To use Advantage CA-InterTest with Omegamon Version 450 or subsequent versions: You must start Omegamon before you start Advantage CA-InterTest. If you are starting Omegamon with the PLT, you must add the Omegamon program EISET to the list of PLT program
To use Advantage CA-InterTest with Omegamon, Advantage CA-InterTest transactions must be excluded from the Omegamon Resource Limit (Time Out) Specification.
TMON Users
To use Advantage CA-InterTest with TMON, Advantage CA-InterTest transactions must be excluded from the TMON Resource Limit (Time Out) Specification.
Pre-existing Advantage CA-InterTest Customization If you have customized Advantage CA-InterTest (IN25OPTS, IN25LETX, IN25UCOM, IN25UEXI) make sure you redo the modifications after Advantage CA-InterTest is installed. Symbolic File Considerations The Symbolic Files from this release are downward compatible with Version 6.0 providing the release 6.0 compatibily PTF s are applied. Check your cover letter shipped with the product for the correct 6.0 PTF numbers needed for upward compatibility with the 6.1 symbolic file. Additionally, the Symbolic File format for 6.1 is compatible with InterTest/Batch 3.0. CICS Program Definition Requirements This release requires new Advantage CAInterTest programs. The resource definitions from previous releases will not work properly with this release. CICS/COMET Support Support is provided for both mixed- and macro-level programs controlled by Technologic Software's CICS/COMET.
38
Advantage CA-InterTest 6.0 to 6.1 Migration Considerations IN25UEXI Pregenerated IN25UEXI is provided for CA-IDMS, CA-Datacom, CA-Telon, CA-Sort, CA-Masterpiece, CA-InfoPoint, DB2, and MQSERIES, CICSPlex/SM, and TCP/IP Sockets Interface. CA-ACF2 and RACF Additional transactions must be granted unrestricted security. See CA-ACF2 and RACF Users for details.
39
dvantage CA-InterTest for CICS is installed using SMP/E. The installation process consists of: Installing required Unicenter TNG Framework for OS/390 Common Services Entering Advantage CA-InterTest product keys for CA LMP check Loading and modifying the supplied sample JCL library Allocating libraries Executing an SMP/E RECEIVE function Executing an SMP/E APPLY function Executing an SMP/E ACCEPT function Defining and loading the Help data set Creating the user-defined help file for abend descriptions (optional) Defining and loading the Symbolic File Creating the Checkpoint File Adding entries to the CICS tables Updating the CICS JCL and Startup parameters Installing DB2 support (optional) Executing the Check-out Program Installing PL/I support (optional)
NOTE: you MUST install the required Unicenter TNG Framework for OS/390 Common Services components before proceeding with an SMP/E installation of Advantage CA-InterTest.
41
The following list summarizes the steps involved in the Advantage CA-InterTest installation process. Review this list before installing Advantage CA-InterTest, and then use it as a checklist during the actual installation. 1. Review Advantage CA-InterTest system requirements. Be sure all of the requirements are met before installing Advantage CA-InterTest. 2. Enter the LMP codes for the Advantage CA-InterTest product. 3. Complete the Advantage CA-InterTest Installation Worksheet. Modify the default values that do not meet your data centers standards. Use the worksheet as a guide when modifying the installation JCL. 4. Load the sample installation JCL from the tape. 5. Allocate target and distribution libraries using member BA61ALC JCL. 6. If this is your first or only Computer Associates product, define the CA SMP data sets using sample JCL member BAINITE for SMP/E Release 1.4 or member BAINITE5 for SMP/E Release 1.5 or higher. Also, define SMP zones using BA61INIT. 7. Customize the SMP JCL procedures using the BA61SMPE member. 8. Execute an SMP RECEIVE function using the BA61REC JCL member. 9. Execute an SMP APPLY function using the BA61APP JCL member. 10. Execute an SMP ACCEPT function using JCL member BA61ACC. 11. Install the Help facility. a. Create the help file for user-defined abend descriptions (optional). 12. Create the Symbolic File. 13. Create the Checkpoint File. 14. Add the CICS table entries. 15. Update the CICS startup JCL and Startup parameters. 16. Install DB2 support (optional). 17. Restart CICS and run the check-out program.
42
Summary of Installation Steps 18. Install PL/I support, if licensed for this option. See the chapter PL/I Option Installation Steps for details. 19. Unload the documentation set. After installing Advantage CA-InterTest (and the PL/I option if you are licensed for it), adjust the compile and assemble procedures for COBOL, COBOL II and higher, Assembler, and PL/I programs so that Advantage CA-InterTest can obtain symbolic information. Existing users should begin by reviewing ITST Option 8 Whats New. New users should begin by using the demo programs before using Advantage CA-InterTest on their own programs.
Using CA LMP
Advantage CA-InterTest requires CA LMP (License Management Program), one of the Unicenter TNG Framework for OS/390 Common Services, to initialize correctly. CA LMP also provides a standardized and automated approach to the tracking of licensed software. Examine the CA LMP Key Certificate you received with your Advantage CAInterTest installation or maintenance tape. The certificate provides an LMP key for the Advantage CA-InterTest base product and, if you have purchased the PL/I Symbolic Option or Advantage CA-SymDump, an additional key for each option purchased.
43
Summary of Installation Steps The certificate contains the fields shown in the following table. Fields Product Name Supplement Descriptions The trademarked or registered name of the Advantage CAInterTest licensed for the designated site and CPUs. The reference number of your license for Advantage CAInterTest in the format nnnnnn nnn. This format differs slightly inside and outside North America and may not be provided in some cases. The date your license expires in the format MONTH dd, yyyy (as in OCTOBER 21, 2001). The name of the technical contact at your site who is responsible for the installation and maintenance of Advantage CA-InterTest. This is the person to whom CA addresses all CA LMP correspondence. The name of the Director of MIS or the person who performs that function. If the title, but not the individuals name, is indicated on the Certificate, supply the actual name when correcting and verifying the Certificate. The address of the building where the CPU is installed. An encrypted code required by CA LMP for Advantage CA-InterTest initialization. During installation, it is referred to as the LMP Code. A two-character code that corresponds to Advantage CAInterTest. The code that identifies the specific CPU on which this installation of Advantage CA-InterTest is valid.
MIS Director
CA LMP is provided as an integral part of CAIRIM (Resource Initialization Manager), one of the Unicenter TNG Framework for OS/390 Common Services. Once CAIRIM has been installed or maintained as specified in the cover letter for this product release, CA LMP support is available for all CA LMP-supported software solutions.
44
Summary of Installation Steps The CA LMP execution key, provided on the Key Certificate, must be added to the CAIRIM parameters to ensure proper initialization of the Computer Associates software solution. To define a CA LMP execution key to the CAIRIM parameters, modify member KEYS in OPTLIB data set. The parameter structure for member KEYS is shown next.
PROD(pp) DATE(ddmmmyy) CPU(tttt-mmmm/ssssss) LMPCODE(kkkkkkkkkkkkkkkk)
Required. The two-character product code. For any given CA LMP software solution, this code agrees with the product code already in use by the CAIRIM initialization parameters for earlier genlevels of Advantage CA-InterTest. ddmmmyy The CA LMP licensing agreement expiration date. tttt-mmmm Required. The CPU type and model (for example: 3090-600) on which the CA LMP software solution is to run. If the CPU type or model requires less than four characters, blank spaces are inserted for the unused characters. ssssss Required. The serial number of the CPU on which the CA LMP software solution is to run. kkkkkkkkkkkkk Required. The execution key needed to run the CA LMP software solution. This CA LMP execution key is provided on the Key Certificate shipped with each CA LMP software solution. An example of a control card for the CA LMP execution software parameter is shown next. In this example, the CA LMP execution key value is invalid and provided as an example only.
PROD(BA) DATE(01JAN94) CPU(3090-600 /370623) LMPCODE(52H2K06130Z7RZD6)
pp
For a full description of the procedure for defining the CA LMP execution key to the CAIRIM parameters, see the Unicenter TNG Framework for OS/390 Common Services Getting Started
45
Enter CA LMP Key Information for the PL/I Symbolic and Advantage CA-SymDump Options
If you purchased the PL/I Symbolic Facility or the Advantage CA-SymDump option, you received an additional Execution Key for each option you purchased. To define these CA LMP execution keys to the CAIRIM parameters, modify member KEYS in the OPTLIB data set (see the section, Using CA LMP, for instructions).
What is your installations generic unit name for the shipped installation tape? Default: TAPE=TAPE TAPE=______________
3.
What is your installation standard SYSOUT class for Computer Associate product installationss and SMP output? Default: SYSOUT=* SYSOUT=___________
4.
What is the dsname high-level qualifier for the Advantage CA-InterTest installation libraries (both target and distribution libraries)? Default: CAI=CAI. a. Default: TARGET= Default: DLIB= c. Default: PUNIT=SYSDA CAI=_______________ TARGET=___________ DLIB=______________ PUNIT=____________ What VOL=SER do you want to use for the target libraries?
b. What VOL=SER do you want to use for the distribution libraries? What is your installation generic unit name for the above library volumes?
46
Summary of Installation Steps 5. What is the dsname high-level qualifier for the SMP libraries to be used for the installation of Computer Associate products? Default: CAISMP=CAI. a. CAISMP=___________ What VOL=SER do you want for the SMP libraries, if these libraries do not already exist? VOLSER=___________
Default: VOLSER=
b. What is your installation generic unit name for the permanent DASD SMP volumes? Default: PERMDA=SYSDA 6. PERMDA=__________
What VOL=SER do you want for the SMP temporary libraries? TLIB=______________
//SYSPRINT DD SYSOUT=A //SYSUT1 DD DISP=(OLD,KEEP), // DSN=CAI.SAMPJCL, // UNIT=CART, <=== generic 3480 tape cartridge // VOL=SER=BAyymm, <=== tape label // LABEL=(9,SL) //SYSUT2 DD DISP=(NEW,CATLG,DELETE), // DSN=CAI.INTERTST.SAMPJCL, <=== your DSN // UNIT=SYSDA, <=== your generic DASD // VOL=SER=XXXXXX, <=== permanent DASD volser // SPACE=(3120,(40,20,10)), <=== minimum space required // DCB=(LRECL=80,BLKSIZE=3120,RECFM=FB) //SYSUT3 DD UNIT=SYSDA, // SPACE=(TRK,(5,5)) //SYSUT4 DD UNIT=SYSDA, // SPACE=(TRK,(5,5)) //SYSIN DD DUMMY
Once this job has ended, your library will contain all of the JCL needed to complete the installation of Advantage CA-InterTest. To satisfy your data centers needs, certain tailoring of the JCL is necessary while executing the steps on the following pages. Refer to the Installation Worksheet you completed earlier in this chapter to obtain values for the various JCL parameters.
47
Member BA61ALC allocates all of the target and distribution libraries required by Advantage CA-InterTest during installation and maintenance. However, many Computer Associates products have common components and libraries that may already have been installed. Therefore, carefully analyze the installation steps to ensure that completed steps are not repeated. Edit the JCL to conform to your installation standards and the previously completed worksheet. However, never change any of the ddnames or the last qualifier of the data set names. All space allocations supplied in this member are in blocks to allow for compatibility between DASD types. The allocations given are the minimum required for installing Advantage CA-InterTest. You may want to adjust these for your installation device types, and to allow enough free space for maintenance (the more free space you allocate, the less often the libraries will be compressed during maintenance). For common libraries that are already present, be sure there is sufficient space for Advantage CA-InterTest. Submit member BA61ALC and review the output.
This JOB produces condition code 16 and a short status report. The report shows the SMP level in both the title line and the termination message. The release is the second digit of the level (for example, LVL 15.11 indicates Version 1, Release 5, Modification level 11).
49
WARNING! To ensure proper installation and maintenance of this product, all SYSMODs specified in the SMP control statements for this job must be selected. During the APPLY and ACCEPT steps, SMP propagates all zones that are appropriate for the product. Eliminatiing any SYSMOD from the installation process may cause failures in customization or future maintenance of the product.
WARNING! To ensure proper installation and maintenance of this product, all SYSMODs specified in the SMP control statements for this job must be selected. During the APPLY and ACCEPT steps, SMP propagates all zones that are appropriate for the product. Eliminating any SYSMOD from the installation process may cause failures in customization or future maintenance of the product.
410
WARNING! If your site has previously installed Advantage CA-SymDump as a separate product and you are installing Advantage CA-InterTest only on a trial basis, skip this step. If you perform this step, you will not be able to restore your libraries back to the original Advantage CA-SymDump installation. Once the product has been purchased and licensed, you must perform this step before any additional maintenance can be applied.
Edit the JCL to conform to your installation standards and the previously completed worksheet. Review and edit the SMP SELECT control statement as described in the sample JCL. If other Computer Associates products have been installed some of these functions may have been accepted already. If this is the case, a return code of 12 will occur. Remove the failing SYSMODs and resubmit the job. SMP/E users have the option of specifying the operand REDO on the ACCEPT command statement and should expect an SMP return code of 8, which is permissible in this case. Submit the job and review the output to verify that the ACCEPT process ran successfully. If the ACCEPT process completed with an SMP return code greater than 4, view the output, correct the problem, and resubmit the job. We strongly recommend that you accept the Advantage CA-InterTest product immediately after you have successfully run the APPLY process. This ACCEPT step provides a backup of the base product on the distribution libraries. This backup is necessary for future SMP restores. Buddy TipTo ensure proper installation and maintenance of this product, all SYSMODs specified in the SMP control statements for this job must be selected. During the APPLY and ACCEPT steps, SMP propagates all zones that are appropriate for the product. Eliminating any SYSMOD from the installation process may cause failures in customization or future maintenance of the product.
Step 11. Install the Advantage CA-InterTest for CICS Help Facility
NOTE: If your site has previously installed Advantage CA-SymDump as a separate product, skip this step.
The member DEFHELP creates and loads the VSAM file that contains the Advantage CA-InterTest online help information. Edit the JCL to conform to your installation standards and the previously completed worksheet. This member and other referenced members are found in the CAI.SAMPLIB library after the APPLY step.
411
Summary of Installation Steps The member DEFUHLP creates the VSAM file that contains the user-defined abend description information. Edit the JCL to conform to your installation standards and the previously completed worksheet. This member and other referenced members are found in the CAI.SAMPLIB library after the APPLY step.
NOTE: If your site has previously installed Advantage CA-SymDump as a separate product, skip this step. However, if you want to expand your Symbolic File at this time, you can optionally perform this step.
The member DEFSYM creates the PROTSYM VSAM file, which contains the symbolic information and source listings for your application programs. Edit the JCL to conform to your installation standards and the previously completed worksheet. Note the following items when creating the Symbolic File: Do not specify a secondary space allocation. The DEFSYM utility job (running the IN25UTIL program) could run for a long time depending on the size of the file. This occurs only the first time after the file is created by the IDCAMS job. Each Symbolic File has an upper limit of about four million 2 KB records and holds approximately 147,000 programs. The Symbolic File Maintenance chapter explains how to delete members. The Symbolic File must not reside in the LSR pool.
412
Step 13. Create the Advantage CA-InterTest for CICS Checkpoint File
The member DEFCKPT creates the Checkpoint File that is used to periodically record the status of Advantage CA-InterTest for a possible restart. Edit the JCL to conform to your installation standards and the entries on the previously completed worksheet. See the chapter Monitoring Menu Options in the Advantage CA-InterTest User Guide for information on the checkpoint recording facility.
The use of the Advantage CA-InterTest transactions ISER, VIRC, and VTAT must not be protected to a specific signon, and for CA-ACF2 and RACF users must meet the special considerations given in the chapter System Requirements. Do not change any of the options specified for the Advantage CA-InterTest entries. If you believe there is an error in any of the entries, contact Computer Associates Technical Support.
If you use DD statements in your CICS startup JCL then your Advantage CA-InterTest files, as defined in the CSD, require DD statements in the JCL for CICS. DISP=SHR must be specified for PROTSYM to allow batch compiles to run concurrently with CICS. Sample DD statements are shown next:
413
Refer to the SYMFIL option in the chapter Modifying Advantage CA-InterTest for CICs Options if you need more than one Symbolic File. Also, add the Advantage CA-InterTest load library to the DFHRPL in the CICS startup JCL for your release of CICS:
// // // // // DD DD DD DD DD DSN=CAI.CACICS41,DISP=SHR DSN=CAI.CACICS52,DISP=SHR DSN=CAI.CACICS53,DISP=SHR DSN=CAI.CACICS61.DISP=SHR DSN=CAI.CACICS62.DISP=SHR CICS 4.1 CTS 1.2 CTS 1.3 CTS 2.1 CTS 2.2
CICS Startup DSA Limit parameter - Advantage CA-InterTest for CICS makes calls to IEWBIND when using the new online COMPOSITE module command and IEWBIND requires about 750k of below the line storage. To ensure there is sufficient storage available (below the line for IEWBIND calls), you must insure that your DSALIM is at least 750k less than your below the line private area size. Failure to do this could result in S0F4 and U900 abends in your CICS region during dump capture.
414
Summary of Installation Steps 3. The DBA must grant Bind and Execute authority to the plan created in Step 2.
415
416
Summary of Installation Steps The following table describes the sequential files that are provided on the product tape and lists the commands you can issue to transfer them to a PC. OS/390 Name/Description prefix.CAINT61.BKSHELF Bookshelf definition prefix.CAINT61.BKINDEX Search index OS/390 Format Variable block ASCII CRLF File Transfer Command on PC RECEIVE <dir>\CAINT61.BKS prefix.CAINT61.BKSHELF
prefix.CAINT61.INT61OG1 Fixed block RECEIVE Getting Started LRECL 4096 Binary <dir>\INT61OG1.BOO prefix.CAINT61.INT61OG1 prefix.CAINT61.INT61OM1 Fixed block RECEIVE Message Guide LRECL 4096 Binary <dir>\INT61OM1.BOO prefix.CAINT61.INT61OM1 prefix.CAINT61.INT61OU1 Fixed block RECEIVE User Guide LRECL 4096 Binary <dir>\INT61OU1.BOO prefix.CAINT61.INT61OU1 prefix.CAINT61.INT61OA1 Assembler Primer prefix.CAINT61.INT61OC1 COBOL Primer prefix.CAINT61.INT61OP1 PL/I Primer Fixed block RECEIVE LRECL 4096 Binary <dir>\INT61OA1.BOO prefix.CAINT61.INT61OA1 Fixed block RECEIVE LRECL 4096 Binary <dir>\INT61OC1.BOO prefix.CAINT61.INT61OC1 Fixed block RECEIVE LRECL 4096 Binary <dir>\INT61OP1.BOO prefix.CAINT61.INT61OP1
417
If available, use WinZip 6.2 or above. Save the restored files to the drive and directory of your choice. Use one of the following methods: If available, use WinZip 6.2 or above. Save the restored files to the drive and directory of your choice. Enter the following at a command prompt:
gzip d BA61PDF.tgz pax r f BA61PDF.tar
For UNIX (Including OS/390 USS and Linux) Use one of the following sets of commands:
gzip d BA61PDF.tgz pax r f BA61PDF.tar uncompress BA61PDF.tar.z tar xvf BA61PDF.tar
Move the files to the drive and directory of your choice. Start your Adobe Acrobat Reader to open the restored PDF files.
418
For Advantage CA-InterTest regions installed with CICSPlex support (CICSPLEX=YES in IN25OPTS), the CNTL=START and CNTL=RESTART commands automatically have Advantage CA-InterTest resynchronize monitoring with any active regions in the CICSPlex. The Automatically Starting Advantage CAInterTest chapter explains how to start Advantage CA-InterTest automatically with your CICS system. At this time, you can compile and assemble your programs with the Advantage CA-InterTest symbolic post-processor programs as described in the Symbolic Support chapter. These programs let you use symbolic references during testing. Remember, however, that you do not have to compile your programs with one of the Advantage CA-InterTest symbolic post-processor programs. All of the Advantage CA-InterTest monitoring facilities are available for current programs without recompiling or reassembling them. We do recommend that you recompile or reassemble current programs if Advantage CA-InterTest detects errors because symbolic support greatly facilitates debugging.
419
Option Installation Steps To activate Advantage CA-InterTest at CICS startup, you can: Manually activate Advantage CA-InterTest by issuing the CNTL=START command. Automatically activate Advantage CA-InterTest using the PROMMAC macro or the IN25PLT PLTPI program. For details, see the section Automatically Starting Advantage CA-InterTest for CICS.
For regions using the CICSPlex support option, you can issue the following command to concurrently deactivate Advantage CA-InterTest in all connected CICSPlex regions:
CNTL=END,SCOPE=GLOBAL
Advantage CA-InterTest maintains a permanent service task that runs under the transaction ID ISER. The program is IN25SERV. CICS cannot complete a normal shutdown until this task ends. It is important that you deactivate Advantage CAInterTest before CICS shutdown to terminate this task. To deactivate Advantage CA-InterTest at CICS shutdown, you can do one of the following: Manually deactivate Advantage CA-InterTest by issuing the CNTL=END command. Automatically deactivate Advantage CA-InterTest using the IN25PLTE program. If you add this Advantage CA-InterTest-supplied shutdown PLT program to your shutdown program list, Advantage CA-InterTest will be deactivated automatically at normal CICS termination. Add the following Advantage CA-InterTest PLTSD entry before DFHDELIM so that it is part of Stage 1 processing:
DFHPLT TYPE=ENTRY,PROGRAM=IN25PLTE
If you are licensed to install and use the Advantage CA-InterTest PL/I option, you must perform the following SMP/E RECEIVE, APPLY, and ACCEPT procedures in addition to the base product installation. The PL/I option installation procedure uses the same target and distribution libraries as Advantage CA-InterTest.
NOTE: If you did not modify member KEYS in the OPTLIB data set to include the PL/I option LMP key, you must do this to successfully run the PL/I option. See the section Step 2. Enter LMP Product Key Certificate Information for instructions.
420
Option Installation Steps Installation Checklist The following list summarizes the steps involved in the PL/I option installation.
NOTE: If your site has previously installed Advantage CA-SymDump for CICS as a separate product with PL/I support, skip these steps.
Step 1. Execute an SMP RECEIVE function using the MA61REC JCL member. Step 2. Execute an SMP APPLY function using the MA61APP JCL member. Step 3. Execute an SMP ACCEPT function using the MA61ACC JCL member.
421
Automatically Starting Advantage CA-InterTest for CICS Member MA61ACC accepts all of the components (functional SYSMODs) of the Advantage CA-InterTest PL/I option to the distribution libraries. Edit the JCL to conform to your installation standards and the previously completed worksheet. Submit the job and review the output to verify that the ACCEPT process ran successfully. If the ACCEPT process completed with an SMP return code greater than 4, view the output, correct the problem, and resubmit the job. We strongly recommend that you accept the Advantage CA-InterTest PL/I option product immediately after you have successfully run the APPLY process. This ACCEPT step provides a backup of the base product on the distribution libraries. This backup is necessary for future SMP restores.
or
CNTL=EXEC,MODULE=tablname
Where tablname is the name of the load module generated by the assembly of the PROMMAC macros. You can generate several alternate modules with different names, each with a CICS program definition, if you want alternate ways to start Advantage CA-InterTest or execute CNTL commands. If the PROMD=tablname option is specified in the IN25OPTS macro, you can achieve the same result by specifying:
CNTL=START
422
Automatically Starting Advantage CA-InterTest for CICS If the CNTL=START command is issued from a CRT terminal or CRLP-type terminal (a terminal whose input and output are two sequential files; see the IBM CICS System Programmer's Guide), the commands from the load module are displayed back. For a CRT terminal, there is a small time delay before each command is executed so the user can see what is being done. The first positional parameter of the PROMMAC macro contains the CNTL command to be executed. The command must be enclosed in apostrophes. If the table is to be used by the CNTL=START command, the first PROMMAC macro must contain this command:
'CNTL=START,PROM=nn,PROX=nn'
Where nn sets the sizes of the internal Advantage CA-InterTest tables. The second positional parameter of the PROMMAC macro must contain END. It must be coded in the last PROMMAC macro before the END statement. Any CNTL command can be specified except CNTL=LIST and CNTL=INQ. Sample PROMMAC Macros - The following JCL is suitable for OS/390 installations. These examples are shown for illustration purposes only. See the Advantage CA-InterTest for CICS User Guide for more information.
//PROMAC JOB (NTSM,473),'JOHN BROWN',CLASS=D,MSGCLASS=A
//ASSEM EXEC PGM=IEV90,REGION=512K, // PARM='XREF(SHORT),DECK,NUM,LIST,ALIGN,NOOBJ' //* //SYSLIB DD DSN=CAI.SAMPLIB,DISP=SHR //SYSUT1 DD SPACE=(CYL,(1,1)),UNIT=SYSDA //SYSUT2 DD SPACE=(CYL,(1,1)),UNIT=SYSDA //SYSUT3 DD SPACE=(CYL,(1,1)),UNIT=SYSDA //SYSPUNCH DD DSN=&OBJ,SPACE=(TRK,(1,1)),UNIT=SYSDA, // DCB=(BLKSIZE=800,LRECL=80,RECFM=FB),DISP=(,PASS) //SYSPRINT DD SYSOUT=A //SYSIN DD * PROMMAC 'CNTL=START,PROM=20,PROX=5' PROMMAC 'CNTL=ABP,ON,T321' PROMMAC 'CNTL=ON,PROG=(CFIL,TERMIO,FILEIO,ERRORS,SCAN,LLASRCH), USR=.ANY' PROMMAC 'CNTL=EXCL,PROG=(TERMIO,FILEIO)' PROMMAC 'CNTL=ON,PROG=PBMASTER,FOL=ON,USR=.ANY' PROMMAC 'CNTL=PURGE,INTRVAL=0100',END END /* //LINK EXEC PGM=IEWL,PARM='LIST,XREF,MAP',REGION=512K //SYSLMOD DD DSN=CAI.CACICSxx(PROMAC),DISP=SHR //SYSUT1 DD UNIT=SYSDA,SPACE=(TRK,(10,10)) //SYSPRINT DD SYSOUT=A //SYSLIN DD DSN=&&OBJ,DISP=(OLD,DELETE) // NOTE: A CICS program definition named PROMAC is required for the generated table. In the SYSLMOD DD statement, replace xx with your two-digit CICS release number (for example, 41 for CICS 4.1, 52 for CTS 1.2, or 53 for CTS 1.3).
423
2. 3.
Add a PPT entry for the load module. Set the following Advantage CA-InterTest options (see the Modifying Advantage CA-InterTest for CICS section Advantage CA-InterTest for CICS chapter):
RECNTMU=NO
RECNTNW=NO
4.
Replace the CNTL commands in the sequential input with the following command:
CNTL=START,PROM=name
Where name is the name of the module that was created in Step 1.
Where tablname is the name of the load module assembled through PROMMAC macros (see the section Using the PROMMAC Macro). The table name must be followed by a space. If the CNTL task to be automatically initiated is to own a terminal, be sure that the terminal is in service and has the ATI (automatic task initiation) capability when the CNTL task is started. Issuing CNTL Commands from a Program - You can issue any CNTL command using the EXEC CICS START command. However, for the CNTL=START command, the only permitted format is:
424
If the CNTL task is activated at a terminal, response messages are displayed there and the command is executed as if someone had entered it from that terminal. For example, if the CNTL command sets a breakpoint, the from and to terminals are the terminal at which the task was activated. After Advantage CA-InterTest is started, a program can issue an EXEC CICS START command with the data record containing:
CNTL=EXEC,MODULE=tablname
The IN25PLT program can be called by another user-written PLT program that passes a valid Advantage CA-InterTest start command in a COMMAREA to IN25PLT. An example is given below:
INTSTART DC C'CNTL=START,PROM=PROMTABL ...' . . . EXEC CICS LINK PROGRAM('IN25PLT') COMMAREA(INTSTART) LENGTH(=Y(L'INSTART))
The transient data destination specified in the GLOG= Advantage CAInterTest option must be defined to CICS and must be opened. See the section Modifying Advantage CA-InterTest for CICS Options in the Avantage CA-InterTest for CICSchapter for details. The group DFHINQUI must be defined in the CICS startup list for IN25PLT to execute. The Advantage CA-InterTest Help file, PROTHLF, must be defined and available.
425
426
Overview
f you are licensed to install and use the CA-InterTest PL/I option, you must perform the following SMP/E RECEIVE, APPLY, and ACCEPT procedures in addition to the base product installation. The PL/I option installation procedure uses the same target and distribution libraries as CA-InterTest.
If you did not modify member KEYS in the OPTLIB data set to include the PL/I option LMP key, you must do this to successfully run the PL/I option.. Installation Checklist - The following list summarizes the steps involved in the PL/I option installation.
NOTE: If your site has previously installed CA-SymDump for CICS as a separate product with PL/I support, skip these steps.
1. 2. 3.
Execute an SMP RECEIVE function using the MA61REC JCL member. Execute an SMP APPLY function using the MA61APP JCL member. Execute an SMP ACCEPT function using the MA61ACC JCL member.
Member MA61REC receives all of the components (functional SYSMODs) of the CA-InterTest PL/I option and executes the procedure edited in Step 7, Customize the SMP Procedure in the Base Product Installation Steps chapter. Edit the JCL to conform to your installation standards and the previously completed worksheet. Submit the job and review the output to verify that the RECEIVE process ran successfully. If the RECEIVE process completed with an SMP return code greater than 4, review the output, correct the problem, and resubmit.
51
52
6 Symbolic Support
Chapter
o be able to use symbolic references in COBOL, Assembler, and PL/I programs, you must make a one-time change to your compile and assemble procedures. This new procedure will not change your program or load module in any way. It simply runs a Advantage CA-InterTest program to save information for online use. The new procedure can be executed by as many concurrent jobs as necessary. Concurrent compiles or assemblies do not interfere with each other in updating the Symbolic File. After you change your compile and assemble procedure, you should compile and assemble a few CICS programs to test the new procedure.
COBOL Compilers
The post-processor program that you use to change your compile procedure depends on your COBOL compiler. The sample JCL described later in this section explains which post-processor to use. Here is how the Advantage CA-InterTest post-processor works: 1. The Advantage CA-InterTest post-processor operates after your compiler step and collects information from the compiler's //SYSPRINT DD statement. 2. This temporary data set is passed to the Advantage CA-InterTest job step through the //INPUT DD statement. 3. The original input from your compiler's //SYSPRINT is written to the //OUTPUT DD data set declared in the Advantage CA-InterTest job step. This data set is specified in the same way as the //SYSPRINT DD was specified for the compile without Advantage CA-InterTest. 4. Messages from the Advantage CA-InterTest program are written to the ...//MESSAGE DD SYSOUT=... statement to be printed. 5. The Advantage CA-InterTest Symbolic VSAM File is referenced through the //PROTSYM DD statement with DISP=SHR. 6. Old records in the PROTSYM file are replaced by new ones during each run of the Advantage CA-InterTest program. See the Symbolic File Maintenance chapter for instructions on removing old program data from the file.
61
Suppress Compiler Generated Line Numbers Data Division Map Verb Names Cross-Reference of Data Names & Cross-Reference of Paragraph Names Condensed Procedure Division Map ASSEMBLER-like Procedure Division Map
CLIST or PMAP
OFFSET or LIST
See the section Additional Notes for COBOL Programs in this chapter for other compiler considerations.
About Symbolic Support If you are using the NOCOPT option, use the options for IBM COBOL compilers specified in the previous section. See the CA-Optimizer User Guide or CAOptimizer/II User Guide for more information. CA-Optimizer MLIST NONUM DMAP CA-Optimizer/II MLIST or MOFFSET NONUMBER MAP or MMAP INTERTST Produces Integrated Procedure Division Map Suppress Compiler-Generated Line Numbers Data Division Map Advantage CA-InterTest requirement. Indicates that the program is being optimized for use with Advantage CAInterTest. Cross-Reference of Data Names and Cross-Reference of Paragraph Names
XREF
XREF
63
About Symbolic Support The only required field on the parameter statement is a program name. The program name is the name in the CICS program definition or, for composite support, the monitor-name.
If you pass options using a control card, the program name must start in column 1. The following example saves symbolic references for the program named ORDEDIT using a control card:
COL = 1...5....0
ORDEDIT
NOTE: Specify the CUTPRINT parameter only when you do not want all or part of your listing printed. The entire listing will be printed if this parameter is missing from the parameter statement.
Saving Your Listing for Online Display with the LISTER Option
You can also request that all or a portion of your source code be saved for online viewing. If saved, Advantage CA-InterTest automatically displays the relevant part of the listing when a breakpoint occurs. To make this request you must add one of the following keywords to the parameter statement: ,LISTER=ALL saves the entire COBOL listing ,LISTER=MAP saves only the parts that precede the Data Division map (recommended for COBOL) ,LISTER=REF saves only the parts that precede the data names CrossReference list (recommended for COBOL II)
64
About Symbolic Support For example, to save the symbolic references for the program ORDEDIT, not print any portion of the listing, and save the source code portion of the program, specify the following:
ORDEDIT,CUTPRINT=ALL,LISTER=MAP
NOTES: If the LISTER parameter is omitted, no listing is saved in the Symbolic File. If only the LISTER parameter is specified, it must follow the program name.
Buddy TipWe recommend that you use LISTER=MAP for COBOL and LISTER=REF for COBOL II foe minimum overhead and disk space usage.
In the following example, the parameter specification records the symbolic references for the program ORDEDIT, prints the listing, does not save any portion of the listing, and does not allow symbolic data to be removed from the Symbolic File by a purge interval batch run.
ORDEDIT,NOPURGE
In the next example, the parameter specification records the symbolic references for the program ORDEDIT, does not print a copy of the listing, does not save any portion of the listing, and does not allow data to be removed from the Symbolic File by a purge interval batch run.
ORDEDIT,CUTPRINT=ALL,NOPURGE
In this example, the parameter specification records the symbolic references for the program ORDEDIT, does not print a copy of the listing, saves the source code portion of the listing for online display, and does not allow data to be removed from the Symbolic File by a purge interval batch run.
ORDEDIT,CUTPRINT=ALL,LISTER=MAP,NOPURGE
65
//* YOUR EXISTING //* (IF DOING // // //* YOUR EXISTING //* THE FOLLOWING //*
CICS PREPROCESSOR JCL GOES HERE A COMMAND LEVEL COMPILE) COBOL OR CA-OPTIMIZER JCL GOES HERE WITH MODIFICATIONS:
//* IF THE COMPILER GIVES A RETURN CODE NOT HIGHER THAN 4 //* //* RUN THE ADVANTAGE CA-INTERTEST POST-PROCESSOR //* //* BELOW, THE //STEPLIB AND THE //STEPCAT MAY BE UNNECESSARY. //* 2-> //GENPARM EXEC PGM=IN25PARM,PARM='PARAMETER STATEMENT' 2-> //STEPLIB DD DSN=CAI.CACICSxx,DISP=SHR 2-> //CARDS DD DSN=&&CARDS,DISP=(,PASS),UNIT=SYSDA, SPACE=(TRK,(1,1)) //* //POSTCOB EXEC PGM=IN25SYMC,COND=(4,LT,COBOL),REGION=512K //SYSUDUMP DD SYSOUT=A //STEPLIB DD DSN=CAI.CACICSxx,DISP=SHR //INPUT DD DSN=&&INPUT,DISP=(OLD,DELETE) //OUTPUT DD SYSOUT=A,DCB=(RECFM=FBA,LRECL=121,BLKSIZE=2420) //MESSAGE DD SYSOUT=A //PROTSYM DD DSN=INTRTST.PROTSYM,DISP=SHR 3-> //CARDS DD DSN=&&CARDS,DISP=(OLD,DELETE) //* //* IF THE COMPILER GIVES A RETURN CODE HIGHER THAN 4 //* THEN RUN AN IEBGENER TO PRINT THE COBOL LISTING //* //PRINT EXEC PGM=IEBGENER,COND=(5,GT,COBOL) //SYSPRINT DD DUMMY //SYSIN DD DUMMY
66
In the STEPLIB DD statements, replace xx with your two-digit CICS release number (for example: 41 for CICS 4.1, 52 for CTS 1.2, or 53 for CTS 1.3). The following JCL modifications must be made to your existing compile procedure: 1. Specify the //SYSPRINT data set in the COBOL/VS compiler or CA-Optimizer step. 2. Insert a new job step to execute the Advantage CA-InterTest program after the compiler or CA-Optimizer step. This JCL example assumes that you will pass the parameter statement in the PARM parameter of the EXEC statement. If you prefer to pass the parameter statement using a control card: 1. Remove all of the statements in the example that are marked by a 2->. 2. Change the following JCL statement:
3->//CARDS DD DSN=&&CARDS,DISP=(OLD,DELETE)
to
3->//CARDS DD *
3.
COBOL II, CA-Optimizer/II, COBOL/370, IBM COBOL for MVS, or IBM COBOL for OS/390 Example
All changes to the normal procedure are specified by ->.
//*
//* YOUR EXISTING //* (IF DOING // // //* YOUR EXISTING //* THE FOLLOWING //*
CICS PREPROCESSOR JCL GOES HERE A COMMAND LEVEL COMPILE) COBOL II OR CA-OPTIMIZER/II JCL GOES HERE WITH MODIFICATIONS:
For COBOL II, COBOL/370, IBM COBOL for MVS, or IBM COBOL for OS/390 only:
1-> //SYSPRINT DD DSN=&&INPUT,DISP=(,PASS),UNIT=SYSDA,
//* IF THE COMPILER GIVES A RETURN CODE NOT HIGHER THAN 4 //* RUN THE ADVANTAGE CA-INTERTEST POST-PROCESSOR //* //* BELOW, THE //STEPLIB AND THE //STEPCAT MAY BE UNNECESSARY. //* 2-> //GENPARM EXEC PGM=IN25PARM,PARM='PARAMETER STATEMENT' 2-> //STEPLIB DD DSN=CAI.CACICSxx,DISP=SHR 2-> //CARDS DD DSN=&&CARDS,DISP=(,PASS),UNIT=SYSDA,SPACE=(TRK,(1,1)) //* //POSTCOB EXEC PGM=IN25COB2,COND=(4,LT,COBOL),REGION=512K //SYSUDUMP DD SYSOUT=A //STEPLIB DD DSN=CAI.CACICSxx,DISP=SHR //INPUT DD DSN=&&INPUT,DISP=(OLD,DELETE) //OUTPUT DD SYSOUT=A,DCB=(RECFM=FBA,LRECL=133,BLKSIZE=2660) //* //MESSAGE DD SYSOUT=A //PROTSYM DD DSN=INTRTST.PROTSYM,DISP=SHR 3-> //CARDS DD DSN=&&CARDS,DISP=(OLD,DELETE) //* //* IF THE COMPILER GIVES A RETURN CODE HIGHER THAN 4 //* THEN RUN AN IEBGENER TO PRINT THE COBOL LISTING //* //PRINT EXEC PGM=IEBGENER,COND=(5,GT,COBOL) //SYSPRINT DD DUMMY //SYSIN DD DUMMY //SYSUT1 DD DSN=&&INPUT,DISP=(OLD,DELETE) //SYSUT2 DD SYSOUT=A //* //* YOUR EXISTING LINKAGE-EDITOR JCL GOES HERE
In the STEPLIB DD statements, replace xx with your two-digit CICS release number (for example: 41 for CICS 4.1, 52 for CTS 1.2, or 53 for CTS 1.3). The following JCL modifications must be made to your existing compile procedure: 1. Specify the //SYSPRINT data set in the COBOL II compiler or CA-Optimizer/II step. 2. Insert a new job step to execute the Advantage CA-InterTest program after the compiler or CA-Optimizer/II step.
68
About Symbolic Support This JCL example assumes that you will pass the parameter statement in the PARM parameter of the EXEC statement. If you prefer to pass the parameter statement using a control card: 1. Remove all of the statements in the example that are marked by a 2->. 2. Change the following JCL statement:
3->//CARDS DD DSN=&&CARDS,DISP=(OLD,DELETE)
to
3->//CARDS DD *
3.
Assembler Programs
The change to your Assembler procedure requires only one job stepto execute the IN25SYMA program. IN25SYMA supports Assembler F, Assembler H, and High Level Assembler. Here is how the Advantage CA-InterTest procedure works: 1. IN25SYMA operates between your Assembler and link-editor, collecting information from the Assembler's //SYSPRINT DD statement, which should be declared a temporary sequential data set in the Assembler job step with:
DCB=(RECFM=FBA,LRECL=121,BLKSIZE=(a multiple of 121))
NOTE: When using Assembler H, specify RECFM=FBM unless your Assembler H is generated to produce listings in the RECFM=FBA format.
That temporary data set is passed to the IN25SYMA job step through the //INPUT DD statement. 3. The original input from your Assembler's //SYSPRINT is written to the //OUTPUT DD data set declared in the IN25SYMA job step. 4. Messages from the IN25SYMA program are written to the //MESSAGE DD statement to be printed. 5. The Advantage CA-InterTest Symbolic VSAM file is referenced by IN25SYMA through the //PROTSYM DD statement with DISP=SHR. 6. Old records in the PROTSYM file are replaced by new ones with each run of the IN25SYMA program. See the Symbolic File Maintenance chapter for instructions on removing old program data from the Symbolic File.
69
2.
Assembler Options
The entire listing produced by the Assembler is required. The following options must be specified: Option ESD XREF(FULL) or XREF(SHORT) Produces External Symbol Dictionary Full Cross-Reference Short Cross-Reference
Important! You must ensure that all statements that define the start of DSECTs are printed. This ensures that the CORE structured display facility shows the correct data in DSECT format.
NOTE: High Level Assembler Release 2.0 users must also specify the option LIST(121).
IN25SYMA Options
Options are passed to the Advantage CA-InterTest post-processor using a parameter statement. The parameter statement can be specified in a control card or created in a PARM= parameter of a preceding job step. The //GENPARM step (indicated by 2>) in the JCL example at the end of this section shows how to specify the statement.
NOTE: If you specify the parameter statement as a control card, the program name must start in column 1.
The only required field on this parameter card is the program name. The program name is the name in the CICS program definition or, for composite support, the monitor-name. The following example saves the symbolic references for the program named ORDEDIT in control card format:
COL = 1...5....0
ORDEDIT
610
NOTE: Specify the ,CUTPRINT= parameter only when you do not want all or part of your listing printed. The entire listing prints if this parameter is omitted from the parameter statement.
Saving Your Listing for Online Display with the LISTER Option
You can also request that all or a portion of your source code be saved for online viewing. If saved, Advantage CA-InterTest automatically displays the relevant part of the listing when a breakpoint occurs. To save the listing you must add one of these keywords to the parameter statement: ,LISTER=ALL saves the entire Assembler listing ,LISTER=REF saves only the parts that precede the Cross-Reference list The parameter specification in the following example saves symbolic references for program ORDEDIT, does not print the listing, and saves the entire Assembler output for online display.
ORDEDIT,CUTPRINT=ALL,LISTER=ALL
NOTES: If the LISTER parameter is omitted, no listing is saved in the Symbolic File. If only the LISTER parameter is specified, it must follow the program name.
611
About Symbolic Support To mark data as nonpurgable, add this keyword to the parameter statement as the last option:
,NOPURGE
The parameter specification in the following example records the symbolic references for the program ORDEDIT, prints the listing, does not save any portion of the listing, and does not allow symbolic data to be removed from the Symbolic File by a purge interval batch run.
ORDEDIT,NOPURGE
The parameter specification in the following example records the symbolic references for the program ORDEDIT, does not print a copy of the listing, does not save any portion of the listing, and does not allow symbolic data to be removed from the Symbolic File by a purge interval batch run.
ORDEDIT,CUTPRINT=ALL,NOPURGE
The parameter specification in the following example records the symbolic references for the program ORDEDIT, does not print a copy of the listing, saves the entire output listing for online display, and does not allow symbolic data to be removed from the Symbolic File by a purge interval batch run.
ORDEDIT,CUTPRINT=ALL,LISTER=ALL,NOPURGE
612
//* YOUR EXISTING CICS PREPROCESSOR JCL GOES HERE //* (IF DOING A COMMAND LEVEL ASSEMBLER PROGRAM) // // //* YOUR EXISTING ASSEMBLER JCL GOES HERE WITH //* THE FOLLOWING MODIFICATIONS //* 1-> //SYSPRINT DD DSN=&&INPUT,DISP=(,PASS),UNIT=SYSDA, 1-> // SPACE=(TRK,(15,5)), 1-> // DCB=(DSORG=PS,LRECL=121,BLKSIZE=2420,RECFM=FBA) //* //* //* IF THE ASSEMBLER GIVES A RETURN CODE NOT HIGHER THAN 0 //* //* THEN RUN THE ADVANTAGE CA-INTERTEST POST-PROCESSOR //* 2-> //GENPARM EXEC PGM=IN25PARM,PARM='PARAMETER STATEMENT' 2-> //STEPLIB DD DSN=CAI.CACICSxx,DISP=SHR 2-> //CARDS DD DSN=&&CARDS,DISP=(,PASS),UNIT=SYSDA,SPACE=(TRK,(1,1)) //* //POSTASM EXEC PGM=IN25SYMA,COND=(0,LT,ASM),REGION=512K //SYSUDUMP DD SYSOUT=A //STEPLIB DD DSN=CAI.CACICSxx,DISP=SHR //INPUT DD DSN=&&INPUT,DISP=(OLD,DELETE) //OUTPUT DD SYSOUT=A,DCB=(RECFM=FBM,LRECL=121,BLKSIZE=2420) //MESSAGE DD SYSOUT=A //PROTSYM DD DSN=INTRTST.PROTSYM,DISP=SHR 3-> //CARDS DD DSN=&&CARDS,DISP=(OLD,DELETE) //* //* IF THE ASSEMBLER GIVES A RETURN CODE HIGHER THAN 0 //* THEN RUN AN IEBGENER TO PRINT THE ASSEMBLER LISTING //* //PRINT EXEC PGM=IEBGENER,COND=(0,EQ,ASM) //SYSPRINT DD DUMMY //SYSIN DD DUMMY //SYSUT1 DD DSN=&&INPUT,DISP=(OLD,DELETE) //SYSUT2 DD SYSOUT=A //* //* YOUR EXISTING LINKAGE-EDITOR JCL GOES HERE //*
In the STEPLIB DD statements, replace xx with your two-digit CICS release number (for example: 41 for CICS 4.1, 52 for CTS 1.2, or 53 for CTS 1.3).
613
About Symbolic Support The following JCL modifications must be made to your existing Assembler procedure to use the IN25SYMA program: 1. The //SYSPRINT data set in the Assembler step must be modified. 2. A new job step to execute the IN25SYMA program must be inserted after the Assembler step. In the previous example, the parameter statement is specified in the PARM parameter of the EXEC statement. If you want to pass the parameter statement using a control card: 1. Remove all of the statements marked with a 2->. 2. Change the following JCL statement:
3->//CARDS DD DSN=&&CARDS,DISP=(OLD,DELETE)
to
3->//CARDS DD *
3.
PL/I Programs
To be able to set breakpoints at PL/I statement numbers and label names online, a one-time change to your PL/I compile procedure is required. This new procedure runs a Advantage CA-InterTest program, IN25SYMP, to save information for online use. Here is how the Advantage CA-InterTest program IN25SYMP works: 1. IN25SYMP operates between your compiler and link-editor and collects information from the compiler's //SYSPRINT DD statement. Declare this data set a temporary, sequential data set in the compiler job step with:
DCB=BLKSIZE=a number larger than 129
This temporary data set is passed to the IN25SYMP job step through the //INPUT DD statement. 3. The original input from your compiler's //SYSPRINT is written to the //SYSPRINT DD data set declared in the IN25SYMP job step. 4. Messages from the IN25SYMP program are written to both the //MSGS DD and the //MESSAGES DD statements. 5. The Advantage CA-InterTest Symbolic VSAM File is updated by IN25SYMP through the //PROTSYM DD statement with DISP=SHR. 6. Old records in the PROTSYM file are replaced by new ones during each run of the Advantage CA-InterTest program. See the Symbolic File Maintenance chapter for instructions on removing old program data from the file.
2.
614
Compiler Options
Suggested parameters for the PL/I optimizing compiler provide enough information for successful symbolic debugging. The LIST option (Assembler-like listing of the generated code) is optional, but the tables of offsets must be provided. The following options must be used with the IBM PL/I compiler: AGGREGATE, ATTRIBUTES(FULL), MAP, NEST, NOGONUM, NOMARGINI, NONUMBER, OPTIONS, SOURCE, STMT or GOSTMT, STORAGE, and XREF(FULL).
NOTE: Because of special considerations, if you must use the %NOPRINT compiler option contact Advantage CA-InterTest technical support.
Installation Options
For Symbolic File compile date-time to load module checking on PL/I programs to function, your PL/I compiler must have been installed with the TSTAMP=YES option (the default).
IN25SYMP Options
Options are passed to the Advantage CA-InterTest post-processor using a parameter statement. This statement can be specified in a control card or created in a PARM= parameter of a preceding job step. The //GENPARM step (indicated by 2->) in the JCL example at the end of this section shows how to specify the statement.
NOTE: If you specify the options in a control card, the program name must start in column 1.
The only required field on the parameter statement is a program name. The program name is the name in the CICS program definition or, for composite support, the monitor-name. The following example saves symbolic references for the program named ORDEDIT in control card format:
COL = 1...5....0
ORDEDIT
About Symbolic Support The following example saves symbolic information for the program ORDEDIT and terminates printing after the XREF table.
ORDEDIT,CUTPRINT=REF
NOTES: Specify the ,CUTPRINT parameter only when you do not want all or part of your listing printed. The entire listing prints if this parameter is not specified. If only this parameter is specified, it must immediately follow the program name.
Saving Your Listing for Online Display with the LISTER Option
You can also request that all or a portion of your source code be saved for online viewing. If saved, Advantage CA-InterTest automatically displays the relevant part of the listing when a breakpoint occurs. To make this request you must add one of the following keywords to the parameter statement: ,LISTER=ALL saves the entire PL/I listing ,LISTER=REF saves only the source and XREF sections ,LISTER=OFFSET saves all of the listing up to and including the table of offsets The specification in this example saves the entire listing for online display and does not print any portion of the listing.
ORDEDIT,LISTER=ALL,CUTPRINT=ALL
NOTES: If only the LISTER parameter is specified, it must immediately follow the program name. If the LISTER parameter is omitted, no listing is saved in the Symbolic File.
616
About Symbolic Support The parameter specification in the following example records the symbolic references for the program ORDEDIT, prints the listing, does not save any portion of the listing, and does not allow symbolic data to be removed from the Symbolic File by a purge interval batch run.
ORDEDIT,NOPURGE
The parameter specification in the following example records the symbolic references for the program ORDEDIT, does not print a copy of the listing, does not save any portion of the listing, and does not allow symbolic data to be removed from the Symbolic File by a purge interval batch run.
ORDEDIT,CUTPRINT=ALL,NOPURGE
The parameter specification in the following example records the symbolic references for the program ORDEDIT, does not print a copy of the listing, saves the entire output listing for online display, and does not allow symbolic data to be removed from the Symbolic File by a purge interval batch run.
ORDEDIT,CUTPRINT=ALL,LISTER=ALL,NOPURGE
//* //* YOUR EXISTING CICS PREPROCESSOR JCL GOES HERE //* WHEN DOING A COMMAND LEVEL COMPILE // //* YOUR EXISTING PL/I COMPILER JCL GOES HERE //* WITH THE FOLLOWING MODIFICATIONS //* 1-> //SYSPRINT DD DSN=&&INPUT,DISP=(MOD,PASS),UNIT=SYSDA, 1-> // SPACE=(CYL,(1,1)),DCB=BLKSIZE=5000 //* //* IF THE COMPILER GIVES A RETURN CODE LESS THAN 9, //* //* THEN RUN THE ADVANTAGE CA-INTERTEST POST-PROCESSOR STEP //* 2-> //GENPARM EXEC PGM=IN25PARM,PARM='PARAMETER STATEMENT' 2-> //STEPLIB DD DSN=CAI.CACICSxx,DISP=SHR 2-> //CARDS DD DSN=&&CARDS,DISP=(,PASS),UNIT=SYSDA,SPACE=(TRK,(1,1)) //* //POSTPLI EXEC PGM=IN25SYMP,REGION=2048K,COND=(9,LT,PLI), // PARM='NOREPORT' //STEPLIB DD DSN=CAI.CACICSxx,DISP=SHR //PROTSYM DD DSN=INTRTST.PROTSYM,DISP=SHR //INPUTT DD DSN=&&INPUT,DISP=(OLD,PASS) //MSGS DD SYSOUT=* //MESSAGE DD SYSOUT=* //SYSPRINT DD SYSOUT=*
617
In the STEPLIB DD statements, replace xx with your two-digit CICS release number (for example: 41 for CICS 4.1, 52 for CTS 1.2, or 53 for CTS 1.3). The following are the JCL modifications that must be made to your existing compile procedure: 1. Specify the //SYSPRINT data set in the PL/I compiler step. 2. Insert a new job step to execute the Advantage CA-InterTest program after the compiler step. This JCL example assumes that you will pass the parameter statement in the PARM parameter of the EXEC statement. If you prefer to pass the parameter statement using a control card: 1. Remove all of the statements in the previous example that are marked with a 2->. 2. Change the following JCL statement:
3-> //CARDS DD DSN=&&CARDS,DISP=(OLD,DELETE)
to:
3-> //CARDS DD *
3.
618
he various option settings are described in this chapter, along with their defaults and how to change them. This chapter also explains how to further customize Advantage CA-InterTest for CICS to meet your site's needs. The following topics are discussed: Implementing composite support Declaring user-defined CORE commands Adding Assembler DSECTs to the symbolic file Unprotecting main storage with the user exit IN25LETX Adding COBOL file structures to the Symbolic File Specifying abend codes that should not be interceptedIN25ABEN Customizing help for abend codes
Advantage CA-InterTest installation options are contained in the IN25OPTS load module. You can change option settings easily by changing the load module without recompiling Advantage CA-InterTest programs. To change a Advantage CA-InterTest option, follow these steps: Create an IN25OPTS load module that contains the modified options with a batch assemble-and-linkedit job (sample JCL follows). Activate the changes by performing these steps: 1. 2. Turn off CA-InterTest Issue this command:
CEMT SET PROG(IN25*) NEWCOPY
71
Procedure for Modifying Options Ignore any failures of IN25HOOK to newcopy. 3. Restart CA-InterTest Option Defaults - The option defaults used in the pregenerated version of Advantage CA-InterTest Version 6.1 are listed in the following table: Option=Default Value IPLXT=IPLX* IRCTT=VIRC* ISERT=ISER* ITSTT=ITST* LETSVC=YES LISTT=LIST* MONOM=NO MONOMSEC=YES OSGETM=YES PROMD=00000020 READBUF=YES REALIA2=NO RECNTMU=NO RECNTNW=YES SLB=YES SLBAKEEP=YES SLBMARG=1 SLBSCRL=PAGE STBTIT=YES STBTRN=STB4* STUAR=NO
Option=Default Value AUDIT=NO AUTMON=YES BREAK=YES CICSPLEX=NO CKPTFIL=PROTCPF CNTLSEC=YES CNTLT=CNTL* CNTOSEC=YES CNTSQLG=YES CORET=CORE* CORSEC=YES CPF11=7B CPLXCKPI=0020 CPLXFMID=INTERTST CWALET= no value DFLTUSER=.ANY DL1SIZE=8192 EXTSEC=N FDISP=FC FFORM=D FILET=FILE
72
Procedure for Modifying Options Option=Default Value FILSEC=YES FSYMP=PROTFILE GLOG=CSSL HELPFIL=PROTHLF HELPT=HELP* ICMDBUF=1024 ICMDEXE=50 ICMDMAX=50 IGLUT=IGLU* TRCFFMID=SYMDTRCF TRCFSCLS= TRCFVOL= TRCFTRHD=50 TRCFMEGT=15 Option=Default Value SYMDFIL=PROTDMP SYMDINT=YES SYMDT=SYMD* SYMFIL=PROTSYM SYMPSWD=12345678 UCONLY=YES USERHELP=PROTUHF VERCOR=NO VRPTT=VRPT* VTATT=VTAT* TRCFMCLAS= TRCFDCLS= TRCFUNIT= TRCFMEGM=1000 TRCFTOUT=240
*If you change a transaction ID, also change the CICS transaction definition.
73
//************************************************************ //* IN25OPTS SAMPLE JCL * //************************************************************ //ASM EXEC PGM=IEV90,REGION=1M, // PARM='LIST,XREF(SHORT),DECK,NOOBJ' //SYSPRINT DD SYSOUT=* //SYSPUNCH DD DSN=&&OBJECT,UNIT=SYSDA,DISP=(NEW,PASS), // DCB=BLKSIZE=3200,SPACE=(TRK,(1,1)) //SYSLIB DD DSN=CAI.SAMPLIB,DISP=SHR // DD DSN=CICS.MACLIB,DISP=SHR //SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT2 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) //SYSIN DD * *** CWA USER DSECT REQUIRED HERE IF USING THE CWALET OPTION *** USING CWADS,0 ADVANTAGE CA-INTERTEST REQUIREMENT CWADS DSECT USER CWA CWAFLD1 DS CL20 CWAFLD2 DS CL15 CWAFLD3 DS CL100 ******** ADVANTAGE CA-INTERTEST OPTION SPECIFICATIONS********************** IN25OPTS TYPE=CSECT, X FILSEC=YES, X LETSVC=NO IN25OPTS TYPE=CSECT, X CWALET=(CWAFLD1,CWAFLD2+15) IN25OPTS TYPE=FINAL END /* //LKED EXEC PGM=IEWL,PARM=(XREF,LIST,MAP), // REGION=1M,COND=(4,LT,ASM) //SYSPRINT DD SYSOUT=* //SYSLIN DD DSN=&&OBJECT,DISP=(OLD,DELETE) //SYSLMOD DD DSN=CAI.CACICSxx(IN25OPTS),DISP=SHR //SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(1,1)) //
In this example, the options FILSEC, LETSVC, and CWALET have been generated. All other options use the default settings. In the SYSLMOD DD statement, replace xx with your two-digit CICS release number (for example: 41 for CICS 4.1, 52 for CTS 1.2, or 53 for CTS 1.3).
NOTE: The CWALET option requires you to place your user CWA DSECT before the first IN25OPTS specification in the assembly. The USING statement for this DSECT is required. The register value for the USING statement can be any value from 0 to 15.
74
IN25OPTS Keywords
This section lists the IN25OPTS keywords. Defaults are underlined. Slashes (/) between parameters indicate you must make a choice. AUDIT= NO/YES - For auditing purposes, certain installations require that all CORE, FILE, and CNTL commands be recorded. No Specify No if you did not specify the GLOG= option or if you want to dynamically activate and deactivate global logging with CNTL=GLOG,ON and CNTL=GLOG,OFF commands. If you specify No, the user can request logging of FILE commands by specifying FUNC=LOG on the FILE menu. Yes Specify Yes if you specified the GLOG= option and you need the global logging facility always active. With AUDIT=YES, neither the CNTL=GLOG,ON command nor the CNTL=GLOG,OFF command are accepted. The CNTL commands and Advantage CA-InterTest responses are always recorded in the transient data queue or data set that was specified with the GLOG= keyword. CORE changes to storage areas not owned by the task (usually password protected) are always recorded. The FILE transaction operates in the LOG=ON mode; that is, all user requests and resulting FILE screen images are recorded.
NOTE: If you do not specify the GLOG= keyword, the AUDIT=YES specification is ignored.
AUTMON=YES/NO - Indicates whether a new Monitor Table entry is created. Yes Creates a new Monitor Table entry for a program when an automatic breakpoint is about to occur if the program is being monitored under a Monitor Table entry that does not name this program by its full name (for example, if the entry names a transaction). The new entry assumes all monitoring options currently in effect. This option makes it easier to debug the program. No Does not create a separate Monitor Table entry.
75
Procedure for Modifying Options BREAK=YES/NO - Indicates whether Advantage CA-InterTest is allowed to execute breakpoints. Yes Allows Advantage CA-InterTest to execute breakpoints; that is, to stop execution of the application program at certain points. Select this option if you intend to use Advantage CA-InterTest as an interactive debugging tool. No Does not allow Advantage CA-InterTest to execute breakpoints. This option might be desirable in a separate version of Advantage CA-InterTest used solely for monitoring production applications. Advantage CA-InterTest generated with BREAK=NO monitors with less overhead, which is important in production. Instead of causing automatic breakpoints, Advantage CAInterTest abnormally terminates transactions with a transaction dump when it detects a standards violation. The abend/dump code is INTE. The dump contains all of the usual diagnostic information. CICSPLEX=YES/NO - Advantage CA-InterTest provides special support for CICS regions participating in a CICSPlex environment. Participating CICSPlex regions have Advantage CA-InterTest commands propagated across all regions in the CICSPlex. Yes Indicates that this CICS region is participating in at least one CICSPlex family of regions, as named in the CPLXFMID keyword. Invokes Advantage CA-InterTest CICSPlex processing by using CAICCI. If CICSPLEX=YES, CAICCI processing must be installed on the OS/390 operating system and available to CICS. No Indicates that this CICS region is not participating in a CICSPlex family. CKPTFIL=PROTCPF/ filename - Specify the file name for the Advantage CA-InterTest checkpoint file. The name must not exceed seven characters. If you do not use the default, be sure to adjust the CICS file definition.
76
Procedure for Modifying Options CNTLSEC=YES/NO - Indicates whether certain CNTL commands can be protected with a password. Yes Protects certain CNTL commands with a password and allows for password protection of certain CNTL options. Specify CNTLSEC=YES if the CNTL command functions should be available only to authorized personnel. With CNTLSEC=YES, the keyword CNTOSEC further specifies whether the subset of CNTL options should also be password protected. The passwords are defined in the IN25SEC2 macros. See the Password Protection with Advantage CA-InterTest chapter in System Programmer Guide for the list of CNTL commands and options subject to password protection and details on specifying passwords using IN25SEC2. With CNTLSEC=YES, you must use the IN25SEC2 macro to generate the Advantage CA-InterTest program IN25SEC2 or use the IN25SEC2 delivered with CA-InterTest. No Does not protect certain CNTL commands with passwords and does not allow for password protection of certain CNTL options. CNTLT= CNTL/transaction-id - Specify a four-character transaction ID for the Advantage CA-InterTest CNTL transaction. Be sure to adjust the CICS transaction definition if you do not use the default.
NOTE: The CICS restriction that no user transaction ID begin with the character C is not strict. IDs such as CNTL and CORE can be used if the CICS system does not use them.
CNTOSEC=YES/NO - When the value for the keyword CNTLSEC is YES, specify this keyword to include or exclude certain CNTL options from password protection. When CNTLSEC=NO, this keyword is ignored. Yes Protects certain CNTL options with a password. The password is defined in an IN25SEC2 macro, as discussed in the chapter Password Protection with Advantage CA-InterTest for CICS. No Does not protect any CNTL options with passwords. CNTSQLG=YES/NO - Indicates whether CNTL commands are logged. Yes Logs CNTL commands executed from a sequential terminal and responses to them into the transient data destination defined in the GLOG option. No Does not log CNTL commands.
77
Procedure for Modifying Options CORET=CORE/transaction-id - Specify a four-character transaction ID for the Advantage CA-InterTest CORE transaction. Be sure to adjust the CICS transaction definition if you do not use the default. Buddy TipThe CICS restriction that no user transaction ID begin with the character C is not strict. You can use IDs such as CNTL and CORE if the CICS system does not use them. CORSEC=YES/NO - Indicates whether a password is required to modify a main storage area protected by CA-InterTest. Yes Requires a password when a user of the CORE facility is about to modify a main storage area that is protected by CA-InterTest, but does not require the password during normal debugging. Specify CORSEC=YES if you will use the Advantage CA-InterTest IN25SEC2 macro to generate a password that would prevent the CORE facility from being used by unauthorized personnel. The IN25SEC2 macro must be used to generate the Advantage CAInterTest program IN25SEC2 or use the IN25SEC2 delivered with CA-InterTest. The use of the IN25SEC2 macro is described in the Password Protection with Advantage CA-InterTest for CICS chapter. Without the password, the CORE transaction lets you modify only those storage areas that belong to a task that is waiting in a breakpoint and are not protected by Advantage CA-InterTest from being modified by the monitored program. No Does not require a password before allowing modification of any field within the CICS region in main storage. See the description of the CORE transaction in the Advantage CAInterTest for CICS User Guide. The CORSEC specification also applies to data modification in the LIST Keep window.
NOTE: Regardless of the CORSEC= specification, the following main storage areas are not available for modification by the CORE transaction:
CICS/VS Sign-on Table (DFHSNT) Main storage outside of the CICS region
78
Procedure for Modifying Options CPF11=7B/BF - Activates the PF11 key on the Detailed Breakpoint screen. 7B Allows application programmers to use the PF11 key on the Detailed Breakpoint screen to tell Advantage CA-InterTest to force the execution of any error condition that Advantage CA-InterTest has detected even though the error condition that caused the automatic breakpoint still exists. In effect, the user tells Advantage CA-InterTest that this is really not a violation and to execute regardless of the consequences. Before enabling this facility, be aware of the following considerations: As a result of this execution, not only the tested transaction's data could be damaged but other concurrent transactions could also be affected and the entire CICS system may crash.
BF
Using PF11 ignores not only the immediate error condition, but also all subsequent error conditions until the next breakpoint or CICS Service Request (whichever comes first). Specify CPF11=BF if you do not want to provide this facility.
CPLXFMID=INTERTST/CICSPlex-familyname - Defines a CICSPlex family name to be associated with the CICS region. Yes Defines an eight-character CICSPlex family name associated with the CICS region. The same family name must be given to all CICS regions participating in that family to obtain CICSPlex support throughout the family. Advantage CA-InterTest supports multiple CICSPlex families within or across multiple OS/390 regions. For example, all regions associated with CPLXFMID=REGIONA participate in one CICSPlex family, while all regions associated with CPLXFMID=REGIONB participate in another. No Disregards this keyword; the default. CPLXCKPI=0020/hhmm - If CICSPLEX=YES and the checkpoint facility is started by a CICSPLEX resynchronization request, defines the time interval in hours (HH) and minutes (MM) between checkpoints.
79
Procedure for Modifying Options CWALET=( )/(label,label) - Specify the CWALET keyword only if you want to remove Advantage CA-InterTest storage protection from certain CWA fields. Important! The storage fields specified with this keyword are unprotected for all programs that run under Advantage CA-InterTest monitoring; all programs are permitted to modify these fields. If you choose to specify one or more CWALET areas, you must code a separate IN25OPTS TYPE=CSECT macro for each CWALET area (one area per macro). IN25OPTS macros with CWALET must follow other IN25OPTS macros except for the TYPE=FINAL macro, which must be the last one. no value Advantage CA-InterTest protection will not be removed. Use the CSA= and LET= online options to let specific monitored programs modify additional areas of main storage. See the Advantage CA-InterTest for CICS User Guide for details about online options. (label,label) Specify two Assembler labels, separated by a comma and enclosed in parentheses; for example, CWALET=(CSAUTA1,CSAUTA4). The first label defines the first byte of the area to be unprotected; the second label defines the first byte past the area. When using labels, they must be defined in the DSECT for the CWA and inserted in the IN25OPTS compile; see the section Sample JCL to Assemble the Options Program for details. If your CWA has an existing DSECT, use existing labels and offsets from the labels to define the unprotected area. If you do not have an existing DSECT in your CWA, add the following two statements to the IN25OPTS module to create one:
*********** CWA USER DSECT REQUIRED HERE ************
USING CWADS,0 ADVANTAGE CA-INTERTEST REQUIREMENT CWADS DSECT USER CWA ************** ADVANTAGE CA-INTERTEST SPECIFICATIONS *********
You can then specify offsets from the beginning of the CWA. For example, the following macro unprotects a 20-byte area starting at the beginning of the CWA:
IN25OPTS TYPE=CSECT,CWALET=(CWADS,CWADS+20)
DL1SIZE=8192/nnnnn - Specifies the number of bytes in the largest DL/I segment to be retrieved using the Advantage CA-InterTest FILE facility. Storage corruption may occur if the size specified here is smaller than a DL/I segment that is retrieved using FILE. DFLTUSER=.ANY/SPECIFIC/BACKGROUND - DFLTUSER stands for default user and controls how Advantage CA-InterTest monitoring functions by default. A user can override the default settings established by this parameter at any time.
710
Procedure for Modifying Options .ANY When this setting is used, Advantage CA-InterTest monitoring pays no attention to the CICS user ID of the session, even if the user is signed on to CICS. Monitoring is set for all users, and breakpoints, by default, are directed to the same terminal used to set them. DFLTUSER=.ANY keeps Advantage CAInterTest monitoring the same as it was in Versions 5.3 and below. SPECIFIC This setting is only valid in a secure Advantage CA-InterTest region where the users log on to CICS. When DFLTUSER=SPECIFIC is used, Advantage CA-InterTest qualifies each monitoring entry with the users CICS user ID. In addition, Advantage CA-InterTest directs all options to monitoring to .ANY terminal. This setting allows many users to test the same program or transaction independently. This also allows users to move from terminal to terminal and have their monitoring entries and monitoring options follow them. Important! When DFLTUSER=SPECIFIC is used and a user does not sign on to the CICS region, Advantage CA-InterTest uses the value of the CICS DFLTUSER for the monitoring entry. The CICS default user ID is optionally specified in the SIT parameters. If not specified in the SIT, its value is CICSUSER. BACKGROUND This setting is only valid in a secure Advantage CA-InterTest region where the users log on to CICS. Code this if your CICS system is used predominantly as an Application Server, where most transactions are not attached to terminals (that is, web interface transactions). This setting sets the FROM terminal to .ANY, and the breakpoint (TO) terminal to the current terminal that is setting the breakpoints. EXTSEC=YES/NO - Indicates whether the External Security Manager is to be used. Yes Advantage CA-InterTest and CA-SymDump for CICS call the External Security Manager to verify access to secured functions.
NOTE: For details regarding CA-SymDump for CICS calls to external security, see the CA-SymDump for CICS Getting Started.
No
Advantage CA-InterTest and CA-SymDump for CICS bypass the calls to the External Security Manager. When first installing Advantage CAInterTest and CA-SymDumpfor CICS, this setting is useful until the product is tested and the security rules are written.
711
Procedure for Modifying Options FDISP=FC/DL/TD/TS/DB - Determines the default menu for the FILE transaction. The various menu types are described in the Advantage CA-InterTest for CICS User Guide. The user can change the menu of the FILE facility online at any time. FC The FILE transaction shows its first display in the DATATYPE=FC format; that is, ready to process CICS files defined in the CICS file definition (File Control Table). DL The FILE transaction shows its first display in the DATATYPE=DL format; that is, ready to process DL/I segments. TD The FILE transaction shows its first display in the DATATYPE=TD format; that is, ready to process CICS transient data queues. TS The FILE transaction shows its first display in the DATATYPE=TS format; that is, ready to process CICS temporary storage. DB The FILE transaction shows its first display in the DATATYPE=DB format; that is, ready to process DB2 data. FFORM=D/C/V/S - Determines the default format in which the FILE transaction displays the data. The user can change the format of the FILE display online at any time. For illustrations of FILE displays, see the Advantage CAInterTest for CICS User Guide. D The FILE transaction shows its first display in dump format, similar to the nonstructured display of the CORE transaction. Shows both character and hexadecimal images. C The FILE transaction shows its first display in character format. This format displays the largest amount of data, but is useless for noncharacter data records. V The FILE transaction shows its first display in vertical format, similar to the DITTO utility. This format displays the least amount of data. S The FILE transaction shows its first display in structured format if symbolic information for the program containing the structures is stored in the Advantage CA-InterTest Symbolic File. COBOL and PL/I structures use 01 level names; Assembler structures use DSECT names. Shows both character and hexadecimal images. See the FSYMP option.
712
Procedure for Modifying Options FILET=FILE/transaction-id - Specify a four-character transaction ID for the Advantage CA-InterTest FILE transaction. Be sure to adjust the CICS transaction definition if you do not use the default. Yes The Advantage CA-InterTest IN25SEC2 macro generates passwords to prevent the FILE transaction from being used by unauthorized personnel. More comprehensive security enforcement has to be implemented on the CICS level or on the operating system level. With FILSEC=YES the IN25SEC2 macro must be used to generate the Advantage CA-InterTest IN25SEC2 program, or use the IN25SEC2 delivered with CA-InterTest. Failure to do so will make the FILE transaction useless. Using the IN25SEC2 macro is described in the Password Protection with Advantage CA-InterTest for CICS chapter. No Permits users of the FILE transaction to access any CICS file or DL/I data without a CA-InterTest-enforced password.
FSYMP=PROTFILE/symbolic-programname - Specify the name of the default dummy COBOL or PL/I program that contains all of the 01 level structures used at the site or the Assembler program that contains all the DSECTs. Symbolic information for this program must be stored in the Advantage CA-InterTest Symbolic File. Users of the FILE transaction requesting records or DL/I segments in structured format must specify the symbolic name of the program that contains the structure. However, if a default program containing all of the structures has been compiled or assembled, users can omit the symbolic program name. See the Additional Advantage CA-InterTest for CICS Customization Procedures section for a sample default COBOL program. The Adding Assembler DESCTs to the Symbolic File section in that chapter describes how to add Assembler file structures. GLOG=CSSL/DCT-destination-id - Specify a four-character name of a transient data destination in the CICS Destination Control Table (DCT). The default, GLOG=CSSL, provides the statistics destination that is always present in the CICS system and is usually printed when the CICS system is terminated.
The destination must specify a direct or indirect extrapartition transient data set that has a record size of at least 84 bytes (variable-length format, including the length field). Advantage CA-InterTest writes records to the specified transient data queue (destination) after the command CNTL=GLOG,ON is entered. See the description of the AUDIT keyword; also see the description of the Advantage CA-InterTest global logging facility in the Advantage CA-InterTest for CICS User Guide. HELPFIL=PROTHLF/filename - Specify the file name for the Advantage CA-InterTest Help file. The name cannot exceed seven characters. Be sure to adjust the CICS file definition if you do not use the default If CICSPLEX=NO, the default, this task does not run.
713
Procedure for Modifying Options IRCTT=VIRC/transaction-id - Specify a four-character transaction ID for the Advantage CA-InterTest VIRC transaction. This is an internal Advantage CAInterTest transaction used only for handling breakpoints. Its use must not be protected by a specific signon. If started by mistake from a terminal, the transaction program does nothing.
In an MRO or ISC environment, the VIRC transaction must be installed as local in all Terminal Owning Regions and Application Owning Regions that use CA-InterTest. In a CICS environment that does not use MRO or ISC, the VIRC transaction must be installed to support automatic single-stepping.
NOTE: If you change the transaction ID, also change the CICS transaction definition.
ISERT=ISER/transaction-id - Specify a four-character transaction ID for the internal Advantage CA-InterTest ISER transaction. Do not assign protection to a specific user.
NOTE: If you change the transaction ID, also change the CICS transaction definition.
ITSTT=ITST/transaction-id - Specify a four-character transaction ID for the Advantage CA-InterTest ITST transaction. This transaction displays the Advantage CA-InterTest Primary Option menu from a CICS prompt. Do not assign protection to a specific user.
NOTE: If you change the transaction ID, also change the CICS transaction definition.
LETSVC=YES/NO - Indicates whether SVCs are permitted. Yes Permits any SVCs in application programs except:
SVC 13 (hex 0D) - ABEND macro
No
These are the SVCs often used implicitly in applications, but any other SVCs should not be used in CICS programming. Regardless of this keyword, you can use BYP= options during a Advantage CAInterTest test session to permit the monitored program to use SVCs.
714
Procedure for Modifying Options LISTT=LIST/transaction-id - Specify a four-character transaction ID for the Advantage CA-InterTest LIST transaction (viewing of the compile or assembly listing). Be sure to adjust the CICS transaction definition if you do not use the default. Menu Activates the feature and displays the MON and NOM options on the CNTL main menu. Nomenu Activates the segmented monitoring feature, but limits users to implementing segmented monitoring through CNTL commands or the LIST facility. NOMENU disables the use of the MON and NOM options on the Monitoring menus, and removes the MON and NOM entries from the CNTL main menu. No Deactivates the segmented monitoring feature and removes any previous MON and NOM entries from the CNTL main menu. MONOMSEC=YES/NO - Controls password protection for the segmented monitoring options in the CNTL facility. If MONOM=NO, MONOMSEC is ignored. Yes Implements password protection of the segmented monitoring feature. The password is controlled by a keyword in the IN25SEC2 macro. Instructions for specifying passwords for CNTL options are in the Password Protection with Advantage CA-InterTest for CICS chapter. No Permits the use of the segmented monitoring feature without password protection. OSGETM=YES/NO - Indicates whether a GETMAIN SVC is allowed to be issued. Yes Permits COBOL programs monitored by Advantage CA-InterTest to issue the GETMAIN SVC. As suggested by the CICS Application Programmer's Reference Manual, any CICS COBOL program should be coded so that no COBOL facilities require a GETMAIN SVC. Such a GETMAIN SVC obtains storage from the OSCORE storage pool outside the storage controlled by the CICS Storage Management. There is no FREEMAIN if the COBOL program terminates. When, eventually, a GETMAIN cannot be satisfied, the CICS system will be abended by the operating system. OSGETM=YES is implied by the LETSVC=YES specification. No Does not permit the GETMAIN SVC to be issued by COBOL programs. Unless you run software that issues the GETMAIN SVC, we recommend that you specify OSGETM=NO as OS/390 GETMAINs should not be permitted. With this specification, an automatic breakpoint will occur when the GETMAIN SVC is detected. However, OSGETM=NO is overridden by LETSVC=YES.
715
Procedure for Modifying Options PROMD=00000020/name/number - The name or the number in this keyword is used for the default value of the PROM= parameter of the CNTL=START command. name Specify the name (up to eight characters) of the Advantage CAInterTest Startup Table that has to be generated with the PROMMAC macro. The use of the macro is described in the chapter Automatically Starting Advantage CA-InterTest for CICS. number Specify the number to be used as the default value of the PROM= parameter of the CNTL=START command, which specifies the initial number of entries in the Monitoring Table. This number must be eight characters long. For the initial period of use, the default value should suffice. The number of entries in the table should be no less than the number of names to be declared for monitoring. However, for efficiency, allow enough entries at the beginning by specifying the PROM= parameter here or in the CNTL=START command. A large number of unoccupied entries use more storage but do not increase the overhead because only occupied table entries are examined when the table is scanned. READBUF=YES/NO - Indicates whether the read buffer function is suported. Yes Before sending a breakpoint to a terminal, Advantage CA-InterTest issues a read buffer to save the last user screen from that terminal. If your Advantage CA-InterTest demonstration session runs successfully, specify Yes. No You must specify No if all terminals that would be used by Advantage CA-InterTest users run under TCAM or do not support the read buffer function. If you do not specify No, you must declare the NRB=ON online option whenever monitoring is declared. REALIA2=YES/NO/ONLY - Indicates whether CA-Realia II Workbench for OS/390 CICS is active in the CICS region. Yes Indicates that both CA-Realia II Workbench for OS/390 CICS and Advantage CA-InterTest are active in the CICS region. No Indicates that CA-Realia II Workbench for OS/390 CICS is not active in the CICS region. Only Indicates that only CA-Realia II Workbench for OS/390 CICS is active in the CICS region. RECNTMU=YES/NO - Indicates whether CNTL commands are displayed before execution. Yes Displays the CNTL commands generated by the Advantage CAInterTest menus just before the commands are executed. The user can learn these commands from the screen and, for efficiency, use them instead of menus.
716
RECNTNW=YES/NO - Indicates whether CNTL commands are displayed before execution. Yes Displays the CNTL commands that are automatically generated by CNTL=RESTART or CNTL=NEW,PROG= commands. These appear just before they are executed so that the user can see what is being done. No Suppresses display of CNTL commands. Specify No if users are not interested in these details.
SLB=YES/NO - Indicates whether Source Listing Breakpoint displays are available. Yes Uses Source Listing Breakpoint displays for the terminal from which the program was declared for monitoring if the compile (assembly) listing is available in the Advantage CA-InterTest Symbolic File. No Uses Detailed Breakpoint displays when a program is declared for monitoring. In either case, Source Listing Breakpoint displays can be turned on or off during the online test session.
NOTE: The Advantage CA-InterTest LIST facility (the online viewing of compile and assembly listings prior to program execution) is not affected by this setting.
SLBAKEEP=YES/NO - Specifies the default value for the LIST facility of the AutoKeep display feature. Regardless of this setting, the value can be adjusted online at any time. Yes Displays items in the Keep window concerning the currently highlighted line and any data items you have requested to be displayed in the Keep Window. No Displays only the data items you have requested to be displayed in the Keep Window. SLBMARG=1/nn - Specifies a decimal number, from 1 to 41, of the default margin value on the LIST facility screens for Assembler programs. Regardless of this setting, the Location field of each source listing line is shown. The margin value can be adjusted online at any time. 1 Presents the left-most portion of each source listing line. 41 Presents the right-most portion. 28 Suppresses the machine code. 34 Suppresses the machine code and statement numbers.
717
Procedure for Modifying Options SLBSCRL=PAGE/HALF/STOP/nnnn - Specifies the default scroll value for the LIST facility (online viewing of compile and assembly listings) when the user presses the PF7 or PF8 keys. Regardless of this setting, the value can be adjusted online at any time. Page Scrolls the display one page. Half Scrolls the display half a page. Stop Scrolls the display to the next declared breakpoint. nnnn Scrolls the display the specified number of lines (1 to 9999). SLBTIT=YES/NO/REGS - Specifies the default top portion of the display of the LIST facility (online viewing of compile and assembly listings); that is, whether the titles for the options and PF keys should be presented or not. Regardless of this setting, the value can be adjusted online at any time. Yes Displays the entire top portion of the display, leaving less space for the source listing. No Displays only the entry fields and a command line, leaving more space for the source listing. Pressing the PF4 or PF16 key displays the entire top portion so a user can review the options or PF key assignments. Regs Displays the same fields as SLBTIT=NO, but also displays the general registers and the condition code at a breakpoint. STBTRN=STB4/transaction-id - For CA-Stabilize/CICS users, specify a fourcharacter transaction ID for the CA-Stabilize/CICS STB4 initialization transaction. Be sure to adjust the CICS transaction definition if you do not use the default. STUAR= NO/YES - Affects breakpoint processing in regard to the TCTTE user area (an area embedded in the TCTTE, whose address is in the field labeled TCTTECIA). No The contents of the area are not saved for the duration of the breakpoint or restored when the task continues execution from the breakpoint. There is no need to preserve the data in the area if the breakpoint display is to be sent to another terminal, or if the area is to be modified (during the breakpoint) only by the person performing the test. Because command level (EXEC CICS) applications rarely use this area, STUAR=NO should be appropriate. Also specify STUAR=NO if the area may be affected during the breakpoint by a facility other than the tested application. Yes The contents of the area are preserved for the duration of the breakpoint. Specify STUAR=YES if the logic of the tested application depends on saving this area while your task waits at a breakpoint, and then restoring it to its previous value, possibly with your modifications. STUAR=YES is desirable if the area can be used during the breakpoint and use of the area must not affect the tested program.
718
Procedure for Modifying Options SYMDFIL=PROTDMP/filename - For CA-SymDump for CICS users, specify the file name for the CA-SymDump for CICS (the Symbolic Dump option) file. This is the name of the file from which dumps can be viewed; CA-SymDump for CICS always writes to the file PROTDMP. The name cannot exceed seven characters. Be sure to adjust the CICS file definition if you do not use the default. SYMDINT=YES/NO - For CA-SymDump for CICS users viewing a Source Listing, this option specifies whether the user can invoke Advantage CA-InterTest functions for the abended program. Yes CA-SymDump for CICS users can invoke Advantage CA-InterTest functions when viewing a Source Listing for an abended program. For example, users can set monitoring, invoke the FILE facility, and perform other Advantage CA-InterTest functions directly from CA-SymDump for CICS. No CA-SymDump for CICS users cannot invoke Advantage CA-InterTest functions when viewing a Source Listing for an abended program. To invoke Advantage CA-InterTest functions, users must access Advantage CA-InterTest directly. SYMDT=SYMD/transaction-id - For CA-SymDump for CICS users, specify a four-character transaction ID for the CA-SymDump for CICS transaction that allows dumps to be viewed online. Be sure to adjust the CICS transaction definition if you do not use the default. SYMFIL=PROTSYM/file/(file1,file2,....) - Specify the CICS file definition names for the Advantage CA-InterTest Symbolic Files. The names cannot exceed seven characters. If more than one name is specified, the names must be separated by commas and the entire list enclosed in parentheses. Be sure to adjust the CICS file definition if you do not use the default. This option tells Advantage CA-InterTest the CICS file definitions of the Advantage CA-InterTest Symbolic Files and their search order for program data. When monitoring is turned on for a program, Advantage CA-InterTest searches the Symbolic Files in the sequence specified and for COBOL and PL/1 programs finds the Symbolic File member which matches the corresponding load module compile date/time. If a matching date/time cannot be found or a symbolic file member has a more recent date than the date in the load module, a symbolic file mismatch screen will appear and the customer must chose which symbolic file member to use for debugging. For assembler programs, the symbolic file mismatch screen will always appear if a program is found on more than one symbolic file. Once a matching date/time member is found or a member is selected from a mismatch screen, Advantage CA-InterTest will continue to use the selected symbolic file member until all breakpoints and monitoring has been turned off for the program.
719
Procedure for Modifying Options There is no upper limit to the number of Symbolic Files that you can specify. However, limit the number of files to reduce the overhead and the storage required for the VSAM buffers because each CICS file definition must be defined with LSRPOOL=NONE. SYMPSWD=12345678/character-string - Specify an eight-character password used by the Symbolic File utility program IN25UTIL to guard against an inadvertent change to the Symbolic File. The password generated here will be required when doing the following utility functions: INITIALIZE, RELOAD, DELETE, or PURGE. To change the default password, specify any character string up to eight characters long. TRCFMID=SYMDTRCF/8 character unique id - For CA-SymDump for CICS users, specify the unique TRACE FAMILY ID that a CICS region will use to locate and form an affinity with a TRACE FORMAT REGION that has an IN25OPTS with the same TRCFFMID. This parameter is used by both the CICS region and the TRACE FORMAT REGION. TRCFMCLS= - For CA-SymDump for CICS users, specify an allocation MANAGEMENT CLASS that the TRACE FORMAT REGION will use to allocate storage for trace formatting. This parameter is used only by the TRACE FORMAT REGION and is ignored by a CICS region. TRCFSCLS= - For CA-SymDump for CICS users, specify an allocation STORAGE CLASS that the TRACE FORMAT REGION will use to allocate storage for trace formatting. This parameter is used only by the TRACE FORMAT REGION and is ignored by a CICS region. TRCFDCLS= - For CA-SymDump for CICS users, specify an allocation DATA CLASS that the TRACE FORMAT REGION will use to allocate storage for trace formatting. This parameter is used only by the TRACE FORMAT REGION and is ignored by a CICS region. TRCFUNIT= - For CA-SymDump for CICS users, specify an allocation UNIT that the TRACE FORMAT REGION will use to allocate storage for trace formatting. This parameter is used only by the TRACE FORMAT REGION and is ignored by a CICS region. TRCFVOL= - For CA-SymDump for CICS users, specify an allocation VOLUME that the TRACE FORMAT REGION will use to allocate storage for trace formatting. This parameter is used only by the TRACE FORMAT REGION and is ignored by a CICS region. TRCFTHRD=50/ number of threads - For CA-SymDump for CICS users, specify the number of simultaneous threads that will be supported for trace format requests. This parameter should be used as a rudimentary throttle to allow performance tuning of the formatted trace facility. This parameter is used only by the TRACE FORMAT REGION and is ignored by a CICS region.
720
Procedure for Modifying Options TRCFMEGM=1000/ total number of megs - For CA-SymDump for CICS users, specify the maximum size of extended private area storage in megabytes that the TRACE FORMAT REGION will allocate for use by all threads. This amount of extended private must be available to the TRACE FORMAT REGION when it starts, or the job will terminate. If this number is exceeded when a trace is selected for formatting, the user is invited to try again later This will allow performance tuning of the formatted trace facility. This parameter is used only by the TRACE FORMAT REGION and is ignored by a CICS region. TRCFMEGT=15/megs per thread - For CA-SymDump for CICS users, specify the maximum size of extended private area storage in megabytes that the TRACE FORMAT REGION will allocate for use by one thread. If this is not available when a trace is selected for formatting, the user is invited to try again later. This will allow performance tuning of the formatted trace facility. This parameter is used only by the TRACE FORMAT REGION and is ignored by a CICS region. TRCFTOUT=240/ trace timeout in seconds - For CA-SymDump for CICS users, specify trace timeout value in seconds that both the TRACE FORMAT REGION and the CICS task will wait on CCI calls used to communicate between the CICS task and the TRACE FORMAT REGION. When this value is exceeded, the CCI session is terminated, and the formatted trace resources are freed. The operator remains within the reloaded dump, and is given the option of reformatting the trace. This will allow performance tuning of the formatted trace facility. This parameter is used by both the CICS region and the TRACE FORMAT REGION. UCONLY=NO/YES - Determines whether certain terminal output will be dynamically translated from lowercase to uppercase. . No Terminal output is not dynamically translated. Yes Terminal output is dynamically translated to uppercase characters. If you previously installed the uppercase version of the Advantage CA-InterTest load libraries because your terminals did not support the mixed case English character set, you should specify YES. USERHELP=PROTUHF/ filename - Specify the file name for the optional help file of user-defined abend descriptions. The name cannot exceed seven characters. Be sure to adjust the CICS file definition if you do not use the default.
721
Additional Advantage CA-InterTest for CICS Customization Procedures VERCOR=NO/YES - Determines whether changes to main storage must be verified. No Changes to main storage requested in a CORE transaction command can, but need not be, verified in the same command. If CORSEC=YES is specified, the user cannot modify any foreign piece of storage by mistake because the CORE transaction will ask for the password. As a result, you can specify VERCOR=NO because a careless user can harm only the tested program's data. Yes Any change to main storage requested in a CORE transaction command must be verified in the same command regardless of password protection (see the CORSEC= keyword). This compulsory verification could make a debugging session unnecessarily tedious, thus decreasing productivity. The system programmer will find this specification a hindrance, especially in situations when a certain value must be forced upon an area whose content continually changes. See the Accessing Main Storage: CORE chapter in the Advantage CA-InterTest for CICS User Guide for more information. VRPTT=VRPT/transaction-id - Specify a four-character transaction ID for the Advantage CA-InterTest VRPT transaction used to verify the installation and display the installation options. Be sure to adjust the CICS transaction definition if you do not use the default. VTATT=VTAT/transaction-id - Specify a four-character transaction ID for the Advantage CA-InterTest VTAT transaction. This is an internal Advantage CAInterTest transaction used only for handling breakpoints. Since it is not used by any operator, its use must not be protected by a specific user. If started by mistake from a terminal, the program does nothing. Be sure to adjust the CICS transaction definition if you do not use the default.
722
Additional Advantage CA-InterTest for CICS Customization Procedures 1. For symbolic support, compile the main program and each subroutine you want to test with the Advantage CA-InterTest post-processor. Follow the directions in the Symbolic Support chapter. Link-edit the programs and execute the Advantage CA-InterTest batch program IN25LINK to read the link-edit map and store the necessary information in the Symbolic File.
NOTE: Skip Step 1 if you do not want symbolic support.
2.
The IN25LINK program does not change the load module in any way and can be executed by as many concurrent jobs as necessary. Concurrent jobs do not interfere with each other when updating the Advantage CA-InterTest Symbolic File. It is more efficient to use the IN25LINK program to obtain necessary link-edit information; however, you can provide the link-edit information online on the CNTL Composite Support menu.
IN25LINK Program
The IN25LINK program processes the link-editor map after the link-editor step. Here is how it works: 1. IN25LINK collects information from the link-editor's //SYSPRINT DD statement, which should be declared a temporary sequential data set in the link-editor job step with:
DCB=(RECFM=FBA,LRECL=121,BLKSIZE=2420))
IN25LINK either appends the collected data to an existing symbolic program entry or creates a new entry. 2. The temporary data set is passed to the IN25LINK job step through the INPUT DD statement. 3. The original input from the link-editor's //SYSPRINT is written to the //OUTPUT DD data set declared in the IN25LINK job step. 4. Messages from the IN25LINK program are written to the //MESSAGE DD statement to be printed. 5. The Advantage CA-InterTest Symbolic VSAM File is referenced by IN25LINK through the //PROTSYM DD statement with DISP=SHR. Specify one or more parameter cards to identify the composite module, main program, and any subroutines you want to test. The IN25LINK parameters are passed to the IN25LINK program using one or more parameter cards.
723
The program name specified in the parameter statement for the post-processor step must also be the CICS program definition name of the composite module. See the chapter Symbolic Support for details. You can also optionally specify the NOPURGE parameter. This parameter specifies that symbolic information for the composite module not be purged from the Symbolic File during a purge interval batch job.
link-name
monitor-name
identifies the name of the COBOL program, Assembler CSECT, or PL/I Control Section as listed in the link-edit map. This parameter must begin in column 1. For a PL/I program, specify the name of the Control Section, generated by the compiler, that ends with '1'. specifies the name under which the program is to be monitored. Follow these rules in selecting a monitor-name: Each monitor-name must be unique. The monitor-name of the main program must be the CICS program definition name of the composite module. However, the monitor-name of a subroutine cannot be a CICS program definition name. The monitor-name can be identical to the link-name. If you compiled the main program or subroutine with the Advantage CA-InterTest postprocessor, the monitor-name must be identical to the program name specified in that job step.
724
Additional Advantage CA-InterTest for CICS Customization Procedures You can omit all but the first parameter card, which identifies the composite module.
Excluding Subroutines
By default, Advantage CA-InterTest excludes subroutines with CEE, DFH, DLZ, ILB, IGZ, and IBM prefixes when it reads the link-edit map. Usually, you will not want to test such programs. However, you can specify a parameter card to change the default exclusion rules. This parameter card can be positioned anywhere in the card deck except as the first card, and has this format:
.EXCLUDE=
or
.EXCLUDE=xxxxxxxx[,xxxxxxxx,...,xxxxxxxx]
The .EXCLUDE= specification must begin in column 1. .EXCLUDE= instructs Advantage CA-InterTest not to exclude any subroutines. .EXCLUDE=xxxxxxxx instructs Advantage CA-InterTest to exclude subroutines whose link-names are represented by xxxxxxxx. Specify the entire link-name to exclude a specific subroutine; specify the beginning portion of the link-name to exclude a group of subroutines. For example, to exclude all subroutines with the prefix ACA1, specify .EXCLUDE=ACA1.
Example
A composite module with the CICS program definition name BIGMOD consists of several separately compiled programs and library modules. Its main program is named MAINMOD and is written in COBOL. BIGMOD also has three Assembler subroutines that you want to test separately: SUBMOD-A, SUBMOD-B, and SUBMOD-C. None of the subroutines has its own CICS program definition entry. You have already assembled SUBMOD-A, SUBMOD-B, and SUBMOD-C with the Advantage CA-InterTest Assembler post-processor program. You specified ASMMOD-A, ASMMOD-B, and ASMMOD-C, respectively, as the program names in that job step. Compile MAINMOD with the Advantage CA-InterTest COBOL post-processor program and specify BIGMOD as the program name. Next, link-edit MAINMOD, SUBMOD-A, SUBMOD-B, and SUBMOD-C and execute the Advantage CA-InterTest batch program IN25LINK.
725
Additional Advantage CA-InterTest for CICS Customization Procedures The link-edit map output for BIGMOD indicates an entry address of 160 and that BIGMOD now is replaced in the data set, and contains the following: Control Section Name DFHECI MAINMOD ILBOATB ILBOCOM0 SUBMOD-A SUBMOD-B SUBMOD-C Origin 00 160 7A08 7B28 7CA0 8EA0 9EA1 Length 160 78A8 11A 73 1200 100 93 Description Command level COBOL stub Main programCOBOL COBOL library module COBOL library module SubprogramAssembler SubprogramAssembler SubprogramAssembler
Sample JCL for the link-edit step and Advantage CA-InterTest job step follows.
NOTE: The link-names specified on the parameter cards for the Advantage CA-InterTest job step are the program names as listed in the link-edit output.
726
Additional Advantage CA-InterTest for CICS Customization Procedures The following specifications let users set breakpoints and options for any of the four programs using the monitor-names specified: BIGMOD, ASMMOD-A, ASMMOD-B, and ASMMOD-C. Buddy TipIf you are using the link editor DFSM S1.1, you must add PARM (MAP,...) to your execute card.
//*
//* LINK-EDIT STEP //* //LKED EXEC PGM=IEWL,...... //SYSLIB DD..... //SYSLMOD DD..... //SYSUT1 DD..... //SYSLIN DD..... 1-> //SYSPRINT DD DSN=&&INPUT,DISP=(,PASS),UNIT=SYSDA, 1-> // SPACE=(TRK,(2,5)), 1-> // DCB=(DSORG=PS,LRECL=121,BLKSIZE=2420,RECFM=FB) //* //* RUN THE ADVANTAGE CA-INTERTEST POST-PROCESSOR STEP //* 3-> //* ADD IN25PARM JCL HERE IF NEEDED //* //* BELOW, THE //STEPCAT MAY BE UNNECESSARY. //* 2-> //POSTASM EXEC PGM=IN25LINK,REGION=512K 2-> //SYSUDUMP DD SYSOUT=A 2-> //STEPLIB DD DSN=CAI.CACICSxx,DISP=SHR 2-> //INPUT DD DSN=&&INPUT,DISP=(OLD,DELETE) 2-> //OUTPUT DD SYSOUT=A,DCB=(RECFM=FBA,LRECL=121,BLKSIZE=2420) 2-> //MESSAGE DD SYSOUT=A 2-> //PROTSYM DD DSN=INTRTST.PROTSYM,DISP=SHR 2-> //CARDS DD * 2-> BIGMOD CICS program definition name of composite module 2-> MAINMOD,BIGMOD link-name and monitor-name of main program 2-> SUBMOD-A,ASMMOD-A link-name and monitor-name of subprogram 2-> SUBMOD-B,ASMMOD-B link-name and monitor-name of subprogram 2-> SUBMOD-C,ASMMOD-C link-name and monitor-name of subprogram 2-> /*
727
Additional Advantage CA-InterTest for CICS Customization Procedures In the STEPLIB DD statement, replace xx with your two-digit CICS release number (for example, 41 for CICS 4.1, 52 for CTS 1.2, or 53 for CTS 1.3). Observe the following rules: The parameter statement for the post-processor step must specify the CICS program definition name of the composite module as the program name. In this example this is BIGMOD, so an appropriate parameter statement would be:
BIGMOD,LISTER=ALL
See the chapter Symbolic Support for details on specifying this parameter statement. The first parameter card for the IN25LINK job step must identify the composite module; for example, BIGMOD.
The monitor-name of the main program must be the CICS program definition name of the composite module; for example, BIGMOD, as illustrated in the second parameter card. The following JCL modifications are required to use the IN25LINK program: The //SYSPRINT data set in the link-edit step must be modified. A new job step to execute the IN25LINK program is inserted after the link-editor step. If you are processing only the first parameter control card, you can pass it using a PARM= statement. To use a PARM= statement, add the following JCL at the location marked by 3->:
3-> //GENPARM EXEC PGM=IN25PARM,PARM='PARAMETER STATEMENT'
In the STEPLIB DD statement, replace xx with your two-digit CICS release number (for example, 41 for CICS 4.1, 52 for CTS 1.2, or 53 for CTS 1.3). Change the following JCL statement:
2-> //CARDS DD *
to read:
DD DSN=&&CARDS,DISP=(OLD,DELETE)
728
Code one CORUCOM macro for each new CORE keyword. Submit the resulting source code to assemble a new Advantage CA-InterTest load module named IN25UCOM. The module is used by the CORE facility as a table to convert your own keywords into strings of CORE keywords. Since the CORUCOM macro generates a separate CICS load module, you can add new or modified commands at any time. To do this, code the commands, assemble the module, and then do a NEWCOPY for the load module IN25UCOM by issuing:
CEMT SET PROG(IN25UCOM) NEWCOPY
729
Declaring User-Defined CORE Commands The last CORUCOM statement must be coded as follows:
1 1
Each user-defined CORUCOM statement specifies one user-defined element of the CORE command and one string of CORE commands that will replace that userdefined element. The user-defined element is specified by the CODE= keyword. Each element keyword must be less that eight characters long, must consist only of alphanumeric characters and, to prevent confusion with a hexadecimal number, must contain at least one of these characters: GHIJKLMNOPQRSTUVWXYZ. When two or more keywords have the same prefix (for example, ICE2, ICE), the longer keyword must be specified first, as illustrated in the following example. The string of CORE command elements is specified by the COMND= keyword. The string must be enclosed in apostrophes and, within the string, any apostrophe must be coded as two apostrophes. All elements of the CORE command are permitted, including other user-defined elements. Example - In the next example: The new keyword ICE2 (second macro) uses another new keyword ICE (in the third macro). Notice that the longer keyword is specified first. The fourth macro defines the keyword MYTABLE, which displays a storage area pointed to by the address in the CWA, and produces a display formatted as a structure named MYTABLE in the Advantage CA-InterTest Symbolic File records identified by the name MYSYMDEF. For more details, see the section Adding Assembler DSECTs to the Symbolic File. The * in column 72 means continuation.
1 1 7
COL= 1...5....0.....6............................................2 CORUCOM TYPE=INITIAL (required) CORUCOM CODE=ICE2,COMND='ICE@4' CORUCOM CODE=ICE,COMND='=CSA@54' CORUCOM CODE=MYTABLE,COMND='=CWA@8,USE=MYSYMDEF.MYT* ABLE' CORUCOM TYPE=FINAL (required)
730
//* (COMMENT: A STANDARD IBM PROC FOR ASSEMBLER MACRO LEVEL) //STEP EXEC ASMFCL //ASM.SYSLIB DD DSN=CAI.SAMPLIB,DISP=SHR //ASM.SYSIN DD * CORUCOM TYPE=INITIAL * YOUR FIRST CORUCOM STATEMENT GOES HERE .. ..... CORUCOM TYPE=FINAL END /* //LKED.SYSLMOD DD DSN=CAI.CACICSxx,DISP=SHR //LKED.SYSIN DD * NAME IN25UCOM(R) /* //
In the LKED.SYSLMOD DD statement, replace xx with your two-digit CICS release number (for example, 41 for CICS 4.1, 52 for CTS 1.2, or 53 for CTS 1.3).
NOTE: The IN25UCOM member of the Advantage CA-InterTest source library contains sample source for assembling the IN25UCOM load module.
Advantage CA-InterTest lets you display the major CICS areas in Assembler DSECT format. You can also display your own user areas in DSECT format. One way to do this is to add your DSECTs to the ones supplied by CA-InterTest. However, if you do this, your entries will disappear when you install a new release of Advantage CAInterTest or CICS. A better way is to create one or more Symbolic File members to contain your DSECTs. Saving all of the DSECTs used at your site in one Symbolic File member allows users of the FILE transaction to omit the symbolic program name when requesting records or DL/I segments in structured format. The name of this member must be referenced in the FSYMP installation option. The default name is PROTFILE. Complete the following steps to create your own Symbolic File members: 1. Run a job to add the members containing the DSECTs to the Symbolic File. 2. Run a job to define the CORE keywords needed to display the DSECTs.
731
//ASM //SYSLIB //SYSUT1 // //SYSPUNCH //SYSTERM //SYSPRINT // //SYSIN USERTWAF USERDSEC //* //PARM // //STEPLIB //CARDS //* //SA //STEPLIB //INPUT //OUTPUT //MESSAGE //PROTSYM //CARDS /*
EXEC DD DD DD DD DD
PGM=IEV90,REGION=1024K DSN=USER.SOURCE,DISP=SHR DSN=&SYSUT1,SPACE=(1024,(120,120),,,ROUND), UNIT=VIO, DCB=BUFNO=1 SYSOUT=B SYSOUT=* DSN=&&TEMP,DISP=(,PASS),UNIT=SYSDA, SPACE=(CYL,(3,2)), DCB=(RECFM=FBM,LRECL=121,BLKSIZE=2420) *
PGM=IN25PARM,REGION=512K, PARM='USERDSEC,LISTER=REF,NOPURGE' DSN=CAI.CACICSxx,DISP=SHR DSN=&&CARDS,DISP=(,PASS),UNIT=SYSDA, SPACE=(80,1) PGM=IN25SYMA,REGION=512K DSN=CAI.CACICSxx,DISP=SHR DSN=&&TEMP,DISP=(OLD,DELETE) SYSOUT=*, DCB=(RECFM=FBM,LRECL=121,BLKSIZE=2420) SYSOUT=* DSN=INTRTST.PROTSYM,DISP=SHR DSN=&&CARDS,DISP=(OLD,DELETE)
In the STEPLIB DD statements, replace xx with your two-digit CICS release number (for example, 41 for CICS 4.1, 52 for CTS 1.2, or 53 for CTS 1.3). See the Assembler section of the Symbolic Support chapter for an explanation of the IN25PARM and IN25SYMA programs.
NOTE: This job does not require a link-edit step because it only updates the Symbolic File. No load module is produced.
732
//* (COMMENT: A STANDARD IBM PROC FOR ASSEMBLER MACRO LEVEL) //STEP EXEC ASMFCL //ASM.SYSLIB DD DSN=CAI.SAMPLIB,DISP=SHR //ASM.SYSIN DD * COPY CORUCOM CORUCOM TYPE=INITIAL CORUCOM CODE=TWAF,COMND='TWA,USE=USERDSEC.USERTWAF' CORUCOM TYPE=FINAL END /* //LKED.SYSLMOD DD DSN=CAI.CACICSxx,DISP=SHR //LKED.SYSIN DD * NAME IN25UCOM(R) /* //
In the LKED.SYSLMOD DD statement, replace xx with your two-digit CICS release number (for example, 41 for CICS 4.1, 52 for CTS 1.2, or 53 for CTS 1.3).
IN25LETX is an optional exit program coded by the user that specifies areas in main storage that should not be protected by Advantage CA-InterTest. The areas to be unprotected are indicated by beginning and ending storage addresses. This exit program provides a programmable function equivalent to the Advantage CA-InterTest interactive LET option. This is a particularly useful option, because frequently an application program is designed to modify a storage area that is protected by Advantage CA-InterTest. Ordinarily when that happens, Advantage CA-InterTest initiates an automatic breakpoint and halts the program's execution. IN25LETX must follow the rules for command-level programs. It executes within the task of the monitored application program, and must not do anything that would affect normal execution of the application. IN25LETX is invoked each time Advantage CA-InterTest begins monitoring and also when it resumes monitoring, such as after a CICS command or after any kind of breakpoint. For CICS 4.1 and above, the interface to IN25LETX is a CICS command level LINK with a COMMAREA. This allows a user's IN25LETX module to issue CICS SPI or API commands to locate key module addresses.
NOTE: The interface permits IN25LETX to return a variable-length table of pairs to Advantage CA-InterTest in a single pass. Previous non-ESA versions of IN25LETX branched to Advantage CA-InterTest for each address pair until all address pairs were passed.
733
Table Address This field is set to zeros upon entry to the exit. Advantage CAInterTest assumes it was passed a valid table address if this field is modified. Leaving this field set to zeros causes Advantage CA-InterTest to remove any address pairs previously set by this exit for this task. Monitored ProgramContains the name of the program being monitored by Advantage CA-InterTest at the time this exit was invoked. Application RegistersThe fullword address of the 16-fullword area containing the application's registers (0 to 15) that were saved just prior to the entry to this exit.
734
Unprotecting Main Storage with the User Exit IN25LETX IN25LETX must deliver a full table of address pairs each time it is invoked. IN25LETX does not have to be reentrant, meaning it can contain save areas and tables in which permanent addresses can be stored. There is no need to rebuild the LETX table if the addresses do not change. In this case, a one-time routine can find the areas, build the LETX table, and save the table in the IN25LETX module for the next time. IN25LETX can make itself resident by loading itself again (see the section Sample IN25LETX Program). IN25LETX can reside above or below the 16 MB line and execute in either addressing mode. All table addresses, however, must have the X'80000000' bit turned off; that is, the address X'01234567' must not be passed as X'81234567'.
TITLE 'IN25LETX - ADVANTAGE CA-INTERTEST LET EXIT - USER CODED' DFHREGS REGISTER EQUATES * DFHEISTG DSECT WORKING STORAGE DSECT XPROGLEN DS F PROGRAM LENGTH **************************************************************** * I N 2 5 L E T X C O M M A R E A * **************************************************************** COMMAREA DSECT COMMAREA CTBLADDR DS F ADDRESS OF USER LET TABLE INTPROG DS CL8 NAME OF MONITORED PROGRAM INTREGS DS F ADDR OF APPL REGISTERS (015) * USERTWA DSECT DSECT FOR USER TWA UTBLADDR DS F ADDRESS OF USER TABLE UTBLLEN DS H LENGTH OF USER TABLE * ***************************************************************** IN25LETX DFHEIENT EIBREG=R11,CODEREG=R12,DATAREG=R13 * L R10,DFHEICAP POINT TO COMMAREA USING COMMAREA,R10 * CLC EIBTRNID,=C'ABCD' IS THIS THE TRANSACTION? BNE RETURN NO, RETURN, DO NOT SET ANY * ADDRESSES FOR THIS TASK * PROCESS CLC LTWATBL,=D'0' HAVE THEY BEEN ALREADY SAVED? BE GETAREAS NO, GO GET THEM LA R1,LTABLE THEN, THE LET TABLE IS BUILT... ST R1,CTBLADDR PUT LET TABLE ADDR IN THE COMMAREA * RETURN EXEC CICS RETURN *
735
Disabling IN25LETX
Advantage CA-InterTest uses IN25LETX during all monitoring; that is, for all entries of the Advantage CA-InterTest monitoring table. To prevent Advantage CA-InterTest from executing IN25LETX, you must disable it or remove it from the program library. Once a link to IN25LETX fails (because the program is disabled), Advantage CAInterTest will not try the link again, thus avoiding much overhead. In such a case, the execution of IN25LETX will not resume until the next Advantage CA-InterTest start.
736
/* //COB EXEC PGM=IGYCRCTL,REGION=1024K, // PARM='OBJECT,APOST,FLAG(I,W),LIST,XREF,MAP,NOOPT,VBREF' //STEPLIB DD DSN=SYS1.COB2COMP,DISP=SHR //SYSLIB DD DSN=CICS.COBLIB,DISP=SHR //SYSLIN DD DSN=&&LOADSET,DISP=(MOD,PASS), // UNIT=SYSDA,SPACE=(80,(250,100)) //SYSUT1 DD UNIT=SYSDA,SPACE=(460,(350,100)) //SYSUT2 DD UNIT=SYSDA,SPACE=(460,(350,100)) //SYSUT3 DD UNIT=SYSDA,SPACE=(460,(350,100)) //SYSUT4 DD UNIT=SYSDA,SPACE=(460,(350,100)) //SYSUT5 DD UNIT=SYSDA,SPACE=(460,(350,100)) //SYSUT6 DD UNIT=SYSDA,SPACE=(460,(350,100)) //SYSUT7 DD UNIT=SYSDA,SPACE=(460,(350,100)) //SYSPRINT DD DSN=&&TEMPIN,DISP=(,PASS),UNIT=SYSDA,SPACE=(TRK,(15,5)), // DCB=(DSORG=PS,LRECL=133,BLKSIZE=1330,RECFM=FBA) //SYSIN DD * ID DIVISION. PROGRAM-ID. PROTFILE. ENVIRONMENT DIVISION. DATA DIVISION. WORKING-STORAGE SECTION. 77 PROGRAM-NAME PIC X(8) VALUE 'PROTFILE'. LINKAGE SECTION. ** CAR SEGMENT ** 01 CAR. 05 CAR-SEGMENT-KEY-FIELD. 15 CAR-SEGMENT-MAKE PIC X(12). 05 CAR-SEGMENT-MODEL PIC X(12). 05 CAR-SEGMENT-TYPE PIC X(10). 05 CAR-SEGMENT-WEIGHT PIC S9(5) 05 CAR-SEGMENT-CYLINDRS PIC S9(3) ** DEALER SEGMENT ** 01 DEALER. 05 CAR-DEALER-SEGMENT-KEY. 15 CAR-DEALER-SHORT-NAME PIC X(9). 15 CAR-DEALER-TIEB PIC S999 15 CAR-DEALER-NBRWD PIC S9 05 CAR-DEALER-FIRST-NAME PIC X(24). PROCEDURE DIVISION. MOVE 'PROTFILE' TO PROGRAM-NAME. GOBACK. //*
737
COMP-3. COMP-3.
COMP-3. COMP-3.
In the STEPLIB DD statement, replace xx with your two-digit CICS release number (for example, 41 for CICS 4.1, 52 for CTS 1.2, or 53 for CTS 1.3).
NOTE: A similar job can be used for COBOL/VS.
If certain abend codes should not be intercepted regardless of the Advantage CAInterTest Automatic Breakpoint (ABI) setting, use the IN25ABEN macro to specify the codes. Advantage CA-InterTest provides a default IN25ABEN that includes the abend codes AKC3, ATNI, ATCV, and AEXY.
NOTE: AKC3 is needed to run Advantage CA-InterTest with CA-Verify.
To specify your own codes in the IN25ABEN macro, code the macro as described in the following sample IN25ABEN source code assembly:
//ASSEMBLE.SYSIN DD *
IN25ABEN Coding Rules - Follow these rules when coding IN25ABEN: IN25ABEN TYPE=INITIAL must be coded first. The ABCODE= parameters must specify four-character abend codes. The abend codes ATNI, ATCV, and AEXY must be included. Include the code AKC3 if you are running Advantage CA-InterTest with CA-Verify. If ABCODE specifies a list of abend codes, then separate the codes with commas and enclose the list in parentheses. Codes that include spaces or special characters must be enclosed in single quotes. IN25ABEN TYPE=FINAL terminates the table. END terminates the assembly source.
738
Specifying Abend Codes That Should Not Be Intercepted After coding the macro, assemble the source code according to the following sample JCL. The following JCL example assembles the IN25ABEN source code. Modify this example to meet your system requirements.
//IN25ABEN JOB ...
//ASM EXEC PGM=IEV90,REGION=1024K, // PARM='DECK,LIST,XREF(SHORT),ALIGN' //SYSPRINT DD SYSOUT=A //SYSPUNCH DD DSN=&&LOADSET,DISP=(NEW,PASS),UNIT=SYSDA, // DCB=(RECFM=FB,LRECL=80,BLKSIZE=400),SPACE=(400,(100,100,1)) //SYSLIB DD DSN=CAI.SAMPLIB,DISP=SHR //SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(5,1)) //SYSUT2 DD UNIT=SYSDA,SPACE=(CYL,(5,1)) //SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(5,1)) //SYSIN DD * IN25ABEN TYPE=INITIAL IN25ABEN ABCODE=(ATNI,ATCV,AEXY) IN25ABEN ABCODE=AKC3 IN25ABEN ABCODE=(AKCT,APLE) IN25ABEN ABCODE=(1234,'# Q$',1UMF) IN25ABEN TYPE=FINAL END /* //LKED EXEC PGM=IEWL,REGION=512K,PARM=(XREF,LIST,MAP) //SYSLMOD DD DSN=CAI.CACICSxx(IN25ABEN),DISP=SHR //SYSUT1 DD UNIT=SYSDA,DCB=BLKSIZE=1024,SPACE=(1024,(200,200)) //SYSPRINT DD SYSOUT=A //SYSLIN DD DSN=&&LOADSET,DISP=(OLD,DELETE)
In the SYSLMOD DD statement, replace xx with your two-digit CICS release number (for example, 41 for CICS 4.1, 52 for CTS 1.2, or 53 for CTS 1.3).
739
2 8
3 End 9
4 Return 10
5 11
6 12
You can tie an abend code to a specific program by entering both the abend code and program name fields. You can create a generic abend code for all program names by entering the abend code only, with no program name. During a user session when Advantage CA-InterTest intercepts an abend, it first searches for a matching abend code entry on the user-defined help file. If a description for the abend code is found on the user-help file, Advantage CA-InterTest displays its contents at the breakpoint and on related CA-SymDump analysis displays. If there is no user-defined description or if the user file does not exist, then the abend code description from the Advantage CA-InterTest help file is used. If there is no abend code description in the Advantage CA-InterTest help file, then a default NOTFABCODE is displayed.
740
Overview
his chapter discusses how to use Advantage CA-InterTest for CICS with:
MRO DB2 Software invoked by CALLs from your application programs or macros Wild branches EDF HOGAN Software
To use Advantage CA-InterTest in an MRO environment, you must have: All Advantage CA-InterTest-required CICS definitions in any CICS application-owning region (AOR) that will use Advantage CA-InterTest for testing. A local program definition for IN25VIRC in the terminal-owning region (TOR). A local transaction definition for VIRC in the TOR; this transaction ID must be identical in the TOR and all AORs.
One remote transaction definition for VTAT in the TOR for each AOR that will use Advantage CA-InterTest. Of course, the TOR's local VTAT transaction IDs must be unique (for example, VTA1, VTA2, VTA3, and so on). However, the remote transaction IDs can be the same for all AORs (for example, VTAT), so you do not need to maintain a unique IN25OPTS for each AOR. If you choose to specify an alternate VTAT transaction ID in one or more AORs, you must be sure to specify the same alternate transaction ID in the TOR's remote VTAT transaction definition. In addition, for all CICS regions that will use Advantage CA-InterTestboth AOR and TORthe transaction definition for VIRC must specify the same transaction code.
81
Special Considerations for MRO Support A sample set of definitions is supplied in member CSDINTTO on the CAI.SAMPLIB. This sample set contains all of the RDO definitions required for the CICS TOR region. All Advantage CA-InterTest transaction names are the same as those specified in the AOR and can be modified by your site.
NOTE: We recommend that the Advantage CA-InterTest CORE transaction be installed in the TOR as local to help system support staff resolve problems in that region.
Remote transaction definitions can be defined for all transactions except VIRC, which can be started from the TOR to run in the AOR. Using these transaction definitions is usually preferable to starting routing sessions with the CRTE SYSID= transaction. You can add a transaction definition in each TOR.
DEFINE TRANSACTION(LNTL)
Where LNTL is a four-character transaction name for the Advantage CA-InterTest CNTL transaction in the TOR
REMOTENAME(RNTL)
Where RNTLis a four-character transaction name for the Advantage CA-InterTest CNTL transaction in the AOR
REMOTESYSTEM(TROW)
Where TROWthe name under which the AOR is known to the TOR Buddy TipNOTE: RNTL and LNTL can be the same name.
82
Special Considerations for MRO Support The ATTACHSEC option of the CONNECTION entry in the CSD is used with the DFLTUSER= option setting in IN25OPTS to provide the granularity of monitoring required. Only the combinations of DFLTUSER and ATTACHSEC given in the following table are supported: IN25OPTS CSD DFLTUSER CONNECTION, = ATTACHSEC= ANY LOCAL Typical Use Additional Consideration
AOR and TOR need the same default CICS user ID (set in the SIT) TORs SIT uses SEC=YES or MIGRATE option
SPECIFIC
IDENTIFY
This setting is typically used in a nonsecure MRO environment where the TORs SIT uses the SEC=NO option. The user ID passed from the TOR is the TORs default user ID as set in the SIT (typically CICSUSER). Advantage CA-InterTest compares this user ID to the AORs default user ID and, if they match, sets the user ID to be monitored by .ANY user. This entry causes all users of the program to be monitored (as in earlier Advantage CA-InterTest releases).
Important! Should the default user IDs of the AOR and TOR not match, the results are unpredictable. Thereforet, you should check that the default user IDs in the AOR and TOR are the same.
Monitoring in a Secure MRO Environment
The following combination is allowed in a secure MRO environment where the TORs SIT uses the SEC=YES or MIGRATE option.
DFLTUSER=SPECIFIC ATTACHSEC=IDENTIFY
83
Special Considerations for MRO Support In this case, the applications unique user ID is passed from the TOR to the AOR only if the ATTACHSEC option of the CONNECTION entry is IDENTIFY. This requirement and specifying DFLTUSER=SPECIFIC in IN25OPTS allows Advantage CA-InterTest to assign the user ID to each monitoring command as a default. This saves the user from having to type it in or specify it, and allows Advantage CAInterTest to properly monitor user activity in the TOR.
84
Using Advantage CA-InterTest for CICS with DB2 Application Programs If the sending terminal is not the same as the receiving terminal, the sending terminal will be unavailable and tied to the tested transaction during the breakpoint. This restriction does not apply if the receiving terminal is the same as the sending one because the user can disconnect from Advantage CA-InterTest.
85
Using Advantage CA-InterTest for CICS with DB2 Application Programs The following JCL example creates the IN25UEXI module for combined DB2 and special uses. Modify this example to meet your system requirements.
//IN25UEXI JOB ...
//ASM EXEC PGM=IEV90,REGION=1024K, // PARM='DECK,LIST,XREF(SHORT),ALIGN' //SYSPRINT DD SYSOUT=A //SYSPUNCH DD DSN=&&LOADSET,DISP=(NEW,PASS),UNIT=SYSDA, // DCB=(RECFM=FB,LRECL=80,BLKSIZE=400),SPACE=(400,(100,100,1)) //SYSLIB DD DSN=CAI.SAMPLIB,DISP=SHR //SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(5,1)) //SYSUT2 DD UNIT=SYSDA,SPACE=(CYL,(5,1)) //SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(5,1)) //SYSIN DD * COPY UEXIIDMS CA-IDMS COPY UEXIDATA CA-DATACOM COPY UEXITELN CA-TELON COPY UEXISORT CA-SORT COPY UEXIMAST CA-MASTERPIECE COPY UEXIDB2 DB2 COPY UEXIDB2 DB2 COPY UEXICPSM CICSPLEX SM COPY UEXISOKT TCP/IP SOCKETS * * INSERT YOUR IN25UEX STATEMENTS FOR SPECIAL CALLS HERE * IN25UEX TYPE=FINAL * * INSERT ANY USER WRITTEN ROUTINE HERE * END TERMINATES THE ASSEMBLY OF IN25UEXI /* //LKED EXEC PGM=IEWL,REGION=512K,PARM=(XREF,LIST,MAP) * * INSERT ANY //SYSLIB STATEMENTS FOR SPECIAL LOADLIBS HERE * //SYSLMOD DD DSN=CAI.CACICSxx,DISP=SHR //SYSUT1 DD UNIT=SYSDA,DCB=BLKSIZE=1024,SPACE=(1024,(200,200)) //SYSPRINT DD SYSOUT=A //SYSLIN DD DSN=&&LOADSET,DISP=(OLD,DELETE) // DD * ENTRY IN25UEXI NAME IN25UEXI(R) //
In the SYSLMOD DD statement, replace xx with your two-digit CICS release number (for example, 41 for CICS 4.1, 52 for CTS 1.2, 53 for CTS 1.3). The IN25UEXI module created by the previous job stream is used by the monitor program of Advantage CA-InterTest. To install this module, you must perform the following steps: 1. Terminate Advantage CA-InterTest (you can issue the Advantage CAInterTest checkpoint command before terminating Advantage CA-InterTest). 2. Issue a CEMT SET PROG(IN25UEXI) NEW command for the new copy. 3. Issue a CEMT SET PROG(IN25PGM2) NEW command for the new copy. 4. Start or restart Advantage CA-InterTest.
86
To make Advantage CA-InterTest recognize a call (a COBOL or PL/I CALL verb or the Assembler CALL macro) to specific interfaces (such as database systems) and execute the call without monitoring the interface code. In both cases, optional routines can be coded to: Check the parameters before the global routine is given control Display Advantage CA-InterTest automatic breakpoints with error codes defined by you WARNING! Advantage CA-InterTest assumes that the global routine of the CALL interface always returns control to the point of the CALL. If it does not, the user-written routine is mandatory.
87
Calls to Software and User Macro Support If the code matches and there is no associated routine (defined in the IN25UEXI), Advantage CA-InterTest drops monitoring and produces a standard Advantage CAInterTest entry in the CICS Trace Table (USER 144 code) with the identifier found in the corresponding entry in the IN25UEXI module. Monitoring resumes only upon return from the called module to the CALL statement. If there is a user-defined routine, the routine is performed first. The routine can check the CALL's parameters and decide whether a particular interface should be given control or an automatic breakpoint should occur (if the CALL is incorrect), and whether monitoring should continue when the interface returns to the calling program. IN25UEXI routines receive control in: AMODE31 (CICS 3.2 and above) EXECKEY (CICS) (CICS 3.3 and above) BASESPACE MODE (CICS 4.1 and above)
" "
" "
" "
or
IN25UEX CALL=(entry1,......,entryn)
" " " " " " IN25UEX TYPE=FINAL place optional routines here
(REQUIRED)
This required parameter specifies the name of an entry point. Specify the same name used in your COBOL or PL/I CALL statement or Assembler CALL macro, or specify an arbitrary name. A name specified in this CALL parameter is displayed on the Advantage CA-InterTest Request Breakpoint menus and on the CNTL=INQ reports. Multiple entry point names can be specified, as shown in the second format; however, the optional parameters listed next cannot be used. WARNING! Do not specify entry points used in a CALL that is the result of an EXEC CICS. ROUT=routine This optional parameter specifies the name of your special routine. Omit this parameter if there is no routine. LENGTH=xx This optional parameter specifies the length (in decimal) of the comparison. The maximum length is 64 and the default length is 16. The default is sufficient in most cases.
CALL=entry1
88
Calls to Software and User Macro Support This optional parameter specifies the offset (in decimal) from the entry point of the code to be compared. The maximum offset (displacement) is 512; the default offset is 0. ID=xx This optional parameter specifies the identification value for the Advantage CA-InterTest entry in the CICS Trace Table. Like all such entries produced by Advantage CA-InterTest, the first byte contains the character C (USER 144), field A contains the displacement, and field B contains the characters US followed by the two characters specified in this parameter. If the ID= parameter is not specified, Advantage CA-InterTest generates a value. After IN25UEXI is link-edited, verify the total size of the result as shown in the link-edit listing. There is no need to include entire interface modules in the IN25UEXI, as the comparison occurs only for the specified (or default) length at the specified (or default) offset. If the IN25UEXI module is too large, you can code little Assembler CSECTs that identically replace the ones used by applications in IN25UEXI. This technique has been used in the pregenerated version of IN25UEXI. Its source code is provided in the CAI.SAMPLIB source library in member DB2UEXI. This technique has reduced the size of IN25UEXI from approximately 30 KB to just 192 bytes. DISP=xx
Where CWALABEL is the label of a field in the CWA that contains the address of the global routine. The entry points are specified by using one of the following formats:
********** CWA USER DSECT REQUIRED HERE ********** USING CWADS,0 ADVANTAGE CA-INTERTEST REQUIREMENT CWADS DSECT USER CWA CWAFLD1 DS CL20 CWAENT1 DS F USER ROUTINE CWAFLD3 DS CL100 ************ ADVANTAGE CA-INTERTEST SPECIFICATIONS ************* IN25UEX CWAD=label1,ROUT=routine,ID=xx " " " " " " IN25UEX CWAD=labeln IN25UEX TYPE=FINAL (REQUIRED) place optional routines here
89
CWAD=cwadadr This required parameter specifies a label that is defined in the CWA and contains the address of the entry point of a piece of commonly used code, such as a date conversion routine. For example, if the routine address is 20 bytes from the beginning of the CWA, you can code:
IN25UEX CWAD=(CWADS+20)
ROUT=routine ID=xx
Multiple entry point names can be specified as in the second format; however, if specified in this manner, the optional parameters listed next cannot be used. This optional parameter is used as in the CALL= form. This optional parameter is used as in the CALL= form.
Calls to Software and User Macro Support R13 = EIB address R14 = return address for this routine R15 = entry point address for this routine
NOTES: In XA or ESA systems, this routine receives control in the same AMODE (addressing mode 24 or 31) that the branch instruction had prior to its execution. Registers 3 and 14 must not be changed by the routine. If these registers are used, they must be saved and restored by the routine. The application program registers 0 to 15 (prior to the execution of the branch instruction) are at 96 (X'60') bytes past the address in register 3.
In addition to checking application-related parameters, the routine must determine if Advantage CA-InterTest should continue monitoring. Monitoring must not continue if the code that is called by the monitored program does not return control to the next byte after the BALR instruction. Before the routine returns to the address in register 14, it must set register 0 to one of the following values: 0 Execute the CALL without monitoring X'D0' - X'FF' Advantage CA-InterTest should issue an automatic breakpoint with this error code -1 The routine does not return control to the next byte after the BALR; therefore monitoring must be dropped any other negative value Advantage CA-InterTest should monitor the called piece of code
811
In the SYSLMOD DD statement, replace xx with your two-digit CICS release number (for example, 41 for CICS 4.1). The IN25UEXI module created by the previous job stream is used by the monitor program of Advantage CA-InterTest. To install this module, perform the following steps: 1. Terminate Advantage CA-InterTest (you can issue the Advantage CAInterTest checkpoint command before terminating Advantage CA-InterTest). 2. Issue a CEMT SET PROG(IN25UEXI) NEWCOPY command for the new copy. 3. Issue a CEMT SET PROG(IN25PGM2) NEWCOPY command for the new copy. 4. Start or restart Advantage CA-InterTest.
813
Calls to Software and User Macro Support In addition, add an INCLUDE MSSECALL in your link-edit step. You should exclude the COMPUTATIONS program from monitoring. To do this, issue the CNTL=EXCL,PROG=PS* and CNTL=EXCL,PROG=PE* commands.
Where SHRINK, EXPAND, PUFFUP, PUFFDOWN, and CLOSE are the entry points.
814
The receiving program resides elsewhere and has no CICS program definition. In this situation, use the FOL=ON online option. In this case, breakpoints can be set for addresses, not offsets, and symbolic Advantage CA-InterTest support is not available.
815
Using Advantage CA-InterTest for CICS with IBM's EXEC Debugging Facility (EDF)
Using Advantage CA-InterTest for CICS with IBM's EXEC Debugging Facility (EDF)
The EDF facility, which is activated by the CEDF transaction and described in the IBM CICS/VS Application Programmer's Guide Command Level, does not interfere with the Advantage CA-InterTest monitoring and interactive testing. Advantage CAInterTest also does not interfere with EDF, except when EDF presents the EDF breakpoint display of the program that is being monitored by Advantage CAInterTest, EDF incorrectly indicates the location of the command since commands are issued by Advantage CA-InterTest, not by the program. Additionally, CEDF will not be supported on transactions that contain programs that use COMET.
816
Use Considerations
Monitoring the PEM Module - The PEM module does not need to be debugged and should not be monitored by Advantage CA-InterTest in a CICS 3.2 or above environment. Monitor only your HOGAN application programs using the segmented monitoring option, as discussed next.
817
Using Advantage CA-InterTest for CICS and HOGAN Software Monitoring Application Programs That Use HOGAN - Application programs that use HOGAN should be monitored only by using the Advantage CA-InterTest segmented monitoring options. Do not monitor such programs by transaction or terminal name, or by global monitoring. The Advantage CA-InterTest for CICS User Guide explains how to use segmented monitoring. The USH=ON monitoring option must also be used to prevent unnecessary automatic breakpoints from occurring. All of the Advantage CA-InterTest online options are available. However, the FOL= option should not be used. It is advisable to learn how to use the BYP= option and the PF11 override option.
Installation Procedure
To install Advantage CA-InterTest for HOGAN support, first complete all of the required steps given in the chapter Base Product Installation Steps. Then complete your installation by performing the steps below. 1. Create the IN25UEXI module for HOGAN. Instructions are given in the section IN25UEXI Instructions for Additional Vendor Products. 2. Enable the Advantage CA-InterTest segmented monitoring options. To do this, you must set the MONOM installation option in the IN25OPTS module to either MENU or NOMENU. Optionally, you can enable password security for segmented monitoring by setting the MONOMSEC installation option to YES. Refer to the chapter Advantage CA-InterTest for CICS for details. This completes the installation for HOGAN support in a CICS 3.2 or above environment.
818
Required Parameters
The IN25SEC2 macro is delivered in the Advantage CA-InterTest source code file and must be unloaded from the distribution tape before the assembly job.
IN25SEC2 TYPE=INITIAL,SCRNUM=(x,x,x,x)
The TYPE=INITIAL macro initiates the assembly and specifies the four numbers in the SCRNUM keyword that are to be used in your version of the scrambling algorithm. These numbers must be a value from 1 to 16, separated by commas, and enclosed in parentheses. The TYPE=FINAL macro must be the last macro before the END statement. This macro must not contain any other parameters.
91
Specifying Passwords for the CORE Facility Between the TYPE=INITIAL and TYPE=FINAL macros, specify the IN25SEC2 macros to assign passwords to protected resources as follows: NAME= keyword specifies the name of the resource PASS= keyword specifies the four-character password for the resource. Only the characters A-Z, 0-9, $, @, and # are allowed. The following sections explain how to specify IN25SEC2 macros to assign passwords for CORE, FILE, and CNTL.
xxxx specifies the password. When a user of the CORE facility receives the message ENTER SECURITY PASSWORD, the user must enter the four-character password. This password is then scrambled and compared with the scrambled password specified in the PASS= parameter. If the codes are equal, the CORE change is made and the password does not have to be entered again during the same session. If the password is entered incorrectly, the CORE facility asks for it again.
NOTE: Even if the password is entered correctly, areas outside CICS storage cannot be modified.
The following IN25SEC2 macro, delivered with the pregenerated version of Advantage CA-InterTest, protects all storage not owned by a user's task:
IN25SEC2 NAME=PROTCORE,PASS=MAIN
PROTCORESpecifies that this entry is for the CORE transaction. MAINThe default password: To change this password, reassemble the IN25SEC2 program with the new password specified in the above macro. To remove this password, reassemble the IN25SEC2 program with the above macro removed.
92
Specifying Passwords for CNTL Commands and Options Specifies the name of the file ID (from the CICS file definition) or the DBD identification. xxxx Specifies the password. FPROT=YES Indicates that the file or DBD name should also be fetchprotected; that is, data cannot be viewed or changed unless the password is correctly entered. You must code one IN25SEC2 macro for every file or DBD name you want to protect; files or DBDs not named in a macro are not password protected against unauthorized use. These passwords apply only to access through the Advantage CAInterTest FILE facility. When a user of the FILE facility receives the message ENTER SECURITY PASSWORD, the user must enter the four-character password. This password is then scrambled and compared with the scrambled password specified in the PASS= parameter. If the codes are equal, the specified FILE or DBD is accessed. If the password is entered incorrectly, the FILE facility terminates. Protecting All Files with a Password You can code an IN25SEC2 macro to protect all files and DBD names that are not specifically protected in individual IN25SEC2 macros. The following example password protects FILEA against both reads and writes with the password ASEC, password protects FILEB against writes only with the password BSEC, and password protects all other files against both reads and writes with the password FSEC.
IN25SEC2 IN25SEC2 IN25SEC2 NAME=PROTFILE,PASS=FSEC,FPROT=YES NAME=FILEA,PASS=ASEC,FPROT=YES NAME=FILEB,PASS=BSEC
yyyyyyyy
NOTE: Any security measures of your CICS installation are applied by CICS or the operating system after Advantage CA-InterTest password protection is satisfied. The FILE facility functions as an application within CICS.
Password protection is available for certain CNTL commands and monitoring options as described next. To use Advantage CA-InterTest to protect other commands and options or not protect the ones listed here, contact Computer Associates for assistance. CNTL password protection does not apply to the following situations: Automatic startup of Advantage CA-InterTest from the table assembled from Advantage CA-InterTest PROMMAC macros CNTL=RESTART command CNTL=NEW command
93
Specifying Passwords for CNTL Commands and Options CNTL=EXEC command Startup of Advantage CA-InterTest by the IN25PLT program in the PLT table Execution of a CNTL command from a CRLP terminal; that is, a simulated terminal consisting of input and output sequential files
Execution of a CNTL command from the system console Passwords are not needed in these situations because they either automatically start Advantage CA-InterTest, which is controlled by the system programming staff, or reestablish functions that were password protected when they were originally requested.
94
CNTL=GLOG CNTL=ON,PROG=.ALL
CNTL=OFF,PROG=.ALL
CNTL=ON,PROG=.ALL, CNTL=ALL
The CNTL=OFF command that removes monitoring options is password protected only to the extent that the option to be removed is password protected.
95
Specifying Passwords for CNTL Commands and Options The following IN25SEC2 macro, delivered with the pregenerated version of Advantage CA-InterTest, protects all of the previously listed CNTL commands:
IN25SEC2 NAME=PROT$FUN,PASS=$FUN
PROT$FUNIdentifies the CNTL commands listed previously. $FUNThe default password. To change this password, reassemble the IN25SEC2 program with the new password specified in the above macro. To remove this password, reassemble the IN25SEC2 program with the above macro removed.
,CSA=(offset,length) ,LET=name ,LET=(address,length) ,MON=location ,NOM=location ,OVR=errcode ,STR=ON ,TON=* or ,TON=terminal ,USH=ON
96
PROT$OPT Identifies the password protected CNTL options. $OPTThe default password. To change this password, reassemble the IN25SEC2 program with the new password specified in the above macro. To remove this password, reassemble the IN25SEC2 program with the above macro removed.
PROT$MNOIdentifies the CNTL options MON and NOM. $MNOThe default password. To change this password, reassemble the IN25SEC2 program with the new password specified in the above macro. To remove this password, reassemble the IN25SEC2 program with the above macro removed.
97
//ASSEM EXEC PGM=IEV90,REGION=512K, // PARM='XREF(SHORT),DECK,NUM,LIST,ALIGN,NOOBJ' //* //SYSLIB DD DSN=CAI.SAMPLIB,DISP=SHR // DD DSN=CICS.MACLIB,DISP=SHR //SYSUT1 DD SPACE=(CYL,(1,1)),UNIT=SYSDA //SYSUT2 DD SPACE=(CYL,(1,1)),UNIT=SYSDA //SYSUT3 DD SPACE=(CYL,(1,1)),UNIT=SYSDA //SYSPUNCH DD DSN=&OBJ,SPACE=(TRK,(1,1)),UNIT=SYSDA, // DCB=(BLKSIZE=800,LRECL=80,RECFM=FB),DISP=(,PASS) //SYSPRINT DD SYSOUT=A //SYSIN DD * IN25SEC2 TYPE=INITIAL,SCRNUM=(1,1,1,1) IN25SEC2 NAME=PROTCORE,PASS=CORE IN25SEC2 NAME=PROTFILE,PASS=FSEC IN25SEC2 NAME=FILE1,PASS=WXYZ,FPROT=YES IN25SEC2 NAME=FILE2,PASS=ABCD IN25SEC2 NAME=PROT$FUN,PASS=CNTL IN25SEC2 NAME=PROT$OPT,PASS=CNTL IN25SEC2 TYPE=FINAL END /* //LINK EXEC PGM=IEWL,PARM='LIST,XREF,MAP',REGION=512K //SYSLMOD DD DSN=CAI.CACICSxx(IN25SEC2),DISP=SHR //SYSUT1 DD UNIT=SYSDA,SPACE=(TRK,(10,10)) //SYSPRINT DD SYSOUT=A //SYSLIN DD DSN=&&OBJ,DISP=(OLD,DELETE) //
In the SYSLMOD DD statement, replace xx with your two-digit CICS release number (for example, 41 for CICS 4.1, 52 for CTS 1.2, or 53 for CTS 1.3). In this example: The CORE password has been changed to CORE. All files except FILE1 and FILE2 will be WRITE protected with the password FSEC. FILE1 will be READ and WRITE protected with password WXYZ. FILE2 will be WRITE protected with password ABCD. CNTL commands and monitoring options are protected with the password CNTL
98
fter Advantage CA-InterTest for CICS has been installed, you can start it automatically with your CICS system. There are four ways to do this:
Use the PROMMAC macro Enter CNTL commands from a CRLP-type terminal Activate Advantage CA-InterTest from a program Start Advantage CA-InterTest from a PLT
You can use PROMMAC macros in an assembly to create a load module defined in the CICS program definition that contains a number of CNTL commands. These commands are executed consecutively in the order of their appearance in the macros when either of these commands is submitted:
CNTL=START,PROM=tablname
or
CNTL=EXEC,MODULE=tablname
Where tablname is the name of the load module generated by the assembly of the PROMMAC macros. You can generate several alternate modules with different names, each with a CICS program definition, if you want alternate ways to start Advantage CA-InterTest or execute CNTL commands. If the PROMD=tablname option is specified in the IN25OPTS macro, you can achieve the same result by specifying:
CNTL=START
If the CNTL=START command is issued from a CRT terminal or CRLP-type terminal (a terminal whose input and output are two sequential files; see the IBM CICS System Programmer's Guide), the commands from the load module are displayed back. For a CRT terminal, there is a small time delay before each command is executed so the user can see what is being done. The first positional parameter of the PROMMAC macro contains the CNTL command to be executed. The command must be enclosed in apostrophes.
101
Using the PROMMAC Macro If the table is to be used by the CNTL=START command, the first PROMMAC macro must contain this command:
'CNTL=START,PROM=nn,PROX=nn'
Where nn sets the sizes of the internal Advantage CA-InterTest tables. The second positional parameter of the PROMMAC macro must contain END. It must be coded in the last PROMMAC macro before the END statement. Any CNTL command can be specified except CNTL=LIST and CNTL=INQ. Sample PROMMAC Macros The following JCL is suitable for OS/390 installations. These examples are shown for illustration purposes only. See the Advantage CA-InterTest for CICS User Guide for more information.
//PROMAC JOB (NTSM,473),'JOHN BROWN',CLASS=D,MSGCLASS=A
//ASSEM EXEC PGM=IEV90,REGION=512K, // PARM='XREF(SHORT),DECK,NUM,LIST,ALIGN,NOOBJ' //* //SYSLIB DD DSN=CAI.SAMPLIB,DISP=SHR //SYSUT1 DD SPACE=(CYL,(1,1)),UNIT=SYSDA //SYSUT2 DD SPACE=(CYL,(1,1)),UNIT=SYSDA //SYSUT3 DD SPACE=(CYL,(1,1)),UNIT=SYSDA //SYSPUNCH DD DSN=&OBJ,SPACE=(TRK,(1,1)),UNIT=SYSDA, // DCB=(BLKSIZE=800,LRECL=80,RECFM=FB),DISP=(,PASS) //SYSPRINT DD SYSOUT=A //SYSIN DD * PROMMAC 'CNTL=START,PROM=20,PROX=5' PROMMAC 'CNTL=ABP,ON,T321' PROMMAC 'CNTL=ON,PROG=(CFIL,TERMIO,FILEIO,ERRORS,SCAN,LLASRCH), USR=.ANY' PROMMAC 'CNTL=EXCL,PROG=(TERMIO,FILEIO)' PROMMAC 'CNTL=ON,PROG=PBMASTER,FOL=ON,USR=.ANY' PROMMAC 'CNTL=PURGE,INTRVAL=0100',END END /* //LINK EXEC PGM=IEWL,PARM='LIST,XREF,MAP',REGION=512K //SYSLMOD DD DSN=CAI.CACICSxx(PROMAC),DISP=SHR //SYSUT1 DD UNIT=SYSDA,SPACE=(TRK,(10,10)) //SYSPRINT DD SYSOUT=A //SYSLIN DD DSN=&&OBJ,DISP=(OLD,DELETE) // NOTE: A CICS program definition named PROMAC is required for the generated table.
In the SYSLMOD DD statement, replace xx with your two-digit CICS release number (for example, 41 for CICS 4.1, 52 for CTS 1.2, or 53 for CTS 1.3).
102
2. 3.
Add a PPT entry for the load module. Set the following Advantage CA-InterTest options (see the chapter Advantage CA-InterTest fo CICS):
RECNTMU=NO RECNTNW=NO
4.
Replace the CNTL commands in the sequential input with the following command:
CNTL=START,PROM=name
Where name is the name of the module that was created in Step 1.
Where tablname is the name of the load module assembled through PROMMAC macros. The table name must be followed by a space. If the CNTL task to be automatically initiated is to own a terminal, be sure that the terminal is in service and has the ATI (automatic task initiation) capability when the CNTL task is started.
103
Starting Advantage CA-InterTest for CICS from a PLT Issuing CNTL Commands from a Program You can issue any CNTL command using the EXEC CICS START command. However, for the CNTL=START command, the only permitted format is:
CNTL=START,PROM=tablname
If the CNTL task is activated at a terminal, response messages are displayed there and the command is executed as if someone had entered it from that terminal. For example, if the CNTL command sets a breakpoint, the from and to terminals are the terminal at which the task was activated. After Advantage CA-InterTest is started, a program can issue an EXEC CICS START command with the data record containing:
CNTL=EXEC,MODULE=tablname
If the program IN25PLT is included in the PLT, it starts Advantage CA-InterTest for CICS as specified in the IN25OPTS member. IN25PLT is delivered in the distribution load library. The following Advantage CA-InterTest PLTPI entry must be added after DFHDELIM so that it is part of stage 2 processing:
DFHPLT TYPE=ENTRY,PROGRAM=IN25PLT
The IN25PLT program can be called by another user-written PLT program that passes a valid Advantage CA-InterTest start command in a COMMAREA to IN25PLT. An example is given below:
INTSTART DC C'CNTL=START,PROM=PROMTABL ...' . . . EXEC CICS LINK PROGRAM('IN25PLT') COMMAREA(INTSTART) LENGTH(=Y(L'INSTART))
NOTES: The transient data destination specified in the GLOG= Advantage CA-InterTest option must be defined to CICS and must be opened. See the chapter Advantage CA-InterTest for CICS for details. The group DFHINQUI must be defined in the CICS startup list for IN25PLT to execute. The Advantage CA-InterTest Help file, PROTHLF, must be defined and available.
104
If Advantage CA-InterTest is automatically started in a CICSPlex-participating region (that is, CICSPLEX=YES in IN25OPTS), it will resynchronize its monitoring options with any active CICSPlex members upon startup.
NOTE: Resynchronization occurs whenever the CNTL=START or CNTL=RESTART command is issued in a CICSPlex-participating region.
105
he IN25UTIL batch utility program maintains and reports on the Symbolic File .This program runs as a separate job .Its functions are specified using control cards.
Control Cards
All control cards must begin in column 1. PASSWORD=12345678/xxxxxxxx Specifies a password that is required when maintaining the Symbolic File .You only need to specify the password once, but it must precede the first update request. The xxxxxxxx specification must match the value of the SYMPSWD= keyword in the IN25OPTS macro. INITIALIZE Initializes the Symbolic File. This function must always be run after the Symbolic File is created using VSAM Access Method Services. For a newly defined file, the IN25UTIL program preformats all records .If you perform this function for an existing file, all symbolic data is removed. The PASSWORD control card must precede the INITIALIZE control card. PURGE=nnn Removes symbolic data for any program that has not been compiled or assembled within the number of days specified by nnn, a decimal number from 1 to 365. The PASSWORD control card must precede the PURGE control card.
NOTE: The PURGE function does not remove data for programs compiled or assembled with the post-processor NOPURGE option.
DELETE=xxxxxxxx Deletes all symbolic data for the program specified by xxxxxxxx. The PASSWORD control card must precede the DELETE control card. REPORT Produces a Symbolic File report that contains statistics and a detailed report on each program. You can obtain a similar report online by entering one of these commands:
CNTL=INQ,SYM=ALL CNTL=INQ,SYM=xxxxxxxx for all programs for program xxxxxxxx
111
Examples PRINT=xxxxxxxx Prints the saved source listing for program xxxxxxxx. The PASSWORD control card must precede the RELOAD control card.
Examples
The following examples contain sample JCL for performing common Symbolic File maintenance tasks.
//STEP1 EXEC PGM=IN25UTIL //STEPLIB DD DSN=CAI.CACICSxx,DISP=SHR //SYSUDUMP DD SYSOUT=* //MESSAGE DD SYSOUT=* //PROTSYM DD DSN=INTRTST.PROTSYM,DISP=SHR //CARDS DD * PASSWORD=12345678 INITIALIZE /* //
In the STEPLIB DD statement, replace xx with your two-digit CICS release number (for example, 41 for CICS 4.1, 52 for CTS 1.2, or 53 for CTS 1.3).
Purging Programs
The following example purges all programs that have not been compiled or assembled within the last 20 days.
//UTILITY JOB ........
//STEP1 EXEC PGM=IN25UTIL //STEPLIB DD DSN=CAI.CACICSxx,DISP=SHR //SYSUDUMP DD SYSOUT=* //MESSAGE DD SYSOUT=* //PROTSYM DD DSN=INTRTST.PROTSYM,DISP=SHR //CARDS DD * PASSWORD=12345678 PURGE=20 /* //
In the STEPLIB DD statement, replace xx with your two-digit CICS release number (for example, 41 for CICS 4.1, 52 for CTS 1.2, or 53 for CTS 1.3).
112
Examples
//STEP1 EXEC PGM=IN25UTIL //STEPLIB DD DSN=CAI.CACICSxx,DISP=SHR //SYSUDUMP DD SYSOUT=* //MESSAGE DD SYSOUT=* //PROTSYM DD DSN=INTRTST.PROTSYM,DISP=SHR //CARDS DD * PASSWORD=12345678 DELETE=ORDEDIT DELETE=TEST1 /* //
In the STEPLIB DD statement, replace xx with your two-digit CICS release number (for example, 41 for CICS 4.1, 52 for CTS 1.2, or 53 for CTS 1.3).
//STEP1 EXEC PGM=IN25UTIL //SYSUDUMP DD SYSOUT=* //STEPLIB DD DSN=CAI.CACICSxx,DISP=SHR //MESSAGE DD SYSOUT=* //PROTSYM DD DSN=INTRTST.PROTSYM,DISP=SHR //CARDS DD * REPORT PASSWORD=12345678 PURGE=90 REPORT /* //
In the STEPLIB DD statement, replace xx with your two-digit CICS release number (for example, 41 for CICS 4.1, 52 for CTS 1.2, or 53 for CTS 1.3).
Unloading Programs
The following example unloads all programs on the Symbolic File to tape.
//UTILITY JOB ........
//STEP1 EXEC PGM=IN25UTIL //STEPLIB DD DSN=CAI.CACICSxx,DISP=SHR //SYSUDUMP DD SYSOUT=* //MESSAGE DD SYSOUT=* //UNLOAD DD UNIT=TAPE,VOL=SER=UNLDTAP,LABEL=(,NL),DISP=(OLD,KEEP), // DCB=(RECFM=FB,LRECL=2042,BLKSIZE=20420) //PROTSYM DD DSN=INTRTST.PROTSYM,DISP=SHR //CARDS DD * UNLOAD=ALL /* //
113
Examples In the STEPLIB DD statement, replace xx with your two-digit CICS release number (for example, 41 for CICS 4.1, 52 for CTS 1.2, or 53 for CTS 1.3).
Reloading Programs
The following example reloads all programs on tape to the CA-InterTest Symbolic File.
//UTILITY JOB ........
//STEP1 EXEC PGM=IN25UTIL //STEPLIB DD DSN=CAI.CACICSxx,DISP=SHR //SYSUDUMP DD SYSOUT=* //MESSAGE DD SYSOUT=* //RELOAD DD UNIT=TAPE,VOL=SER=RELDTAP,LABEL=(,NL),DISP=(OLD,KEEP), // DCB=(RECFM=FB,LRECL=2042,BLKSIZE=20420) //PROTSYM DD DSN=INTRTST.PROTSYM,DISP=SHR //CARDS DD * PASSWORD=12345678 RELOAD=ALL /* //
In the STEPLIB DD statement, replace xx with your two-digit CICS release number (for example, 41 for CICS 4.1, 52 for CTS 1.2, or 53 for CTS 1.3).
//STEP1 EXEC PGM=IN25UTIL //STEPLIB DD DSN=CAI.CACICSxx,DISP=SHR //SYSUDUMP DD SYSOUT=* //MESSAGE DD SYSOUT=* //OUTPUT DD SYSOUT=*,DCB=(RECFM=FBA,LRECL=121,BLKSIZE=2420) //PROTSYM DD DSN=INTRTST.PROTSYM,DISP=SHR //CARDS DD * PRINT=ORDEDIT /* //
In the STEPLIB DD statement, replace xx with your two-digit CICS release number (for example, 41 for CICS 4.1, 52 for CTS 1.2, or 53 for CTS 1.3).
114
Examples
//UTILITY JOB ........
//UNLOAD EXEC PGM=IN25UTIL //STEPLIB DD DSN=CAI.CACICSxx,DISP=SHR //SYSUDUMP DD SYSOUT=* //MESSAGE DD SYSOUT=* //UNLOAD DD UNIT=TAPE,VOL=SER=RELDTAP,LABEL=(,NL),DISP=(,PASS), // DCB=(RECFM=FB,LRECL=2042,BLKSIZE=20420) //PROTSYM DD DSN=INTRTST.PROTSYM,DISP=SHR //CARDS DD * UNLOAD=ALL /* //IDCAMS EXEC PGM=IDCAMS,COND=(0,NE,UNLOAD) Insert an IDCAMS step to delete the existing Symbolic File and define a new one .We recommend that this step and the next one run only if the first step has a condition code of 0. /* //RELOAD EXEC PGM=IN25UTIL,COND=(0,NE,UNLOAD) //STEPLIB DD DSN=CAI.CACICSxx,DISP=SHR //SYSUDUMP DD SYSOUT=* //MESSAGE DD SYSOUT=* //RELOAD DD UNIT=TAPE,VOL=SER=RELDTAP,LABEL=(,NL),DISP=(OLD,KEEP), // DCB=(RECFM=FB,LRECL=2042,BLKSIZE=20420) //PROTSYM DD DSN=INTRTST.PROTSYM,DISP=SHR //CARDS DD * PASSWORD=12345678 INITIALIZE RELOAD=ALL REPORT /* //
In the STEPLIB DD statements, replace xx with your two-digit CICS release number (for example, 41 for CICS 4.1, 52 for CTS 1.2, or 53 for CTS 1.3).
115
12 Troubleshooting
Chapter
Overview
his chapter explains how to troubleshoot problems and obtain customer support. The following topics are discussed:
Identifying and resolving problems Contacting Computer Associates Technical Support Receiving ongoing product releases and maintenance Requesting product enhancements
Diagnostic Procedures
See the following flowchart for a summary of the procedures you should follow if you have a problem with a Computer Associates software product. Each of these procedures is detailed on the following pages.
Overview
Overview
Has the hardware configuration (tape drives, disk drives, and so forth) changed? From your response to these questions and the diagnostic data, try to identify the cause and resolve the problem.
Overview StarTCC, the web-based portion of CA-TCC (CA-Total Client Care), gives you real-time, interactive access to CA product support information through the Internet. Using StarTCC, you can: Open new issues Browse or update your existing issues Perform keyword searches Download solutions, PTFs, and important notices regarding Computer Associates products, maintenance, and documentation
Secure sockets layer (SSL) to encrypt your transaction traffic Encrypted data records (known as cookies) HTML tables StarTCC Security
StarTCC runs as a secured server (SSL). You may need to configure your browser to enable SSL. Guidelines for doing this are provided on the Computer Associates Technical Support page.
Access StarTCC
To access StarTCC, click Support on the Computer Associates home page and follow the links for StarTCC. The StarTCC options are: StarTCC introduction StarTCC registration
Overview
StarTCC Introduction
Click Introducing StarTCC to view background information for StarTCC, details about the prerequisites, and instructions for configuring your browser. Be sure to review this section for updates or information not included here.
StarTCC Registration
Click Register to identify yourself to StarTCC. You must register before you can access StarTCC online. There are prompts for all required information, including your name, site ID, CA-StarTrak PIN, company name, e-mail address, postal address, and desired password for accessing StarTCC.
NOTE: If you do not have a CA-StarTrak PIN, StarTCC provides one for you when you register.
Accessing StarTCC
Click Login and select an access option to begin using StarTCC. When prompted, enter your user ID and password. Once your sign on is validated, you can select one of the following options: Open a New IssueOpen an issue for, or request an enhancement to, one of your Computer Associates products. Browse Your IssuesDisplay all issues for your site. The issues are grouped into three categories: Open, Closed, and Enhancement Requests (DARs). Browse/Download SolutionsSpecify criteria for selecting solutions, which you can then view or download. Search CA Knowledge BaseSpecify criteria for searching the Computer Associates database for solutions, problems, and keywords that can provide you with immediate answers to your product support questions and concerns. Update Your StarTCC ProfileMake changes to your default e-mail address, phone number, and password whenever necessary. Display Your Sites LicensesView a list of all of the Computer Associates products for which your company site is currently licensed. Display News ItemsView and download recently published solutions for Computer Associates products, instructions for downloading from StarTCC, and helpful information for using CA-StarTrak, StarTCC, or other Computer Associates products.
Overview
StarTCC Hotline
If you experience any problems using StarTCC, call the StarTCC Technical Support hotline.
Emergency phone numbers are available for after-hours technical support. You can find the emergency phone numbers for the United States and Canada, and for international calls at http://esupport.ca.com/. All after-hours calls should be limited to severity 1 problems. If you are unable to resolve the problem, have the following information ready before contacting Computer Associates Technical Support: All of the diagnostic information described in the section Collecting Diagnostic Data Product name, release number, operating system, and genlevel Buddy TipThis information is available online from the Advantage CA-InterTest Product Status Menu. To access the menu from CICS, enter ITST to display the Primary Option Menu, and then select Option 7.1. Your CICS release number
Overview Product name and release number of any other software you suspect is involved Release level and PUTLEVEL of the operating system Your name, telephone number, and extension (if any) Your company name Your site ID A severity code. This is a number from 1 to 4 that you assign to the problem. Use the following definitions to determine the severity of the problem: 1 = a system down or inoperative condition 2 = a suspected high-impact condition associated with the product 3 = a question concerning product performance or an intermittent lowimpact condition associated with the product 4 = a question concerning general product use or implementation
Overview
Requesting Enhancements
Computer Associates welcomes your suggestions for product enhancements. All suggestions are considered and acknowledged. You can use any of the following methods to request enhancements: Access StarTCC, the Computer Associates web-based, interactive support system, from the Computer Associates Internet site to open an issue for the enhancement request. For details, see the section Accessing the Online Client Support System. Contact your Account Manager or a Technical Support Representative, who will initiate a Demand Analysis Request (DAR) for you. The DAR system serves as a central receiving point for all enhancement requests.
13 Maintenance
Chapter
Overview
his chapter describes the maintenance process for Advantage CA-InterTest for CICS. Topics include: Overview of the SMP/E maintenance process Advantage CA-InterTest maintenance delivery PTF maintenance installation Overview of maintenance steps
Detailed maintenance steps New users of Advantage CA-InterTest receive a distribution tape containing the current version of the system. Clients are requested to operate only under currently supported releases of Advantage CA-InterTest. Standard user documentation is also provided to Advantage CA-InterTest users. Updates to this documentation are provided automatically to all clients having current maintenance agreements. Clients with current maintenance agreements also receive ongoing Advantage CAInterTest maintenance. When a new release of the system is available, a notice is sent to all current Advantage CA-InterTest clients.
131
Overview
SMP/E Libraries
SMP/E uses two sets of libraries: Target libraries are the product execution or runtime libraries. - CAI.CACICSnncontains the load modules. - CAI.SAMPLIB contains the sample source and JCL. Distribution libraries are the product backup libraries. - CAI.CBA60nnDcontains the load modules. - CAI.CBA60SLDcontains the sample source and JCL.
NOTE: nn is the two-digit CICS release number
When a product is installed by SMP/E, the target and distribution libraries are populated. The target libraries are populated during the SMP/E APPLY process, and the distribution libraries are populated during the SMP/E ACCEPT process. At this point, the target and the distribution libraries contain identical versions of the product modules. Maintenance through SMP/E is applied to the runtime system (the target libraries) first. After the maintenance has been running on the system for a period of time or when it appears that there are no problems with the maintenance, it is applied to the backup libraries (the distribution libraries).
NOTE: When maintenance is installed on the running libraries, it is said to be applied. When installed on the backup libraries, it is said to be accepted.
132
Overview
Maintenance Delivery
Maintenance to your Advantage CA-InterTest system is packaged and delivered as SMP/E USERMODs, APARs, and PTFs. The various types of maintenance delivery are discussed next.
133
Overview A partitioned data set containing all necessary sample JCL is provided in the Load Sample JCL Library step. The sample JCL data set contains all JCL necessary for installation and maintenance. The maintenance-specific members are prefixed with an M. Refer to the external label of the tape for the current volume serial number.
Description Review and follow the cover letter instructions. Load the sample JCL from the tape Customize the SMP procedure. Edit the JCL to exclude previously applied SYSMODs. Receive Advantage CA-InterTest maintenance. Apply check Advantage CA-InterTest maintenance. Restore any applicable SYSMODs. Apply Advantage CA-InterTest maintenance. Reapply any applicable SYSMODs. Execute Advantage CA-InterTest to verify successful maintenance. Accept Advantage CA-InterTest maintenance. Unload the documentation set. Save all materials and output.
134
Step 4. Edit Maintenance JCL to Exclude Previously Applied SYSMODs Additionally, before starting this maintenance procedure you should: Check the packing list for Advantage CA-InterTest against the package contents.
Review all PTFs (Program Temporary Fixes) and PMLs (Product Maintenance Letters) provided. Important! If any items are missing or if you have any questions, call your local Computer Associates Technical Support center before performing the maintenance procedure.
//SYSPRINT DD SYSOUT=A //SYSUT1 DD DISP=(OLD,KEEP), // DSN=CAI.SAMPJCL, // UNIT=CART, <===generic 3480 tape cartridge // VOL=SER=BAyymm, <===VOLSER from tape label // LABEL=(9,SL) //SYSUT2 DD DISP=(NEW,CATLG,DELETE), // DSN=CAIM.INTERTST.SAMPJCL, <===your DSN // UNIT=SYSDA, <===your generic DASD // VOL=SER=XXXXXX, <===permanent DASD volser // SPACE=(3120,(50,10,10)), <===minimum space required // DCB=(LRECL=80,BLKSIZE=3120,RECFM=FB) //SYSUT3 DD UNIT=SYSDA, // SPACE=(TRK,(5,5)) //SYSUT4 DD UNIT=SYSDA, // SPACE=(TRK,(5,5)) //SYSIN DD DUMMY
Once this job has ended, your library will contain all of the JCL needed to complete the maintenance for Advantage CA-InterTest.
135
Step 4. Edit Maintenance JCL to Exclude Previously Applied SYSMODs The sample JCL data set contains the members listed in the following table.
NOTE: xx is the two-digit CICS release number.
Member Name CBA60xx CLQ60xx CSA60xx CMA60xx (xx = 41, 52, or 53)
For Product Advantage CA-InterTest CA-Realia II Workbench for CICS Breakpoint PL/I option
To be cumulative, these members contain a list of all PTFs for each component since the base level of this release. You must edit these members by either commenting out or deleting the PTF IDs belonging to maintenance levels equal to or lower than your current genlevel. These members drive all subsequent SMP steps. For example, to edit the PTF list for the Advantage CA-InterTest member CBA60xx, locate the member in the sample JCL file. The example below shows sample SYSMOD entries for genlevels 9904, 9912, and 0009.
LA14345 /*LVL9904*/
Assuming you are at the fictitious genlevel 9805 and going to genlevel 9808, you should edit the list as follows:
/* LA14345 LVL9904*/
/* /* /* /* /*
NOTE: SMP requires that all comments begin with /* and complete with */.
After you edit this member, remember to update the data set so the changes are not lost.
136
Computer Associates requires the removal of any SYSMOD preventing PTF application. To allow PTF application, perform SMP RESTORE processing on the SYSMODs identified during the SMP APPLY CHECK. The instructions to accomplish this are in Step 7.
137
Step 4. Edit Maintenance JCL to Exclude Previously Applied SYSMODs Edit member MBA60RES to conform to your site standards. Only the SYSMODs identified by APPLY CHECK processing need to be restored. Type these SYSMODs within the SMPCNTL DD statement. After you complete editing, submit the job and verify that RESTORE processing ran successfully. If SMP RESTORE completed with a return code greater than 4, review the output, correct the problem, and resubmit. We suggest you execute the SMP APPLY CHECK again to verify that there are no additional SYSMODs inhibiting the application of maintenance.
Then, activate the maintenance and restart Advantage CA-InterTest with the commands:
CEMT SET PROG(IN25*) NEW
CNTL=START
To validate the successful application of maintenance, run the appropriate demonstration program.
138
139