> -----Original Message----- > From: IBM Mainframe Discussion List > [mailto:[EMAIL PROTECTED] On Behalf Of Scott Barry > Sent: Wednesday, September 10, 2008 6:32 PM > To: [email protected] > Subject: Re: Another ICETOOL challenge > > On Wed, 10 Sep 2008 17:07:16 -0500, Bass, Walter W > <[EMAIL PROTECTED]> wrote: > > >I have a file of variable length records > >DCB=(DSORG=PS,RECFM=VB,LRECL=1504,BLKSIZE=27998) > >The records are already a variety of different lengths. > >Many, but not all of these records have trailing blanks > (x'40') on the > >end. > >I would like to remove those trailing blanks. > > > >I suspect that ICETOOL can kindly remove them for me and shorten the > >record > >length accordingly, but I have not yet been able to figure out how. > > > >Has anyone else already invented this wheel or have some > idea how to go > >about it? > >If not ICETOOL, is there another common IBM utility that I am > >overlooking that > >can do this without having to resort to writing a program? > > > >Thanks, > >Bill Bass > >Senior Applications Developer > >United Health Care > >Greenville, SC > > > > > > Have a look at using the VLTRIM=' ' with DFSORT, either > SORT/COPY or with > ICETOOL, such as: > > OPTION COPY > OUTFIL VLTRIM=C' ' > > Scott Barry > SBBWorks, Inc. >
Thanks! Exactly what I needed. Either the DFSORT manual is getting too big or maybe my eye were just going buggy after an hour of searching, but I never did see VLTRIM. Bill This e-mail, including attachments, may include confidential and/or proprietary information, and may be used only by the person or entity to which it is addressed. If the reader of this e-mail is not the intended recipient or his or her authorized agent, the reader is hereby notified that any dissemination, distribution or copying of this e-mail is prohibited. If you have received this e-mail in error, please notify the sender by replying to this message and delete this e-mail immediately. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
