RE: SQL identity column V4R5 howto?

Just a question, why not do the process within the trigger program.

Consider the following:

 When      TEvent     = Insert     and            
           IDfld      = *Zero                                  
 Eval      IDfld      = $Getnextnbr       
 When      TEvent     = Update     and            
           IDfld      = *Zero                     
 Eval      IDfld      = $Getnextnbr

Michael     

-----Original Message-----
From: Goodbar, Loyd (ETS - Water Valley)
[mailto:LGoodbar@xxxxxxxxxxxxxx]
Sent: Wednesday, August 27, 2003 10:31 AM
To: 'midrange-l@xxxxxxxxxxxx'
Subject: SQL identity column V4R5 howto?


I know at V4R5 SQL does not have identity (auto number, auto sequence, auto
increment) columns. We're waiting for our 810 upgrade with V5R2 for this,
but I don't have a timeframe yet (hopefully by Oct 31).

Has anyone done a stored procedure or trigger or trigger/dtaq process for
using identity columns in SQL at V4R5?

I was thinking that I could write a before trigger to pass the library,
file, field, and RRN of the row to a data queue. A data queue monitor would
get these and do a "+1" to the field to populate the identity column. This
would "guarantee" serialization of the autonumbering process.

I would probably need to write an on-change trigger to "prevent" renumbering
of the identity column on existing rows.

Any other ideas, besides waiting for V5R2?

Thanks,
Loyd



--  
Loyd Goodbar
Programmer/analyst
BorgWarner Incorporated
ETS/Water Valley
662-473-5713
lgoodbar@xxxxxxxxxxxxxx

_______________________________________________
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.