🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.sys.mac.databases
Article #652

Re: 4D Field Incrementing

#652
From: Graydon Patterson
Date: Sun, 24 Jan 1993 02:06
15 lines
836 bytes
Here is the standard procedure I use to create unique ID's..
`	NextID
$0:=[NextID]ID
[NextID]ID:=[NextID]ID+1
SAVE RECORD([NextID])
`    end script

To obtain a unique ID in any file use the following...
[Clients]Client Number:=NextID    ` NEXTID being a function

The NextIF file has only one field called ID and only one
record, the next ID to be called.
(pardon my typos)
-- 
Technical Details
Message-ID: <1993Jan24.020602.20467@freenet.carleton.ca>
Path: arc1-ca.pugleaf.net!sparky!uunet!cs.utexas.edu!torn!nott!cunews!freenet.carleton.ca!Freenet.carleton.ca!aa192

Show Full Headers
Complete Article Headers
Newsgroups: comp.sys.mac.databases
Path: arc1-ca.pugleaf.net!sparky!uunet!cs.utexas.edu!torn!nott!cunews!freenet.carleton.ca!Freenet.carleton.ca!aa192
From: aa192@Freenet.carleton.ca (Graydon Patterson)
Subject: Re: 4D Field Incrementing
Message-ID: <1993Jan24.020602.20467@freenet.carleton.ca>
Sender: news@freenet.carleton.ca (News Administrator)
Organization: National Capital Freenet, Ottawa, Canada
Date: Sun, 24 Jan 1993 02:06:02 GMT
Lines: 21