IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Record lenght in a Unload statement with ICETOOL


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Dewor

New User


Joined: 02 Sep 2005
Posts: 2

PostPosted: Fri Sep 02, 2005 9:12 pm
Reply with quote

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
View user's profile Send private message
priyesh.agrawal

Senior Member


Joined: 28 Mar 2005
Posts: 1448
Location: Chicago, IL

PostPosted: Fri Sep 02, 2005 10:03 pm
Reply with quote

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
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Fri Sep 02, 2005 10:25 pm
Reply with quote

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
View user's profile Send private message
Frank Yaeger

DFSORT Developer


Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA

PostPosted: Fri Sep 02, 2005 11:31 pm
Reply with quote

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
View user's profile Send private message
Dewor

New User


Joined: 02 Sep 2005
Posts: 2

PostPosted: Mon Sep 05, 2005 6:48 pm
Reply with quote

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
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> DFSORT/ICETOOL

 


Similar Topics
Topic Forum Replies
No new posts How to split large record length file... DFSORT/ICETOOL 10
No new posts Load new table with Old unload - DB2 DB2 6
No new posts SFTP Issue - destination file record ... All Other Mainframe Topics 2
No new posts FINDREP - Only first record from give... DFSORT/ICETOOL 3
No new posts To find whether record count are true... DFSORT/ICETOOL 6
Search our Forums:

Back to Top