Veri Tabanını Kullanan Aktif Kullanıcılar

ben bunun için bir dosya kullanıyorum.

xok=.f.
scan
if lock()
   xok=.t.
   retu
endif
ends

if !xok
  appe blan
  lock()
endif

yalnız bu durumda unlock all komutunu hiçbiryerde çalıştırmaman gerekir.
logo ve eta bunun yerine tabloya işaret koymayı deniyorlar (hala öyle mi yapıyorlar bilmiyorum, belki bırakmışlardır). o yöntemin sakıncası elektrik kesilmesi veya kilitlenmelere veya kullanıcının programı çarpıdan kapatması durumunda bir terminal açıkmış gibi görünüyor. ama benim sistemde böyle bir sakınca yok. kilitlenip resetlenen terminal açıkmış gibi görünse de network'e tekrar bağlandığında veya belli bir süre geçtiğinde kilit serbest kalıyor.