Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Building control cards dynamically with varying rec count

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> All Other Mainframe Topics
View previous topic :: :: View next topic  
Author Message
rikdeb

New User


Joined: 19 Jan 2009
Posts: 63
Location: hyderabad

PostPosted: Sat Nov 15, 2014 3:27 pm    Post subject: Building control cards dynamically with varying rec count
Reply with quote

Hi All,
Want some suggestion on how to progress on the following scenario.
Suppose i have a flat file which can contain multiple records say 1 to 10 records (say IDno pic x(10))
Code:
2010096220
2010098680
2010099400
2010101220
2010102330


My intention is to build a jcl like below with the IDnos from above dataset
Code:
//STEP02  EXEC PGM=FILEAID                                   
//STEPLIB   DD DISP=SHR,DSN=FILEAID.LOAD                 
//SYSOUT    DD SYSOUT=*                                       
//SYSPRINT  DD SYSOUT=*                                       
//SYSLIST   DD SYSOUT=*                                       
//DD01      DD DISP=SHR,DSN=TEST.RECORDS.BACKUP
//DD01O     DD DISP=(,CATLG),DSN=TEST.CURRENT.FILE
//             SPACE=(CYL,(50,50),RLSE),LRECL=2004,           
//             RECFM=VB,BLKSIZE=0                             
//SYSIN     DD *                                             
$$DD01  COPY  IF=(42,EQ,C'2122285880,1074362440,2010099400'),
              OR=(42,EQ,C'2010101220,2010102330')   
     


Could you please provide Suggestions to build this control card : (copy if=....) dynamically as per the input records in SAS or sort ?
Back to top
View user's profile Send private message

enrico-sorichetti

Senior Member


Joined: 14 Mar 2007
Posts: 10478
Location: italy

PostPosted: Sat Nov 15, 2014 6:02 pm    Post subject: Reply to: Building control cards dynamically with varying re
Reply with quote

most probably the fastest way around could be a joinkey <SORT>
with the option to keep the records of the <big> file which match the <small> file
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 -> All Other Mainframe Topics All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts CA SYSVIEW - MQTHRESH updating dynami... Anilkumarmq CA Products 2 Fri Jun 08, 2018 2:06 pm
No new posts Dynamically updating the MQ monitorin... Anilkumarmq Java & MQSeries 0 Fri Jun 08, 2018 2:05 pm
No new posts mapping PLI structure to assembler co... Pedro PL/I & Assembler 3 Fri Jun 01, 2018 2:53 am
No new posts How to Count a particular record in a... Mounika Nemani DFSORT/ICETOOL 5 Tue May 29, 2018 1:07 pm
No new posts Control M - Predecessor/successor of ... SRIDEVI TANTRY Compuware & Other Tools 6 Sun May 06, 2018 10:57 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us