• Subject: Re: Move an entire record format as a whole
  • From: dhandy@xxxxxxxxxxx (Douglas Handy)
  • Date: Wed, 07 Jul 1999 21:46:47 GMT

Brian,

>Does anyone know if it is possible to move an entire record format to a
>holding field, or DS so that I can move my file pointer (another chain)
>but still access the old data?

The simplest way is to use RPG IV so you can take advantage of the
Prefix() keyword on an externally described data structure.

First, name a DS and externally describe it to match your record
format.  Second, name another DS externally described the same way,
but add Prefix( Old_ ) or whatever.

Prior to the second chain, move the first DS to the second DS, which
will populate all the Old_* fields with the original data.  You can
then use these to compare with the regular field names after reading
another record.

Doug
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* This is the RPG/400 Discussion Mailing List!  To submit a new         *
* message, send your mail to "RPG400-L@midrange.com".  To unsubscribe   *
* from this list send email to MAJORDOMO@midrange.com and specify       *
* 'unsubscribe RPG400-L' in the body of your message.  Questions should *
* be directed to the list owner / operator: david@midrange.com          *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *


This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2019 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].