Export problem
George Simon
GSimon at americanriverintl.com
Fri Feb 9 10:37:59 PST 2007
-----Original Message-----
From: Kenneth Brody [mailto:kenbrody at bestweb.net]
Sent: Friday, February 09, 2007 12:14 PM
To: George Simon
Cc: filepro-list at seaslug.org
Subject: RE: Export problem
Quoting George Simon (Fri, 9 Feb 2007 11:46:59 -0500):
[...]
> >> I don't know if the code below would work, it depends on how
filePro
> >> selects the next record to be used from the pool of available
record
> >> numbers. Ken?
> >>[... if lookup to record 1 fails ...]
> >> If:
> >> Then: lookup filename r=free -e
> >> If: filename(@rn) ne rn
> >> Then: delete filename; goto ADDREC1
> >> If:
> >> Then: lookup - r=rn -e
> >> If:
> >> Then: return
>
> >> The lookup-free will get the first record off of the freechain,
> >> if any. There is no guarantee about the order of the records on
> >> the freechain.
>
>> But, if the freechain reads:
>> 25, 32, 14, 1, 30, 7, ...
>> Will I get to record 1 after deleting the first 3 records or will
those
>> records go back to the beginning of the freechain?
> What do you mean "after deleting the first 3 records"? If those
> records are on the freechain, they're already deleted (or never
> used in the first place). Do you mean add records and then
> delete them?
Yes, if you look at the code above, I'm doing a free-record lookup and
if the record number is not 1, the record is deleted and we get another
free record until we get to record 1.
> As I recall the freechain is in LIFO order, so you
> will get the last record you deleted.
So are you saying that using that technique, I will never get to record
1?
--
More information about the Filepro-list
mailing list