Mainframe For Dummies

MATCH - MERGE     LOGIC   Match Merge logic is extensively used in COBOL programs to compare the data in two sequential files effectively. Only pre-requisite to for using this logic is, all input files to be in Sorted Order   Problem : I have 2 Sequential files File 1   and File 2 .                  If Record exists in both the files then write data into FILE A                                If Record exists only in File1 and not in File2 then write data into FILE B                  If Record exists only in File2 and not in File1 then write data into FILE C   Solution: The effective way of solvi ng above problem is, by using Match Merge Logic. Only pre-requisite to for using this logic is, all input files to be in Sorted Order.  First step sort I/P file   Explanation of Logic : Below listed are I/P and Output files data for say RollNo   File 1                   File 2                         FILE A                     FILE B                              FILE C 10          ...

  1.     Where do we use TSQs                  Data in TSQ is stored as VSAM files a.     Pageup and Pagedown Logic b.     For writing Log Details (as we cant use Displays in CICS)   2.     How do we access the TSQ using a Key field a.     Using RIDFIELD   3.     What is Sync Point and why is called as 2 Phase Commit a.     Sync point is issued to save the data till that LUW. b.     This is called as 2 Phase commit as , first it saves the data pertaining to File, Db2 then CICS data. 4.     I would like to generate only Input field (along with A, F, L) and not Output files in my Symbolic Map, how to achieve this ? a.     Use Mode = IN   , in BMS macro 5.     How do you position your cursor on Map. a.     Co...

Cobol-DB2 Cobol -IMS 1 Need to Prcompile to generate 1. DBRM (Sql Staments only) 2. Cobol Object code No Precompilation Required 2 Bind the DBRM to Generate Plan. Plan consists of Executable SQL Quries No Bind Process is Required. Here we Write PSBs to fetch respective Record. 3 Compile Cobol Code Compile Cobol-Ims program 4 Execute Cobol - DB2 Program using IKJEFT01, where in we Specify Program Name and Plan Name to be Executed Execute Cobol-IMS program using DFSRRC00. Pass Program Name , PSB, Name, Plan name Thru Parm Parameter Why We need BIND In DB2 not in IMS Say below query is written in Cobol-Db2 Program Equivalent IMS Call 1 Select A, B, C First Define PCB to Fetch the field A, B, C Where A=10 Using DLI Call fetch the field A, B, ...