silvano, eu acho q sei o q é.. então, tente o seguinte..
CDSPesquisa.Close; CDSPesquisa.Params.Clear; CDSPesquisa.CommandText := 'SELECT * FROM TABELA002 WHERE CAMPO1 = :PARAMETRO1 AND CAMPO2 = :PARAMETRO2'; CDSPesquisa.ParamByName('PARAMETRO1').AsString := Edit1.Text; CDSPesquisa.ParamByName('PARAMETRO2').AsString := Edit2.Text; CDSPesquisa.Open; --- Em delphi-br@yahoogrupos.com.br, "silvano_monteiro" <[EMAIL PROTECTED]> escreveu > > Ninguem sabe ??? > > --- Em delphi-br@yahoogrupos.com.br, "silvano_monteiro" > <[EMAIL PROTECTED]> escreveu > > > > Bom dia , estou com um grande problema e nao consegui resolver ainda > > Problema com passagem de parametros , estou usando > > D7/DbXpress/ClientDataSet/DataSetProvider/SqlQuery > > > > Minha aplicacao esta em 3 camadas > > Entao tenho um servidor de aplicacao (Servidor.exe) no qual fica a > > SQLQuery/DataSetProvider num DataModule > > > > No meu Programa Cliente (onde fica o ClientDataSet q esta ligado ao > > DSProvider do Servidor) preciso utilizar o mesmo CDS varias vezes > pra > > fazer consulta no BD (em SyBase) > > > > O problema esta acontecendo Aleatoriamente , da a seguinte mensagem > > de Erro : "No value for parameter 'Parametro1'" ou "No value for > > parameter 'ParametroXXX'" , depende do parametro corrente > > > > > > Estou fazendo o seguinte: > > > > CDSPesquisa.Close; > > CDSPesquisa.CommandText := 'SELECT * FROM TABELA001 WHERE CAMPO1 > > >= :PARAMETRO1'; > > CDSPesquisa.ParamByName('PARAMETRO1').AsString := Edit1.Text; > > CDSPesquisa.Open; <-- ***Primeira vez nao da erro > > > > CDSPesquisa.Close; > > CDSPesquisa.CommandText := 'SELECT * FROM TABELA002 WHERE CAMPO1 > > >= :PARAMETRO1 AND CAMPO2 = :PARAMETRO2'; > > CDSPesquisa.ParamByName('PARAMETRO1').AsString := Edit1.Text; > > CDSPesquisa.ParamByName('PARAMETRO2').AsString := Edit2.Text; > > CDSPesquisa.Open; <-- ***As vezes aparece o ERRO AQUI > > > > "NO VALUE FOR PARAMETER 'XXX'" > > > > Ja utilizei o FetchParams > > Ja dei create > > CDSPesquisa.Params.CreateParam(ftString,'PARAMETRO1',ptInput); > > > > > > Comentaram q isso poderia ser BUG do Delphi7... eu trabalhava com o > > D6 dessa forma e funcionava > > Alguem sabe qual a forma correta de passar parametros sem da esse > > erro? > > Sabem se é realmente Bug do D7? > > > > Agradeço desde já > > Silvano Monteiro - Cuiabá-MT > > > -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> <*> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages <*> Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html