|
Jim,
Ok. I have created a simple example for the archives.
Its in two parts, a CL driver program:
http://code.midrange.com/index.php?id=c2e6605742
and the actual Cobol program that reads source members:
http://code.midrange.com/index.php?id=8cdb8400df
Terry Winchester
Programmer/Analyst
________________________________
The Raymond Corporation
terry.winchester@xxxxxxxxxxxxxxx
> -----Original Message-----
> From: cobol400-l-bounces@xxxxxxxxxxxx
> [mailto:cobol400-l-bounces@xxxxxxxxxxxx] On Behalf Of Jim Essinger
> Sent: Tuesday, May 29, 2007 5:59 PM
> To: COBOL Programming on the iSeries/AS400
> Subject: Re: [COBOL400-L] how to access source member from ILE COBOL?
>
> Terry,
>
> If your willing to share with more people, I would suggest that you
> copy/paste your code to
>
> http://code.midrange.com/
>
> and then post to this thread the resulting web address. That
> way when others
> look in the future, they can see the code you are talking
> about. You also
> only have to post once, and then the link will be available
> to search for in
> the archives.
>
> Thanks!
>
> Jim
>
> On 5/29/07, Winchester Terry <terry.winchester@xxxxxxxxxxxxxxx> wrote:
> >
> > Michael,
> >
> > Yes, this can be done by using an OVRDBF to point
> > to the member (prgoram) you wish to read. I have
> > sent you an example via e-mail.
> >
> > Terry Winchester
> > Programmer/Analyst
> > ________________________________
> > The Raymond Corporation
> > terry.winchester@xxxxxxxxxxxxxxx
> >
> > > -----Original Message-----
> > > From: cobol400-l-bounces@xxxxxxxxxxxx
> > > [mailto:cobol400-l-bounces@xxxxxxxxxxxx] On Behalf Of
> Michael Rosinger
> > > Sent: Tuesday, May 29, 2007 7:12 AM
> > > To: cobol400-l@xxxxxxxxxxxx
> > > Subject: [COBOL400-L] how to access source member from ILE COBOL?
> > >
> > > List,
> > >
> > > Is it possible to read a member from a source physical file
> > > in ILE COBOL?
> > > Can this be done via native COBOL access? Or does it require
> > > an API? An
> > > example would be greatly appreciated! TIA
> > >
> > > --
> > > Regards,
> > >
> > > Michael Rosinger
> > > Systems Programmer / DBA
> > > Computer Credit, Inc.
> > > 640 West Fourth Street
> > > Winston-Salem, NC 27101
> > > 336-761-1524
> > > m rosinger at cciws dot com
> > >
> > >
> > > --
> > > 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.
> > >
> > >
> >
> > Confidentiality Notice:
> >
> > The preceding e-mail message (including any attachments) contains
> > information that may be confidential, protected by applicable legal
> > privileges, or constitute non-public information. It is
> intended to be
> > conveyed only to the designated recipient(s). If you are
> not an intended
> > recipient of this message, please notify the sender by
> replying to this
> > message and then delete it from your system. Use, dissemination,
> > distribution or reproduction of this message by unintended
> recipients is
> > not authorized and may be unlawful.
> >
> >
> >
> >
> > --
> > 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.
> >
> >
> --
> 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.
>
>
Confidentiality Notice:
The preceding e-mail message (including any attachments) contains
information that may be confidential, protected by applicable legal
privileges, or constitute non-public information. It is intended to be
conveyed only to the designated recipient(s). If you are not an intended
recipient of this message, please notify the sender by replying to this
message and then delete it from your system. Use, dissemination,
distribution or reproduction of this message by unintended recipients is
not authorized and may be unlawful.
--
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.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
midrange.com
