Re: EVAL-CORR

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