Home      Mainframe Forum      Mainfarme Tutorials      IBM Manuals      Mainframe Interview Questions      Mainframe Books      IT News     SiteMap     Downloads


     
 
MAINFRAME - TIP OF THE DAY : To allow a job or step to use the maximum amount of time, code TIME=MAXIMUM. Coding TIME=MAXIMUM allows the job or step to run for 357912 minutes. (Approx. 248 days)

Google
 
Web mainframegurukul.com

Programmers Voted for below topics.      Please Vote for good Posts. Votes Salutes
Topic Title Votes Salutes
splitting of records using cobol 6
HOW TO FIND LINKAGE LENGTH 6
SOC 7 abend - interview question 6
jcl sort to add leading zeroes 5
Infosys Training Program for freshers 4
EJECT Verb in COBOL 4
Changes in copybook 4
Comparing two files 3
What are the issues related with correlated subqueries? 3
VSAM File status 23 ,but records are present in the file 3
what is index or subscript in cobol. please give me brief ex 3
IKJ56500I COMMAND DSN NOT FOUND 3
EZtrv+ - Is there a way to suppress ez-code from printing... 1 1
Merging two files into one based on certain key fields: 1 1
Copy GDG to GDG (one to one). 1 1
Cobol Multiple Choice Questions By Shravan Wipro 1 1
Hexadecimal to decimal conversion - SORT JCL INREC OUTREC 1 1
What is the difference between SYNONYM and ALIAS? 1 1
sort two files with same sort condition 1 1
jcl sort to add leading zeroes 5
How we can access PDS and its Members thru COBOL ? 3
VSAM File status 23 ,but records are present in the file 3
Urgent Help needed !! 3
Hexadecimal to decimal conversion - SORT JCL INREC OUTREC 2
What is auditing? 2
Reg DFSORT utility. 2
Computer based tutorial on IMS DB/DC 2
what is index or subscript in cobol. please give me brief ex 2
How to compare two ps files having millions of records ? 2
How to read HEX file and convert it into decimal in REXX. 2
stored procedure in cobol 2
what s the difference between DB2 & ADB2? 2
Comparing Date with current date 1
How to assign System Date/Time to a parameter in a JCL pgm? 1
Man of the year 1
I need to FTP from MF to UNIX 1
How to convert Julian date format into yyyymmdd date format? 1
SOC 7 abend - interview question 1
What is the difference between Static and Dynamic Binding? 1
EZtrv+ - Is there a way to suppress ez-code from printing... 1
DB2 checkpoint-restart doubts 1
sort two files with same sort condition 1
U4093 IMS Abend 1
Is it possible to get last modified date of PDS members... 1
Merging two files into one based on certain key fields: 1
Corresponding statement 1
How to write a JCL using IEBCOMPR

 
Post new topic   Reply to topic    mainframegurukul.com Forum Index -> JCL
  View previous topic :: View next topic  
Author Message
IEBCOMPR
Guest





Answer was approved by Question owner.
Useful Post
0 votes
Not an useful post
Greate Post!! Salute Author
0 salutes

PostPosted: Thu Mar 30, 2006 12:36 pm    Post subject: How to write a JCL using IEBCOMPR Reply with quote

My MAin concern is to write a JCL for comparing two PS files so that the common elements are present in a third PS file

Is this useful for the case of Pds Datasets also?
Back to top
Click here, If this post answer your question. <-- Click on right mark icon. If this post answer your question.

arrbee
Active Member


Joined: 24 Feb 2006
Posts: 146

Answer was approved by Question owner.
Useful Post
0 votes
Not an useful post
Greate Post!! Salute Author
0 salutes

PostPosted: Thu Mar 30, 2006 1:39 pm    Post subject: 3.13 Reply with quote

How about using ISPF option 3.13? It should be easier.
_________________
Arr Bee
-------------
?My joy in learning is partly that it enables me to teach? - Seneca(Roman philosopher, mid-1st century AD)
Back to top
View user's profile Send private message Send e-mail
Click here, If this post answer your question. <-- Click on right mark icon. If this post answer your question.
sss_shashank12
Member


