converting between the formats in SORT.

mf_user · New User Joined: 05 Jan 2006 Posts: 47

Can anybody give example JCLs to convert between the formats in SORT.

Thanks.

vinodmaanju · New User Joined: 10 May 2005 Posts: 28 Location: Pune

VB TO FB CONVERSION:-

//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=(1:5,100)
* VTOF CONVERT FB TO VB
* 1:5,100 COPY FROM 5 BYETS(BECAUSE IN VB FIRST 4 BYTES ARE *OCCUPIED BY RDW SO STARTING POSITION WILL BE 5
/*

FB TO VB CONVERSION:-

//FBVB JOB A92,PROGRAMMER
//S1 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=A123456.SORT.SAMPIN,DISP=SHR
//VBOUT DD DSN=A123456.SORT.VSAMP,DISP=(NEW,CATLG,DELETE),
// UNIT=3390,SPACE=(CYL,(5,5))
//SYSIN DD *
OPTION COPY
OUTFIL FNAMES=VBOUT,FTOV,VLTRIM=C’ ’
* FTOV CONVERT FB TO VB
* VLTRIM=C' ' DELETE ALL SPACES AFTER ENDING RECORDS
/*

Frank Yaeger · Posted: Thu Jan 05, 2006 9:25 pm

If by "formats", you mean RECFM (e.g. FB, VB), see the following Smart DFSORT Tricks:

www.ibm.com/servers/storage/support/software/sort/mvs/tricks/srtmst01.html#t11

www.ibm.com/servers/storage/support/software/sort/mvs/tricks/srtmst03.html#t09

If by "formats", you mean data formats (e.g. ZD, PD, BI, FI, UFF, SFF, etc), see the following:

www.ibm.com/servers/storage/support/software/sort/mvs/beyond_sorting/online/srtmboft.html#ocv

If you want more specific help, you need to explain in detail what you're trying to do.

ranga_subham · New User Joined: 01 Jul 2005 Posts: 51

Guys, thank you very much for the details.