Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum 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: 10687
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 Signed Count in Trailer RALAKKAL SYNCSORT 7 Fri May 15, 2020 2:46 am
No new posts Read a file dynamically without the d... Antonio A Negrelli COBOL Programming 4 Wed Apr 29, 2020 10:54 pm
No new posts Add the name in the PS file and creat... dharmaraok DFSORT/ICETOOL 9 Wed Apr 01, 2020 10:43 am
No new posts Dynamically adding CLIST Library to e... upendrasri TSO/ISPF 12 Sat Mar 14, 2020 4:33 pm
No new posts Count From Multiple Inputs Tyler Dunbar DFSORT/ICETOOL 5 Tue Nov 12, 2019 1:07 am

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