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