|
|
| Author |
Message |
Dewor
New User
Joined: 02 Sep 2005 Posts: 2
|
|
|
|
Hi everybody,
I'm trying to convert a VB 458 into an FB 500 dataset.. Help me..
This is my job, but it's not good..
| Code: |
//S020 EXEC PGM=ICETOOL,REGION=5120K
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN1 DD DSN=&&TPTTAB,DISP=(OLD,PASS)
//OUT1 DD DSN=dataset name,DISP=(,PASS),
// SPACE=(CYL,(800,300),RLSE),UNIT=(DISK,5),RECFM=FB
//*
//TOOLIN DD *
SORT FROM(IN1) TO(OUT1) USING(SRT1)
//*
//SRT1CNTL DD *
SORT FIELDS=COPY
OUTFIL FNAMES=OUT1,CONVERT,OUTREC=(7,500)
|
Respond that "OUTREC FIELD OUTSIDE RANGE" |
|
| Back to top |
|
 |
References
|
|
 |
priyesh.agrawal
Global Moderator
Joined: 28 Mar 2005 Posts: 1509 Location: Chicago, IL
|
|
|
|
Hi Dewor,
First thing, If you are converting a VB I/P file, record length 458 to a FB O/P file ...the O/P file should be LRECL= 454 (458-4). Why 500 here ?
another thing...
| Code: |
| OUTFIL FNAMES=OUT1,CONVERT,OUTREC=(7,500) |
change it to the
| Code: |
| OUTFIL FNAMES=OUT1,VTOF,OUTREC=(5,454) |
It should work....
Regards,
Priyesh. |
|
| Back to top |
|
 |
superk
Moderator Team Head
Joined: 26 Apr 2004 Posts: 3383 Location: Charlotte,NC USA
|
|
|
|
Try this:
| Code: |
//S020 EXEC PGM=ICETOOL,REGION=5120K
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN1 DD DSN=&&TPTTAB,DISP=(OLD,PASS)
//OUT1 DD DSN=dataset name,DISP=(,PASS),
// SPACE=(CYL,(800,300),RLSE),UNIT=(DISK,5)
//*
//TOOLIN DD *
COPY FROM(IN1) USING(SRT1)
//*
//SRT1CNTL DD *
OUTFIL FNAMES=OUT1,CONVERT,OUTREC=(7,452,500:X),
VLFILL=X'40' * Truncate first two colums
or
OUTFIL FNAMES=OUT1,CONVERT,OUTREC=(5,454,500:X),
VLFILL=X'40' * Keep first two columns
|
|
|
| Back to top |
|
 |
Frank Yaeger
DFSORT Moderator
Joined: 15 Feb 2005 Posts: 4684 Location: San Jose, CA
|
|
|
|
Dewor,
Superk has it right. However, with DFSORT, you don't really need VLFILL=X'40' since it's used automatically with CONVERT (or the more user friendly alias VTOF).
FYI, "OUTREC FIELD OUTSIDE RANGE" is a Syncsort message (WERxxxA), so you're using Syncsort/SYNCTOOL, not DFSORT/ICETOOL.
DFSORT/ICETOOL has ICExxxs messages. |
|
| Back to top |
|
 |
Dewor
New User
Joined: 02 Sep 2005 Posts: 2
|
|
|
|
I know the conversion value from a vb to fb is "value-4" but I want to do a 500 fb dataset without any use of other sort.. Just with unload utility.
I want to create a dataset which contains table and a filler, not only the occurence of the table. The copy is 454 but I wan to resize in 500 fb without any statement. Do you think is it possible??
Thank you very much.
Dewor |
|
| Back to top |
|
 |
|
|
|