cpuhawg
Active User
Joined: 14 Jun 2006
Posts: 331
Location: Jacksonville, FL
|
|
|
|
I don't think a dataset that was REPRO'ed to VSAM as a variable file can be REPRO from VSAM to QSAM as a fixed file.
Check the record size for your VSAM file.
If you see something like: RECORDSIZE(160 160) then you are dealing with a FIXED file (FB) and it could be REPRO'ed out with FB,160,27840
If you see something like: RECORDSIZE(160 4096), then you are dealing with a VARIABLE file (VB). 160 would indicate the shortest of your variable length records.
You can write the dataset out your REPRO as VB. That dataset could then be converted to fixed using DFSORT, FILEAID, SYNCSORT, etc.
Here is a SORT example:
| Code: |
//S4SORT EXEC PGM=ICEMAN
//* DCB on Input file would be VB, 164, 16400
//SORTIN DD DSN=VARIABLE.INPUT.FILE,DISP=OLD
//SORTOUT DD DSN=FIXED.OUTPUT.FILE,
// DISP=(NEW,PASS),UNIT=SYSDA,SPACE=(TRK,(3,3),RLSE),
// DCB=(RECFM=FB,LRECL=160,BLKSIZE=16000)
//SYSOUT DD SYSOUT=*
//* Starting in position 5 of the variable record and copied to 160 positions
//* VLFILL will insert blanks for all records shorter than 160 positions
//SYSIN DD *
OPTION COPY
OUTFIL OUTREC=(5,160),CONVERT,VLFILL=X'40'
|
|
|
