IBM has included an "IDENTITY" like data type in its new release:
IBM DB2 UDB V5R2 for eSeries (that'd be DB2/400).

Let's see that's what? more than a decade for the AS/400 to catch up?