Re: Runtime KLIST change?

Here's an example Frank.  Its not my code but I use it a lot and it solves 
a problem.  I don't know any other easy way to do what this code does:

0037.00  * --------------------------------------------- 
0038.00  * Original Record 
0039.00  * --------------------------------------------- 
0040.00 D@OrRecord        S               *   Inz(*Null) 
0041.00 
0042.00 DOrRecord       E DS                  ExtName(<PFile>) Prefix(OR_)
0043.00 D                                     Based(@OrRecord) 
0044.00 
0045.00  * --------------------------------------------- 

Essentially, if you change "<PFile>" to the file name you are using you'll have 
all the fields in the 
record available prefixed with "OR_" 
_______________________
Booth Martin
boothm@earth.goddard.edu
http://www.spy.net/~booth
_______________________




Frank Steinjan <fstone@wtal.de>
Sent by: owner-rpg400-l@midrange.com
12/05/1999 06:57 AM
Please respond to RPG400-L

 
        To:     RPG400-L@midrange.com
        cc: 
        Subject:        Re: Runtime KLIST change?

Hi guys,

let me say this: everybody of you knows how boring those discussions are 
and where they lead to.
I didn't want to discuss "the possibillity to use pointers to solve a 
special problem". I just
wanted a hint, if there is a possibillity and how it looks like. Believe 
it or not, but I'm also
doing programming for a couple of years and I think I could decide by 
myself if this solution is
practical and maintainable. If you don't know about those possibillities, 
how could you else
decide if its "good" or "bad" ??? :-)

greedzzzz,

Frank


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