John, It is documented under the FTOV parm in OUTFIL description. Here is a direct link to the FTOV description.
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ice1ca60/3.15?ACTION=MATCHES&REQUEST=Specifies+that+fixed-length+OUTFIL+input+records+are+to+be+converted&TYPE=FUZZY&SHELF=&DT=20110608113434&CASE=&searchTopic=TOPIC&searchText=TEXT&searchIndex=INDEX&rank=RANK&ScrollTOP=FIRSTHIT#FIRSTHIT If the above link does not work use this http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ice1ca60/3.15? and scroll down to FTOV description section. Thanks, Kolusu DFSORT Development IBM Corporation IBM Mainframe Discussion List <[email protected]> wrote on 09/09/2013 02:14:23 PM: > From: John McKown <[email protected]> > To: [email protected], > Date: 09/09/2013 02:14 PM > Subject: Re: SORT? need. > Sent by: IBM Mainframe Discussion List <[email protected]> > > Thanks. I didn't know that and didn't see it in my reading of the manual. > I'll mention it to the programmer. > > > On Mon, Sep 9, 2013 at 3:47 PM, Sri h Kolusu <[email protected]> wrote: > > > >> Anyway, DFSORT has a FTOV function. But I need an "any"TOV type > > function. That is, it will read FB or VB and output VB. > > > > Hi John, > > > > > > DFSORT is smart enough to ignore FTOV parm if the input is already a > > variable block file. Here is simple example . > > > > //*************************************************************** > > //* CREATE AN FB INPUT FILE AND A VB INPUT FILE * > > //*************************************************************** > > //STEP0050 EXEC PGM=SORT > > //SYSOUT DD SYSOUT=* > > //SORTIN DD * > > A > > BB > > CCC > > DDDD > > EEEEE > > FFFFFF > > GGGGGGG > > //VB DD DSN=&&VB,DISP=(,PASS),SPACE=(CYL,(1,1),RLSE) > > //FB DD DSN=&&FB,DISP=(,PASS),SPACE=(CYL,(1,1),RLSE) > > //SYSIN DD * > > SORT FIELDS=COPY > > OUTFIL FNAMES=VB,FTOV,VLTRIM=C' ' > > OUTFIL FNAMES=FB > > //* > > //*************************************************************** > > //* CONVERT THE FB FILE TO VB FILE USING FTOV * > > //*************************************************************** > > //STEP0100 EXEC PGM=SORT > > //SYSOUT DD SYSOUT=* > > //SORTIN DD DSN=&&FB,DISP=SHR > > //SORTOUT DD SYSOUT=* > > //SYSIN DD * > > SORT FIELDS=COPY > > OUTFIL FTOV > > //* > > //*************************************************************** > > //* CONVERT THE VB FILE TO VB FILE USING FTOV (IGNORED) * > > //*************************************************************** > > //STEP0200 EXEC PGM=SORT > > //SYSOUT DD SYSOUT=* > > //SORTIN DD DSN=&&VB,DISP=SHR > > //SORTOUT DD SYSOUT=* > > //SYSIN DD * > > SORT FIELDS=COPY > > OUTFIL FTOV > > //* > > > > The sysout from the job will show the following > > > > STEP0050 Sysout : > > > > ICE210I 0 VB : EXCP USED, LRECL = 84, BLKSIZE = 27998, TYPE = VB > > (SDB) > > ICE210I 0 FB : EXCP USED, LRECL = 80, BLKSIZE = 27920, TYPE = FB > > (SDB) > > > > STEP0100 Sysout : > > > > ICE088I 0 JOHN.STEP0100. , INPUT LRECL = 80, BLKSIZE = 27920, TYPE > > = FB > > ICE210I 0 SORTOUT : BSAM USED, LRECL = 84, BLKSIZE = 27920, TYPE = VB > > > > STEP0200 Sysout : > > > > ICE088I 0 JOHN .STEP0200. , INPUT LRECL = 84, BLKSIZE = 27998, TYPE > > = VB > > ICE210I 0 SORTOUT : BSAM USED, LRECL = 84, BLKSIZE = 27998, TYPE = VB > > > > > > > > Further if you have any questions please let us know > > > > > > Thanks, > > Kolusu > > DFSORT Development > > IBM Corporation > > Email: [email protected] > > Phone: 408-927-2187 Tie Line: 457-2187 > > > > IBM Mainframe Discussion List <[email protected]> wrote on > > 09/09/2013 09:22:21 AM: > > > > > From: John McKown <[email protected]> > > > To: [email protected], > > > Date: 09/09/2013 09:26 AM > > > Subject: SORT? need. > > > Sent by: IBM Mainframe Discussion List <[email protected]> > > > > > > I haven't yet looked in the DFSORT manual, bad me, but I'll ask anyway. > > > > > > Programmer has a "problem". He is writing a COBOL program. No, that's > > not > > > the problem <grin/>. He wants the input to be an OPTIONAL file which > > might > > > be VB in one run an FB in a different run. This file is "user" > > generated. I > > > told him to tell the user to put in the SITE command necessary to make > > the > > > uploaded file be VB. He basically said that he didn't think he could > > > _force_ them to do that. The conversation degenerated after that. > > > > > > Anyway, DFSORT has a FTOV function. But I need an "any"TOV type > > function. > > > That is, it will read FB or VB and output VB. > > > > > > If this were me, I'd use REXX because I've been told these will be > > "small" > > > files. But the programmer doesn't know REXX. And I'm not go write it for > > > him because our programmers don't know REXX and so won't be able to > > support > > > it. And I'd end up being support-for-eternity for this. It's happened > > > before with some HLASM code which is now "mine". > > > > > > -- > > > As of next week, passwords will be entered in Morse code. > > > > > > Maranatha! <>< > > > John McKown > > > > > > ---------------------------------------------------------------------- > > > For IBM-MAIN subscribe / signoff / archive access instructions, > > > send email to [email protected] with the message: INFO IBM-MAIN > > > > > > > ---------------------------------------------------------------------- > > For IBM-MAIN subscribe / signoff / archive access instructions, > > send email to [email protected] with the message: INFO IBM-MAIN > > > > > > -- > As of next week, passwords will be entered in Morse code. > > Maranatha! <>< > John McKown > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to [email protected] with the message: INFO IBM-MAIN > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
