Author: Danielle.Filteau
Subject: outrec field outside range
Posted: Sat Mar 04, 2017 2:37 am (GMT 5.5)
I've got 2 input files, F1=LRECL=80, F2,LRECL=200.
Only the rows that match in both should be kept.
The output file needs fields from both inputs, and needs to be reformatted.
The output file should be 200 bytes.
For some reason the output is showing only as 128 bytes. Not sure what's wrong.
The output should be lined up as this:
I understand why the reformat fields are 128 bytes, but the outfil is not, what parameter is missing?
Subject: outrec field outside range
Posted: Sat Mar 04, 2017 2:37 am (GMT 5.5)
I've got 2 input files, F1=LRECL=80, F2,LRECL=200.
Only the rows that match in both should be kept.
The output file needs fields from both inputs, and needs to be reformatted.
The output file should be 200 bytes.
For some reason the output is showing only as 128 bytes. Not sure what's wrong.
| Code: |
//BLDACTV EXEC PGM=SYNCSORT,COND=(0,LT) //SORTJNF1 DD DISP=SHR,DSN=DXF125.SXSC.NDVRC1.CCIDVAL //SORTJNF2 DD DISP=SHR,DSN=DXF125.SXSC.NDVRC1.CCIDPIT.NEXTDAY //MATCH DD DISP=(NEW,CATLG,DELETE), // DSN=DXF125.SXSC.NDVRC1.CCIDVAL.ACTSRCH.JOIN.F, // SPACE=(CYL,(5,5)),UNIT=SYSDA,DCB=(RECFM=FB,LRECL=200) //SYSOUT DD SYSOUT=* //SORTWK01 DD DSN=&&TEMP,SPACE=(CYL,(2)),UNIT=SYSDA //SORTWK02 DD DSN=&&TEMP,SPACE=(CYL,(2)),UNIT=SYSDA //SORTWK03 DD DSN=&&TEMP,SPACE=(CYL,(2)),UNIT=SYSDA //SORTWK04 DD DSN=&&TEMP,SPACE=(CYL,(2)),UNIT=SYSDA //SORTWK05 DD DSN=&&TEMP,SPACE=(CYL,(2)),UNIT=SYSDA //SORTMSG DD SYSOUT=* //SYSIN DD * ----+----1----+----2----+----3----+----4----+----5----+----6----+----7-- SORT FIELDS=COPY JOINKEYS FILE=F1, FIELDS=(3,12,A,25,8,A,34,1,A,36,8,A,45,8,A,16,8,A,54,8,A), FORMAT=CH JOINKEYS FILE=F2, FIELDS=(3,12,A,16,8,A,25,1,A,27,8,A,36,8,A,145,8,A,155,8,A), FORMAT=CH REFORMAT FIELDS=(F1:3,12,25,8,34,1,36,8,45,8, X F2:45,8,56,8,120,8,130,8,75,43,165,8,175,8) OUTFIL FNAMES=MATCH, BUILD=(3,12,X,16,8,X,25,1,X,27,8,X,36,8,X,45,8,X,54,8,X, X 64,8,X,73,8,X,83,43,X,124,8,X,133,8,61X), OMIT=(45,8,CH,EQ,C'00010101') END |
| Code: |
SYNCSORT FOR Z/OS 2.1.3.0R U.S. PATENTS: 4210961, 5117495 (C) 2014 SYNCS CANADA REVENUE AGENCY z/OS 2.1.0 SYNCSORT LICENSED FOR CPU SERIAL NUMBER 12C27, MODEL 2827 715 LICE SYSIN : SORT FIELDS=COPY JOINKEYS FILE=F1, FIELDS=(3,12,A,25,8,A,34,1,A,36,8,A,45,8,A,16,8,A,54,8,A), FORMAT=CH JOINKEYS FILE=F2, FIELDS=(3,12,A,16,8,A,25,1,A,27,8,A,36,8,A,145,8,A,155,8,A), FORMAT=CH REFORMAT FIELDS=(F1:3,12,25,8,34,1,36,8,45,8, X F2:45,8,56,8,120,8,130,8,75,43,165,8,175,8) OUTFIL FNAMES=MATCH, BUILD=(3,12,X,16,8,X,25,1,X,27,8,X,36,8,X,45,8,X,54,8,X, X 64,8,X,73,8,X,83,43,X,124,8,X,133,8,61X), OMIT=(45,8,CH,EQ,C'00010101') END WER813I INSTALLATION OPTIONS IN MFX LOAD LIBRARY WILL BE USED WER276B SYSDIAG= 11297146, 20497476, 20497476, 22994850 WER164B 9,720K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED, WER164B 0 BYTES RESERVE REQUESTED, 1,020K BYTES USED WER481I JOINKEYS REFORMAT RECORD LENGTH= 128, TYPE = F WER230A MATCH OUTREC FIELD OUTSIDE RANGE WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000 WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE WER482I JNF1 STATISTICS WER483B 3,160K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED, WER483B 0 BYTES RESERVE REQUESTED, 1,020K BYTES USED WER108I SORTJNF1 : RECFM=FB ; LRECL= 80; BLKSIZE= 27920 WER073I SORTJNF1 : DSNAME=DXF125.SXSC.NDVRC1.CCIDVAL WER482I JNF2 STATISTICS WER483B 6,072K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED, WER483B 0 BYTES RESERVE REQUESTED, 1,020K BYTES USED WER108I SORTJNF2 : RECFM=FB ; LRECL= 200; BLKSIZE= 27800 WER073I SORTJNF2 : DSNAME=DXF125.SXSC.NDVRC1.CCIDPIT.NEXTDAY |
The output should be lined up as this:
| Code: |
* CCID Env # System Subsys CCID-Eff CCID-Xpry CreateBy Create-Dt Comments LstUpdBy LstUpdDt *---+----1----+----2----+----3----+----4----+----5----+----6----+----7-----+----8----+----9----+----0----+----1----+----2----+----3----+----4 |
I understand why the reformat fields are 128 bytes, but the outfil is not, what parameter is missing?