Re: DS and external described files....

>Date: Wed, 4 Oct 2000 06:48:52 -0700 (PDT)
>From: Marco Facchinetti <facchinetti@yahoo.com>
>
>Hi, consider this:
>
>ffttes00f  uf a e           k disk
>d fttesw        e ds         extname(fttes00f) prefix(t1:2)
>
>d fttesx        e ds         extname(fttes00f)
>
>c   x       chain    fttes00f
>c           eval     fttesw=fttesx
>c ....
>c .... change the fields in fttesw
>c ....
>c           eval     fttesx=fttesw
>c           update   fttes(00f)
>
>Is it working?
>Is it too "expansive" at run time?

Marco, it should work.  It's probably not very expensive to
do the two copies from one DS to the other.  I assume you need
the original fields while you are updating, for some reason.
If that's the case, it's a bit cheaper to copy one DS to another,
as you are doing, than to copy each field individually.

Barbara Morris


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