20
окт
CONVERT VB TO FB FILE; List all datasets with High Level Qualifier; List Migrated Datasets; date and timestamp in load object; Removing Duplicates; SUPERCE in Batch. I have a VB file of lrecl which is 9 posit. I want to convert it to an FB with lrecl of 9. Aug 19, 2015 Converting FB file to VB file and vice versa using SORT Converting Fixed Block file to Variable Block file. We can use FTOV to do this conversion. SORT Parameters. JCL (10) Mainframe Tips & Tricks (5) MQ Series (1) MVS (1) VSAM (2) Blog Archive 2018 (2) August (2).
You can adapt this JCL. SYSUT1 points to FB input member, SYSUT2 points to preallocated VB PDS. //PS10 EXEC PGM=IEBGENER,REGION=0M //SYSPRINT DD SYSOUT=* //SYSUT1 DD DSN=INPUT.PDS(MEM1), // DISP=SHR //SYSUT2 DD DSN=OUTPUT.PDS, // DISP=SHR //SYSIN DD * GENERATE MAXFLDS=2,MAXNAME=1 RECORD FIELD=(8,73,,1),FIELD=(72,1,,9) MEMBER NAME=MEM1 Mike Shaw MVS/QuickRef Support Group Chicago-Soft, Ltd.
---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to with the message: GET IBM-MAIN INFO Search the archives at Angel Tamayo 4/11/2009, 11:48 น. On Wed, 4 Nov 2009 14:22:48 -0500, Angel Tamayo wrote: >Somebody could help me with a JCL to copy all members from a PDS dataset >with rcfm=FB to PDS dataset with recfm=VB. > You can probably use CVTCLIST (CBT file 187 - ).
But for my own CLISTs, I typically just use the JCL below. The IEBGENER sysin (IEBGRFVI) looks like this: GEN GENERATE MAXFLDS=2 GEN RECORD FIELD=(8,73,,1),FIELD=(72,1,,9) CVTCLIST has the advantage of processing the entire library. Nosaj thing views octopus ep rarest. //* //* CONVERT FIXED BLOCK CLISTS TO VARIABLE BLOCK CLISTS //* //CHGTOVB PROC MEMBER= //PS010 EXEC PGM=IEBGENER //SYSPRINT DD SYSOUT=* //SYSUT1 DD DSN=userid.CLIST(&MEMBER),DISP=SHR //SYSUT2 DD DSN=userid.CLIST.VB(&MEMBER),DISP=SHR //SYSIN DD DSN=userid.JCL.CNTL(IEBGRFVI),DISP=SHR // PEND //* //JS010 EXEC CHGTOVB,MEMBER=mem1 //JS020 EXEC CHGTOVB,MEMBER=mem2 //JS030 EXEC CHGTOVB,MEMBER=mem3 etc. Mark -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group - ZFUS G-ITO mailto: z/OS Systems Programming expert at Mark's MVS Utilities: ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to with the message: GET IBM-MAIN INFO Search the archives at Paul Gilmartin 4/11/2009, 13:24 น. On Wed, 4 Nov 2009 14:19:20 -0600, Mark Zelden wrote: >On Wed, 4 Nov 2009 14:22:48 -0500, Angel Tamayo wrote: > >>Somebody could help me with a JCL to copy all members from a PDS dataset >>with rcfm=FB to PDS dataset with recfm=VB.
> >But for my own CLISTs, I typically just use the JCL below. The >IEBGENER sysin (IEBGRFVI) looks like this: > >GEN GENERATE MAXFLDS=2 >GEN RECORD FIELD=(8,73,,1),FIELD=(72,1,,9) > I don't see that the OP made any statement about LRECL, nor whether the lines bore sequence numbers. Has this somehow been inferred from context?
Must have been; the OP seems satisfied with the replies. -- gil ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to with the message: GET IBM-MAIN INFO Search the archives at Mark Zelden 4/11/2009, 13:54 น. On Wed, 4 Nov 2009 15:01:37 -0600, Paul Gilmartin wrote: >On Wed, 4 Nov 2009 14:19:20 -0600, Mark Zelden wrote: > >>On Wed, 4 Nov 2009 14:22:48 -0500, Angel Tamayo wrote: >> >>>Somebody could help me with a JCL to copy all members from a PDS dataset >>>with rcfm=FB to PDS dataset with recfm=VB. >> >>But for my own CLISTs, I typically just use the JCL below. The >>IEBGENER sysin (IEBGRFVI) looks like this: >> >>GEN GENERATE MAXFLDS=2 >>GEN RECORD FIELD=(8,73,,1),FIELD=(72,1,,9) >> >I don't see that the OP made any statement about LRECL, nor >whether the lines bore sequence numbers. Has this somehow >been inferred from context? Must have been; the OP seems >satisfied with the replies.
> No, the OP didn't. That was why I also said my example was for CLISTs. Also, while the OP asked for JCL, the easiest way is probably ISPF 3.3 copy. Mark -- Mark Zelden Sr.
Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group - ZFUS G-ITO mailto: z/OS Systems Programming expert at Mark's MVS Utilities: ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to with the message: GET IBM-MAIN INFO Search the archives at Terri E Shaffer, 6:50 น. We currently have 3- 3330cyl page datasets defined per 3390-9 volumes with PAV support turned on. My question revolves around the above support and might be more of a personal opinion than technical one. So is it better performance to allocate 1 per volume, 3 per volume per 3390-9 and/or what if I go for a full Mod-27 or even mod-54, given either 1 or multiple per physical volumes??? Is anyone doing this currently since the APAR closed last year?
Popular Posts
CONVERT VB TO FB FILE; List all datasets with High Level Qualifier; List Migrated Datasets; date and timestamp in load object; Removing Duplicates; SUPERCE in Batch. I have a VB file of lrecl which is 9 posit. I want to convert it to an FB with lrecl of 9. Aug 19, 2015 Converting FB file to VB file and vice versa using SORT Converting Fixed Block file to Variable Block file. We can use FTOV to do this conversion. SORT Parameters. JCL (10) Mainframe Tips & Tricks (5) MQ Series (1) MVS (1) VSAM (2) Blog Archive 2018 (2) August (2).
You can adapt this JCL. SYSUT1 points to FB input member, SYSUT2 points to preallocated VB PDS. //PS10 EXEC PGM=IEBGENER,REGION=0M //SYSPRINT DD SYSOUT=* //SYSUT1 DD DSN=INPUT.PDS(MEM1), // DISP=SHR //SYSUT2 DD DSN=OUTPUT.PDS, // DISP=SHR //SYSIN DD * GENERATE MAXFLDS=2,MAXNAME=1 RECORD FIELD=(8,73,,1),FIELD=(72,1,,9) MEMBER NAME=MEM1 Mike Shaw MVS/QuickRef Support Group Chicago-Soft, Ltd.
---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to with the message: GET IBM-MAIN INFO Search the archives at Angel Tamayo 4/11/2009, 11:48 น. On Wed, 4 Nov 2009 14:22:48 -0500, Angel Tamayo wrote: >Somebody could help me with a JCL to copy all members from a PDS dataset >with rcfm=FB to PDS dataset with recfm=VB. > You can probably use CVTCLIST (CBT file 187 - ).
But for my own CLISTs, I typically just use the JCL below. The IEBGENER sysin (IEBGRFVI) looks like this: GEN GENERATE MAXFLDS=2 GEN RECORD FIELD=(8,73,,1),FIELD=(72,1,,9) CVTCLIST has the advantage of processing the entire library. Nosaj thing views octopus ep rarest. //* //* CONVERT FIXED BLOCK CLISTS TO VARIABLE BLOCK CLISTS //* //CHGTOVB PROC MEMBER= //PS010 EXEC PGM=IEBGENER //SYSPRINT DD SYSOUT=* //SYSUT1 DD DSN=userid.CLIST(&MEMBER),DISP=SHR //SYSUT2 DD DSN=userid.CLIST.VB(&MEMBER),DISP=SHR //SYSIN DD DSN=userid.JCL.CNTL(IEBGRFVI),DISP=SHR // PEND //* //JS010 EXEC CHGTOVB,MEMBER=mem1 //JS020 EXEC CHGTOVB,MEMBER=mem2 //JS030 EXEC CHGTOVB,MEMBER=mem3 etc. Mark -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group - ZFUS G-ITO mailto: z/OS Systems Programming expert at Mark\'s MVS Utilities: ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to with the message: GET IBM-MAIN INFO Search the archives at Paul Gilmartin 4/11/2009, 13:24 น. On Wed, 4 Nov 2009 14:19:20 -0600, Mark Zelden wrote: >On Wed, 4 Nov 2009 14:22:48 -0500, Angel Tamayo wrote: > >>Somebody could help me with a JCL to copy all members from a PDS dataset >>with rcfm=FB to PDS dataset with recfm=VB.
> >But for my own CLISTs, I typically just use the JCL below. The >IEBGENER sysin (IEBGRFVI) looks like this: > >GEN GENERATE MAXFLDS=2 >GEN RECORD FIELD=(8,73,,1),FIELD=(72,1,,9) > I don\'t see that the OP made any statement about LRECL, nor whether the lines bore sequence numbers. Has this somehow been inferred from context?
Must have been; the OP seems satisfied with the replies. -- gil ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to with the message: GET IBM-MAIN INFO Search the archives at Mark Zelden 4/11/2009, 13:54 น. On Wed, 4 Nov 2009 15:01:37 -0600, Paul Gilmartin wrote: >On Wed, 4 Nov 2009 14:19:20 -0600, Mark Zelden wrote: > >>On Wed, 4 Nov 2009 14:22:48 -0500, Angel Tamayo wrote: >> >>>Somebody could help me with a JCL to copy all members from a PDS dataset >>>with rcfm=FB to PDS dataset with recfm=VB. >> >>But for my own CLISTs, I typically just use the JCL below. The >>IEBGENER sysin (IEBGRFVI) looks like this: >> >>GEN GENERATE MAXFLDS=2 >>GEN RECORD FIELD=(8,73,,1),FIELD=(72,1,,9) >> >I don\'t see that the OP made any statement about LRECL, nor >whether the lines bore sequence numbers. Has this somehow >been inferred from context? Must have been; the OP seems >satisfied with the replies.
> No, the OP didn\'t. That was why I also said my example was for CLISTs. Also, while the OP asked for JCL, the easiest way is probably ISPF 3.3 copy. Mark -- Mark Zelden Sr.
Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group - ZFUS G-ITO mailto: z/OS Systems Programming expert at Mark\'s MVS Utilities: ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to with the message: GET IBM-MAIN INFO Search the archives at Terri E Shaffer, 6:50 น. We currently have 3- 3330cyl page datasets defined per 3390-9 volumes with PAV support turned on. My question revolves around the above support and might be more of a personal opinion than technical one. So is it better performance to allocate 1 per volume, 3 per volume per 3390-9 and/or what if I go for a full Mod-27 or even mod-54, given either 1 or multiple per physical volumes??? Is anyone doing this currently since the APAR closed last year?
...'>How To Convert Vb File To Fb File In Jcl(20.10.2018)CONVERT VB TO FB FILE; List all datasets with High Level Qualifier; List Migrated Datasets; date and timestamp in load object; Removing Duplicates; SUPERCE in Batch. I have a VB file of lrecl which is 9 posit. I want to convert it to an FB with lrecl of 9. Aug 19, 2015 Converting FB file to VB file and vice versa using SORT Converting Fixed Block file to Variable Block file. We can use FTOV to do this conversion. SORT Parameters. JCL (10) Mainframe Tips & Tricks (5) MQ Series (1) MVS (1) VSAM (2) Blog Archive 2018 (2) August (2).
You can adapt this JCL. SYSUT1 points to FB input member, SYSUT2 points to preallocated VB PDS. //PS10 EXEC PGM=IEBGENER,REGION=0M //SYSPRINT DD SYSOUT=* //SYSUT1 DD DSN=INPUT.PDS(MEM1), // DISP=SHR //SYSUT2 DD DSN=OUTPUT.PDS, // DISP=SHR //SYSIN DD * GENERATE MAXFLDS=2,MAXNAME=1 RECORD FIELD=(8,73,,1),FIELD=(72,1,,9) MEMBER NAME=MEM1 Mike Shaw MVS/QuickRef Support Group Chicago-Soft, Ltd.
---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to with the message: GET IBM-MAIN INFO Search the archives at Angel Tamayo 4/11/2009, 11:48 น. On Wed, 4 Nov 2009 14:22:48 -0500, Angel Tamayo wrote: >Somebody could help me with a JCL to copy all members from a PDS dataset >with rcfm=FB to PDS dataset with recfm=VB. > You can probably use CVTCLIST (CBT file 187 - ).
But for my own CLISTs, I typically just use the JCL below. The IEBGENER sysin (IEBGRFVI) looks like this: GEN GENERATE MAXFLDS=2 GEN RECORD FIELD=(8,73,,1),FIELD=(72,1,,9) CVTCLIST has the advantage of processing the entire library. Nosaj thing views octopus ep rarest. //* //* CONVERT FIXED BLOCK CLISTS TO VARIABLE BLOCK CLISTS //* //CHGTOVB PROC MEMBER= //PS010 EXEC PGM=IEBGENER //SYSPRINT DD SYSOUT=* //SYSUT1 DD DSN=userid.CLIST(&MEMBER),DISP=SHR //SYSUT2 DD DSN=userid.CLIST.VB(&MEMBER),DISP=SHR //SYSIN DD DSN=userid.JCL.CNTL(IEBGRFVI),DISP=SHR // PEND //* //JS010 EXEC CHGTOVB,MEMBER=mem1 //JS020 EXEC CHGTOVB,MEMBER=mem2 //JS030 EXEC CHGTOVB,MEMBER=mem3 etc. Mark -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group - ZFUS G-ITO mailto: z/OS Systems Programming expert at Mark\'s MVS Utilities: ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to with the message: GET IBM-MAIN INFO Search the archives at Paul Gilmartin 4/11/2009, 13:24 น. On Wed, 4 Nov 2009 14:19:20 -0600, Mark Zelden wrote: >On Wed, 4 Nov 2009 14:22:48 -0500, Angel Tamayo wrote: > >>Somebody could help me with a JCL to copy all members from a PDS dataset >>with rcfm=FB to PDS dataset with recfm=VB.
> >But for my own CLISTs, I typically just use the JCL below. The >IEBGENER sysin (IEBGRFVI) looks like this: > >GEN GENERATE MAXFLDS=2 >GEN RECORD FIELD=(8,73,,1),FIELD=(72,1,,9) > I don\'t see that the OP made any statement about LRECL, nor whether the lines bore sequence numbers. Has this somehow been inferred from context?
Must have been; the OP seems satisfied with the replies. -- gil ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to with the message: GET IBM-MAIN INFO Search the archives at Mark Zelden 4/11/2009, 13:54 น. On Wed, 4 Nov 2009 15:01:37 -0600, Paul Gilmartin wrote: >On Wed, 4 Nov 2009 14:19:20 -0600, Mark Zelden wrote: > >>On Wed, 4 Nov 2009 14:22:48 -0500, Angel Tamayo wrote: >> >>>Somebody could help me with a JCL to copy all members from a PDS dataset >>>with rcfm=FB to PDS dataset with recfm=VB. >> >>But for my own CLISTs, I typically just use the JCL below. The >>IEBGENER sysin (IEBGRFVI) looks like this: >> >>GEN GENERATE MAXFLDS=2 >>GEN RECORD FIELD=(8,73,,1),FIELD=(72,1,,9) >> >I don\'t see that the OP made any statement about LRECL, nor >whether the lines bore sequence numbers. Has this somehow >been inferred from context? Must have been; the OP seems >satisfied with the replies.
> No, the OP didn\'t. That was why I also said my example was for CLISTs. Also, while the OP asked for JCL, the easiest way is probably ISPF 3.3 copy. Mark -- Mark Zelden Sr.
Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group - ZFUS G-ITO mailto: z/OS Systems Programming expert at Mark\'s MVS Utilities: ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to with the message: GET IBM-MAIN INFO Search the archives at Terri E Shaffer, 6:50 น. We currently have 3- 3330cyl page datasets defined per 3390-9 volumes with PAV support turned on. My question revolves around the above support and might be more of a personal opinion than technical one. So is it better performance to allocate 1 per volume, 3 per volume per 3390-9 and/or what if I go for a full Mod-27 or even mod-54, given either 1 or multiple per physical volumes??? Is anyone doing this currently since the APAR closed last year?
...'>How To Convert Vb File To Fb File In Jcl(20.10.2018)