RE: IFS: Removing blanks from ASCII, comma delimited text file

OH, well, in that case, it sounds like you want a full record layout with
a 30A field being 30 blanks...

In that case, just CPYF to a flat file and send it...then use a
read-from-into to redefine the unput  buffer and you've got a general
utility.



On Tue, 11 May 2004, Brown, Keith wrote:

>    <META HTTP-EQUIV="Content-Type" CONTENT="text/html;    charset=ISO-8859-1">
>
>    Thanks, I don't clarify the issue.  The main    of the data do not want 
> the blanks in the    trailing blanks truncated.
>
>    -----Original Message-----
>    From: cobol400-l-bounces@xxxxxxxxxxxx
>    [<A    
> HREF="mailto:cobol400-l-bounces@xxxxxxxxxxxx";>mailto:cobol400-l-bounce   
> s@xxxxxxxxxxxx]On Behalf Of Don
>    Sent: Tuesday, May 11, 2004 2:09 PM
>    To: COBOL Programming on the iSeries/AS400
>    Subject: Re: [COBOL400-L] IFS: Removing blanks from    delimited text file
>
>    well, once you've got it in .csv on the host, why not    send
>    it to the target?  Would be much faster and a    transit.
>
>    On Tue, 11 May 2004, Brown, Keith wrote:
>
>    >    <META    charset=ISO-8859-1">
>    >
>    >    I'm copying an AS/400 library    comma       descriptions.     each 
> record I'm sending 25-30 blank characters.
>
>    >
>    >    Thanks,
>    >    Keith Brown
>    >    > This is the COBOL Programming on the    mailing list
>    > To post a message email:    > To subscribe, unsubscribe, or change list  
>   > visit: <A    HREF="http://lists.midrange.com/mailman/listinfo/cobol400-l"; 
>    TARGET="_blank">http://lists.midrange.com/mailman/listinfo/cobol400-l<   
> /A>
>    > or email:    > Before posting, please take a moment to review    > at <A 
>    TARGET="_blank">http://archive.midrange.com/cobol400-l.
>    >
>
>    <FONT    This is the COBOL Programming on the iSeries/AS400    list
>    To post a message email:    To subscribe, unsubscribe, or change list    
> visit: <A       
> TARGET="_blank">http://lists.midrange.com/mailman/listinfo/cobol400-l<   /A>
>    or email: COBOL400-L-request@xxxxxxxxxxxx
>    Before posting, please take a moment to review the    at <A    
> TARGET="_blank">http://archive.midrange.com/cobol400-l.
> _______________________________________________
> This is the COBOL Programming on the iSeries/AS400 (COBOL400-L) mailing list
> To post a message email: COBOL400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/cobol400-l
> or email: COBOL400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/cobol400-l.
>