RE: Suggestions

["Douglas W. Palme" <dpalme@xxxxxxxxxxxxxxxxxxxxx>]

Tim,
thanks that did the trick......I appeciate the help

Douglas


On Wed, 9 Mar 2005 12:25:10 -0800, Tim Kredlo wrote
> Douglas,
> 
> Create a logical file with this field as the unique key.
> SetLL to the file at *Hival or *End
> ReadP the file and get the last/highest used id#
> 
> HTH
> 
> Tim Kredlo
> Exterior Wood, Inc
> 
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
> On Behalf Of Douglas W. Palme
> Sent: Wednesday, March 09, 2005 11:57 AM
> To: RPG programming on the AS400 / iSeries
> Subject: Suggestions
> 
> I have a physical file that will hold gas type information, but one 
> of the fields needs to be an integer id field.  My experience with 
> other db formats
> 
> is that I could set that field to auto generate so that as each 
> record is written it will increment the count by 1.  we will be 
> using this for cross referencing to some other files and must be unique.
> 
> I know I can read through the file and increment a counter, but that 
> seems to have a huge overhead, not to mention that as time goes on,
>  it'll take longer and longer to calculate.
> 
> Does anyone have a viable suggestion on how to accomplish this?
> 
> Douglas
> 
> -- 
> 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.
> 
> -- 
> 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.


--
Open WebMail Project (http://openwebmail.org)