RE: COBOL output to XML file

[Kelly Cookson <kc62301@xxxxxxxxx>]

I'd be very interested in learning how to write
directly to an IFS file.  Would I use CL to override
to the IFS file, or would I select the IFS file using
Cobol code?

I'd appreciate any code snippets you might have.  I'll
also look around the IBM site to see what I can find.

Thanks,
Kelly



--- Winchester Terry
<terry.winchester@raymondcorp.com> wrote:
> Kelly,
>
> You can write directly to the IFS file system (a
> stream
> file) with Cobol.  You could try this technique with
> a stub
> program to see if it creates the file correctly.
>
> There was sample code on IBM's "code snippet" site,
> but
> apparently that has been discontinued (no surprise
> here...)
>
> Somewhere I have it stored on CD...
>
> Terry
>
> > -----Original Message-----
> > From: Kelly Cookson [mailto:kc62301@yahoo.com]
> > Sent: Thursday, July 11, 2002 2:00 PM
> > To: cobol400-l@midrange.com
> > Subject: COBOL output to XML file
> >
> >
> > I'm trying code a COBOL program that generates an
> XML
> > file.
> >
> > The COBOL program WRITEs to a physical file or
> source
> > file member, then I transfer the file to a PC text
> > file.  I've used the Client Access Express
> transfer
> > function, the copy to stream file (CPYTOSTMF)
> command
> > and the copy to PC document (CPYTOPCD) command.
> In
> > each case, an end-of-file label is added to the
> text
> > file. The end-of-file label makes the XML file
> > ill-formed. (Deleting the end-of-file label with a
> > text editor makes the XML file well-formed.)
> >
> > Can I WRITE directly to a PC text file from
> COBOL400?
> > Or can I set up a translation table that does not
> add
> > an end-of-file label to the PC text file?
> >
> > Thanks for any insights.
> >
> > Kelly
> >
> > __________________________________________________
> > Do You Yahoo!?
> > Sign up for SBC Yahoo! Dial - First Month Free
> > http://sbc.yahoo.com
> > _______________________________________________
> > This is the COBOL Programming on the iSeries/AS400
> > (COBOL400-L) mailing list
> > To post a message email: COBOL400-L@midrange.com
> > To subscribe, unsubscribe, or change list options,
> > visit:
>
http://lists.midrange.com/cgi-bin/listinfo/cobol400-l
> > or email: COBOL400-L-request@midrange.com
> > Before posting, please take a moment to review the
> archives
> > at 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@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit:
>
http://lists.midrange.com/cgi-bin/listinfo/cobol400-l
> or email: COBOL400-L-request@midrange.com
> Before posting, please take a moment to review the
> archives
> at http://archive.midrange.com/cobol400-l.
>


__________________________________________________
Do You Yahoo!?
Sign up for SBC Yahoo! Dial - First Month Free
http://sbc.yahoo.com