Skip to main content

Posts

Mainframe Consultants / Programmers

Mainframe Consultants / Programmers are available immediately to work on  Mainframe Projects across the globe.  Contact me (arunam7@gmail.com or mfdtech@gmail.com )  to discuss further if below are your requirements

1 . Would like to Outsource the Projects ?
2.  Need Experienced Consultants to work at client Place
3.  Need Freshers / Trained Mainframe programmers to work at client Place
4.  Mainframe Training for Corporate
5. Recruitment assistance   




Recent posts

Freshers 2017 / 2018 Passout Graduates Job oppurtunity with MNCs

Freshers 2017/2018  Passout Graduates -  Job oppurtunity with MNCs

Prerequisites

1.  Should have 65 % and above through out 10/10+2 /BE/MCA
2.  All Branches
3.  Year of Passing 2017 and 2018
4.  Send your Resume to mfdtech@gmail.com
     Subject line :  Location/PassOut/Branch/%Marks
                         Eg :  HYD-2018 - CSE - 70%

I will write back to you with the process involved

Match_merge_logic

MATCH - MERGE     LOGICMatch Mergelogic 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 OrderProblem :I have 2 Sequential files File1  and File2.                 If Record exists in both the files then write data into FILEA                 If Record exists only in File1 and not in File2 then write data into FILEB                 If Record exists only in File2 and not in File1 then write data into FILECSolution: The effective way of solving 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 fileExplanation of Logic : Below listed are I/P and Output files data for say RollNoFile1File2                         FILEA                     FILEB                              FILEC10                      10                               1020                      20�������…

Inter_View_Qns2

1.Where do we use TSQs                  Data in TSQ is stored as VSAM filesa.Pageup and Pagedown Logicb.For writing Log Details (as we cant use Displays in CICS)2.How do we access the TSQ using a Key fielda.Using RIDFIELD3.What is Sync Point and why is called as 2 Phase Commita.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 macro5.How do you position your cursor on Map.a.Code   IC, in Attribute field of BMS macro of respective fieldb.Move -1 to Length field of respective fieldc.Using SEND MAP    CURSOR ( 100 )6.How do you test Physical Map layout in CICS region.a.Use CECI send Map () Mapset()7.What’s the debugging tool used for CICSa.We use CEDF/Intertest/Expeditor.8.How do you test / check the Cobol flow thru CEDFa.Use the …

DB2-IMS - Few Difference

Cobol-DB2Cobol -IMS


1Need to Prcompile
to generate1. DBRM (Sql Staments only)
2. Cobol Object codeNo Precompilation Required2Bind the DBRM to Generate Plan. Plan consists of
Executable SQL QuriesNo Bind Process is Required.
Here we Write PSBs to fetch respective Record.3Compile Cobol CodeCompile Cobol-Ims program4Execute Cobol - DB2 Program using IKJEFT01, where in we
Specify Program Name and Plan Name to be ExecutedExecute Cobol-IMS program using DFSRRC00. PassProgram Name , PSB, Name, Plan name Thru Parm Parameter



Why We needBIND In DB2 not in IMS




Say below query is written in Cobol-Db2 ProgramEquivalent IMS Call


1Select A, B, CFirst Define PCB to Fetch the field A, B, C
Where A=10Using DLI Callfetch the field A, B, C specified in above PCB

CALL CBLTDLIUSINGGU , PCB-NAME , SSA-Field
(Populate Key value 10 to SSA)2Above Query turned to executable query by binding Plancompile PSB (can hold n no of PCBS)3use this plan to execute the Program (while execut…

How to Solve SOC7 Abend - with screen shots

Below process helps to find out the statement, caused the SOC7 error.


Check the Sysout of RUNJCL. This shows the error statement and lists offset valueTake the Offset Value 000003C0Got to respective Compilation Job listing, check the sysprint Search for the offset value 0003C0 (delete +00 -- initial 3 letters of Offset value and search for it) check below 2 screen shotsThis Offset value is listed under line no 0045 – which refers to Move statement.
Take this no. 045 and find for it in same sysprint. This points to the exact statement, caused SOC7 This 045 pints to the Move statement 1526, this is the exact line in the programCheck for the above line no. In source program. This points to the statement highlighted below. Check the statement, variable check-4, which is added to check-6. These are having different Picture clause.check-4 is alfhanumaric, holding some junk data, when this data is moved to Chcek-6 variable(of comp-3) creates SOC7 error.This is just an example to explain one ca…