Submit Mainframe Utilities and Development Tools Questions to Computer Education Techniques CETi

Submit Mainframe Utilities and Development Tools Questions to Computer Education Techniques CETi

Submit Mainframe Utilities and Development Tools Questions


Submit Mainframe Utilities and
Development Tools Questions

Technology Updates

Knowledge Base

Submit Mainframe Utilities and Development Tools Questions to Computer Education Techniques CETi Advanced search

Interrelated Information Technology

Computer Associates Software
DYL-280 Questions Endevor Questions InterTest Questions
Compuware Software
Abend-AID Questions File-AID Questions Xpediter Questions
  File-AID - DB2 Questions  
IBM - Mainframe Programming Languages and System Software
COBOL Questions VSAM Questions Programming Language Questions

The Computer Education Techniques knowledge base is a service for answering questions, inclusive of the research and validation of the accuracy of information in the public domain.  Citation of source documentation and examples are used to provide answers to the questions. Utilization of the information of this service and reliance on the answers, information or other materials received through this web site is done at your own risk.

Q Has DYL-280 been updated to interface with PCs?
A There is no version of DYL-280 that will run on a Microsoft Windows environment. However, the newest versions of DYL-280 allow a user to define delimiter characters which can be inserted between each column of a report, and at the beginning and end of the line. This feature is designed for downloading data to a PC. FYI, the new name for DYL-280 is Advantage VISION:Results.
Q Can a COBOL program be called from DYL-280?
A Yes, in the new version of the DYL-280 LE environment the capability exist for calling subroutines in COBOL, C, etc.

CA Endevor Software Change Manager is being used for adding a new element from a library in #6126.jeff.cobol(jddisp):  
There are unexpected issues and problems associated with the interaction and response being provided by the system.
How can the problems be resolved?  Is there a simpler way to perform the task? 

Initial Screen

TO LOCATION:               




  ELEMENT     ===>         

  TYPE        ===> COB3B


Step 1:
When the primary command is blank, a list of members is displayed.
Step 2:
ĎAí is then entered next to JDDISP; the following screen is displayed. 

08:37:44  C1G0203I     ADD      ELEMENT JDDISP                                 

08:37:44  C1G0205I        FROM DSNAME:  #6126.JEFF.COBOL                       


08:37:44  C1G0232I        OPTIONS:  CCID: *                                    

08:37:44  C1G0232I                  COMMENT: *                                 



Step 3:


The F3 key is invoked and the previous screen is displayed with the message at top ĎFOREGROUND NOT ALLOWEDí:


COMMAND ===>                                                  SCROLL ===> PAGE

FROM  Data set:    #6126.JEFF.COBOL                                           

TO    Environment: DEVVAL   System: TRAINING Subsystem: ENDCLASS Stage: D     


    MEMBER     ELEMENT    TYPE     COMMENT                               VERSION

  A JDDISP     * C1E0125E COB3B    *                                            

    JDNEW                 COB3B    *                                           

    JDOLD                 COB3B    *                                           

    JDSIMPLE              COB3B    *                                            

    JSIMPLE               COB3B    *                                           

    VSAM3                 COB3B    *                                           

    XSIMPLE               COB3B    *  


The foreground can be used for adding a COBOL (COB3B) element; however, at your installation invoking the Generate Processor in the foreground is not allowed.

A batch job must be used in order to add a new COBOL element.

Since a processor is not required, a Display, Retrieve and Sign-in can be performed in the foreground.
Q We are trying to determine if Endevor can be used to store our DDL for database creation (a central location for production DDL) I am not sure if there is a way to count the number of lines of one of our databases with the most line of 'code' but a guesstimate would be 100,000+; 70+ partitioned tablespaces w/40 parts, with partitioned indexes and several NPIs, aliases, triggers, table definitions, etc.

Is there a limit for the number of lines in a single Endevor element?

A There is no practical limit imposed by Endevor.

Your system staff may set some limits in the libraries.

Q Is it necessary to memorize all the CA-InterTest commands?
A SYS-EDís CA-InterTest course teaches the product using the ISPF menus and screens and command prompts. The ISPF screens allow a programmer to test and debug programs using basic and advanced features of CA-InterTest. The command prompt commands are an efficient way to utilize advanced techniques. And donít forget to download SYS-EDís reference cards.
Q The company that I work for is just beginning to work with CICS web applications. Does CA-InterTest support web applications?
A CA-InterTest can be used to interactively debug CICS web applications. SYS-EDís CA-InterTest course teaches request breakpoints which readily halt execution of web applications which access CICS. This affords a programmer the opportunity to perform all the CICS debugging activities.

