FiveTech Support Forums

Estimados Colegas

Tengo una aplicacion en red con un Twbrowse Maestro-detalle la cual
acceden varios usuarios a la vez como puedo hacer para optimizarla
Cuando el usuario navegue por el browse maestro, al otro usuario no
le aparezca fichero bloqueado por usuario

desde ya mucha gracias
Fabian

Databaselab2002@yahoo.com.ar

sele 15
USE ARTICULO alias articulo shared
if .not. neterr()

index on upper(articulo->descri) to articulo
set index to articulo
else
alert("archivo Bloqueado por otro usuario")
endif


 REDEFINE  LISTBOX oLbx FIELDS       ;
  ARTICULO->CODIGO,ARTICULO->DESCRI ,str(ARTICULO->PRECIO) ;
  HEADER "CODIGO","Descripcion","Precio" ;
  sizes 100,250,150 ;
  ALIAS "articulo"                     ;
  ID 199  OF ODLG ;
  on change detail(olbx3)

  Use garan2t alias garan2t shared 
  if .not. neterr()
  INDEX ON (garan2t->codart) TO garan2t
  SET INDEX TO garan2t
  else
  Alert("Archivo Bloqueado por otro usuario")
  ENDIF


  REDEFINE  LISTBOX oLbx3 FIELDS       ;
  garan2t->codart,garan2t->DENOMI,Str(garan2t->pventa);
  HEADER "Codigo","Articulo","Precio Venta" ;
  sizes 150,150,150 ;
  alias "garan2t";
  ID 77 OF ODLG

Function Detail(olbx3)

Local xxXX

Store articulo->garantia to xxXX
Use garan2T

if .not. neterr()
set filter to garan2T->codgar=xxXX
olbx3:refresh()
else
alert("Archivo Bloqueado Por uusuario",,"Red")
endif

Hola Fabian

Un par de observaciones que veo :

• Estas intentando abrir el mismo archivo 2 veces (garan2T) primero compartido y despues exclusivo, no entiendo la razon.
  Porque precisamente en ese momento es que sucede lo que comentas

• Porque no usas una base temporal o un arreglo para el detalle

He usado esto en varios browses como el que indicas y no he tenido problema alguno.

Saludos

Matando pulgas a cañonazos......

Mas rapido y mas facil

1) no creo que tengas necesidad de crear el indice cada vez que entres a consultar, los indices no se tienen que estar creando a cada momento, se crean una vez y se reconstruyen hasta que fallan.

2) utiliza un scope, asi cada vez que te muevas en la base de datos padre, haces un scope en la base de datos hija y funciona como una bala.

[/code]