RE: Accessing a source file.

[Mark Allen <allenmark@xxxxxxxx>]

Yes override

Rename record format

Can be externally described

For a RPGLE src member

 QRPGLESRC  SRCSEQ                                   S     1     6  2
            SRCDAT                                   S     7     6  0
            SRCDTA                                   A    13   138


For none ILE src member
 Base PF    Field Name Field Description         Key Tp  Pos  Len Dec
 QRPGSRC    SRCSEQ                                   S     1     6  2
            SRCDAT                                   S     7     6  0
            SRCDTA                                   A    13    80


Mark Allen
I.S. Manager
Wilkes Telephone & Electric
A Dycom Company
Phone: (706) 678-9565
Email: allenmark@nu-z.net
http://www.nu-z.net




:-----Original Message-----
:From: rpg400-l-admin@midrange.com
:[mailto:rpg400-l-admin@midrange.com] On Behalf Of Feador Jerry
:Sent: Thursday, May 09, 2002 3:30 PM
:To: 'rpg400-lmidrangecom'
:Subject: Accessing a source file.
:
:
:
:Hi all,
:
:I've been searching and searching but...
:
:Can anybody supply the general rules for including, and
:reading, a source physical file in an RPGLE program.?
:
:I understand the requirements for the preceding CL override.
:It's the RPG setup that's throwing me... Can the file be
:defined as 'E'xternal or does it have to be 'F'ixed with 'I'
:specs? (I haven't used 'I' specs in so long...) Do I have to
:rename the record format? (since it's the same as the file
:name and the compiler doesn't like that!)
:
:Thanks for your time and assistance,
:"The Captain"
:
:Jerry L. Feador
:Programmer/Analyst II
:Kia Motors America, Inc.
:(949) 595-5810
:_______________________________________________
:This is the RPG programming on the AS400 / iSeries (RPG400-L)
:mailing list To post a message email: RPG400-L@midrange.com To
:subscribe, unsubscribe, or change list options,
:visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
:or email: RPG400-L-request@midrange.com
:Before posting, please take a moment to review the archives
:at http://archive.midrange.com/rpg400-l.
: