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
 

 

Creating multiple output files from multiple input files.

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
Phoenix

New User


Joined: 27 Feb 2007
Posts: 20
Location: Chennai

PostPosted: Mon Jan 14, 2008 1:05 pm    Post subject: Creating multiple output files from multiple input files.
Reply with quote

Hi,

I am using SYNCSORT for copying 4 files to 4 seperate files in the same order with no editing or sorting in a single step.

For e.g.

Inputfiles are suppose: A , B, C, D, ......

and outpput files are suppose : P, Q, R, S, .......

i want to copy A to P, B to Q, C to R, and so on in a single SYNCSORT step

But i am not able to get the exact syntax for it, in DFSORT it can be done by using seperate controlcards for each input file. Like this:

SORT FIELDS=COPY,EQUALS
COPY FROM(SORTIN01) TO(SORT01) USING(CTL1)
COPY FROM(SORTIN02) TO(SORT02) USING(CTL2)
COPY FROM(SORTIN03) TO(SORT03) USING(CTL3)
COPY FROM(SORTIN04) TO(SORT04) USING(CTL4)

But i need the corrosponding syntax for SYNCSORT.

Any help would be appreciated.

Cheers.
phoenix.
[/code]
Back to top
View user's profile Send private message

jaspal

New User


Joined: 22 May 2007
Posts: 68
Location: mumbai

PostPosted: Mon Jan 14, 2008 2:49 pm    Post subject: Re: Creating multiple output files from multiple input files
Reply with quote

HI ,
i thing this will help you



Code:

//JS010    EXEC PGM=MULTIGEN,
//         PARM='NOOV',
//         REGION=1024K
//*
//SYSUT1   DD DSN=A,DISP=SHR
//SYSUT2   DD DSN=P,
//            DISP=(NEW,CATLG,DELETE),                                 
//            DATACLAS=HUGE,                                           
//            RECFM=FB,                                                 
//            LRECL=1866,                                               
//            BLKSIZE=0,                                               
//            UNIT=SYSDA                                               
//SYSUT3   DD DSN=B,DISP=SHR
//SYSUT4   DD DSN=Q,
//            DISP=(NEW,CATLG,DELETE),                                 
//            DATACLAS=HUGE,                                           
//            RECFM=FB,                                                 
//            LRECL=1866,                                               
//            BLKSIZE=0,                                               
//            UNIT=SYSDA                                               
//SYSUT5   DD DSN=C,DISP=SHR
//SYSUT6   DD DSN=R,
//            DISP=(NEW,CATLG,DELETE),                                 
//            DATACLAS=HUGE,                                           
//            RECFM=FB,                                                 
//            LRECL=1866,                                               
//            BLKSIZE=0,                                               
//            UNIT=SYSDA                                               
//SYSOUT   DD SYSOUT=*                                                 
//*       
Back to top
View user's profile Send private message
Phoenix

New User


Joined: 27 Feb 2007
Posts: 20
Location: Chennai

PostPosted: Mon Jan 14, 2008 3:08 pm    Post subject: Reply to: Creating multiple output files from multiple input
Reply with quote

Hi,

In our shop we do not use this utiility. icon_sad.gif

Code:
//JS010    EXEC PGM=MULTIGEN,


So if you can suggest something in SYNCSORT or somthing general it might be helpful.

Thanks.

Cheers,
Phoenix.
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Mon Jan 14, 2008 10:41 pm    Post subject:
Reply with quote

Quote:
in DFSORT it can be done by using seperate controlcards for each input file. Like this:

SORT FIELDS=COPY,EQUALS
COPY FROM(SORTIN01) TO(SORT01) USING(CTL1)
COPY FROM(SORTIN02) TO(SORT02) USING(CTL2)
COPY FROM(SORTIN03) TO(SORT03) USING(CTL3)
COPY FROM(SORTIN04) TO(SORT04) USING(CTL4)


For the record, the syntax shown is more complex than it needs to be for DFSORT's ICETOOL. You could use:

Code:

COPY FROM(SORTIN01) TO(SORT01)
COPY FROM(SORTIN02) TO(SORT02) 
COPY FROM(SORTIN03) TO(SORT03) 
COPY FROM(SORTIN04) TO(SORT04) 
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 -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Incorrect output when trying to add n... monica1 PL/I & Assembler 10 Fri Jan 13, 2017 5:02 pm
No new posts Performing arithmetic on input field zh_lad DFSORT/ICETOOL 31 Tue Dec 06, 2016 8:04 pm
No new posts High CPU consumption Job using IAM fi... aswinir JCL & VSAM 15 Thu Dec 01, 2016 8:28 pm
No new posts Problem in writing Output file vickey_dw COBOL Programming 5 Mon Nov 14, 2016 11:14 pm
No new posts Match or compare two files in VB Format anatol DFSORT/ICETOOL 14 Thu Nov 03, 2016 7:41 pm


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