Joined: 08 Mar 2006
Posts: 4

Answer was approved by Question owner.
Useful Post
0 votes
Not an useful post
Greate Post!! Salute Author
0 salutes

PostPosted: Mon Apr 03, 2006 9:24 am    Post subject: Comparing files Reply with quote

Hi

I wanted to know the strings which comes after the comparision. In 3.13 I will get the number of strings which are same.... But not the strings which are same....

Could you plz tell me a Jcl for the same so that I could get the strings which pass the comparision... i.e. which are same in two files

Thanks & Regards,
Shashank
Back to top
View user's profile Send private message Send e-mail
Click here, If this post answer your question. <-- Click on right mark icon. If this post answer your question.
arrbee
Active Member


Joined: 24 Feb 2006
Posts: 146

Answer was approved by Question owner.
Useful Post
-1 votes
Not an useful post
Greate Post!! Salute Author
0 salutes

PostPosted: Mon Apr 03, 2006 10:27 am    Post subject: Reply with quote

Shashank,

If I had to do the compare between two PDS members then I would open a member (MEMBER1) first and issue the below command:

" COMPARE YOUR.PDS.NAME(MEMBER2)"

and it will list all the compared and common lines online there itself.

Here is the example.........

Code:

1). Open your member (EX. SHASH01) in View or Edit mode.

2). The content of SHASH01 suppose:

EDIT       XXXXX.XXXXXX.XXX(SHASH01) - 01.00               Columns 00001 00072
Command ===>                                                  Scroll ===> CSR 
****** ***************************** Top of Data ******************************
000001 AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
000002 BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB
000003 000000000000000000000000000000000000000000000000000000000000000000000000
000004 111111111111111111111111111111111111111111111111111111111111111111111111
****** **************************** Bottom of Data ****************************

3). The content of SHASH02 suppose:

EDIT       XXXXX.XXXXXX.XXX(SHASH02) - 01.01               Columns 00001 00072
Command ===>                                                  Scroll ===> CSR 
****** ***************************** Top of Data ******************************
000001 AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
000002 BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB
000003 999999999999999999999999999999999999999999999999999999999999999999999999
000004 222222222222222222222222222222222222222222222222222222222222222222222222
****** **************************** Bottom of Data ****************************

4). Issue the command "COMPARE XXXXX.XXXXXX.XXX(SHASH02)" at Command ==> prompt.

5). This is how your compares would look like...

EDIT       XXXXX.XXXXXX.XXX(SHASH01) - 01.00               Columns 00001 00072
Command ===>                                                  Scroll ===> CSR 
****** ***************************** Top of Data ******************************
000001 AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
000002 BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB
====== 999999999999999999999999999999999999999999999999999999999999999999999999
====== 222222222222222222222222222222222222222222222222222222222222222222222222
.OAAAA 000000000000000000000000000000000000000000000000000000000000000000000000
.OAAAB 111111111111111111111111111111111111111111111111111111111111111111111111
****** **************************** Bottom of Data ****************************


At present, I am not getting an idea on how to achieve it using a JCL!! But, probably a REXX utility should help you. Sorry, I am not a REXX pro.

HTH.
_________________
Arr Bee
-------------
?My joy in learning is partly that it enables me to teach? - Seneca(Roman philosopher, mid-1st century AD)
Back to top
View user's profile Send private message Send e-mail
Click here, If this post answer your question. <-- Click on right mark icon. If this post answer your question.
rangab
Active Member


Joined: 17 Mar 2006
Posts: 56

Answer was approved by Question owner.
Useful Post
0 votes
Not an useful post
Greate Post!! Salute Author
0 salutes

PostPosted: Mon Apr 03, 2006 12:23 pm    Post subject: Reply with quote

Shashank,

Would you try this JCL?

Code:

