[firebase-br] Sintaxe

daniel farage danielfarage2000 em yahoo.com.br
Qua Set 28 17:35:39 -03 2005


Desculpe o abuso mas não fui bem claro, eu preciso abrir um loop e depois
fazer um select com um ou dois parametros do loop e saber se ele encontrou
algo! Assim no delphi..:
Valeu,brigado atenção


DTM.T90_UNIDADE.Close;
DTM.T90_UNIDADE.Open;
while not dtm.T90_UNIDADE.Eof do begin

  with QRY_unidade do begin
     Close;
     SQL.Clear;
     StringSql:='SELECT REGIAO from TAB_RESUMODETALHADO ';
     StringSql:=StringSql+'WHERE REGIAO=:pREGIAO and UNIDADE=:pUNIDADE ';
     QRY_unidade.SQL.Add(StringSql);
     QRY_unidade.ParamByName('pREGIAO').AsString:=DTM.T90_UNIDADET90_REGIAO.AsString;
     QRY_unidade.ParamByName('pUNIDADE').AsString:=DTM.T90_UNIDADET90_UNIDADE.AsString;
     OPEN;
  end;

  if QRY_unidade.IsEmpty then begin
     DTM.TAB_RESUMODETALHADO.Insert;
     dtm.TAB_RESUMODETALHADOREGIAO.AsString:=DTM.T90_UNIDADET90_REGIAO.AsString;
     dtm.TAB_RESUMODETALHADOTEMA.AsString:='Servidores Públicos';
     dtm.TAB_RESUMODETALHADOUNIDADE.AsString:=DTM.T90_UNIDADET90_UNIDADE.AsString;
     dtm.TAB_RESUMODETALHADOQTDE.AsInteger:=0;
     dtm.TAB_RESUMODETALHADO.Post;
  end;
  DTM.T90_UNIDADE.Next;

end;

O Outlook Express não pôde postar a mensagem.  Assunto 'Sintaxe', Conta: 'news.gmane.org', Servidor: 'news.gmane.org', Protocolo: NNTP, Resposta do servidor: '441 Required "From" header is missing', Porta: 119, Segura (SSL): Não, Erro do servidor: 441, Nº do erro: 0x800CCCA9

		
---------------------------------
 Novo Yahoo! Messenger com voz: ligações, Yahoo! Avatars, novos emoticons e muito mais. Instale agora!


Mais detalhes sobre a lista de discussão lista