This worked for me: //STEP1 EXEC PGM=IEBGENER //SYSUT1 DD * This is inside Frank's new VB file. //SYSUT2 DD DISP=(,CATLG),DSN=PVELS.MY.VB.FILE,RECFM=VB,LRECL=204, // SPACE=(TRK,(1,1)) //SYSPRINT DD SYSOUT=* //SYSIN DD DUMMY //*------------------------------------------------------------- //STEP2 EXEC PGM=IKJEFT1B //SYSEXEC DD DISP=SHR,DSN=PVELS.TSO.EXEC //INFILE DD DISP=SHR,DSN=PVELS.MY.VB.FILE // DD *,DCB=PVELS.MY.VB.FILE ,RECFM=V,LRECL=204 This should ALSO end up in the OUTPUT file //OUTFILE DD DISP=(,CATLG),DSN=PVELS.MY.OUTFILE,LIKE=PVELS.MY.VB.FILE //SYSTSIN DD * %FRANK //SYSTSPRT DD SYSOUT=* //*------------------------------------------------------------- //STEP3 EXEC PGM=IKJEFT1B //SYSTSIN DD * PROFILE NOPREFIX LISTDS PVELS.MY.VB.FILE LISTDS PVELS.MY.OUTFILE REPRO INFILE(FILE1) OUTFILE(FILE2) //FILE1 DD DISP=SHR,DSN=PVELS.MY.OUTFILE //FILE2 DD SYSOUT=* //SYSTSPRT DD SYSOUT=* //
The FRANK Rexx is: "execio * diskR infile (finis)" "execio * diskW outfile (finis)" On Fri, 29 Oct 2021 at 09:26, Frank Swarbrick <frank.swarbr...@outlook.com> wrote: > Looks like it's utilizing only those DCB parameters that are support for > SYSIN datasets, and RECFM is not one of them. > > ________________________________ > From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> on behalf > of Peter Vels <peter.v...@gmail.com> > Sent: Thursday, October 28, 2021 4:16 PM > To: IBM-MAIN@LISTSERV.UA.EDU <IBM-MAIN@LISTSERV.UA.EDU> > Subject: Re: Variable length records for SYSIN data sets > > Try this: > > //INFILE DD DISP=SHR,DSN=MY.VB.FILE > // DD *,DCB=MY.VB.FILE > > Peter > > On Fri, 29 Oct 2021 at 08:57, John McKown <john.archie.mck...@gmail.com> > wrote: > > > IIRC: > > > > //DD1 DD DSN=SOME.VB.DSN,DISP=SHR > > // DD *,RECFM=VB,LRECL=??? /* LRECL FROM ABOVE > > //* > > > > On Thu, Oct 28, 2021 at 4:11 PM Frank Swarbrick < > > frank.swarbr...@outlook.com> > > wrote: > > > > > I have a goal to concatenate a data set of variable length records > > > (RECFM=VB,LRECL=204) with an instream data set of fixed length > > characters. > > > My though was to add RECFM=V to my instream DD, i.e.: > > > //INFILE DD DISP=SHR,DSN=MY.VB.FILE > > > // DD *,RECFM=V,LRECL=204 > > > > > > The RECFM is rejected as being conflicting with a SYSIN dataset: > > > IEFC009I KEYWORD RECFM IS MUTUALLY EXCLUSIVE WITH KEYWORD SYSIN ON THE > DD > > > STATEMENT > > > > > > And yet the following section of the manual, "SYSIN data set" has > > > discussion of SYSIN data sets where "the record format is variable": > > > https://www.ibm.com/docs/en/zos/2.5.0?topic=ssds-sysin-data-set > > > > > > But how do I actually make the SYSIN dataset variable length? > > > > > > I do realize there are probably other options to accomplish my task, > but > > > this is bugging me. > > > > > > ---------------------------------------------------------------------- > > > For IBM-MAIN subscribe / signoff / archive access instructions, > > > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > > > > > > ---------------------------------------------------------------------- > > For IBM-MAIN subscribe / signoff / archive access instructions, > > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
