>>>I have a form where I return the results of queries into several temporary files. I am using the sys(3) function to get the names for these. After upgrading to VisFox 6 I have several users who are having problems with duplicate file names. I have even put timing loops in between the sys(3) statements with no luck. Anyone have any suggestions how to get the unique file name function to return unique file names?
>>
>>Hi Jeff,
>>
>>The docs on SYS(3) say that on fast machines it may not work. It recommends "Use SUBSTR(SYS(2015), 3, 10) to create unique, legal eight character file name."
>>
>>hth,
>
>
>Thanks a bunch, guess I'm used to my old FoxBase days on 8086's
With VFP and Win9x or NT you could drop the substr part (and think dropping is really better) and even add a one-two char station identifier to make it always unique.

*table stations exist
* structure just (online l)
* prg entry
use stations
do while !(seek(.f.,"stations","online") and rlock("stations"))
  insert into stations values (.f.)
enddo

* cUniqFile = "T"+padl(recno("stations"),3,"0")+sys(2015)+".tmp"

Cetin