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.

----------------------------------------------------------------------
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

Reply via email to