... Du meinst mit 2. Lösung die SEQUENCE?

Wenn Ja ein Sequence Object wird wie folgt erstellt:
Code:
CREATE SEQUENCE HSCOMMON10/MYSEQUENCE 
    AS INTEGER START WITH 1 INCREMENT BY 1 
               NO ORDER NO CYCLE 
               NO MINVALUE NO MAXVALUE 
               CACHE 20;
Am einfachsten geht es mit dem Wizard im iSeries Navigator.

Bei Sequence Objekten brauchst Du keine UDF, sondern kannst direkt beim Insert oder Update den nächsten Wert anfordern.

Code:
Insert MySchema/MyFile
Values (Next Value For MySequence, .....)

Insert MySchema/MyFile
as Select Next Value For MySequence, ....

Update MySchema/MyFile
     set Field = Next Value For MySequcence ...
Birgitta