AW: Identity columns and RLA

["Birgitta Hauser" <Hauser@xxxxxxxxxxxxxxx>]

There is no need to convert everything into SQL.
If the identity column is generated always, the new identity value is
determined correctly when writing a new record.
If you perform an SQL SET statement, with IDENTITY_VAL_LOCAL, the identity
value of your write operation.
Exec SQL SET :LastId = Identity_Val_Local;

We use this conjunction WRITE in RPG and Identity_Columns and
IDENTITY_VAL_LOCAL since years without any problems

Determining the highest identity value in the table with SQL might not be
the best idea, because in between your write and determining the highest
value an other program or job could have been written an other row.
With Identity_Val_Local you'll really get the Identity value of your WRITE
(even if a trigger gets fired that writes an other row into the same table
with a new identity).

Mit freundlichen Grüßen / Best regards

Birgitta Hauser

"Shoot for the moon, even if you miss, you'll land among the stars." (Les
Brown)
"If you think education is expensive, try ignorance." (Derek Bok)
"What is worse than training your staff and losing them? Not training them
and keeping them!"
?Train people well enough so they can leave, treat them well enough so they
don't want to.? (Richard Branson)



-----Ursprüngliche Nachricht-----
Von: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] Im Auftrag von Peter
Dow
Gesendet: Wednesday, 31.8 2016 23:03
An: rpg400-l@xxxxxxxxxxxx
Betreff: Re: Identity columns and RLA

Thanks Vern. I'm thinking I'll change the program to just use SQL for
everything, since it's simpler.  But I was curious about mixing RLA and SQL.


On 8/31/2016 1:16 PM, Vernon Hamberg wrote:
> There's an IDENTITY_VAL_LOCAL function you can use to get the last 
> assigned - it'd be an SQL statement, like SET or VALUES
>
> HTH
> Vern
>
> On 8/31/2016 3:05 PM, Peter Dow wrote:
> > What happens when writing a record with RLA to a table that has an 
> > identity column?
> >
> > Assuming it actually works, i.e. ignores the value in the identity 
> > column on the WRITE, is there a way to get the value assigned to the 
> > identity column?
> >
> > -- 
> > *Peter Dow* /
> > Dow Software Services, Inc.
> > 909 793-9050
> > petercdow@xxxxxxxxx <mailto:petercdow@xxxxxxxxx>
> > pdow@xxxxxxxxxxxxxx <mailto:pdow@xxxxxxxxxxxxxx> /