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
 

 

Multiple IDCAMs repro in 1 sysin card

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

New User


Joined: 06 Jan 2009
Posts: 88
Location: Ggn, IN

PostPosted: Thu May 31, 2012 2:24 pm    Post subject: Multiple IDCAMs repro in 1 sysin card
Reply with quote

Hi Experts,

I tried searching the web for "multiple repro cards in 1 idcams sysin" but did not get any clear result. So I am starting a new topic. Apologies if this has already been discussed.

I remember quite well that I saw various IDCAMS cards In my first shop wherein we had multiple Key combinations(i.e. FROMKEY and TOKEY) inside a single sysin card. I gave it many tries today but failed initially when I tried reading multiple range of keys from VSAM file onto a sequential file but no luck.

Finally, I have now figured out a way to use multiple IDCAMS repro commands inside 1 sysin and write the output to a sequential file.

Code:

//PS030   EXEC PGM=IDCAMS                         
//VSAMFILE  DD DSN=T3.INVSAM.FILE1,               
//             DISP=(SHR,KEEP,KEEP),             
//             AMP='BUFSP=849960'                 
//SEQFILE   DD DSN=T3.INVSAM.FILE1.OUTSEQ,       
//             DISP=(MOD,CATLG,DELETE),           
//             UNIT=SYSDA,                       
//             SPACE=(10796,(100,10),RLSE),       
//             DCB=(SYS3.DSCB,DSORG=PS,           
//             RECFM=VB,LRECL=272,BLKSIZE=0)     
//SYSIN     DD *                                 
                                                 
 REPRO INFILE(VSAMFILE) -                         
      OUTFILE(SEQFILE) -                         
         FROMKEY('KEY00001')  TOKEY('KEY00099')   
 REPRO INFILE(VSAMFILE) -                         
      OUTFILE(SEQFILE) -                         
         FROMKEY('KEY11111')  TOKEY('KEY22222')   
                                                 


The trick is to use MOD in the disposition of the output sequential file. Each repro request is considered a separate request and data pertaining to it is "appended" to the output sequential file.

Experts, could you please let me know your views on this.
(1)Can there be any disadvantages of using this?
(2)Any improvement that can be done to it?

Cheers,
Nigel.
Back to top
View user's profile Send private message

PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2422
Location: Netherlands, Amstelveen

PostPosted: Thu May 31, 2012 2:29 pm    Post subject:
Reply with quote

Well, the sort adepts/zealots will probably advice tu use sort.
If it works stick to it.
Back to top
View user's profile Send private message
dick scherrer

Site Director


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

PostPosted: Thu May 31, 2012 7:07 pm    Post subject:
Reply with quote

Hello,

If the volume is hundreds of records, stick to it.

If the volume is hundreds of millions of records, consider using sort for performance reasons.

Just my $.02 icon_wink.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 -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
This topic is locked: you cannot edit posts or make replies. How to use 2 input files in control c... Gunapala CN DFSORT/ICETOOL 23 Thu Oct 13, 2016 3:42 pm
This topic is locked: you cannot edit posts or make replies. Sort card to replace text using cross... Susanta SYNCSORT 32 Tue Sep 13, 2016 4:17 pm
No new posts Converting multiple VB files to FB fi... Viswanath Reddy JCL & VSAM 6 Mon Aug 08, 2016 11:49 pm
No new posts dataset copy question - REPRO or some... atulxp TSO/ISPF 2 Wed Aug 03, 2016 10:56 pm
No new posts Creating a dynamic sort card in JCL u... ChitraChhabra DFSORT/ICETOOL 4 Wed Aug 03, 2016 6:15 pm


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