Author Archive

Useful list of TSO/ISPF Commands

1) To view the structure (details like starting position, end position, length and type of fields) of a copybook – This can be viewed from FILEAID option 8. 2) To Copy a member from one PDS to Another: Open the first PDS using 3.4, and type C before the member and ENTER it will ask

COBOL Line numbers – Quick Ref-1

How to remove the line numbers in 1 to 6 columns in TSO/ISPF i) First set the Bands – type BNDS on line-number of the editor panel Generally the default bands are set from 1 to 72 columns as shown below and this can be changed as per our requirement. This can also be used

Modifying a MAP using SDF II in CICS

CICS MAP – adding a new field Step by step Procedure using SDF II: [crayon-5d87686c5f38b399810745/] Step 1: Import the MAP from the production or any other region: From Utilities, Enter into Migrate functionality which is used to import Objects from other region into test region. It is very iseful for the MAP modifications as the

SQLDA Usage_Dynamic SQL

SQLDA USE in Dynamic SQL: Db2 uses the SQL Descriptor Area(SQLDA) to communicate the dynamic SQL information to the application program. It contains the various information like type of SQL, length, pointer to the actual data & number of columns etc. which are very useful for better coding. To get this information into SQLDA after

How to check whether a sequential file (PS) or VSAM file is empty or not?

Sometimes we may face a requirement to check the file is empty or not, if it is empty stop the process other wise proceed with further steps using JCL. Here are some of the commonly used methods to check whether a Physical Sequential (PS) or VSAM File is empty or not. 1. By Using IDCAMS

COBOL DB2 Multi Row Fetch

Multi row Fetch Overview in COBOl Db2 program WITH EXAMPLE: Cobol Db2 multi row fetch concept will be used to retrieve multiple rows with a single fetch statement as opposed with a normal cursor which fetches only single record at a time. The multi-row fetch capability was introduced to DB2 z/OS in Version 8. This

COBOL Index & Subscript

COBOL Index and Subscript – Performance considerations Index and Subscript in COBOL are the very important concepts. Both are used to reference an array or table element in COBOL programs. By knowing the basic differences between the two, one can code the programs efficiently in performance point of view. 1. Index –> Represents the displacement

Dynamic SQL in DB2 COBOL

How to code Dynamic SQL(DS) in a COBOL DB2 Program Dynamic SQL is prepared and executed at the run time as opposed to embedding it in the host language program as in a staticĀ  one. Using dynamic SQL in the application programs has proved many advantages. For ex: In some cases the businesses requirement demands

Exception Handling in CICS

Exception handling It is one of the core concept in CICS coding. Programmer should have knowledge on exception handling methods for effective use of these methods while developing any program. This topic gives various types of exception handling and usage of each one in detail. By default CICS manages the exceptions internally and ends programs

File AID Tutorial and useful commands

File aid is having two types one which is used for File operations and second one is used for DB2 (file aid for DB2). Here we are going to discuss about the file aid for files. Fileaid is a very useful tool in the mainframes, it can be used to browse (PS, VSAM), EDIT the