rikdeb
New User
Joined: 19 Jan 2009 Posts: 63 Location: hyderabad
|
|
|
|
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 ? |
|