Manipulating data into unbroken stream that wraps at 80 char.

["Justin Kiteley" <justin@xxxxxxxxxx>]

Hello,

  I'm writing an application that manipulates print streams for output to a
portable printer attached to a radio frequency terminal.  I've got the
printer working but have an idea that may speed up the transfer of the print
stream to the printer.  Presently the data is being sent to the printer from
an 80 char long field for each line of the print stream. ( print stream
varies in record length and # of records but never longer than 80)  What
I've been trying to do with arrays in RPG/400 is strip out the unneccesary
blanks and place all of the data into a continuos unbroken stream that wraps
after 80 char.  This data is displayed on a subfile but could be first
written to a file then displayed.  I think this will greatly increase the
print times.  Unfortunately I've not been succesful with my attempts so far.
I'm new to RPGIV so if anyone out there has any idea's of how to do this in
RPG/400 or RPGIV I'd be very gratefull!

   Here is an example of a stream I'm working with.  Note: there are
instances where blanks are necessary in the stream but there is always a
last character before strippable blanks occur.

~CC¬
¬XA¬JMB¬FS¬XZ
¬XA¬CVN¬FS¬XZ
¬XA¬SS,,,0570¬FS¬XZ
¬XA¬MTT¬FS¬XZ
¬XA¬MNY¬FS¬XZ
¬XA¬MMT¬FS¬XZ
¬XA¬MD+10¬FS¬XZ
¬XA¬LT     ¬FS¬XZ
¬XA¬PRB¬FS¬XZ
¬XA¬MCY¬XZ
¬XA¬LH0000,0000¬FS¬PON¬FS

Thanks in advance for any ideas on this!

Justin Kiteley
justin@asiwms.com



+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---