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

Join datasets using Syncsort
IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic Quick References
View previous topic :: View next topic  
Author Message
sudhakarraju

New User


Joined: 05 May 2005
Posts: 31
PostPosted: Thu Mar 04, 2010 12:21 am
 Reply with quote
How can I code this sort statement using SYNCSORT.
I have 4 similar SORT joins (4 Steps) in my job and I am planning to bring them into one single step using SYNCSORT.

Code:

//CS98S110  EXEC  PGM=SORT
//SORTJNF1 DD DSN=&&TEMP2,DISP=SHR
//SORTJNF2 DD DSN=&&TEMP1,DISP=SHR
//*
//SYSIN    DD *
   JOINKEYS FILE=F1,
             FIELDS=(1,26,A)
    JOINKEYS FILE=F2,
             FIELDS=(1,26,A)
    JOIN UNPAIRED
    REFORMAT FIELDS=(F1:1,26,F2:1,26)
    SORT     FIELDS=COPY
    OUTFIL   FNAMES=MTCH01,
             INCLUDE=(1,9,CH,NE,C'         ',AND,
                     27,9,CH,NE,C'         ')
//MTCH01   DD DSN=&&MTCH1,
//            DISP=(NEW,PASS),
//            UNIT=SYSDA,SPACE=(CYL,(20,5),RLSE)

Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2146
Location: At my coffee table
PostPosted: Thu Mar 04, 2010 12:35 am
 Reply with quote
Quote:
I have 4 similar SORT joins (4 Steps) in my job and I am planning to bring them into one single step using SYNCSORT.
Might help if more was understood on how the eight inputs related to each other and how the join keys related......In other words, more info......
Back to top
View user's profile Send private message
sudhakarraju

New User


Joined: 05 May 2005
Posts: 31
PostPosted: Thu Mar 04, 2010 1:03 am
 Reply with quote
Code:
//S110  EXEC  PGM=SORT
//SORTJNF1 DD DSN=&&TEMP2,DISP=SHR
//SORTJNF2 DD DSN=&&TEMP1,DISP=SHR
//*
//SYSIN    DD *
   JOINKEYS FILE=F1,
             FIELDS=(1,26,A)
    JOINKEYS FILE=F2,
             FIELDS=(1,26,A)
    JOIN UNPAIRED
    REFORMAT FIELDS=(F1:1,26,F2:1,26)
    SORT     FIELDS=COPY
    OUTFIL   FNAMES=MTCH01,
             INCLUDE=(1,9,CH,NE,C'         ',AND,
                     27,9,CH,NE,C'         ')
//MTCH01   DD DSN=&&MTCH1,
//            DISP=(NEW,PASS),
//            UNIT=SYSDA,SPACE=(CYL,(20,5),RLSE)
//***************************************************
//S120  EXEC  PGM=SORT
//SORTJNF1 DD DSN=&&MTCH1,DISP=SHR
//SORTJNF2 DD DSN=&&TEMP3,DISP=SHR
//*
//SYSIN    DD *
   JOINKEYS FILE=F1,
             FIELDS=(1,26,A)
    JOINKEYS FILE=F2,
             FIELDS=(43,26,A)
    JOIN UNPAIRED
    REFORMAT FIELDS=(F1:1,26,F2:2,14,43,26)
    SORT     FIELDS=COPY
    OUTFIL   FNAMES=MTCH01,
             INCLUDE=(1,9,CH,NE,C'         ',AND,
                     41,9,CH,NE,C'         ')
//MTCH01   DD DSN=&&MTCH2,
//            DISP=(NEW,PASS),
//            UNIT=SYSDA,SPACE=(CYL,(20,5),RLSE)
//*************************************************
//S130  EXEC  PGM=SORT
//SORTJNF1 DD DSN=&&MTCH2,DISP=SHR
//SORTJNF2 DD DSN=&&TEMP4,DISP=SHR
//*
//SYSIN    DD *
   JOINKEYS FILE=F1,
             FIELDS=(1,26,A)
    JOINKEYS FILE=F2,
             FIELDS=(1,26,A)
    JOIN UNPAIRED
    REFORMAT FIELDS=(F1:1,40,F2:27,49)
    SORT     FIELDS=COPY
    OUTFIL   FNAMES=MTCH01,
             INCLUDE=(1,9,CH,NE,C'         ',AND,
                     40,9,CH,NE,C'         ')
//MTCH01   DD DSN=&&MTCH3,
//            DISP=(NEW,PASS),
//            UNIT=SYSDA,SPACE=(CYL,(10,5),RLSE)
//*************************************************
//S140  EXEC  PGM=SORT
//SORTJNF1 DD DSN=&&TEMP3,DISP=SHR
//SORTJNF2 DD DSN=&&TEMP5,DISP=SHR
//*
//SYSIN    DD *
   JOINKEYS FILE=F1,
             FIELDS=(43,26,A)
    JOINKEYS FILE=F2,
             FIELDS=(1,26,A)
    JOIN UNPAIRED
    REFORMAT FIELDS=(F1:43,27,3,13,F2:27,49)
    SORT     FIELDS=COPY
    OUTFIL   FNAMES=MTCH01,
             INCLUDE=(1,9,CH,NE,C'         ',AND,
                     41,9,CH,NE,C'         ')
//MTCH01   DD DSN=&&MTCH4,
//            DISP=(NEW,PASS),
//            UNIT=SYSDA,SPACE=(CYL,(10,5),RLSE)
//***************************************************
Back to top
View user's profile Send private message
sudhakarraju

New User


Joined: 05 May 2005
Posts: 31
PostPosted: Thu Mar 04, 2010 2:30 am
 Reply with quote
I have figured out how to handle this. Thanks for coming forward to help me.
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2146
Location: At my coffee table
PostPosted: Thu Mar 04, 2010 2:33 am
 Reply with quote
Fine, but how about sharing?
Back to top
View user's profile Send private message
Arun Raj

Moderator


Joined: 17 Oct 2006
Posts: 2481
Location: @my desk
PostPosted: Thu Mar 04, 2010 6:10 am
 Reply with quote
sudhakarraju,

Your INCLUDEs seem to allow ONLY the PAIRED records, Then why would you need a JOIN UNPAIRED statement here?
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 -> JCL & VSAM

 

Similar Topics
Topic Forum Replies
No new posts Compare only first records of the fil... SYNCSORT 7
No new posts Join multiple records using splice DFSORT/ICETOOL 5
No new posts Join 2 files according to one key field. JCL & VSAM 3
No new posts Merging 2 datasets into one DFSORT/ICETOOL 1
No new posts JOIN STATEMENT PERFORMANCE. DFSORT/ICETOOL 12
Search our Forums:

Back to Top
IBMMainframes.com is not an official and/or affiliated with IBM® in anyway
Board Rules | FAQ | Downloads | Wiki | SiteMap | Contact Us