Q I work for a Fortune 1000 company and have a large inventory of legacy COBOL programs; accordingly, I need to learn how to read dumps. Can SYS-ED help me acquire that skill?
A Reading a system dump requires knowledge of system architecture and language control blocks. It can be a time consuming and arduous task. Most large mainframe shops use Compuwareís Abend-AID for both diagnosing and resolving application and system failures.

In the SYS-ED Abend-AID course, we teach the common Abend-AID dumps and examine each section of the Abend-AID report. and parts, diagnose the problem and determine the solutions.

Q Does Abend-AID support DB2?
A Yes, Abend-AID does support DB2. SYS-EDís Abend-AID course teaches the DB2 components and pitfalls with debugging DB2 applications.

More specifically, faults are the unexpected conditions or exceptions that cause applications to fail. When a DB2 application fails in production, Abend-AID will analyze reason and SQL return codes along with the captured information to recommend corrective action.

Q We have a requirement whereby data in a dataset needs to be copied into a MS Excel spreadsheet in order that the data can be analyzed. Only a subset of fields will be allowed to be visible.
A The File-AID Reformat Utility can be used to meet your needs. In order to do so it will be necessary to use the original dataset COBOL record layout (copybook) and a customized record layout with the fields that are to be analyzed and visible. Once you have the two COBOL record layouts, a Reformat dataset must be allocated.

1. Use the Reformat dataset for creating a member to use the two record layouts and indicate how the field is to be moved from one record layout to the other.

2. Allocate the dataset to be downloaded and run the Reformat utility.
Q I was a student in the File-AID for Programmers class and have a question.

I was trying to do a fprint to my local printer, and I can't get the local print to work. We need to print out single record in the FMT format.

Worse case, we could perform a screen print; however, File-AID would be excellent tool for printing out one record in the required format.

- - - OR - - -
- - - OR - - -
- - - OR - - -

We entered HA332390 as the printer ID in the destination printer, tried using LOCAL, and a few other things. I also saw the person in charge of the printer, and she couldn't help me.

Do you have any suggestions?


In order to use the Print feature, one of the following is required:

1. A printer defined to the mainframe. It would appear likely that the local printer is not defined to the mainframe. A printer ID will need to be selected which is known to the mainframe.
2. Some organizations have a utility for sending a printout to a TCP/IP defined printer. It will be necessary to obtain the IP address of the local printer and use a organization-specific utility to print it.

It is also possible to submit the batch job and route it to a mainframe defined printer using EJES.

Q I was able to use a "CONTAIN clause" in batch which functioned correctly, but was not able to copy it and have it function correctly on-line. How can I achieve the same result on-line?

According to the File-AID batch reference manual:

The 'CO' for contains is only for online generated selection criteria. Your batch JCL would need to reference that selection PDS and member, and cannot directly code "CO".

For writing in "pure batch" File-AID, you can get the same effect as CO, but the code is not intuitive.

According to Compuware's File-AID batch reference manual:

Scanning Parameters
Use scanning parameters to search for a sequence of characters within a range of locations in a record. The scan length can be any number from 0 (zero) through 255 (excluding 1) as long as it is greater than the length of the data element. If you use 0 (zero), File-AID calculates a scan length from your specified location to the end of the record. Scanning repositions the input relative location pointer when the data value is found. Note: A scanning parameter can test only for an equal (EQ) condition. The data element of a scanning parameter is limited to character or hexadecimal data.

Example 1:
$$DD01 DUMP IF=(22,10,CíCLIPSí)

Example 1 generates a hexadecimal print of any record that contains the character string CLIPS in the scan field between locations 22 and 31.

Example 2:

Example 2 copies the input dataset while locating any record that contains the character string TEST in the scan field between locations 6 and 55. When File-AID locates the string TEST, it replaces it with the string PROD.

A Our solution is:




Essentially, using a range (in this case 361 to the end or the record, represented by the 0), causes FA to scan for an equal match. Or, change my zero to your length of 180, to limit the scan. The multiple character values separated by commas are "or's". If you had other conditions besides the scanning conditions, use the ORIF or the ANDIF.

Q Will File-AID assist in our transition to Health Insurance Portability and Accountability Act - HIPAA?
A HIPAA rules require that a number of fields in the datasets be reformatted. It is possible to reformat patient information without coding COBOL programs. File-AID has a number of reporting and extraction features for performing data analysis, which will identify which files and databases need to be restructured to accommodate HIPAA requirements.
Q Can File-AID access DB2 tables?
A Yes, File-AID/DB2 can access and create DB2 data without the need for coding SQL. It is also possible to analyze program SQL and trace results within the program logic flow.

File-AID DB2
Q We are using the SQL Analysis program in File-AID DB2. After a valid SQL statement is coded into the ISPF option in SQL Analysis, we attempt to run the EXPLAIN with the FADB2 and XP option. The program generates the following syntax error:  


Is this a configuration error or is the syntax error being caused by another problem.
A There is a progression of steps that can be used to identify and resolve the error.

