DataSetProvider e ClientDataSet

|mas se um outro usuario acessar o sistema ao mesmo tempo e for
|tentar acessar um registro, o sistema deste usuario entra em LOOP
|infinito como solucionar ester problema.

Acessar apenas?? Não alterar?? Sua transação está em WAIT ou NOWAIT?? o que é exatamente esse ´loop infinito´?? Suas transações estão fechando?? Qual seu código??


T+

procedure TCadastro_PMS.Btn_InserirClick(Sender: TObject);
begin

IBDataSet1.Close;
IBDataSet1.SelectSQL.Clear;
IBDataSet1.SelectSQL.Add(´SELECT * FROM pms WHERE n_pms is null ´);
IBDataSet1.Open;
IBDataSet2.Open;
IBQueryMateriais.Open;
IBQueryProjeto.Open;
IBQueryBloco.Open;
IBQueryFornecedor.Open;

ClientDataSet1.Open;
ClientDataSet2.Open;

ClientDataSet1.Insert;

desabilita_bottons;

//Panel2.Enabled := True;
PageControl1.Pages[0].Enabled := True;

ClientDataSet1DATACADASTRO.Value := date;

ClientDataSet1USUARIO.AsString := Login.IBQueryUsuarioNOMELOGIN.AsString;

ClientDataSet1APROV_FORN1.Value := ´BLOQUEADO´;
ClientDataSet1APROV_FORN2.Value := ´BLOQUEADO´;
ClientDataSet1APROV_FORN3.Value := ´BLOQUEADO´;

//IBDataSet1TIPO_PMS.AsString := ´CEG´;
ClientDataSet1STATUS.Value := ´BLOQUEADO´;
DBLookupComboBox1.SetFocus;

end;

Se dois usuarios clicam no botão inserir ao mesmo tempo um dos sistema fica travado, se tentar mexer com o mouse ele já não funciona.

Att,
Zenas

Apenas isso?
Alguma query com LOCK??


T+