connection is in use by another statement

Delphi

08/02/2006

Ola pessoal, estou migrando o sistema para SQL Server e quando vou abrir a Query abaixo, mostra o erro :

QyAux:=TQuery.Create(Self);
Try
QyAux.DataBaseName:=UVarsys.DataBaseSist.DataBaseName;
QyAux.Sql.Add(´SELECT COD_CLI_FOR, COD_TIPO_TITULO_PADRAO FROM CLIENTES_FORNECEDORES ´);
QyAux.Sql.Add(´WHERE COD_CLI_FOR = :COD_CLI_FOR´);
if (TBconhecimentosCod_Cliente_Consignatario.AsInteger>0) then
QyAux.ParamByName(´COD_CLI_FOR´).AsInteger:=TBconhecimentosCod_Cliente_Consignatario.AsInteger
Else
Begin
If TBConhecimentosIND_PAGAMENTO.asString=´O´ Then
QyAux.ParamByName(´COD_CLI_FOR´).asInteger:=TBConhecimentosCod_Cliente_Remetente.asInteger
Else
QyAux.ParamByName(´COD_CLI_FOR´).AsInteger:=TBConhecimentosCod_Cliente_Destinatario.AsInteger;
End;
if not QyAux.Prepared then
QyAux.Prepare;
QyAux.Open; //aqui mostra a mensagem
... //connection is in use by another statement

No firebird funciona perfeitamente


Craudio

Craudio

Curtidas 0

Respostas

Craudio

Craudio

08/02/2006

Alguem pode me dar uma dica ?

Qualquer ...


GOSTEI 0
Edilcimar

Edilcimar

08/02/2006

dê um close na query logo no começo


GOSTEI 0
Craudio

Craudio

08/02/2006

Nao funcionou , alguma outra dica ?

Obrigado pela ajuda Edilcimar.


GOSTEI 0
POSTAR