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
 

 

Sort - JOINKEYS UNPAIRED,F1,F2

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> SYNCSORT
View previous topic :: :: View next topic  
Author Message
srinathds83

New User


Joined: 17 Jul 2007
Posts: 41
Location: pune

PostPosted: Fri Jan 25, 2013 11:47 am    Post subject: Sort - JOINKEYS UNPAIRED,F1,F2
Reply with quote

Hi,

I have written below Sort card for getting the common record from file 1 and 2, unpaired from File 1 and Unpaired from File 2.
Code:

JOINKEYS FILES=F1,FIELDS=(1,300,A)             
JOINKEYS FILES=F2,FIELDS=(1,300,A)             
JOIN UNPAIRED,F1,F2                             
REFORMAT FIELDS=(F1:1,300,F2:1,300,?)           
OPTION COPY                                     
OUTFIL FNAMES=OUT12,INCLUDE=(601,1,CH,EQ,C'B'),
BUILD=(1,300)                                   
OUTFIL FNAMES=OUT01,INCLUDE=(601,1,CH,EQ,C'1'),
BUILD=(1,300)                                   
OUTFIL FNAMES=OUT02,INCLUDE=(601,1,CH,EQ,C'2'),
BUILD=(301,300)                                 


i am getting Below error:

Code:

   JOINKEYS FILES=F1,FIELDS=(1,300,A)             
   JOINKEYS FILES=F2,FIELDS=(1,300,A)             
   JOIN UNPAIRED,F1,F2                             
   REFORMAT FIELDS=(F1:1,300,F2:1,300,?)           
                                     *             
   OPTION COPY                                     
   OUTFIL FNAMES=OUT12,INCLUDE=(601,1,CH,EQ,C'B'),
   BUILD=(1,300)                                   
   OUTFIL FNAMES=OUT01,INCLUDE=(601,1,CH,EQ,C'1'),
   BUILD=(1,300)                                   
   OUTFIL FNAMES=OUT02,INCLUDE=(601,1,CH,EQ,C'2'),
   BUILD=(301,300)                                 
WER161B  ALTERNATE PARM USED                       
WER268A  REFORMAT STATEMENT: SYNTAX ERROR         


Is ? is not allowed to use in Sort card? Please correct
Back to top
View user's profile Send private message

Pandora-Box

Moderator


Joined: 07 Sep 2006
Posts: 1529
Location: Andromeda Galaxy

PostPosted: Fri Jan 25, 2013 11:59 am    Post subject:
Reply with quote

Quote:
Joined: 17 Jul 2007


Being in forum for 6 years you still not sure where to ask what icon_eek.gif

Does synsort allow '?' ?

what does the manual say about them?
Back to top
View user's profile Send private message
srinathds83

New User


Joined: 17 Jul 2007
Posts: 41
Location: pune

PostPosted: Fri Jan 25, 2013 12:07 pm    Post subject:
Reply with quote

Pandora-Box wrote:
Quote:
Joined: 17 Jul 2007


Being in forum for 6 years you still not sure where to ask what icon_eek.gif

Does synsort allow '?' ?

what does the manual say about them?


I have written the Sort card according to the manual. but while running it stating Syntax error. Please help me out on this.
Back to top
View user's profile Send private message
Pandora-Box

Moderator


Joined: 07 Sep 2006
Posts: 1529
Location: Andromeda Galaxy

PostPosted: Fri Jan 25, 2013 12:25 pm    Post subject:
Reply with quote

Probably you might be still using old version
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7236

PostPosted: Fri Jan 25, 2013 1:13 pm    Post subject: Reply to: Sort - JOINKEYS UNPAIRED,F1,F2
Reply with quote

? is DFSORT only. Look at Syncsort examples here of JOINKEYS to see how to do the same thing (long way around, and you have to be careful).
Back to top
View user's profile Send private message
Arun Raj

Moderator


Joined: 17 Oct 2006
Posts: 2165
Location: @my desk

PostPosted: Fri Jan 25, 2013 3:49 pm    Post subject:
Reply with quote

srinathds83,

The Syncsort equivalent (UNTESTED) of your card will look somewhat like this.
Code:
JOINKEYS FILES=F1,FIELDS=(1,300,A)             
JOINKEYS FILES=F2,FIELDS=(1,300,A)             
JOIN UNPAIRED,F1,F2                             
REFORMAT FIELDS=(F1:1,300,F2:1,300),FILL=X'FF'           
SORT FIELDS=COPY                                   
OUTFIL FNAMES=OUT01,INCLUDE=(301,1,CH,EQ,X'FF'),
BUILD=(001,300)                                   
OUTFIL FNAMES=OUT02,INCLUDE=(001,1,CH,EQ,X'FF'),
BUILD=(301,300) 
OUTFIL FNAMES=OUT12,SAVE,BUILD=(1,300) 
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7236

PostPosted: Fri Jan 25, 2013 4:04 pm    Post subject: Reply to: Sort - JOINKEYS UNPAIRED,F1,F2
Reply with quote

That should do it, Arun.

Good to see you back.
Back to top
View user's profile Send private message
Arun Raj

Moderator


Joined: 17 Oct 2006
Posts: 2165
Location: @my desk

PostPosted: Fri Jan 25, 2013 10:52 pm    Post subject: Re: Reply to: Sort - JOINKEYS UNPAIRED,F1,F2
Reply with quote

Bill Woodger wrote:
Good to see you back.
Thanks Bill. nice to see you all icon_smile.gif
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 -> SYNCSORT All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Limit duplicate records in the SORT pshongal SYNCSORT 6 Mon Nov 21, 2016 12:54 pm
No new posts How to convert the VBM file to VB or... Sulabh Agrawal JCL & VSAM 4 Fri Nov 18, 2016 1:04 pm
No new posts Joinkeys operation when key1 and key2... Susanta DFSORT/ICETOOL 5 Wed Nov 02, 2016 5:35 pm
No new posts Sort records based on numeric field. Alks SYNCSORT 2 Wed Oct 19, 2016 10:14 pm
No new posts How to delete second instance from Fl... Gunapala CN DFSORT/ICETOOL 6 Tue Oct 18, 2016 11:42 pm


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