IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Compare two files by composite key


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Shivendu

New User


Joined: 20 Feb 2009
Posts: 14
Location: Workstation

PostPosted: Mon Apr 06, 2009 5:08 pm
Reply with quote

Need to compare data in two files FILE1 and FILE2. Data which is present ONLY in FILE2 should be written to a new file FILE3.

File lenght:3518 bytes
13 bytes starting at 455th position and one byte from 471 poition together make the key

Below code not working icon_sad.gif
Code:
COPY FROM(IN1) TO(T1) USING(CTL1)                       
COPY FROM(IN2) TO(T1) USING(CTL2)                       
SELECT FROM(T1) TO(OUT) ON(455,13,CH) ON(471,1,CH) NODUPS USING(CTL3)
/*                                                       
//CTL1CNTL DD *                                         
  INREC OVERLAY=(3519:C'1')                             
/*                                                       
//CTL2CNTL DD *                                         
  INREC OVERLAY=(3519:C'2')                             
/*                                                       
//CTL3CNTL DD *                                         
  OUTFIL FNAMES=OUT,INCLUDE=(3519,1,CH,EQ,C'2'),         
    BUILD=(1,3518)                                       
/*                                                       
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Mon Apr 06, 2009 5:31 pm
Reply with quote

Quote:
Below code not working

Please explain what is not working. What results do you expect and what are you getting.

Are your files FB or VB
Back to top
View user's profile Send private message
himanshu7

Active User


Joined: 28 Aug 2007
Posts: 131
Location: At Desk

PostPosted: Mon Apr 06, 2009 6:20 pm
Reply with quote

Didnt you get the solution from the below post?

ibmmainframes.com/viewtopic.php?t=39471&postdays=0&postorder=asc&start=15
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Mon Apr 06, 2009 8:53 pm
Reply with quote

Hello,

Quote:
Below code not working
Do not post "it is not working".

When something is not working you need to post the abend or error message(s) including the message ids.
Back to top
View user's profile Send private message
Terry Heinze

JCL Moderator


Joined: 14 Jul 2008
Posts: 1249
Location: Richfield, MN, USA

PostPosted: Mon Apr 06, 2009 9:13 pm
Reply with quote

dick scherrer wrote:
Hello,

Quote:
Below code not working
Do not post "it is not working".

When something is not working you need to post the abend or error message(s) including the message ids.

...or wait until "psychic day" and then ask expat. icon_smile.gif
Back to top
View user's profile Send private message
Shivendu

New User


Joined: 20 Feb 2009
Posts: 14
Location: Workstation

PostPosted: Mon Apr 06, 2009 9:41 pm
Reply with quote

Thanks all for ur support. It is done!
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Mon Apr 06, 2009 11:28 pm
Reply with quote

I suppose that is just dandy. . .

The problem was never posted and now the solution is not posted. . . icon_confused.gif

d
Back to top
View user's profile Send private message
Anuj Dhawan

Superior Member


Joined: 22 Apr 2006
Posts: 6250
Location: Mumbai, India

PostPosted: Tue Apr 07, 2009 12:21 pm
Reply with quote

dick scherrer wrote:
I suppose that is just dandy. . .

The problem was never posted and now the solution is not posted. . . icon_confused.gif

d


Quote:
Didnt you get the solution from the below post?

ibmmainframes.com/viewtopic.php?t=39471&postdays=0&postorder=asc&start=15
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> DFSORT/ICETOOL

 


Similar Topics
Topic Forum Replies
No new posts Compare 2 files and retrive records f... DFSORT/ICETOOL 3
No new posts Compare 2 files(F1 & F2) and writ... JCL & VSAM 8
No new posts Write line by line from two files DFSORT/ICETOOL 7
No new posts Compare only first records of the fil... SYNCSORT 7
No new posts Merge two VSAM KSDS files into third ... JCL & VSAM 6
Search our Forums:

Back to Top