Re: Create a stream file in RPG?

[boothm@xxxxxxxxxxxxxxxxx]

Have you looked through CL's "copy to stream file" command? I think it 
does exactly what you are asking.
_______________________
Booth Martin
boothm@earth.goddard.edu
http://www.spy.net/~booth
_______________________




"Bale, Dan" <DBale@TFSA.Textron.com>
Sent by: owner-rpg400-l@midrange.com
03/15/2000 01:32 PM
Please respond to RPG400-L

 
        To:     "'RPG400-L@midrange.com'" <RPG400-L@midrange.com>
        cc: 
        Subject:        Create a stream file in RPG?


I am trying to determine how to output to a stream file in RPG IV.
Essentially, I am trying to create an .RTF document file on the 400, so 
that
I can open it in Wordpad, or even MS Word. 

I am trying to do a homegrown green-screen documentation utility so that I
can include 5250 screen prints with all the highlighting & underscores in 
a
Word document.  Since Word understands RTF, and RTF is relatively simple 
to
build and can handle the bold and underlining attributes, I figured the
programming would be pretty easy.  But it seems that I need to output to a
stream file.

I searched for "stream file" and did not find any reference in the ILE-RPG
manuals.  Will I just have to output to a regular flatfile with, say, a
record length of 500, output one record per print line and use CPYTOSTMF? 

Answer to the inevitable question:  Because I am a travelling contractor 
and
this is doable.
The inevitable question:  Why not just buy a package to do this?

TIA,
- Dan Bale
+---
| 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
+---




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