Re: Read data changed by *BEFORE *INSERT trigger

Kyle,

is the file uniquely keyed by anything other than the id column?  if
not, I don't know if there's anything easy you can do.

a couple things come to mind - 

1) have your trigger populate *LDA with the column id, and have your
entry program retrieve it from there.

2) have your trigger pop the id column into a keyed data queue, and
have your entry program retrieve it.  key your data queue by job
number/user/jobname, so that any user will retrieve only their own
column ids.

hth,

Rick

On 7/30/05, Kyle Goodwin <gte465z@xxxxxxxxxxxxxxxx> wrote:
> I have an RPG trigger attached to a physical file and an RPG data entry
> application.  When a new record is created by the data entry application
> a *BEFORE *INSERT trigger is called to get the new id field value for
> the record (I'm on V4R5 so I can't use a sequence or identity column).
> I'd like to be able to read back the record I just wrote (I use WRITE(E)
> to write it) in order to be able to display the newly created record
> including the generated id column value.  I've tried using READ, READP,
> and SETGT in various combinations, but I can't seem to get it to work.
> I also can't find any documentation regarding where the WRITE operation
> leaves the file position.  This is a full-procedural file enabled for
> reads, adds, and updates.
> 
> Thanks,
> 
> Kyle Goodwin
> --
> This is the RPG programming on the AS400 / iSeries (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.
> 
>