shankarm
Active User
Joined: 17 May 2010
Posts: 175
Location: India
|
|
|
|
I'm trying to copy records from a vb file to a fb file. I want to copy only first three fields,
Input file(VB) layout:
| Code: |
01 A.
05 x1 pic s9(9) comp.
05 y1 pic x.
05 z1 pic x.
05 filler pix x(200).
|
I want to copy x1,y1,z1 to the output file whose lrecl=11.
What i tried is,
| Code: |
SORT FIELDS=COPY
OUTFIL FNAMES=SORTOUT,VTOF,
OUTREC=(5,9,BI,9,1,A,9,1,A)
|
Its not working, instead its throwing an error as follows,
| Quote: |
$ORTPARM : DYNALLOC=(SYSDA,35)
SYSIN :
SORT FIELDS=COPY
OUTFIL FNAMES=SORTOUT,VTOF,
OUTREC=(5,9,BI,9,1,A,9,1,A)
*
WER161B ALTERNATE PARM USED
WER271A OUTFIL STATEMENT : NUMERIC FIELD ERROR
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE
|
Please help me. |
|
Arun Raj
Moderator
Joined: 17 Oct 2006
Posts: 2481
Location: @my desk
|
|
|
|
shankarm,
You seem to have used the wrong syntax, I guess it should work if modified as
| Code: |
//SYSIN DD *
SORT FIELDS=COPY
OUTFIL FNAMES=SORTOUT,VTOF,
OUTREC=(5,6) |
Also the output LRECL is 6 and not 11. Your first field is 9-digit binary which occupies only 4 bytes. |
|