//STEP0001 EXEC PGM=ICETOOL                 
//TOOLMSG  DD SYSOUT=*                       
//DFSMSG   DD SYSOUT=*                       
//SAVEDD   DD SYSOUT=*                       
//IN       DD *                             
12345 RAM                                   
33333 SENTHIL                               
78888 VENU                                   
//         DD *                             
12345 RAM                                   
21156 MAHESH                                 
33333 SENTHIL                               
78900 PRAKASH                               
//OUT      DD SYSOUT=*                       
//TOOLIN   DD *                             
  SELECT FROM(IN) TO(OUT) ON(1,5,CH) FIRSTDUP


Courtesy: Ravi

HTH.
_________________
========
Ranga...:-0)
========
Learn Which You Don't Know - Teach Others Which They Don't Know.
Back to top
View user's profile Send private message
Click here, If this post answer your question. <-- Click on right mark icon. If this post answer your question.
Display posts from previous:   
Post new topic   Reply to topic    mainframegurukul.com Forum Index -> JCL All times are GMT + 5 Hours
Page 1 of 1



 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum

Related topics
 Topics   Replies   Author   Views   Last Post 
No new posts Merging two files into one based on certain key fields: 4 MVS_blob 10321 Thu Oct 25, 2007 9:06 pm
Frank Yaeger View latest post
No new posts compare two files and write duplicate records to file no dup 3 mainframeman 15181 Wed Dec 20, 2006 1:53 am
Frank Yaeger View latest post
No new posts 2 Phase commit 3 156138 4716 Mon Nov 27, 2006 5:05 pm
kalva View latest post
No new posts comparing two flat files 10 abhishek.pradhan 10448 Fri Nov 24, 2006 9:42 am
abhishek.pradhan View latest post
This topic is locked: you cannot edit posts or make replies. To compare two files (SSN fields) 20 vikasbs 23324 Thu Nov 09, 2006 9:55 pm
Frank Yaeger View latest post
 





Cobol Tutorial
This cobol tutorial covers most of the important topics like STRING, UNSTRING, COMP, COMP-3.....
DB2 Tutorial
DB2 Tutorial focuses on DB2 COBOL Programming. Explains in simple language. Some Chapters are locked, Forum members have free access to these chapters
CICS Tutorial
This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming...
JCL Tutorial
This is most popular JCL tutorial from mainframegurukul. It does contain important jcl ....
SORT Tutorial
This Tutorial covers all important aspects of DFSORT. Has more SORT examples
INTERVIEW Questions
This page covers important interview questions
Mainframe Jobs
Mainframe Jobs posted by members of mainframegurukul forum
FaceBook Page
MainframeGurukul FaceBook Page
LinkedIn Page
MainframeGurkul Linkedin Page

This widget requires Flash Player 9 or better







Go to top of the page
 

Online ABEND Reference ||  JCL References ||  COBOL References ||  VSAM References ||  Tutorials by Drona Series ||  SQL tutorial ||  BOOKS  ||  DB2 INTERVIEW QUESTIONS ||  COBOL INTERVIEW QUESTIONS  ||  JCL INTERVIEW QUESTIONS ||  JCL2 INTERVIEW QUESTIONS ||  VSAM INTERVIEW QUESTIONS ||  CICS INTERVIEW QUESTIONS  ||  Online tutorials ||  Online ABEND Reference ||  JCL References ||  COBOL References ||  VSAM References ||  Tutorials by Drona Series ||  SQL tutorial ||  BOOKS  ||  SiteMap  ||  Expeditor Tutorial  ||  FILE-AID Tutorial  ||  Changeman Tutorial  ||  COBOL   ||  DB2   ||  JCL  ||  CICS  ||  VSAM  ||  DB2 Interview Questions ( 110 )   || Simple JCL Tutorials  || JCL Tutorial from MainframeGurukul.com   || Simple JCL Tutorial - Chapter1 ;|| Mainframe Forum - Tutorials  || Mainframe Tutorials || Mainframe CICS tutorial|| Mainframe COBOL Tutorial

Drona Educational Forums - Mainframe Cobol DB2 CICS Board
Powered by phpBB

mainframetopic-85.html