Re: EVAL-CORR

["Carel Teijgeler" <coteijgeler@xxxxxxxxx>]

Why not simply: 

CHAIN MyKey MyFileCLIREFF1 RecordIn; 
Field1 = 'something else';
WRITE MyFormat

Of course the key of the new record must not create a duplicate.
But then I wonder, why copy a record to the same file with some value(s),
but not the key value(s), changed?

With regards,
Carel Teijgeler

*********** REPLY SEPARATOR  ***********

On 3-1-2011 at 9:27 Rory Hewitt wrote:

> David,
>
> As Dennis pointed out, doing a simple EVAL (RecordOut = RecordIn) will
> simply copy the bytes, starting at the left-most byte.
>
> However, if you either specifiy LIKEREC(*ALL) for both record formats or
> use
> EXTNAME rather than LIKEREC, then you could simply use EVAL. So a
follow-up
> question would be why you're not using either of those methods - what
> exactly are the differences between RecordIn and RecordOut? In the vast
> majority of cases, they would be the same (for database files)...
>
> Rory
>
> p.s. There's nothing *wrong* with EVAL-CORR, but it's pretty rare that
> you'd
> need it.
>
> On Mon, Jan 3, 2011 at 6:02 AM, David FOXWELL
> <David.FOXWELL@xxxxxxxxx>wrote:
>
> > I was looking at the code I wrote last year. Well, last week actually,
> but
> > it seemed a long time ago. There I was, like the next developper called
> upon
> > todo the maintenance, and I said to myself, "Why has he put EVAL-CORR? -
> > that would suggest that the two DS were not the same". So, I went back
> to a
> > move, as in my OP but then asked myself if was safe, hence my question.
> -- 
> This is the RPG programming on the IBM i / System i (RPG400-L) mailing
list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
>
>
> -----
> Geen virus gevonden in dit bericht.
> Gecontroleerd door AVG - www.avg.com
> Versie: 10.0.1191 / Virusdatabase: 1435/3350 - datum van uitgifte:
12/31/10
> -----
> Geen virus gevonden in dit bericht.
> Gecontroleerd door AVG - www.avg.com
> Versie: 10.0.1191 / Virusdatabase: 1435/3350 - datum van uitgifte:
12/31/10