| IBM MAINFRAME HELP & SUPPORT FORUMS
Technical Forums for IBM Mainframe Applications like COBOL, JCL, CICS, DB2, FileAid, DFSORT, Endevor, Xpediter, CoolGen, CA-7&11, AbendAid, IMS, IDMS, PL/I, MqSeries, SyncSort, Assembler, ChangeMan, Easytrieve, InterTest, REXX, CLIST etc...
|
| View previous topic :: View next topic |
| Author |
Message |
ashwinreddy
Joined: 16 Sep 2004
Posts: 106
Location: Hyderabad
|
| Posted: Thu Sep 23, 2004 7:59 pm Post subject: About comparing two datases |
|
|
Hai
I need program to compare two datasets(includes all columns) if any two datasets matches write to another dataset.
please try to send solution to my problem
Thanks ashwin |
|
| Back to top |
|
sandip_datta
Joined: 02 Dec 2003
Posts: 152
Location: Tokyo, Japan
|
| Posted: Fri Sep 24, 2004 7:12 am Post subject: |
|
|
I don't understand what do you want to mean? What do you want to write to a third dataset?
You can compare two datasets using ISPF option 3.13, with Fileaid option 10 from primary menu, using COMPAREX in batch mode and some other utilities also.
Regards,
Sandip. |
|
| Back to top |
|
sudheerkumar_k
Joined: 08 Sep 2004
Posts: 11
Location: Bangalore
|
| Posted: Tue Nov 02, 2004 12:37 pm Post subject: Ashwin if not able to use before solution use this |
|
|
Ashwin Reddy,
As sandip said 1. You can use File Aid Option 10
2. SuperCE Utility in ISPF at 3.13
Otherwise make use of this program it works in our shop check in our shop.
//HTDAESKB JOB (WATSBAR,C8510A08,EB10B051),'CHANDANAM',CLASS=6,
// MSGCLASS=X,USER=HTDAESK,NOTIFY=HTDAESK
//**********************************************************************
//* COMPARING TWO DATASETS FOR A SPECIFIED COLUMNS.
//* EX: THE BELOW JCL COMPARES TWO DATASETS FOR THE COLUMNS 7-72 AND
//* WRITES THE O/P TO SYSOUT. EVEN A NEW FILE CAN BE CREATED IF NOT
//* DIRECTED TO SYSOUT
//**********************************************************************
//SUPERC EXEC PGM=ISRSUPC, *
// PARM=(CHNGL,LINECMP,
// '',
// '')
//NEWDD DD DSN=HTDAESK.CCMS.JCLS(TEST1),DISP=SHR
//OLDDD DD DSN=HTDAESK.CCMS.JCLS(TEST2),DISP=SHR
//OUTDD DD SYSOUT=A
//
//*OUTDD DD DISP=(NEW,CATLG,DELETE),
//* MGMTCLAS=QTRLY,
//* DSN=HTDAESK.CCMS.COMPARE1,
//* DCB=(SYS2.DSCB,LRECL=13,RECFM=FB,BLKSIZE=0),
//* UNIT=DISK,
//* SPACE=(CYL,(80,30),RLSE)
//*
//SYSIN DD *
CMPCOLM 7:19
/*
|
|
| Back to top |
|
| |
THIS IS AN ARCIVE FORUM IN READ ONLY MODE. IF YOU WANT TO ASK YOUR DOUBTS USE THE ACTUAL FORUM
|
