MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Equivalent of COMPAREX in FileAid.

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities
View previous topic :: View next topic  
Author Message
mona_luthra
Beginner


Joined: 15 Sep 2003
Posts: 2
Topics: 1

PostPosted: Tue Sep 16, 2003 1:50 am    Post subject: Equivalent of COMPAREX in FileAid. Reply with quote

What will be the equivalent of following code having COMPAREX in FileAID ?
Code:

//COMPAR1   EXEC PGM=COMPAREX                                           
//SYSPRINT  DD SYSOUT=5                                                 
//SYSUT1    DD DISP=SHR,                                               
//             DSN=COMPARE.TEMP                                     
//SYSUT2    DD DISP=SHR,                                               
//             DSN=COMPARE.TEMP1                                   
//SYSUT3    DD DISP=SHR,                                               
//             DSN=COMAPRE.DIFF
//SYSIN     DD *                                                   
        MAXDIFF=999,CONTINUE                                           
        FORMAT=25                                                       
        DASH=C'#'                                                       
        KEY=(1,40,,A)
        COPYDIFF
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12375
Topics: 75
Location: San Jose

PostPosted: Tue Sep 16, 2003 5:48 am    Post subject: Reply with quote

Mona,

The above posted JCl is used to compare 2 datasets SYSUT1 & SYSUT2.I perosnally don't have proctical experience with comparex but here is an explanation of the control cards.
Code:
 
        MAXDIFF=999,CONTINUE                                           
        FORMAT=25                                                       
        DASH=C'#'                                                       
        KEY=(1,40,,A)
        COPYDIFF


MAXDIFF=999,CONTINUE informs COMPAREX to stop PRINTING differences after 999 mis-matches, but the differing SYSUT2 records will still CONTINUE to be copied to SYSUT3.

Key=(1,40,,a) means the compare should be made on the frst 40 bytes ascending

COPYDIFF means that any SYSUT2 Records that differ from SYSUT1 will be written to SYSUT3

I have no idea of DASH & FORMAT parms

Superc or sort can be used to compare the datasets.

Hope this helps...

cheers

kolusu


Last edited by kolusu on Thu Sep 18, 2003 5:55 am; edited 1 time in total
Back to top
View user's profile Send private message Send e-mail Visit poster's website
mona_luthra
Beginner


Joined: 15 Sep 2003
Posts: 2
Topics: 1

PostPosted: Tue Sep 16, 2003 6:21 am    Post subject: Reply with quote

Thanks Kolusu.

Regards,
Mona
Back to top
View user's profile Send private message
mok
Beginner


Joined: 16 May 2003
Posts: 12
Topics: 0
Location: paris

PostPosted: Wed Sep 17, 2003 10:11 am    Post subject: Reply with quote

Hi Mona,
I think the dash parameter is used to distinguish the differences between the 2 files and the format is the length of each mismatching record in the side by side sysout of Comparex.
Just a precision : I have not used Comparex for more than 10 yeras.
Back to top
View user's profile Send private message
gore
Beginner


Joined: 10 Dec 2002
Posts: 46
Topics: 20
Location: Providence, RI

PostPosted: Tue Jul 24, 2007 2:56 am    Post subject: Reply with quote

I am not exacly sure what the following card in comparex is doing.

I do not have access to any comparex manuals as comparex has been removed from my shop and this job was the only job that was using it and was left out.
Code:

//COMPAREP  EXEC PGM=COMPAREX                   
//STEPLIB   DD DISP=SHR,DSN=CPRX.COMPAREX.LOAD 
//SYSPRINT  DD SYSOUT=*                         
//PRINTDD   DD SYSOUT=*                         
//SYSUDUMP  DD DUMMY                           
//SYSUT1    DD DISP=SHR,DSN=SYSPGRP.DB1.VFBPLN10
//SYSUT2    DD DISP=SHR,DSN=SYSPGRP.DB2.VFBPLN10
//SYSIN     DD *                               
 FORMAT=06                                     
 KEY=(29,8,C,R)                                 

My understanding is it is comparing fileds in file starting from 29 col, 8 character long. Not sure what 'FORM=06', 'C' and 'R' mean here.

I have to modify this job to remove comparex and use superc.

Can anyone answer this question?
_________________
Gore
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities 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


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group