Start by checking the BOUNDs being used by the system. It should be columns 1-72.  If it is not, a portion of the statement is being truncated.

In order to check the bounds, enter the ISPF interface to SQL Analysis and type in the command FADB2 BOUNDS.  

In order to change the BOUNDS setting enter:

"FADB2 1 72".

When changing the BOUNDS setting, do not specify the BOUNDS parameter in the command.

If the Left BOUNDS setting can not be changed from 7, the NUM setting for the PDS member being used had been previously set to COB.

If this was the case, then the Left Bounds setting will remain at 7 when trying to use the FADB2 command to change it.  

Changing the NUM setting for the member with the command "NUM OFF" or "NUM NOCOB" will allow the Left Bounds value to be set to something other than 7.
Q Our installation has recently upgraded to DB2 version 9. We use File-AID DB2 to recreate the EXPLAIN tables with the SQL Analysis option 0 Create or Maintain Explain Table(s). When we attempt to create the EXPLAIN tables, there is an error indicating a conflict in CCSID.

How can this problem be corrected?

What is the source of the problem?
A Change Tablespace where the EXPLAIN table will be placed. The new File-AID DB2 creates the EXPLAIN table using UNICODE as the CCSID.

If the Tablespace that is being used does not support UNICODE, the Create will fail.

Q Does Xpediter interface with Abend AID?
A Yes. When a program abends in Xpediter, enter the AA SNAP command. The AA SNAP command displays an Abend-AID Snapshot report containing context sensitive diagnostic information about an ABEND.
Q Can the TSO ALLOCATE command be used instead of the Xpediter ALLOCATE command?
A Yes. However, the TSO ALLOCATE command would have to be reentered after every TSO session. The Xpediter ALLOCATE command dynamically accesses the file allocation utility (FAU) from the debugging session.

When XPEDITER/TSO detects missing files, the ALLOCATE command can be entered for transferring control to the FAU, allocating the missing files, and then returning directly to the Source screen.

When testing a program, the ALLOCATIONS can be saved and automatically invoked.

Q Is it possible to determine which parts of a program are dead code and has never been executed?
A The COUNT command monitors program execution and reports the number of times a specified statement or range of statements has been executed. A condition can be set to pause execution when the execution count reaches the specified limit. If the counts are zero than indicates that the code was never executed.
Q What is the most efficient way for scrolling through the KEEP window?
A The commands DLEFT and DRIGHT can be used for scrolling through the KEEP window.
Q Is it possible to dynamically allocate memory while running a COBOL program in Xpediter?
A The Xpediter GETMAIN command invokes the GETMAIN macro and allocates virtual storage. At least one parameter (n, nK, LA= length address, LV= length value) must be specified with the GETMAIN command. Additional optional parameters then can be specified.

The address will be stored in register 1 if no address parameter is specified, and the return code is stored in register 15. A record of the command is written to the log.

Q How can the system registers be displayed at a breakpoint?

The GPREGS command displays the contents of the general-purpose registers at the bottom of the Source screen. GPREGS ON causes the contents of the general-purpose registers to be logged. Thereafter, the register values are written to the log only when GPREGS LOG has been entered.

Q Does the INTERCEPT command need to be invoked in order to perform online testing of a program?
A The INTERCEPT command is used in interactive mode to load the program and set before and after breakpoints. When testing interactively in BTS or dialog, the INTERCEPT command is generated automatically by XPEDITER/TSO.

INTERCEPT in an unattended batch test is used to get control in a subroutine or fetched procedure and establish qualification for the subroutines or procedures to be invoked. The command also identifies the program to be tested in the BTS environment.

Q How can a executed statement be examined; while backtracing thru the program execution?
A The MONITOR and REVERSE commands are used to activate review mode. Review mode provides the capability for recording and reviewing the execution path by reversing the direction of program execution.

The MONITOR command is used prior to executing a program in order to record execution. Then use the REVERSE command to review the execution history by tracing through the recorded history in the reverse direction. The execution path and the changing data values can be examined while reviewing program execution.

Q What languages are supported by Xpediter?
A Xpediter supports COBOL, Assembler, C and PL/1. The courses offered through our SYS-Ed schedule teach COBOL. Private courses at the client location can be taught using any of the programming languages.
Q When SYS-ED teaches techniques for compiling COBOL with Xpediter; will shop standards also be covered?
A The courses offered through our New York schedule present and demonstrate standards common to large z/OS COBOL installations.

SYS-ED has the flexibility and resources to teach private courses for as few as three individuals from a company. For these courses, our Curriculum Managers will review the standards and procedures with the client in order to determine the best way to create the DDIO dataset, compile programs, execute the test program in batch, and use the Batch Connect feature.

Longstanding Experts in Information Technology