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
 

 

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: 59
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

Global Moderator


Joined: 14 Mar 2007
Posts: 10274
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 CICS Transaction attach count of supp... lind sh CICS 1 Wed Jun 21, 2017 1:33 pm
No new posts Check if any Detail records and extra... V S Amarendra Reddy SYNCSORT 19 Mon May 08, 2017 8:54 pm
This topic is locked: you cannot edit posts or make replies. Merge two files and update Trailer re... Yashashri JCL & VSAM 1 Thu May 04, 2017 12:54 pm
No new posts PA02 - Programmtically control attent... dodithegreat IMS DB/DC 1 Thu Apr 06, 2017 8:33 pm
No new posts Count the length of the record & ... sreekusr DFSORT/ICETOOL 4 Thu Mar 23, 2017 7:52 pm


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