copying VB File to FB File



IBM's flagship sort product DFSORT for sorting, merging, copying, data manipulation and reporting. Includes ICETOOL and ICEGENER

copying VB File to FB File

Postby nikesh_rai » Thu Jan 24, 2013 7:54 pm

Billy.. somehow this post was deleted... continuing from here onward..

I used this sysin card to convert VB to FB

//SYSIN    DD *                   
  OPTION COPY                     
  OUTFIL FNAMES=SORTOUT,VTOF       
/*                                 


and getting the error

ICE201I H RECORD TYPE IS V - DATA STARTS IN POSITION 5                         
ICE805I 1 JOBNAME: D393990B , STEPNAME: STEP001                                 
ICE802I 0 BLOCKSET     TECHNIQUE IN CONTROL                                     
ICE143I 0 BLOCKSET     COPY  TECHNIQUE SELECTED                                 
ICE250I 0 VISIT http://www.ibm.com/storage/dfsort FOR DFSORT PAPERS, EXAMPLES AN
ICE000I 1 - CONTROL STATEMENTS FOR 5694-A01, Z/OS DFSORT V1R12 - 00:35 ON FRI JA
            OPTION COPY                                                         
            OUTFIL FNAMES=SORTOUT,VTOF                                         
ICE201I H RECORD TYPE IS V - DATA STARTS IN POSITION 5                         
ICE126A 9 INCONSISTENT REFORMATTING FOR SORTOUT : REASON CODE 05, IFTHEN 0     
ICE751I 0 C5-K76982 C6-K90026 C7-K82419 C8-K67572 E9-K60824 E7-K79990           
ICE052I 3 END OF DFSORT                                                         
Thanks
Nikesh Rai
nikesh_rai
 
Posts: 192
Joined: Tue Oct 18, 2011 1:27 am
Has thanked: 17 times
Been thanked: 0 time

Re: copying VB File to FB File

 

Re: copying VB File to FB File

Postby BillyBoyo » Thu Jan 24, 2013 8:24 pm

Did you read about VTOF? You're missing a BUILD (or OUTREC, but I think clearer to use BUILD as "OUTREC" is something else as well).
BillyBoyo
Global moderator
 
Posts: 3804
Joined: Tue Jan 25, 2011 12:02 am
Has thanked: 22 times
Been thanked: 264 times

Re: copying VB File to FB File

Postby nikesh_rai » Thu Jan 24, 2013 8:38 pm

ya checked the Build and Overlay both.. but not getting how i will use it.. since i will have to process 3 files altogether which are of three different length.. checked with PARSE option as well didn't get any option with parse to identify start and end of the record so that i can copy the full record
Thanks
Nikesh Rai
nikesh_rai
 
Posts: 192
Joined: Tue Oct 18, 2011 1:27 am
Has thanked: 17 times
Been thanked: 0 time

Re: copying VB File to FB File

Postby BillyBoyo » Thu Jan 24, 2013 8:56 pm

Try BUILD=(1,1000). Your records will all be extended to that length.
BillyBoyo
Global moderator
 
Posts: 3804
Joined: Tue Jan 25, 2011 12:02 am
Has thanked: 22 times
Been thanked: 264 times

Re: copying VB File to FB File

Postby nikesh_rai » Thu Jan 24, 2013 9:07 pm

nope.. not working..

//SYSIN    DD *                               
   OPTION COPY                               
   OUTFIL FNAMES=SORTOUT,VTOF,BUILD=(1,1000) 
/*                                           


getting error

ICE201I H RECORD TYPE IS V - DATA STARTS IN POSITION 5                         
ICE805I 1 JOBNAME: D393990B , STEPNAME: STEP001                                 
ICE802I 0 BLOCKSET     TECHNIQUE IN CONTROL                                     
ICE143I 0 BLOCKSET     COPY  TECHNIQUE SELECTED                                 
ICE250I 0 VISIT http://www.ibm.com/storage/dfsort FOR DFSORT PAPERS, EXAMPLES AN
ICE000I 1 - CONTROL STATEMENTS FOR 5694-A01, Z/OS DFSORT V1R12 - 02:33 ON FRI JA
             OPTION COPY                                                       
             OUTFIL FNAMES=SORTOUT,VTOF,BUILD=(1,1500)                         
ICE201I H RECORD TYPE IS V - DATA STARTS IN POSITION 5                         
ICE027A 9 END OF SORTOUT  FIELD BEYOND MAXIMUM RECORD LENGTH                   
ICE751I 0 C5-K76982 C6-K90026 C7-K82419 C8-K67572 E9-K60824 E7-K79990           
ICE052I 3 END OF DFSORT                                                         


input file have record length of 714
Thanks
Nikesh Rai
nikesh_rai
 
Posts: 192
Joined: Tue Oct 18, 2011 1:27 am
Has thanked: 17 times
Been thanked: 0 time

Re: copying VB File to FB File

Postby Robert Sample » Thu Jan 24, 2013 9:24 pm

nikesh_rai, you DON'T see an inconsistency in your posts?
   OUTFIL FNAMES=SORTOUT,VTOF,BUILD=(1,1000) 
and
             OUTFIL FNAMES=SORTOUT,VTOF,BUILD=(1,1500)
Unless you set the LRECL for SORTOUT to 1500 instead of 1000, the error you are getting makes perfect sense.
Robert Sample
Global moderator
 
Posts: 3367
Joined: Sat Dec 19, 2009 8:32 pm
Location: Dubuque, Iowa, USA
Has thanked: 1 time
Been thanked: 222 times

Re: copying VB File to FB File

Postby nikesh_rai » Thu Jan 24, 2013 9:37 pm

sorry.. this is the actuall error.

ICE201I H RECORD TYPE IS V - DATA STARTS IN POSITION 5                         
ICE805I 1 JOBNAME: D393990B , STEPNAME: STEP001                                 
ICE802I 0 BLOCKSET     TECHNIQUE IN CONTROL                                     
ICE143I 0 BLOCKSET     COPY  TECHNIQUE SELECTED                                 
ICE250I 0 VISIT http://www.ibm.com/storage/dfsort FOR DFSORT PAPERS, EXAMPLES AN
ICE000I 1 - CONTROL STATEMENTS FOR 5694-A01, Z/OS DFSORT V1R12 - 02:31 ON FRI JA
             OPTION COPY                                                       
             OUTFIL FNAMES=SORTOUT,VTOF,BUILD=(1,1000)                         
ICE201I H RECORD TYPE IS V - DATA STARTS IN POSITION 5                         
ICE027A 9 END OF SORTOUT  FIELD BEYOND MAXIMUM RECORD LENGTH                   
ICE751I 0 C5-K76982 C6-K90026 C7-K82419 C8-K67572 E9-K60824 E7-K79990           
ICE052I 3 END OF DFSORT
..

I also tried with lrec=1500 and that error..for 1500 as well
Thanks
Nikesh Rai
nikesh_rai
 
Posts: 192
Joined: Tue Oct 18, 2011 1:27 am
Has thanked: 17 times
Been thanked: 0 time

Re: copying VB File to FB File

Postby Robert Sample » Thu Jan 24, 2013 9:54 pm

I Googled sort vtof and got back 32700 results, THE VERY FIRST OF WHICH GIVES YOU THIS SYNTAX:
The following JCL and DFSORT control statements convert a VB data set with LRECL=104 to an FB data set with LRECL=100:

//VBFB   JOB   A92,PROGRAMMER
//S1     EXEC  PGM=SORT
//SYSOUT DD    SYSOUT=*
//SORTIN DD    DSN=A123456.VBIN,DISP=SHR
//FBOUT  DD    DSN=A123456.FBOUT,DISP=(NEW,CATLG,DELETE),
//  UNIT=3390,SPACE=(CYL,(5,5))
//SYSIN  DD    *
  OPTION COPY
  OUTFIL FNAMES=FBOUT,VTOF,OUTREC=(5,100)
/*

Up to 100 bytes of data starting at position 5 (after the RDW) of the VB input record appears in the FB output record starting at position 1. The FB output records are all 100 bytes long. By default, if a VB input record has less than 100 data bytes, DFSORT pads the output data with blanks on the right to 100 bytes. However, you can change the padding character to anything you like with OUTFIL's VLFILL parameter. For example, VLFILL=C'*' pads with asterisks and VLFILL=X'00' pads with binary zeros:
Have you tried what the official IBM manual recommends using? Note that the IBM manual uses 5 for the first byte, not 1 -- this is to skip the RDW.

If you are going to post any more of your mistakes, post the JCL as well as the SORT statements. Giving one but not both is handicapping anyone attempting to help you.
Robert Sample
Global moderator
 
Posts: 3367
Joined: Sat Dec 19, 2009 8:32 pm
Location: Dubuque, Iowa, USA
Has thanked: 1 time
Been thanked: 222 times

Re: copying VB File to FB File

Postby nikesh_rai » Thu Jan 24, 2013 10:21 pm

Thanks Robert, here is the code.. still not working,

//STEP001  EXEC PGM=SORT                                         
//SORTIN   DD DISP=SHR,DSN=DPFCB84.C1207.C14T01.SVP022.SRTDBITS 
//SORTOUT  DD DSN=DPFCB84.C1207.C14T01.SVP022.SRTDBITS.FLN,     
//            DISP=(NEW,CATLG,DELETE),                           
//            SPACE=(TRK,(10,10),RLSE),                         
//            UNIT=SYSDA                                         
//SYSOUT   DD SYSOUT=*                                           
//SYSIN    DD *                                                 
   OPTION COPY                                                   
   OUTFIL FNAMES=SORTOUT,VTOF,OUTREC=(5,1000)                   
/*                                                               


and the error is:

ICE201I H RECORD TYPE IS V - DATA STARTS IN POSITION 5                         
ICE805I 1 JOBNAME: D393990B , STEPNAME: STEP001                                 
ICE802I 0 BLOCKSET     TECHNIQUE IN CONTROL                                     
ICE143I 0 BLOCKSET     COPY  TECHNIQUE SELECTED                                 
ICE250I 0 VISIT http://www.ibm.com/storage/dfsort FOR DFSORT PAPERS, EXAMPLES AN
ICE000I 1 - CONTROL STATEMENTS FOR 5694-A01, Z/OS DFSORT V1R12 - 03:44 ON FRI JA
             OPTION COPY                                                       
             OUTFIL FNAMES=SORTOUT,VTOF,OUTREC=(5,1000)                         
ICE201I H RECORD TYPE IS V - DATA STARTS IN POSITION 5                         
ICE027A 9 END OF SORTOUT  FIELD BEYOND MAXIMUM RECORD LENGTH                   
ICE751I 0 C5-K76982 C6-K90026 C7-K82419 C8-K67572 E9-K60824 E7-K79990           
ICE052I 3 END OF DFSORT                                                         
Thanks
Nikesh Rai
nikesh_rai
 
Posts: 192
Joined: Tue Oct 18, 2011 1:27 am
Has thanked: 17 times
Been thanked: 0 time

Re: copying VB File to FB File

Postby Robert Sample » Thu Jan 24, 2013 10:42 pm

Try the same without using SORTOUT -- use FBOUT as the IBM example did.
Robert Sample
Global moderator
 
Posts: 3367
Joined: Sat Dec 19, 2009 8:32 pm
Location: Dubuque, Iowa, USA
Has thanked: 1 time
Been thanked: 222 times

Next

Return to DFSORT/ICETOOL/ICEGENER

 


  • Related topics
    Replies
    Views
    Last post