RE: Suggestions

["Joel Fritz" <JFritz@xxxxxxxxxxxxxxxx>]

Another option is a data area containing the next available number.

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Tim Kredlo
Sent: Wednesday, March 09, 2005 12:25 PM
To: 'RPG programming on the AS400 / iSeries'
Subject: RE: Suggestions

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.


*****************************
NOTICE:
All e-mail sent to or from this e-mail address will be received or otherwise 
recorded by
The Sharper Image corporate e-mail system and is subject to archival, 
monitoring,
and review by and/or disclosure to Sharper Image security and other management.
This message is intended only for the use of the addressee and may contain 
information
that is privileged and confidential.

The contents of this message may contain personal views which are not the views 
of The Sharper Image.
If you are not the intended recipient, dissemination of this communication is 
prohibited.
*****************************