Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

comparing two GDGS by file-aid and outputting duplicates

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Compuware & Other Tools
View previous topic :: :: View next topic  
Author Message
saujanya_2831

New User


Joined: 09 May 2007
Posts: 27
Location: pune

PostPosted: Thu May 24, 2007 6:24 pm    Post subject: comparing two GDGS by file-aid and outputting duplicates
Reply with quote

can we compare two GDGs files and output duplicates in third dataset using file aid based on few key fileds in a proc.can anyone post a sample jcl if possible
Back to top
View user's profile Send private message

murmohk1

Senior Member


Joined: 29 Jun 2006
Posts: 1439
Location: Bangalore,India

PostPosted: Fri May 25, 2007 10:23 am    Post subject:
Reply with quote

Saujanya,

Quote:
can we compare two GDGs files


Do you mean gdg versions. If you meant versions, it just like normal flat file comparisions. Either your provide absolute generation number or provide generation number (like (0)/(-1) in the JCL).
Back to top
View user's profile Send private message
saujanya_2831

New User


Joined: 09 May 2007
Posts: 27
Location: pune

PostPosted: Fri May 25, 2007 12:20 pm    Post subject:
Reply with quote

yes murali they are gdg versions and actually we are removing comparex utility ,so iam looking for other options .i came to know file-aid is also a better option to do the same.but how i can use fileaid in proc as i have to compare them write duplicates in another gdg based on few key fields and subsequently that file will be used for reports.can you give me sample jcl for the same
Back to top
View user's profile Send private message
murmohk1

Senior Member


Joined: 29 Jun 2006
Posts: 1439
Location: Bangalore,India

PostPosted: Fri May 25, 2007 2:32 pm    Post subject:
Reply with quote

saujanya,

As of now, I have no mainframe access. But can provide a rough way to get the required JCL.

In the fileaid, there is an option called COMPARE (either in mainscreen or in the utilities option - cant remember exactly). Once you enter into compare screen, give the file names to compare and bottom of the screen select for BATCH MODE. Use the JCL after providing job card (if not given earlier) in the next screen.

Hope this helps you out.
Back to top
View user's profile Send private message
saujanya_2831

New User


Joined: 09 May 2007
Posts: 27
Location: pune

PostPosted: Fri May 25, 2007 3:22 pm    Post subject: thnx murli
Reply with quote

hi murli the gdgs which iam using are temporary so i cant give record format in compare option in file-aid but i got sample jcl from other link.one more query iam using a control card in comaprex so how to use it here.
KEY=(1,2,C,A)
KEY=(3,4,C,A)
KEY=(7,16,C,A)
KEY=(23,16,C,A)
KEY=(39,15,C,A)
KEY=(54,6,C,A)
KEY=(60,7,C,A)
KEY=(81,1,C,A)
MASK=(61,19)
MASK=(82,END)
MAXDIFF=5
CONTINUE
PRINT=MISMATCH
COPYDIFF

and or can i use the same control card.can you please suggest.
Back to top
View user's profile Send private message
murmohk1

Senior Member


Joined: 29 Jun 2006
Posts: 1439
Location: Bangalore,India

PostPosted: Fri May 25, 2007 4:13 pm    Post subject:
Reply with quote

I dont know comparex. But you cannot use this for fileaid.
Back to top
View user's profile Send private message
saujanya_2831

New User


Joined: 09 May 2007
Posts: 27
Location: pune

PostPosted: Mon May 28, 2007 3:55 pm    Post subject: can you suggest some solution
Reply with quote

hi murli you know my problem so can you please suggest or tell me how to do it in superc by using ISRSUPC instead of FILEAID.this is the sample jcl i got .


// JOB
//SEARCH EXEC PGM=ISRSUPC,PARM=(’SRCHCMP,ANYC’)
//STEPLIB DD DSN=ISPF330.LOAD,DISP=SHR
//NEWDD DD DSN=USERID.PDS,DISP=SHR
// DD DSN=USERID.PDS2,DISP=SHR
//OUTDD DD SYSOUT=*
//SYSIN DD * SRCHFOR ’NEEDLE’,W,10:20
/*
//

KEY=(1,2,C,A)
KEY=(3,4,C,A)
KEY=(7,16,C,A)
KEY=(23,16,C,A)
KEY=(39,15,C,A)
KEY=(54,6,C,A)
KEY=(60,7,C,A)
KEY=(81,1,C,A)
MASK=(61,19)
MASK=(82,END)
MAXDIFF=5
CONTINUE
PRINT=MISMATCH
COPYDIFF


thnx
Back to top
View user's profile Send private message
saujanya_2831

New User


Joined: 09 May 2007
Posts: 27
Location: pune

PostPosted: Sat Jun 23, 2007 11:16 am    Post subject: can i get the same result in file-aid
Reply with quote

Hi murli can i get the same result in file-aid.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Compuware & Other Tools All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Changing of LRECL of a file abdulrafi DFSORT/ICETOOL 2 Fri Mar 24, 2017 3:25 pm
No new posts splitting a file abdulrafi DFSORT/ICETOOL 3 Fri Mar 24, 2017 11:51 am
No new posts Receive a file using PCOMM macro Harald.v.K IBM Tools 0 Thu Mar 23, 2017 6:50 pm
No new posts Export flat file data into excel sheet murali.andaluri DFSORT/ICETOOL 2 Mon Mar 20, 2017 5:39 pm
No new posts Formatting VB File Learncoholic DFSORT/ICETOOL 3 Mon Mar 20, 2017 12:29 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us