[delphi-br] Select TSQLQuery

2010-08-20 Por tôpico Rodrigo Rossi
  Boa tarde.

Tenho esse select dentro de um SQLQuery

 SELECT (SELECT
 SUM(TEMPOSTRAMITE.SOLTEMPOATENDIMENTO)
   FROM TEMPOSTRAMITE
  WHERE TEMPOSTRAMITE.SOLID = SOLICITACAO.SOLID
AND TEMPOSTRAMITE.USUIDATENDENTE = 
SOLICITACAO.USUIDRESPONSAVEL) AS TOTAL_MIN,
SOLICITACAO.*,
USUARIO.USUNOME
   FROM SOLICITACAO
INNER JOIN USUARIO
 ON SOLICITACAO.USUIDRESPONSAVEL = USUARIO.USUID
  WHERE USUARIO.USUUSUARIO = :USUARIO_INFORMADO
AND SOLICITACAO.SOLDATAFECHAMENTO IS NULL
AND SOLICITACAO.DATACANCELAMENTO IS NULL

Quando executo a aplicação ele retorna o erro: qryChamados: Field 
'TOTAL_MIN' not found

Obs. Quando ativo a conexão em tempo de desenvolvimento funciona normal, 
ou seja não da erro nenhum, e também quando eu vou no meu ClientDataSet 
e aperto Crtl+F o campo TOTAL_MIN aparece la...

O que eu to fazendo de errado?

-- 
Att.

Rodrigo Rossi
Skype: rodrigotrentinrossi
MSN: rdrg_ro...@hotmail.com
Fone: (45) 9963-1897
Cascavel - PR


Re: [delphi-br] Select em campo BLOB

2010-01-04 Por tôpico Dirlei Dionísio
Reinaldo,

Complementando o que o Berdram disse, imagine que você tenha um arquivo com
1Kb. No banco de dados esse campo ocuparia 1.048.576 bytes (1Kb = 1024 x
1024 bytes). Mesmo que o banco de dados que você utiliza permita que você
consiga fazer uma busca no campo que armazena essa imagem, essa busca seria
*extremamente* cara, em vista da quantidade de bytes que o banco precisará
comparar. Neste caso, você pode gerar um checksum, ou Hash da imagem (leia
http://pt.wikipedia.org/wiki/Hash) e armazenar num outro campo. O Hash
normalmente possui apenas alguns bytes (32 no caso do MD5 -
http://pt.wikipedia.org/wiki/MD5). Assim, quando for necessário verificar se
a imagem existe no banco, você pode fazer a pesquisa apenas pelo campo que
armazena o hash.

Se optar por essa solução, você precisará procurar por uma implementação do
MD5 em Pascal. Não é difícil utilizar esse tipo de solução, como pode
parecer a princípio, mas você pode precisar ler um pouco a respeito e fazer
alguns programinhas de teste para validar essa solução.

Um abraço,
Dirlei.

2010/1/3 Reinaldo Aparecido Pereira ctocv...@yahoo.com.br



 Perdoe-me, mais o termo checksum é novo para mim.
 O que fiz foi gravar todo o conteúdo da imagem em um campo memo.
 Não sei se é possível comparações de campo memo.
 Pode me dar mais orientações sobre sua dica.

 Abçs, Reinaldo

 -Mensagem original-

 De: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br [mailto:
 delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] Em
 nome de Dirlei Dionísio
 Enviada em: domingo, 3 de janeiro de 2010 00:12

 Para: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
 Assunto: Re: [delphi-br] Select em campo BLOB


 Você pode ter um campo para guardar o checksum da imagem, além do binário
 dela. Na hora de verificar se a imagem existe, faça a busca pelo checksum.

 Um dos algoritmos de checksum mais conhecidos é o MD5.

 [ ]'s
 Dirlei.

 2010/1/1 Reinaldo Aparecido Pereira 
 ctocv...@yahoo.com.brctocvl_1%40yahoo.com.br
 

 
 
  Senhores,
 
  No Access ou no Interbase, é possível fazer select em campos tipo Blob.
 
  Explico melhor.
 
  Tenho uma foto e desejo saber se ela já cadastrada em uma tabela no meu
  banco de dados.
 
  Alguma dica de como eu faço isso?
 
  Abçs, Reinaldo
 
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 

 [As partes desta mensagem que não continham texto foram removidas]

 


 --
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

  



[As partes desta mensagem que não continham texto foram removidas]





-- 
 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:
delphi-br-ow...@yahoogrupos.com.br
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:
delphi-br-unsubscr...@yahoogrupos.com.br

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html




RES: RES: [delphi-br] Select em campo BLOB

2010-01-04 Por tôpico Rubem Rocha
http://pt.wikipedia.org/wiki/Checksum


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de berdam
Enviada em: domingo, 3 de janeiro de 2010 15:15
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: RES: [delphi-br] Select em campo BLOB

o chekcsum seria como uma assinatura dos bits da imagem, se a imagem e 
mudada, esse check sum tbm é mudado, se um bit é mudado na imagem, todo 
o checksum muda.

Reinaldo Aparecido Pereira escreveu:

 Perdoe-me, mais o termo checksum é novo para mim.
 O que fiz foi gravar todo o conteúdo da imagem em um campo memo.
 Não sei se é possível comparações de campo memo.
 Pode me dar mais orientações sobre sua dica.

 Abçs, Reinaldo

 -Mensagem original-
 De: delphi-br@yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br 
 [mailto:delphi-br@yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br] Em
 nome de Dirlei Dionísio
 Enviada em: domingo, 3 de janeiro de 2010 00:12
 Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
 Assunto: Re: [delphi-br] Select em campo BLOB

 Você pode ter um campo para guardar o checksum da imagem, além do binário
 dela. Na hora de verificar se a imagem existe, faça a busca pelo checksum.

 Um dos algoritmos de checksum mais conhecidos é o MD5.

 [ ]'s
 Dirlei.

 2010/1/1 Reinaldo Aparecido Pereira ctocv...@yahoo.com.br 
 mailto:ctocvl_1%40yahoo.com.br

 
 
  Senhores,
 
  No Access ou no Interbase, é possível fazer select em campos tipo Blob.
 
  Explico melhor.
 
  Tenho uma foto e desejo saber se ela já cadastrada em uma tabela no meu
  banco de dados.
 
  Alguma dica de como eu faço isso?
 
  Abçs, Reinaldo
 
 





Re: [delphi-br] Select em campo BLOB

2010-01-03 Por tôpico Dirlei Dionísio
Você pode ter um campo para guardar o checksum da imagem, além do binário
dela. Na hora de verificar se a imagem existe, faça a busca pelo checksum.

Um dos algoritmos de checksum mais conhecidos é o MD5.

[ ]'s
Dirlei.

2010/1/1 Reinaldo Aparecido Pereira ctocv...@yahoo.com.br



 Senhores,

 No Access ou no Interbase, é possível fazer select em campos tipo Blob.

 Explico melhor.

 Tenho uma foto e desejo saber se ela já cadastrada em uma tabela no meu
 banco de dados.

 Alguma dica de como eu faço isso?

 Abçs, Reinaldo


 [As partes desta mensagem que não continham texto foram removidas]

  



[As partes desta mensagem que não continham texto foram removidas]





-- 
 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:
delphi-br-ow...@yahoogrupos.com.br
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:
delphi-br-unsubscr...@yahoogrupos.com.br

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html




RES: [delphi-br] Select em campo BLOB

2010-01-03 Por tôpico Reinaldo Aparecido Pereira
Perdoe-me, mais o termo checksum é novo para mim.
O que fiz foi gravar todo o conteúdo da imagem em um campo memo.
Não sei se é possível comparações de campo memo.
Pode me dar mais orientações sobre sua dica.

Abçs, Reinaldo

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Dirlei Dionísio
Enviada em: domingo, 3 de janeiro de 2010 00:12
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Select em campo BLOB

Você pode ter um campo para guardar o checksum da imagem, além do binário
dela. Na hora de verificar se a imagem existe, faça a busca pelo checksum.

Um dos algoritmos de checksum mais conhecidos é o MD5.

[ ]'s
Dirlei.

2010/1/1 Reinaldo Aparecido Pereira ctocv...@yahoo.com.br



 Senhores,

 No Access ou no Interbase, é possível fazer select em campos tipo Blob.

 Explico melhor.

 Tenho uma foto e desejo saber se ela já cadastrada em uma tabela no meu
 banco de dados.

 Alguma dica de como eu faço isso?

 Abçs, Reinaldo


 [As partes desta mensagem que não continham texto foram removidas]

  



[As partes desta mensagem que não continham texto foram removidas]





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 






Re: RES: [delphi-br] Select em campo BLOB

2010-01-03 Por tôpico berdam
o chekcsum seria como uma assinatura dos bits da imagem, se a imagem e 
mudada, esse check sum tbm é mudado, se um bit é mudado na imagem, todo 
o checksum muda.

Reinaldo Aparecido Pereira escreveu:

 Perdoe-me, mais o termo checksum é novo para mim.
 O que fiz foi gravar todo o conteúdo da imagem em um campo memo.
 Não sei se é possível comparações de campo memo.
 Pode me dar mais orientações sobre sua dica.

 Abçs, Reinaldo

 -Mensagem original-
 De: delphi-br@yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br 
 [mailto:delphi-br@yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br] Em
 nome de Dirlei Dionísio
 Enviada em: domingo, 3 de janeiro de 2010 00:12
 Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
 Assunto: Re: [delphi-br] Select em campo BLOB

 Você pode ter um campo para guardar o checksum da imagem, além do binário
 dela. Na hora de verificar se a imagem existe, faça a busca pelo checksum.

 Um dos algoritmos de checksum mais conhecidos é o MD5.

 [ ]'s
 Dirlei.

 2010/1/1 Reinaldo Aparecido Pereira ctocv...@yahoo.com.br 
 mailto:ctocvl_1%40yahoo.com.br

 
 
  Senhores,
 
  No Access ou no Interbase, é possível fazer select em campos tipo Blob.
 
  Explico melhor.
 
  Tenho uma foto e desejo saber se ela já cadastrada em uma tabela no meu
  banco de dados.
 
  Alguma dica de como eu faço isso?
 
  Abçs, Reinaldo
 
 
  [As partes desta mensagem que não continham texto foram removidas]
 
 
 

 [As partes desta mensagem que não continham texto foram removidas]

 

 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

 





-- 
 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:
delphi-br-ow...@yahoogrupos.com.br
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:
delphi-br-unsubscr...@yahoogrupos.com.br

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html




RES: [delphi-br] Select em campo BLOB

2010-01-02 Por tôpico Huander
Compare se o campo esta vazio (null)...  select count(campo_blob) from
tabela where campo_chave_tabela and campo_blob is null

 

Neste exemplo se o retorno for = 0 significa que ele está vazio...

 

É uma forma!

 

 

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Reinaldo Aparecido Pereira
Enviada em: sexta-feira, 1 de janeiro de 2010 19:19
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Select em campo BLOB

 

  

Senhores,

No Access ou no Interbase, é possível fazer select em campos tipo Blob.

Explico melhor.

Tenho uma foto e desejo saber se ela já cadastrada em uma tabela no meu
banco de dados.

Alguma dica de como eu faço isso?

Abçs, Reinaldo

[As partes desta mensagem que não continham texto foram removidas]





[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Select em campo BLOB

2010-01-01 Por tôpico Reinaldo Aparecido Pereira
Senhores,

 

No Access ou no Interbase, é possível fazer select em campos tipo Blob.

Explico melhor.

Tenho uma foto e desejo saber se ela já cadastrada em uma tabela no meu
banco de dados.

Alguma dica de como eu faço isso?

 

Abçs, Reinaldo



[As partes desta mensagem que não continham texto foram removidas]



Res: [delphi-br] select em bancos de dados diferentes

2009-12-07 Por tôpico Maria das Graças .
Se você usa SQL Server não há necessidade de 2 conexões, bastando estar 
conectado em apenas um banco de dados. Faço muito isso para gerar arquivo 
Sintegra de Fabrica + Loja de Fabrica que usam bancos diferentes.

Select Codigo, NOme from DB_BancoA..TBCliente
UNION
Select Codigo, Nome from DB_BancoB..TB_Cliente
Order by Nome

Ou

Select Endereco as EnderecoDoBancoA From DB_BancoA..TBCliente,
  Endereco as EnderecoDoBanco B From DB_BancoB..TB_Cliente
Order by Endereco

Graça





De: Fios e Cabos cic...@fiosecabos.ind.br
Para: delphi-br@yahoogrupos.com.br
Enviadas: Domingo, 6 de Dezembro de 2009 20:29:05
Assunto: [delphi-br] select em bancos de dados diferentes

  
Estou tentando fazer um select em duas tabelas que salvei em bancos de dados
diferentes.

Uso o Delphi 7

Qdo vou ativar a query acusa erro dizendo q uma das tabelas não existe ... 

Alguém tem alguma dica ... 

FIOS E CABOS ENGENHARIA LTDA

CÍCERO FERNANDES

ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO

CREA-SC 27.958-0

0xx(47) 3521-2988 - 0xx(47) 9191.6226

http://fiosecabos. ind.br/ www.fiosecabos. ind.br -
mailto:cic...@fiosecabos. ind.br cic...@fiosecabos. ind.br

P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE! 

[As partes desta mensagem que não continham texto foram removidas]





  

Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] select em bancos de dados diferentes

2009-12-07 Por tôpico Marcelo Luiz Onhate
O delphi que está usando não interessa... interessa o banco, exemplo o 
mysql pode fazer select em outro banco mesmo quando estou conectado em 
outro... O firebird não garanto que faça isso...

Fios e Cabos escreveu:
  

 Estou tentando fazer um select em duas tabelas que salvei em bancos de 
 dados
 diferentes.

 Uso o Delphi 7

 Qdo vou ativar a query acusa erro dizendo q uma das tabelas não existe 
 ...

 Alguém tem alguma dica ...




[delphi-br] select em bancos de dados diferentes

2009-12-06 Por tôpico Fios e Cabos
Estou tentando fazer um select em duas tabelas que salvei em bancos de dados
diferentes.

Uso o Delphi 7

Qdo vou ativar a query acusa erro dizendo q uma das tabelas não existe ... 

Alguém tem alguma dica ... 

 

 

FIOS E CABOS ENGENHARIA LTDA

CÍCERO FERNANDES

ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO

CREA-SC 27.958-0

0xx(47) 3521-2988  -  0xx(47) 9191.6226

 http://fiosecabos.ind.br/ www.fiosecabos.ind.br -
mailto:cic...@fiosecabos.ind.br cic...@fiosecabos.ind.br

P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
AMBIENTE! 

 



[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] select em bancos de dados diferentes

2009-12-06 Por tôpico Leandro
uai se sao tabelas em banco de dados diferentes vc tem que ter dois
componentes de conexao com os dois bancos de dados.. a nao ser que vc faça
uma conexao com um faça o selet e entao desconecte do banco faça a conexao
com o outro banco e faça o select.. soh n sei se a query ficara com os dados
mesmo fazendo a desconexao com o banco..

2009/12/6 Fios e Cabos cic...@fiosecabos.ind.br



 Estou tentando fazer um select em duas tabelas que salvei em bancos de
 dados
 diferentes.

 Uso o Delphi 7

 Qdo vou ativar a query acusa erro dizendo q uma das tabelas não existe ...

 Alguém tem alguma dica ...

 FIOS E CABOS ENGENHARIA LTDA

 CÍCERO FERNANDES

 ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO

 CREA-SC 27.958-0

 0xx(47) 3521-2988 - 0xx(47) 9191.6226

 http://fiosecabos.ind.br/ www.fiosecabos.ind.br -
 mailto:cic...@fiosecabos.ind.br cicero%40fiosecabos.ind.br
 cic...@fiosecabos.ind.br cicero%40fiosecabos.ind.br

 P Antes de imprimir, pense em sua responsabilidade e compromisso com o MEIO
 AMBIENTE!

 [As partes desta mensagem que não continham texto foram removidas]

  




-- 
Leandro, MuTukA


[As partes desta mensagem que não continham texto foram removidas]





-- 
 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:
delphi-br-ow...@yahoogrupos.com.br
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:
delphi-br-unsubscr...@yahoogrupos.com.br

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html




[delphi-br] Select dentro de Select...pode?

2009-06-19 Por tôpico rafaelpinto19


 Olá Galera, pode ter uma Consulta Select dentro de uma consulta 
Select no Interbase e no Delphi? Tipo assim  Select (Select Count(CAMPO1) 
as Total from TABELA) CAMPO1, CAMPO2 from TABELA where CONDICAO...???

 Se Tiver como, podem colocar a Sintaxe ou estrutura correta?? Vou 
tentando aki, mas to sem noção... Agradeço pela ajuda...

Rafael



Res: [delphi-br] Select dentro de Select...pode?

2009-06-19 Por tôpico Luciano Calenzani Simões
Pode sim, uma das formas seria (só para efeito de didática):

select codigo, nome from (select codigo, nome from clientes union all select 
codigo, nome from fornecedores) as temp
where temp.nome like 'A%'
order by temp.nome

Explicando: você um selec que busca informações em clientes, outro em 
fornecedores, o resultado dos dois é unido e há um select por fora que filtra 
dessa union os nomes que começam com A.



 Luciano Calenzani Simões







De: rafaelpinto19 rafaelpint...@gmail.com
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 19 de Junho de 2009 17:27:41
Assunto: [delphi-br] Select dentro de Select...pode?







Olá Galera, pode ter uma Consulta Select dentro de uma consulta Select no 
Interbase e no Delphi? Tipo assim  Select (Select Count(CAMPO1) as Total from 
TABELA) CAMPO1, CAMPO2 from TABELA where CONDICAO...???

Se Tiver como, podem colocar a Sintaxe ou estrutura correta?? Vou tentando aki, 
mas to sem noção... Agradeço pela ajuda...

Rafael


  Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Select dentro de Select...pode?

2009-06-19 Por tôpico Edelson Regis de Lima
Se é a mesma tabela voce não precisa fazer outro select, basta usar o Count
direto:

Select Count(Campo1) as Total, Campo2, Campo3, CampoN
From Tabela
Where condição

O Count lhe retornará a quantidade de registros listados. Se voce quiser
somar o valor contido em Campo1 use o SUM no lugar de COUNT.

Edelson.


2009/6/19 rafaelpinto19 rafaelpint...@gmail.com





 Olá Galera, pode ter uma Consulta Select dentro de uma consulta Select
 no Interbase e no Delphi? Tipo assim  Select (Select Count(CAMPO1) as
 Total from TABELA) CAMPO1, CAMPO2 from TABELA where CONDICAO... ???

 Se Tiver como, podem colocar a Sintaxe ou estrutura correta?? Vou tentando
 aki, mas to sem noção... Agradeço pela ajuda...

 Rafael

  



[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Select ordenado pelo Pai e Filho...

2008-12-18 Por tôpico JB
não é mais fácil dinamicamente verificar se menu possui filhos e então
listar os filhos?

eu trabalho com oracle e com esquemas de hierarquia, mas acho melhora
verificar se os pais possuem filhos.

-- 


José Benedito
Software Developer
s...@jbsolucoes.net
www.jbsolucoes.net
+55 19 8116-7826


Re: [delphi-br] Select ordenado pelo Pai e Filho...

2008-12-18 Por tôpico JB
veja se da pra entender:

select t.COD_MENU, t.COD_MENU_PAI,
  nvl((select s1.COD_MENU || s1.COD_MENU_PAI from TABELA s1 where
s1.COD_MENU = t.COD_MENU_PAI), t.COD_MENU || 0) ordem
from TABELA t
order by 3,2

NVL eh a função do oracle pra tratar null

fiz correndo aqui rs deve ter uma maneira melhor e nao sei se existe
redundancia nisso, mas que funcionou funcionou rsrs, lembrando q em
oracle eu utilizo hierarquia e nao isso rs


2008/12/18 JB josebened...@gmail.com:
 não é mais fácil dinamicamente verificar se menu possui filhos e então
 listar os filhos?

 eu trabalho com oracle e com esquemas de hierarquia, mas acho melhora
 verificar se os pais possuem filhos.

 --

-- 


José Benedito
Software Developer
s...@jbsolucoes.net
www.jbsolucoes.net
+55 19 8116-7826


Re: [delphi-br] Select ordenado pelo Pai e Filho...

2008-12-18 Por tôpico Denilson Alexandre dos Santos Silva
Olá, JB...
 
Para testar esse SQL aqui na minha base de dados, tive só que mudar a instrução 
do Oracle para a referente do MySQL (IFNULL). O resultado não foi o que eu 
queria, uma vez que os registros que são filhos, retornaram no final da 
consulta. Esse resultado também eu já tinha chegado.
Bom, na verdade, eu descobri um jeito de refornar o resultado que eu quero:
 
select cod_menu
 ,texto_menu
 ,cod_menu_pai
  from tabela
order by if(cod_menu_pai = 0, cod_menu, cod_menu_pai)
 
Esse SQL retorna na ordem que eu preciso, mas só funciona no Editor de Query do 
MySQL. Quando jogo no Delphi, ele me retorna o erro List index out of bounds 
(-1)‏. Esse erro ocasiona por causa do IF no Order By.. Ontém até estava 
repassando os meus testes para o Andreano, mas não cheguei a conclusão do mesmo.
 
Se alguém tiver outra maneira de fazer, que não tiver o IF no Order By, ficarei 
grato.
 
Desde já, obrigado a todos.
 
  Denilson - 18/12/2008.
 

--- Em qui, 18/12/08, JB josebened...@gmail.com escreveu:

De: JB josebened...@gmail.com
Assunto: Re: [delphi-br] Select ordenado pelo Pai e Filho...
Para: delphi-br@yahoogrupos.com.br
Data: Quinta-feira, 18 de Dezembro de 2008, 12:21






veja se da pra entender:

select t.COD_MENU, t.COD_MENU_PAI,
nvl((select s1.COD_MENU || s1.COD_MENU_ PAI from TABELA s1 where
s1.COD_MENU = t.COD_MENU_PAI) , t.COD_MENU || 0) ordem
from TABELA t
order by 3,2

NVL eh a função do oracle pra tratar null

fiz correndo aqui rs deve ter uma maneira melhor e nao sei se existe
redundancia nisso, mas que funcionou funcionou rsrs, lembrando q em
oracle eu utilizo hierarquia e nao isso rs

2008/12/18 JB josebenedito@ gmail.com:
 não é mais fácil dinamicamente verificar se menu possui filhos e então
 listar os filhos?

 eu trabalho com oracle e com esquemas de hierarquia, mas acho melhora
 verificar se os pais possuem filhos.

 --

-- 

 _ ___
José Benedito
Software Developer
s...@jbsolucoes. net
www.jbsolucoes. net
+55 19 8116-7826
 














  Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Select ordenado pelo Pai e Filho...

2008-12-17 Por tôpico Denilson Alexandre dos Santos Silva
Boa Noite a todos,
 
Estou com uma situação de um SQL que não estou conseguindo resolver. Bom, eu 
tenho uma tabela de menu + ou - com a seguinte estrutura:

COD_MENU     INT
TEXTO_MENU CHAR
COD_MODULO INT
COD_MENU_PAI   INT
 
Estou criando uma TreeView dinamicamente, que é o meu Menu Principal do 
Sistema. Para que coloque os registros na treeview dinamicamente, eles teriam 
que estar cadastrados na tabela na ordem certa, conforme o exemplo abaixo:
 
COD_MENU   TEXTO_MENU    COD_MODULO   COD_MENU_PAI
1texto 1   1    0
2    texto 2   1    0
3texto 3   1    0
4    texto 4   1    3
5    texto 5   10
 
sendo que o registro com código 3 é um submenu, que terá o registro com código 
4 em outro nível da Treeview. Como isso não vai acontecer, eu posso ter um 
registro que está no final da tabela, que pertence a um ítem de menu que está 
lá no início da tabela, e vice-versa como no exemplo abaixo:

COD_MENU   TEXTO_MENU    COD_MODULO   COD_MENU_PAI
1texto 1   1    0
2    texto 2   1    0
3texto 3   1    0
4    texto 4   1    2
5    texto 5   10
6    texto 6   13
 
A dúvida é como criar um SQL para que ele retorne os registros do exemplo acima 
na seguinte ordem:
 
COD_MENU   TEXTO_MENU    COD_MODULO   COD_MENU_PAI
1texto 1   1    0
2    texto 2   1    0
4    texto 4   1    2
3texto 3   1    0
6    texto 6   13
5    texto 5   10
 
Estou trabalhando no meu exemplo no Delphi 2009 Trial, com o banco de dados 
MySQL 5.0.67 e DBExpress (SQLConnection), pois a versão do MySQL 5.1.30 ele não 
aceita, pela incompatibilidade do LibMySQL.dll com o DBXMys..dll.
 
Aguardo qualquer sugestão, desde já agradecendo a todos.
 
 Denilson - 17/12/2008.
 Gerencial Sistemas.


  Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com

[As partes desta mensagem que não continham texto foram removidas]



Res: [delphi-br] ! Select longo

2008-11-02 Por tôpico Luciano Calenzani Simões
Se você realmente precisa de todos os campos, pode sim usar * e depois citar os 
campos de outras tabelas. Mas use desta forma:
select tabela1.*, tabela2.campo1, tabela2.campo2 from tabela1, tabela2

Você tem que tomar cuidado, porque hoje sua tabela tem X campos, mas amanhã 
poderá ter X+3, aí você estará tazendo campos desnecessários. Por isso é mais 
seguro citar campo a campo.

 Luciano Calenzani Simões







De: Sérgio Luiz de Oliveira [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sábado, 1 de Novembro de 2008 13:45:12
Assunto: [delphi-br] ! Select longo


Galera preciso ler todos os campos de uma tabela, mas
preciso adicionar outros. Nesse caso preciso realmente
de discriminar todos ou teria como escrever um
select *, campoadicional1, campoadicional2 ?


  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] ! Select longo

2008-11-01 Por tôpico Sérgio Luiz de Oliveira
Galera preciso ler todos os campos de uma tabela, mas
preciso adicionar outros. Nesse caso preciso realmente
de discriminar todos ou teria como escrever um
select *, campoadicional1, campoadicional2 ?



[delphi-br] Select especial

2008-10-30 Por tôpico Clovito
Ola Pessoal
Saudações

Tenho um banco de dados em access, trbalho com D7 e tenho a seguinte situação; 
Tenho diversos produtos cadastrados, cada produto podera se repetir varias 
vezes e com preços diferentes. quero criar um filtro que me apresente somente o 
preço menor. Isto é um banco de dados de uma cotação para um supermercado, por 
exemplo:

arroz A12,00
arroz B12,50
Arroz C11,90  
Feijão A   5,00
Feijão C   5,89
Feijão C   4,89

Resultado   
 Arroz C11,90
Feijão C  4,89

etc, etc
Obrigado
Clovito



CLOVIS MACHADO FERREIRA
  QUE A PAZ DO GRANDE ARQUITETO
 DO UNIVERSO NOS AMPARE
MSN- [EMAIL PROTECTED]

[As partes desta mensagem que não continham texto foram removidas]




-- 
 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




Res: [delphi-br] Select especial

2008-10-30 Por tôpico Luciano Calenzani Simões
select produto, min(preco) from produto group by produto

 Luciano Calenzani Simões







De: Clovito [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 30 de Outubro de 2008 15:52:19
Assunto: [delphi-br] Select especial

Ola Pessoal
Saudações

Tenho um banco de dados em access, trbalho com D7 e tenho a seguinte situação; 
Tenho diversos produtos cadastrados, cada produto podera se repetir varias 
vezes e com preços diferentes. quero criar um filtro que me apresente somente o 
preço menor. Isto é um banco de dados de uma cotação para um supermercado, por 
exemplo:

arroz A12,00
arroz B12,50
Arroz C11,90  
Feijão A   5,00
Feijão C   5,89
Feijão C   4,89

Resultado  
Arroz C11,90
Feijão C  4,89


  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses

[As partes desta mensagem que não continham texto foram removidas]



Res: [delphi-br] Select especial

2008-10-30 Por tôpico Angelo Louzada
select nomeproduto, min(valor)
from produto
group by nomeproduto




De: Clovito [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 30 de Outubro de 2008 17:52:19
Assunto: [delphi-br] Select especial

Ola Pessoal
Saudações

Tenho um banco de dados em access, trbalho com D7 e tenho a seguinte situação; 
Tenho diversos produtos cadastrados, cada produto podera se repetir varias 
vezes e com preços diferentes. quero criar um filtro que me apresente somente o 
preço menor. Isto é um banco de dados de uma cotação para um supermercado, por 
exemplo:

arroz A12,00
arroz B12,50
Arroz C11,90  
Feijão A   5,00
Feijão C   5,89
Feijão C   4,89

Resultado  
Arroz C11,90
Feijão C  4,89

etc, etc
Obrigado
Clovito



CLOVIS MACHADO FERREIRA
  QUE A PAZ DO GRANDE ARQUITETO
 DO UNIVERSO NOS AMPARE
MSN- [EMAIL PROTECTED]

[As partes desta mensagem que não continham texto foram removidas]




-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses

[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Select especial

2008-10-30 Por tôpico Rodinei (MSN)
SELECT PRODUTO,MIN(PRECO) FROM PRODUTO GROUP BY PRODUTO


Rodinei Amorim
Programador Delphi
[EMAIL PROTECTED]
(11) 8208-9503 - (11) 2024-2723

--
From: Clovito [EMAIL PROTECTED]
Sent: Thursday, October 30, 2008 4:52 PM
To: delphi-br@yahoogrupos.com.br
Subject: [delphi-br] Select especial

 Ola Pessoal
 Saudações

 Tenho um banco de dados em access, trbalho com D7 e tenho a seguinte 
 situação; Tenho diversos produtos cadastrados, cada produto podera se 
 repetir varias vezes e com preços diferentes. quero criar um filtro que me 
 apresente somente o preço menor. Isto é um banco de dados de uma cotação 
 para um supermercado, por exemplo:

 arroz A12,00
 arroz B12,50
 Arroz C11,90
 Feijão A   5,00
 Feijão C   5,89
 Feijão C   4,89

 Resultado
 Arroz C11,90
 Feijão C  4,89

 etc, etc
 Obrigado
 Clovito



CLOVIS MACHADO FERREIRA
  QUE A PAZ DO GRANDE ARQUITETO
 DO UNIVERSO NOS AMPARE
 MSN- [EMAIL PROTECTED]

 [As partes desta mensagem que não continham texto foram removidas]


 

 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



 


Re: [delphi-br] Select mais rápido

2008-10-16 Por tôpico Rodinei (MSN)
Uma coisa que ajudaria bastante, quando multicamadas, seria usar o select sem 
order by e no CDS ordenar pelo indexfieldnames.


Abraços e boa sorte


Rodinei Amorim
Programador Delphi
[EMAIL PROTECTED]
(11) 8208-9503 - (11) 2024-2723


From: Coutinho - Yahoo 
Sent: Wednesday, October 15, 2008 11:02 PM
To: delphi-br@yahoogrupos.com.br 
Subject: Re: [delphi-br] Select mais rápido


Pode começar fazendo um índice + parecido qom a order by da query que 
deseja executar!
Ajuda muito!!!

Eduardo Melo escreveu:

 Olá, como eu posso fazer um select para buscar registro de forma mais
 rápida?

 Ou como fariam para buscar registros de forma rápida quando se tem mais de
 10 mil registros? Já ouvi falar sobre criar index, mas no banco de 
 dados já
 cria ele quando deixo o campo como chave primária, seria isso? Como devo
 proceder para ter uma consulta rápida e eficaz.

 Grato

 -- 
 Att

 Eduardo Melo
 3º Sistemas de Informação - Bacharelado
 www.meloshospedagem.com.br

 [As partes desta mensagem que não continham texto foram removidas]

 



 

[As partes desta mensagem que não continham texto foram removidas]



Res: [delphi-br] Select mais rápido

2008-10-16 Por tôpico Luciano Calenzani Simões
O desempenho de uma sentença SQL depende de muitos fatores, o que o torna 
rápido, lento ou aceitável. Cito ALGUNS:

- Número de registro na tabela;
- Índices;
- Hardware do servidor;
- Do próprio SGDB;
- Do número de condições que é dado ao SQL (WHERE, ANDs, IFs e CASEs);
- Do uso de funções (COALESCE, DAYSOFMONTH, ...)
- Do número de campos selecionados;
- Se no SQL há subquerys;
- Se no SQL há joins (INNER, LEFT ou RIGTH);
- Da modelagem relacional;
- Da integridade dos dados;
- 
Claro que uns interferem mais e outros menos.

Não é por acaso que existe a função DBA.


 Luciano Calenzani Simões


  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses

[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Select mais rápido

2008-10-16 Por tôpico Luiz ESCobar
Indice do ORDER BY ??? da onde vc tirou esta informação ? desconheço isso... 
porderia postar onde está ?
O que sei sobe indices é pra ajudar em WHEREs e JOINs das informações...
[]s


Luiz Escobar - Analista/Desenvolvedor:
WEB - HTML/JavaScript/PHP/MySQL 
WINDOWS - Delphi/ASSEMBLY/MySQL/xBase
SERVIDORES - CNA IntraNetWare4.11, LINUX-(RedHat9/Suse11), Windows 2K/XP
HARBOUR 
--
Borland C++ 5.5.1 (32 bit)
Harbour 1.0.1 Intl. (Rev. 9429) 
xHarbour Compile build 1.1.0 (Simplex)
Harbour MiniGUI 1.5 Extended Edition (Build 57d) - 2008.10.10
---




From: Coutinho - Yahoo 
Sent: Wednesday, October 15, 2008 10:02 PM
To: delphi-br@yahoogrupos.com.br 
Subject: Re: [delphi-br] Select mais rápido


Pode começar fazendo um índice + parecido qom a order by da query que 
deseja executar!
Ajuda muito!!!

Eduardo Melo escreveu:

 Olá, como eu posso fazer um select para buscar registro de forma mais
 rápida?

 Ou como fariam para buscar registros de forma rápida quando se tem mais de
 10 mil registros? Já ouvi falar sobre criar index, mas no banco de 
 dados já
 cria ele quando deixo o campo como chave primária, seria isso? Como devo
 proceder para ter uma consulta rápida e eficaz.

 Grato

 -- 
 Att

 Eduardo Melo
 3º Sistemas de Informação - Bacharelado
 www.meloshospedagem.com.br

 [As partes desta mensagem que não continham texto foram removidas]

 



 

[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Select mais rápido

2008-10-16 Por tôpico Luiz ESCobar
assino embaixo... explico tudim... 
tem que ver muita coisa... as vezes só otmizar a query não vai ajudar muito...
[]s


Luiz Escobar - Analista/Desenvolvedor:
WEB - HTML/JavaScript/PHP/MySQL 
WINDOWS - Delphi/ASSEMBLY/MySQL/xBase
SERVIDORES - CNA IntraNetWare4.11, LINUX-(RedHat9/Suse11), Windows 2K/XP
HARBOUR 
--
Borland C++ 5.5.1 (32 bit)
Harbour 1.0.1 Intl. (Rev. 9429) 
xHarbour Compile build 1.1.0 (Simplex)
Harbour MiniGUI 1.5 Extended Edition (Build 57d) - 2008.10.10
---


From: Luciano Calenzani Simões 
Sent: Thursday, October 16, 2008 8:07 AM
To: delphi-br@yahoogrupos.com.br 
Subject: Res: [delphi-br] Select mais rápido


O desempenho de uma sentença SQL depende de muitos fatores, o que o torna 
rápido, lento ou aceitável. Cito ALGUNS:

- Número de registro na tabela;
- Índices;
- Hardware do servidor;
- Do próprio SGDB;
- Do número de condições que é dado ao SQL (WHERE, ANDs, IFs e CASEs);
- Do uso de funções (COALESCE, DAYSOFMONTH, ...)
- Do número de campos selecionados;
- Se no SQL há subquerys;
- Se no SQL há joins (INNER, LEFT ou RIGTH);
- Da modelagem relacional;
- Da integridade dos dados;
- 
Claro que uns interferem mais e outros menos.

Não é por acaso que existe a função DBA.

Luciano Calenzani Simões

Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara 
@ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses

[As partes desta mensagem que não continham texto foram removidas]



 

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Select mais rápido

2008-10-15 Por tôpico Eduardo Melo
Olá, como eu posso fazer um select para buscar registro de forma mais
rápida?

Ou como fariam para buscar registros de forma rápida quando se tem mais de
10 mil registros? Já ouvi falar sobre criar index, mas no banco de dados já
cria ele quando deixo o campo como chave primária, seria isso? Como devo
proceder para ter uma consulta rápida e eficaz.

Grato

-- 
Att

Eduardo Melo
3º Sistemas de Informação - Bacharelado
www.meloshospedagem.com.br


[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Select mais rápido

2008-10-15 Por tôpico Eduardo Silva dos Santos
Antes de mais nada, poste o seu SQL pra gente poder analisar e ver qual o
caso..

2008/10/15 Eduardo Melo [EMAIL PROTECTED]

   Olá, como eu posso fazer um select para buscar registro de forma mais
 rápida?

 Ou como fariam para buscar registros de forma rápida quando se tem mais de
 10 mil registros? Já ouvi falar sobre criar index, mas no banco de dados já
 cria ele quando deixo o campo como chave primária, seria isso? Como devo
 proceder para ter uma consulta rápida e eficaz.

 Grato

 --
 Att

 Eduardo Melo
 3º Sistemas de Informação - Bacharelado
 www.meloshospedagem.com.br

 [As partes desta mensagem que não continham texto foram removidas]

 




-- 
...
Eduardo Silva dos Santos
DRD SISTEMAS
(27) 3218-4201
MSN: [EMAIL PROTECTED]
Site: http://www.drdsistemas.com.br/
...


[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Select mais rápido

2008-10-15 Por tôpico Coutinho - Yahoo
Pode começar fazendo um índice + parecido qom a order by da query que 
deseja executar!
Ajuda muito!!!


Eduardo Melo escreveu:

 Olá, como eu posso fazer um select para buscar registro de forma mais
 rápida?

 Ou como fariam para buscar registros de forma rápida quando se tem mais de
 10 mil registros? Já ouvi falar sobre criar index, mas no banco de 
 dados já
 cria ele quando deixo o campo como chave primária, seria isso? Como devo
 proceder para ter uma consulta rápida e eficaz.

 Grato

 -- 
 Att

 Eduardo Melo
 3º Sistemas de Informação - Bacharelado
 www.meloshospedagem.com.br

 [As partes desta mensagem que não continham texto foram removidas]

  




Re: [delphi-br] select em planilha excel via ODBC.. funções?

2008-10-02 Por tôpico felipe govoni
salva a planilha como .dbf e abre ela com BDE.



2008/10/1 Alemão [EMAIL PROTECTED]

   Ola pessoal,

 tenho um programa que faz acesso a uma planilha excel via ODBC. estou
 tentando fazer alguns selects nessa planilha excel, mas sem sucesso...
 muitas funções que conheço do oracle e sql server não funcionam neste ODBC.
 Alguem possue uma lista das funções select que podem ser usadas no excel?
 Ou
 ainda sabe onde posso encontrar essa informação? É praticamente impossivel
 achar esse tipo de informação na internet..

 por exemplo converter um campo em data (to_date no oracle)

 Estou fuçando em tudo quanto é lugar la na MSDN, na parte de driver ODBC e
 não encontro nada.. parece que a própria microsoft não disponibiliza as
 funções que você pode usar o select. Se alguem tiver interessado é
 http://msdn.microsoft.com/en-us/library/ms715373(VS.85).aspx
 http://msdn.microsoft.com/en-us/library/ms715373%28VS.85%29.aspx.

 Obrigado
 Alemão

 [As partes desta mensagem que não continham texto foram removidas]

  




-- 
Felipe Govoni
-
Programador
Fone 8472-8718


[As partes desta mensagem que não continham texto foram removidas]



Res: [delphi-br] select em planilha excel via ODBC .. funções?

2008-10-02 Por tôpico Marcos Nielsen
Olá!
existe uma tecnologia da Microsoft chamada ADO mdac que fornece acesso e 
métodos para manipulação de planilhas do excel.

att.
Marcos



- Mensagem original 
De: felipe govoni [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 2 de Outubro de 2008 12:12:54
Assunto: Re: [delphi-br] select em planilha excel via ODBC.. funções?


salva a planilha como .dbf e abre ela com BDE.

2008/10/1 Alemão forumdelphi@ gmail.com

   Ola pessoal,

 tenho um programa que faz acesso a uma planilha excel via ODBC. estou
 tentando fazer alguns selects nessa planilha excel, mas sem sucesso...
 muitas funções que conheço do oracle e sql server não funcionam neste ODBC.
 Alguem possue uma lista das funções select que podem ser usadas no excel?
 Ou
 ainda sabe onde posso encontrar essa informação? É praticamente impossivel
 achar esse tipo de informação na internet..

 por exemplo converter um campo em data (to_date no oracle)

 Estou fuçando em tudo quanto é lugar la na MSDN, na parte de driver ODBC e
 não encontro nada.. parece que a própria microsoft não disponibiliza as
 funções que você pode usar o select. Se alguem tiver interessado é
 http://msdn. microsoft. com/en-us/ library/ms715373(VS.85).aspx
 http://msdn. microsoft. com/en-us/ library/ms715373 %28VS.85% 29.aspx.

 Obrigado
 Alemão

 [As partes desta mensagem que não continham texto foram removidas]

 


-- 
Felipe Govoni
 -
Programador
Fone 8472-8718

[As partes desta mensagem que não continham texto foram removidas]




  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses

[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] select em planilha excel via ODBC.. funções?

2008-10-02 Por tôpico Coutinho - Yahoo
Eu faria diferente!
Criaria um arquivo mdb (do access) faria uma vinculação com a tabela 
xls, e faria as consultas na tabela usando o odbc para o access...
Podeia até criar as consultas no access. e acessaria esta consultas... 
como se fossem views... percebe?? Para conectar c/ o access é duzias de 
vezes + fácil... ainda tem a KaDao que é free... e o Access acessa sem 
probleams as planilhas do excell. Deixe que a microsoft (access) se 
resolva com a microsoft excell)... usaria uma coisa +firme, o mdb, e 
daria bye-bye aos problemas...

BDE... nem pensar


Sds
Emanuel Coutinho

Alemão escreveu:

 Ola pessoal,

 tenho um programa que faz acesso a uma planilha excel via ODBC. estou
 tentando fazer alguns selects nessa planilha excel, mas sem sucesso...
 muitas funções que conheço do oracle e sql server não funcionam neste 
 ODBC.
 Alguem possue uma lista das funções select que podem ser usadas no 
 excel? Ou
 ainda sabe onde posso encontrar essa informação? É praticamente impossivel
 achar esse tipo de informação na internet..

 por exemplo converter um campo em data (to_date no oracle)

 Estou fuçando em tudo quanto é lugar la na MSDN, na parte de driver ODBC e
 não encontro nada.. parece que a própria microsoft não disponibiliza as
 funções que você pode usar o select. Se alguem tiver interessado é
 http://msdn.microsoft.com/en-us/library/ms715373 
 http://msdn.microsoft.com/en-us/library/ms715373(VS.85).aspxhttp://msdn.microsoft.com/en-us/library/ms715373%28VS.85%29.aspx
  
 http://msdn.microsoft.com/en-us/library/ms715373%28VS.85%29.aspx.

 Obrigado
 Alemão

 [As partes desta mensagem que não continham texto foram removidas]

  




[delphi-br] select em planilha excel via ODBC.. funções?

2008-10-01 Por tôpico Alemão
Ola pessoal,

tenho um programa que faz acesso a uma planilha excel via ODBC. estou
tentando fazer alguns selects nessa planilha excel, mas sem sucesso...
muitas funções que conheço do oracle e sql server não funcionam neste ODBC.
Alguem possue uma lista das funções select que podem ser usadas no excel? Ou
ainda sabe onde posso encontrar essa informação? É praticamente impossivel
achar esse tipo de informação na internet..

por exemplo converter um campo em data (to_date no oracle)

Estou fuçando em tudo quanto é lugar la na MSDN, na parte de driver ODBC e
não encontro nada.. parece que a própria microsoft não disponibiliza as
funções que você pode usar o select. Se alguem tiver interessado é
http://msdn.microsoft.com/en-us/library/ms715373(VS.85).aspxhttp://msdn.microsoft.com/en-us/library/ms715373%28VS.85%29.aspx.


Obrigado
Alemão


[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Select Set07 a Jan08

2008-09-24 Por tôpico Anderson Furtilho
Olá amigos da lista!

Preciso fazer um select onde o usuário digita Setembro 2007 a Dezembro de 2008.
Minha tabela esta assim

MesAno
SETEMBRO2007
OUTUBRO2007
NOVEMBRO2007
DEZEMBRO2007
JANEIRO2008
FEVEREIRO2008
MARÇO2008
ABRIL2008
MAIO2008


Então se ele colocar Set2007 a Fev2008 tem que vir este intervalo..


Eu tenho um recurso que ao passar SETEMBRO ele me retorna o numero equivalente 
(9).

Ja tive a seguinte dica

SELECT 
T.*
FROM (
SELECT
(CAST(RETORNA_MES(MES) || ANO) AS INTEGER) MES_ANO
FROM MINHATABELA
 ) T
WHERE T.MES_ANO BETWEEN :MES_I AND :MES_F

Mas quando passo 20079 a 20081 só vem JANEIRO/2008...

Alguém ja passou por isso ?

Qualquer dica ficarei agradecido
Anderson


  Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua 
cara @ymail.com ou @rocketmail.com.
http://br.new.mail.yahoo.com/addresses


Re: [delphi-br] Select Set07 a Jan08

2008-09-24 Por tôpico Jackson Gomes - ToolsComps

 Preciso fazer um select onde o usuário digita Setembro 2007 a Dezembro de 
 2008.
 Mas quando passo 20079 a 20081 só vem JANEIRO/2008...

mas vc usa Mes/Ano e está passando Ano/Mês. Não seria isso?

 Alguém ja passou por isso ?

Tb tive uma situação parecida, aonde fiz a junção do ano com o mês, criando um 
novo valor: 2007/09 vira 200709, daí fica fácil distinguir pelo Ano/Mes.

begin
  for
select tf.codigo_fipe, tf.ano_modelo, tf.ano, tf.mes_ref, tf.valor
from tabela_fipe tf
where
  tf.ano * 100 + tf.mes_ref =
   (select first 1 tfi.ano*100 + tfi.mes_ref
from tabela_fipe tfi
where tfi.codigo_fipe = tf.codigo_fipe and
  tfi.ano_modelo  = tf.ano_modelo and
  (tfi.ano*100 + tfi.mes_ref) = (:p_ano*100 + :p_mes_ref)
order by 1 desc
)
order by tf.ano, tf.mes_ref
  into
:CODIGO_FIPE,
:ANO_MODELO,
:ANO,
:MES_REF,
:VALOR
  do

  suspend;
end

Jackson Gomes
ToolsComps - Controle de Usuários para Desenvolvedores CodeGear
Web Site: http://www.toolsandcomps.com
Nosso Fórum: http://groups.yahoo.com/group/toolsandcomps
e-mail: [EMAIL PROTECTED]
Fone: 27 3389 1138 - 8811 0324

Devhost - Webhost para desenvolvedores Delphi
http://www.devhost.com.br
[EMAIL PROTECTED] 




[delphi-br] select com case

2008-06-13 Por tôpico Berdam
'SELECT CODIGO_FOR, NOME_FOR, CASE Tipo WHEN ''+J+'' THEN ''+Juridica+'' WHEN 
''+F+'' THEN ''+Fisica+'' END AS tipo, SALDO_ATUAL_ADT FROM FORNECE ';

Galera, estou executando este sql


Uberdam Cavaletti
Formado em Tecnologia da Informação - Unoesc - Xxe
Pós-graduado em desenvolvimento Java - Unoesc - Xxe

 http://www.curricular.com.br/berdam

Visite
http://passandoveneno.blogspot.com




  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

[As partes desta mensagem que não continham texto foram removidas]



Res: [delphi-br] select com case

2008-06-13 Por tôpico Luciano Calenzani Simões
Tá, e daí?
Qual é o problema?

 Luciano Calenzani Simões





- Mensagem original 
De: Berdam [EMAIL PROTECTED]
Para: Delphi delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 13 de Junho de 2008 10:38:03
Assunto: [delphi-br] select com case


'SELECT CODIGO_FOR, NOME_FOR, CASE Tipo WHEN ''+J+'' THEN ''+Juridica+ '' WHEN 
''+F+'' THEN ''+Fisica+'' END AS tipo, SALDO_ATUAL_ ADT FROM FORNECE ';

Galera, estou executando este sql


  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

[As partes desta mensagem que não continham texto foram removidas]



Res: Res: [delphi-br] select com case

2008-06-13 Por tôpico Luciano Calenzani Simões
Cara, esse teu case está meio doidão. A sintaxe correta dele seria:

CASE tipo WHEN 'J' THEN 'Juridica' WHEN 'F' THEN 'Fisica' END AS tipo

Sem esse monte de + e aspas.

 Luciano Calenzani Simões





- Mensagem original 
De: Luciano Calenzani Simões [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 13 de Junho de 2008 10:56:08
Assunto: Res: [delphi-br] select com case


Tá, e daí?
Qual é o problema?

Luciano Calenzani Simões

- Mensagem original 
De: Berdam berdamzinho@ yahoo.com. br
Para: Delphi [EMAIL PROTECTED] os.com.br
Enviadas: Sexta-feira, 13 de Junho de 2008 10:38:03
Assunto: [delphi-br] select com case

'SELECT CODIGO_FOR, NOME_FOR, CASE Tipo WHEN ''+J+'' THEN ''+Juridica+ '' WHEN 
''+F+'' THEN ''+Fisica+'' END AS tipo, SALDO_ATUAL_ ADT FROM FORNECE ';

Galera, estou executando este sql


  Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
armazenamento!
http://br.mail.yahoo.com/

[As partes desta mensagem que não continham texto foram removidas]



RE: Res: Res: [delphi-br] select com case

2008-06-13 Por tôpico Rubem Nascimento da Rocha

De fato, está maluco mesmo! Mas o cara só fez postar o SQL e num disse 
exatamente qual é o problema. Adivinhar por osmose é meio flórida, né não?
Sds.



To: delphi-br@yahoogrupos.com.br
From: [EMAIL PROTECTED]
Date: Fri, 13 Jun 2008 07:02:56 -0700
Subject: Res: Res: [delphi-br] select com case


Cara, esse teu case está meio doidão. A sintaxe correta dele seria:

CASE tipo WHEN 'J' THEN 'Juridica' WHEN 'F' THEN 'Fisica' END AS tipo

Sem esse monte de + e aspas.

Luciano Calenzani Simões

- Mensagem original 
De: Luciano Calenzani Simões [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 13 de Junho de 2008 10:56:08
Assunto: Res: [delphi-br] select com case

Tá, e daí?
Qual é o problema?

Luciano Calenzani Simões

- Mensagem original 
De: Berdam 
Para: Delphi 
Enviadas: Sexta-feira, 13 de Junho de 2008 10:38:03
Assunto: [delphi-br] select com case

'SELECT CODIGO_FOR, NOME_FOR, CASE Tipo WHEN ''+J+'' THEN ''+Juridica+ '' WHEN 
''+F+'' THEN ''+Fisica+'' END AS tipo, SALDO_ATUAL_ ADT FROM FORNECE ';

Galera, estou executando este sql


_
Instale a Barra de Ferramentas com Desktop Search e ganhe EMOTICONS para o 
Messenger! É GRÁTIS!
http://www.msn.com.br/emoticonpack

[delphi-br] Select obtendo faixa etária usando Group By

2008-01-19 Por tôpico Flavio
Olá pessoal, boa noite,

estou querendo retornar no meu comando sql a quantidade de registros que 
pertencem a uma faixa etária(20 à 30 anos e/ou 40 à 50 anos, por exemplo) 
calculando a média do peso de cada faixa etária.
Os atributos da tabela:

| nome | dataNasc | dataAtual | peso |

Alguém tem alguma luz para me ajudar ?

Obrigado pela atenção e tudo de bom.
Flávio.
 

   
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]



RE: [delphi-br] Select obtendo faixa etária usando Group By

2008-01-19 Por tôpico Rubem Nascimento da Rocha

Cadê a estrutura da tabela? De antemão, digo que vc resolve isso com UNION e 
GROUP BY!
Sds.



 To: [EMAIL PROTECTED]; delphi-br@yahoogrupos.com.br
 From: [EMAIL PROTECTED]
 Date: Sat, 19 Jan 2008 21:26:34 -0300
 Subject: [delphi-br] Select obtendo faixa etária usando Group By
 
 
 Olá pessoal, boa noite,
 
 estou querendo retornar no meu comando sql a quantidade de registros que 
 pertencem a uma faixa etária(20 à 30 anos e/ou 40 à 50 anos, por exemplo) 
 calculando a média do peso de cada faixa etária.
 Os atributos da tabela:
 
 | nome | dataNasc | dataAtual | peso |
 
 Alguém tem alguma luz para me ajudar ?
 
 Obrigado pela atenção e tudo de bom.
 Flávio.
 
 
 -
 Abra sua conta no Yahoo! Mail, o único sem limite de espaço para 
 armazenamento!
 
 [As partes desta mensagem que não continham texto foram removidas]
 
 
 

_
Receba GRÁTIS as mensagens do Messenger no seu celular quando você estiver 
offline. Conheça  o MSN Mobile!
http://mobile.live.com/signup/signup2.aspx?lc=pt-br

[delphi-br] Select

2007-11-09 Por tôpico stainle2003
este funciona :
---

select tt.tpre_no, sum(somou) as soma
from
(
select tpre_no, sum(tnotto) as somou
from estmat
where (tpre_no = '002' and tmes = 10 and tano =2007)
group by tpre_no
)tt
group by tt.tpre_no

este não;
-

select tt.tpre_no, sum(somou) as soma
from
(
select tpre_no, sum(tnotto) as somou
from estmat
where (tpre_no = '002' and tmes = 10 and tano =2007)
group by tpre_no,
select tpre_no, sum(tnotto) as somou
from estf03
where (tpre_no = '002' and tmes = 10 and tano =2007)
group by tpre_no
) tt
group by tt.tpre_no

onde está o erro ?, 

grato
Stainle



Re: [delphi-br] Select

2007-11-09 Por tôpico Jaques Dix
Está faltando um UNION ALL entre as duas queries...
Sem o union são dois SQL que não podem ser somados dessa maneira...

select tt.tpre_no, sum(somou) as soma
from
(
select tpre_no, sum(tnotto) as somou
from estmat
where (tpre_no = '002' and tmes = 10 and tano =2007)
group by tpre_no
UNION ALL
select tpre_no, sum(tnotto) as somou
from estf03
where (tpre_no = '002' and tmes = 10 and tano =2007)
group by tpre_no
) tt
group by tt.tpre_no

stainle2003 escreveu:

 este funciona :
 ---

 select tt.tpre_no, sum(somou) as soma
 from
 (
 select tpre_no, sum(tnotto) as somou
 from estmat
 where (tpre_no = '002' and tmes = 10 and tano =2007)
 group by tpre_no
 )tt
 group by tt.tpre_no

 este não;
 -

 select tt.tpre_no, sum(somou) as soma
 from
 (
 select tpre_no, sum(tnotto) as somou
 from estmat
 where (tpre_no = '002' and tmes = 10 and tano =2007)
 group by tpre_no,
 select tpre_no, sum(tnotto) as somou
 from estf03
 where (tpre_no = '002' and tmes = 10 and tano =2007)
 group by tpre_no
 ) tt
 group by tt.tpre_no

 onde está o erro ?,

 grato
 Stainle

  



[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Select

2007-11-09 Por tôpico Nivaldo Stainle
valeu,agora enxerguei o erro.
  obrigado
  abraços

Jaques Dix [EMAIL PROTECTED] escreveu:
  Está faltando um UNION ALL entre as duas queries...
Sem o union são dois SQL que não podem ser somados dessa maneira...

select tt.tpre_no, sum(somou) as soma
from
(
select tpre_no, sum(tnotto) as somou
from estmat
where (tpre_no = '002' and tmes = 10 and tano =2007)
group by tpre_no
UNION ALL
select tpre_no, sum(tnotto) as somou
from estf03
where (tpre_no = '002' and tmes = 10 and tano =2007)
group by tpre_no
) tt
group by tt.tpre_no

stainle2003 escreveu:

 este funciona :
 ---

 select tt.tpre_no, sum(somou) as soma
 from
 (
 select tpre_no, sum(tnotto) as somou
 from estmat
 where (tpre_no = '002' and tmes = 10 and tano =2007)
 group by tpre_no
 )tt
 group by tt.tpre_no

 este não;
 -

 select tt.tpre_no, sum(somou) as soma
 from
 (
 select tpre_no, sum(tnotto) as somou
 from estmat
 where (tpre_no = '002' and tmes = 10 and tano =2007)
 group by tpre_no,
 select tpre_no, sum(tnotto) as somou
 from estf03
 where (tpre_no = '002' and tmes = 10 and tano =2007)
 group by tpre_no
 ) tt
 group by tt.tpre_no

 onde está o erro ?,

 grato
 Stainle

 

[As partes desta mensagem que não continham texto foram removidas]



 

   
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento! 

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Select com count

2007-05-14 Por tôpico rzzanatta
tenho essa select:

 with  dtmmovimento.qryGeracalendmensal do
  begin
 SQL.Clear;
 SQL.Add('SELECT count(fi.CO_FICHAPREVENTIVA) ficha');
 SQL.Add(' FROM ifichapreventiva fi,fichapreventiva f, periodo p, 
categoria c');
 SQL.Add(' WHERE f.CO_FICHAPREVENTIVA=fi.CO_FICHAPREVENTIVA AND  
fi.CO_PERIODO = 3 AND f.CO_CATEGORIA = 12');
 SQL.Add(' AND fi.CO_PERIODO=p.CO_PERIODO AND 
f.CO_CATEGORIA=c.CO_CATEGORIA');
 Open;
 a:= parambyname('ficha').AsInteger;
  end;

Só que ao executar a query ele me retorna esse erro: Parameter ficha 
not found. O que estou fazendo de errado?



Re: [delphi-br] Select com count

2007-05-14 Por tôpico BandaLemuel

Acho que vc poderia fazer assim...

with dtmmovimento.qryGeracalendmensal do
begin
SQL.Clear;
SQL.Add('SELECT count(fi.CO_FICHAPREVENTIVA) ficha');
SQL.Add(' FROM ifichapreventiva fi,fichapreventiva f, periodo p, categoria c');
SQL.Add(' WHERE f.CO_FICHAPREVENTIVA=fi.CO_FICHAPREVENTIVA AND fi.CO_PERIODO = 
3 AND f.CO_CATEGORIA = 12');
SQL.Add(' AND fi.CO_PERIODO=p.CO_PERIODO AND f.CO_CATEGORIA=c.CO_CATEGORIA');
Open;
//FieldByName ao inves de ParamByName
a:= FieldByName('ficha').AsInteger;
end;


Espero ter ajudado.. Wesley



  - Original Message - 
  From: rzzanatta 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, May 14, 2007 2:48 PM
  Subject: [delphi-br] Select com count


  tenho essa select:

  with dtmmovimento.qryGeracalendmensal do
  begin
  SQL.Clear;
  SQL.Add('SELECT count(fi.CO_FICHAPREVENTIVA) ficha');
  SQL.Add(' FROM ifichapreventiva fi,fichapreventiva f, periodo p, 
  categoria c');
  SQL.Add(' WHERE f.CO_FICHAPREVENTIVA=fi.CO_FICHAPREVENTIVA AND 
  fi.CO_PERIODO = 3 AND f.CO_CATEGORIA = 12');
  SQL.Add(' AND fi.CO_PERIODO=p.CO_PERIODO AND 
  f.CO_CATEGORIA=c.CO_CATEGORIA');
  Open;
  a:= parambyname('ficha').AsInteger;
  end;

  Só que ao executar a query ele me retorna esse erro: Parameter ficha 
  not found. O que estou fazendo de errado?



   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition. 
  Version: 7.5.467 / Virus Database: 269.7.0/803 - Release Date: 13/5/2007 12:17


[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Select com count

2007-05-14 Por tôpico Eduardo Castro Alves
ParamByName é para passagem de parametro.

Use FieldByName que vai funcionar.


Eduardo

rzzanatta escreveu:

 tenho essa select:

 with dtmmovimento.qryGeracalendmensal do
 begin
 SQL.Clear;
 SQL.Add('SELECT count(fi.CO_FICHAPREVENTIVA) ficha');
 SQL.Add(' FROM ifichapreventiva fi,fichapreventiva f, periodo p,
 categoria c');
 SQL.Add(' WHERE f.CO_FICHAPREVENTIVA=fi.CO_FICHAPREVENTIVA AND
 fi.CO_PERIODO = 3 AND f.CO_CATEGORIA = 12');
 SQL.Add(' AND fi.CO_PERIODO=p.CO_PERIODO AND
 f.CO_CATEGORIA=c.CO_CATEGORIA');
 Open;
 a:= parambyname('ficha').AsInteger;
 end;

 Só que ao executar a query ele me retorna esse erro: Parameter ficha
 not found. O que estou fazendo de errado?

  



[delphi-br] Select utilizando 2 Bancos (ADO - DB)

2007-04-25 Por tôpico Luizcm_jr
Olá dia a todos,

Muito tem se falado que na versão 1.5 do Firebird não se pode fazer select 
utilizando dois bancos e que
as proximas versão estaria disponivel esse recurso.

Mas, seria possivel fazer uma consulta utilizando dados de um banco Firebird e 
outro em Acess
em uma aplicação feita em Delphi 7?

Se possivel alguém ja passou por essa situação e poderia me auxiliar?


Junior - Araraquara/SP

[As partes desta mensagem que não continham texto foram removidas]



RES: [delphi-br] Select utilizando 2 Bancos (ADO - DB)

2007-04-25 Por tôpico Sérgio T . Uetanabaro
Se eu entendi bem a pergunta, vc queria, por exemplo, fazer um join de uma
tabela no firebird com uma tabela no access?? Ou vc queria acessar uma
tabela do firebird e depois uma do acces?? No primeiro caso nao é possivel.
No segundo, plenamente possível, basta criar duas conexoes. Uma pra cada
banco desejado.
 
 
[]´s
 
Sergio

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Luizcm_jr
Enviada em: quarta-feira, 25 de abril de 2007 09:39
Para: delphi-br@yahoogrupos.com.br; [EMAIL PROTECTED];
FireBase
Assunto: [delphi-br] Select utilizando 2 Bancos (ADO - DB)



Olá dia a todos,

Muito tem se falado que na versão 1.5 do Firebird não se pode fazer select
utilizando dois bancos e que
as proximas versão estaria disponivel esse recurso.

Mas, seria possivel fazer uma consulta utilizando dados de um banco Firebird
e outro em Acess
em uma aplicação feita em Delphi 7?

Se possivel alguém ja passou por essa situação e poderia me auxiliar?

Junior - Araraquara/SP

[As partes desta mensagem que não continham texto foram removidas]



 


[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Select Datas

2007-04-19 Por tôpico BandaLemuel
Use parametros no select... Wesley



- Original Message - 
  From: Tiago Vendemiatti 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, April 18, 2007 4:54 PM
  Subject: [delphi-br] Select Datas


  Caros..
  Estou usando um select para filtrar datas...em um banco ACCESS.

  Porém o mesmo se perde..tipo, eu coloco uma data  12/03/2005...

  Ele traz coisas do ano 1993, 2000, etc...

  Quando o select é com datas muda alguma coisa?

  Abs

  Tiago
  __
  Procure em qualquer página Web com protecção eficaz. Obtenha já o Windows 
Live Toolbar GRATUITO!
  http://www.toolbar.live.com

  [As partes desta mensagem que não continham texto foram removidas]



   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.5.446 / Virus Database: 269.5.2/766 - Release Date: 18/4/2007 07:39


[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Select Datas

2007-04-19 Por tôpico Alcistemas Informática
no parametro recebe os dados como value, e na variavel passe como string

ex



query.parameters.parambyname('DATA_INI').Value := datetostr(Date) 
ou
query.parameters.parambyname('DATA_INI').Value := editdata.text;



  - Original Message - 
  From: BandaLemuel 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, April 19, 2007 8:09 AM
  Subject: Re: [delphi-br] Select Datas


  Use parametros no select... Wesley

  - Original Message - 
  From: Tiago Vendemiatti 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, April 18, 2007 4:54 PM
  Subject: [delphi-br] Select Datas

  Caros..
  Estou usando um select para filtrar datas...em um banco ACCESS.

  Porém o mesmo se perde..tipo, eu coloco uma data  12/03/2005...

  Ele traz coisas do ano 1993, 2000, etc...

  Quando o select é com datas muda alguma coisa?

  Abs

  Tiago
  __
  Procure em qualquer página Web com protecção eficaz. Obtenha já o Windows 
Live Toolbar GRATUITO!
  http://www.toolbar.live.com

  [As partes desta mensagem que não continham texto foram removidas]

  --

  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.5.446 / Virus Database: 269.5.2/766 - Release Date: 18/4/2007 07:39

  [As partes desta mensagem que não continham texto foram removidas]



   

[As partes desta mensagem que não continham texto foram removidas]



RES: [delphi-br] Select Datas

2007-04-19 Por tôpico Sérgio T . Uetanabaro
Opa!! Acho q nao eh a melhor forma de fazer isso nao. Se vc quiser ter um
sistema que rode em varias configuracoes regionais nao trate data como
string.
 
[]´s
 
Sergio Uetanabaro

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Alcistemas Informática
Enviada em: quinta-feira, 19 de abril de 2007 13:48
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Select Datas



no parametro recebe os dados como value, e na variavel passe como string

ex

query.parameters.parambyname('DATA_INI').Value := datetostr(Date) 
ou
query.parameters.parambyname('DATA_INI').Value := editdata.text;

- Original Message - 
From: BandaLemuel 
To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br 
Sent: Thursday, April 19, 2007 8:09 AM
Subject: Re: [delphi-br] Select Datas

Use parametros no select... Wesley

- Original Message - 
From: Tiago Vendemiatti 
To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br 
Sent: Wednesday, April 18, 2007 4:54 PM
Subject: [delphi-br] Select Datas

Caros..
Estou usando um select para filtrar datas...em um banco ACCESS.

Porém o mesmo se perde..tipo, eu coloco uma data  12/03/2005...

Ele traz coisas do ano 1993, 2000, etc...

Quando o select é com datas muda alguma coisa?

Abs

Tiago
__
Procure em qualquer página Web com protecção eficaz. Obtenha já o Windows
Live Toolbar GRATUITO!
http://www.toolbar. http://www.toolbar.live.com live.com

[As partes desta mensagem que não continham texto foram removidas]

--

No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.5.446 / Virus Database: 269.5.2/766 - Release Date: 18/4/2007
07:39

[As partes desta mensagem que não continham texto foram removidas]

[As partes desta mensagem que não continham texto foram removidas]



 


[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Select Datas

2007-04-18 Por tôpico Tiago Vendemiatti
Caros..
Estou usando um select para filtrar datas...em um banco ACCESS.
 
Porém o mesmo se perde..tipo, eu coloco uma data  12/03/2005...
 
Ele traz coisas do ano 1993, 2000, etc...
 
Quando o select é com datas muda alguma coisa?
 
Abs
 
Tiago
_
Procure em qualquer página Web com protecção eficaz. Obtenha já o Windows Live 
Toolbar GRATUITO!
http://www.toolbar.live.com

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Select não funciona

2007-02-22 Por tôpico Rodrigo Brito
Boa TArde

tenho esse select na qual faz a filtragem dos meus registros para consulta
mas quando vou escolher a data ele não funciona não retorna nenhum 
valor  o resto funciona
no sql o campo data está como datetime



if radiobutton1.Checked then
 if DateTimePicker1.Checked then
   begin
adoconmovimento.Active := false;
adoconmovimento.SQL.Clear;
adoconmovimento.SQL.Add ('select * from  movimento 
a,categoria b,material c,solicitante d where a.codmat = c.codmat and 
a.tipo = ''E''and b.codcat = c.codcat and _a.data = '+ 
datetostr(DateTimePicker1.date) +_ ' and b.nome like 
'+QuotedStr(DBLookupComboBox1.Text+'%')+ ' and c.nome like 
'+QuotedStr(DBLookupComboBox2.Text+'%')+ 'order by a.data');
adoconmovimento.active := true;

   end

-- 


Re: [delphi-br] Select não funciona

2007-02-22 Por tôpico Cido
Tente passar a data como parâmetro:


 if radiobutton1.Checked then
 if DateTimePicker1.Checked then
   begin
adoconmovimento.Active := false;
adoconmovimento.SQL.Clear;
adoconmovimento.SQL.Add ('select * from  movimento
 a,categoria b,material c,solicitante d where a.codmat = c.codmat and
 a.tipo = ''E''and b.codcat = c.codcat and _a.data = :DATA1 and b.nome like
 '+QuotedStr(DBLookupComboBox1.Text+'%')+ ' and c.nome like
 '+QuotedStr(DBLookupComboBox2.Text+'%')+ 'order by a.data');

adoconmovimento.ParamByName('DATA1').AsDateTime := DateTimePicker1.Date;


adoconmovimento.active := true;

   end







- Original Message - 
From: Rodrigo Brito [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, February 22, 2007 3:47 PM
Subject: [delphi-br] Select não funciona


 Boa TArde

 tenho esse select na qual faz a filtragem dos meus registros para consulta
 mas quando vou escolher a data ele não funciona não retorna nenhum
 valor  o resto funciona
 no sql o campo data está como datetime



 if radiobutton1.Checked then
 if DateTimePicker1.Checked then
   begin
adoconmovimento.Active := false;
adoconmovimento.SQL.Clear;
adoconmovimento.SQL.Add ('select * from  movimento
 a,categoria b,material c,solicitante d where a.codmat = c.codmat and
 a.tipo = ''E''and b.codcat = c.codcat and _a.data = '+
 datetostr(DateTimePicker1.date) +_ ' and b.nome like
 '+QuotedStr(DBLookupComboBox1.Text+'%')+ ' and c.nome like
 '+QuotedStr(DBLookupComboBox2.Text+'%')+ 'order by a.data');
adoconmovimento.active := true;

   end

 -- 


 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

 Links do Yahoo! Grupos

 



Re: [delphi-br] Select não funciona

2007-02-22 Por tôpico Humberto
Q banco de dados está utilizando?

  - Original Message - 
  From: Rodrigo Brito 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, February 22, 2007 3:47 PM
  Subject: [delphi-br] Select não funciona


  Boa TArde

  tenho esse select na qual faz a filtragem dos meus registros para consulta
  mas quando vou escolher a data ele não funciona não retorna nenhum 
  valor o resto funciona
  no sql o campo data está como datetime

  if radiobutton1.Checked then
  if DateTimePicker1.Checked then
  begin
  adoconmovimento.Active := false;
  adoconmovimento.SQL.Clear;
  adoconmovimento.SQL.Add ('select * from movimento 
  a,categoria b,material c,solicitante d where a.codmat = c.codmat and 
  a.tipo = ''E''and b.codcat = c.codcat and _a.data = '+ 
  datetostr(DateTimePicker1.date) +_ ' and b.nome like 
  '+QuotedStr(DBLookupComboBox1.Text+'%')+ ' and c.nome like 
  '+QuotedStr(DBLookupComboBox2.Text+'%')+ 'order by a.data');
  adoconmovimento.active := true;

  end

  -- 


   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.5.441 / Virus Database: 268.18.3/697 - Release Date: 22/2/2007 
11:55


[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Select não funciona

2007-02-22 Por tôpico Rodrigo Brito
Acho que no sql server nãoé  dessa maneira pois ele não reconhece ASDATETIME


Cido escreveu:

 Tente passar a data como parâmetro:

 if radiobutton1.Checked then
 if DateTimePicker1.Checked then
 begin
 adoconmovimento.Active := false;
 adoconmovimento.SQL.Clear;
 adoconmovimento.SQL.Add ('select * from movimento
 a,categoria b,material c,solicitante d where a.codmat = c.codmat and
 a.tipo = ''E''and b.codcat = c.codcat and _a.data = :DATA1 and b.nome like
 '+QuotedStr(DBLookupComboBox1.Text+'%')+ ' and c.nome like
 '+QuotedStr(DBLookupComboBox2.Text+'%')+ 'order by a.data');

 adoconmovimento.ParamByName('DATA1').AsDateTime := DateTimePicker1.Date;

 adoconmovimento.active := true;

 end

 - Original Message -
 From: Rodrigo Brito [EMAIL PROTECTED] 
 mailto:rbrito%40francoebarbosa.com.br
 To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
 Sent: Thursday, February 22, 2007 3:47 PM
 Subject: [delphi-br] Select não funciona

  Boa TArde
 
  tenho esse select na qual faz a filtragem dos meus registros para 
 consulta
  mas quando vou escolher a data ele não funciona não retorna nenhum
  valor o resto funciona
  no sql o campo data está como datetime
 
 
 
  if radiobutton1.Checked then
  if DateTimePicker1.Checked then
  begin
  adoconmovimento.Active := false;
  adoconmovimento.SQL.Clear;
  adoconmovimento.SQL.Add ('select * from movimento
  a,categoria b,material c,solicitante d where a.codmat = c.codmat and
  a.tipo = ''E''and b.codcat = c.codcat and _a.data = '+
  datetostr(DateTimePicker1.date) +_ ' and b.nome like
  '+QuotedStr(DBLookupComboBox1.Text+'%')+ ' and c.nome like
  '+QuotedStr(DBLookupComboBox2.Text+'%')+ 'order by a.data');
  adoconmovimento.active := true;
 
  end
 
  --
 
 
  --
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
  Links do Yahoo! Grupos
 
 

 

 __ NOD32 2075 (20070222) Information __

 This message was checked by NOD32 antivirus system.
 http://www.eset.com

-- 


Re: [delphi-br] Select não funciona

2007-02-22 Por tôpico Humberto
No caso do SQL Server se eu me lembro bem é necessário formatar a data assim: 
'mmdd', se não for isso é 'ddmm'
  - Original Message - 
  From: Rodrigo Brito 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, February 22, 2007 4:44 PM
  Subject: Re: [delphi-br] Select não funciona


  Acho que no sql server nãoé dessa maneira pois ele não reconhece ASDATETIME

  Cido escreveu:
  
   Tente passar a data como parâmetro:
  
   if radiobutton1.Checked then
   if DateTimePicker1.Checked then
   begin
   adoconmovimento.Active := false;
   adoconmovimento.SQL.Clear;
   adoconmovimento.SQL.Add ('select * from movimento
   a,categoria b,material c,solicitante d where a.codmat = c.codmat and
   a.tipo = ''E''and b.codcat = c.codcat and _a.data = :DATA1 and b.nome like
   '+QuotedStr(DBLookupComboBox1.Text+'%')+ ' and c.nome like
   '+QuotedStr(DBLookupComboBox2.Text+'%')+ 'order by a.data');
  
   adoconmovimento.ParamByName('DATA1').AsDateTime := DateTimePicker1.Date;
  
   adoconmovimento.active := true;
  
   end
  
   - Original Message -
   From: Rodrigo Brito [EMAIL PROTECTED] 
   mailto:rbrito%40francoebarbosa.com.br
   To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
   Sent: Thursday, February 22, 2007 3:47 PM
   Subject: [delphi-br] Select não funciona
  
Boa TArde
   
tenho esse select na qual faz a filtragem dos meus registros para 
   consulta
mas quando vou escolher a data ele não funciona não retorna nenhum
valor o resto funciona
no sql o campo data está como datetime
   
   
   
if radiobutton1.Checked then
if DateTimePicker1.Checked then
begin
adoconmovimento.Active := false;
adoconmovimento.SQL.Clear;
adoconmovimento.SQL.Add ('select * from movimento
a,categoria b,material c,solicitante d where a.codmat = c.codmat and
a.tipo = ''E''and b.codcat = c.codcat and _a.data = '+
datetostr(DateTimePicker1.date) +_ ' and b.nome like
'+QuotedStr(DBLookupComboBox1.Text+'%')+ ' and c.nome like
'+QuotedStr(DBLookupComboBox2.Text+'%')+ 'order by a.data');
adoconmovimento.active := true;
   
end
   
--
   
   
--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
   
Links do Yahoo! Grupos
   
   
  
   
  
   __ NOD32 2075 (20070222) Information __
  
   This message was checked by NOD32 antivirus system.
   http://www.eset.com

  -- 


   


--


  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.5.441 / Virus Database: 268.18.3/697 - Release Date: 22/2/2007 
11:55


[As partes desta mensagem que não continham texto foram removidas]



Re: [delphi-br] Select não funciona

2007-02-22 Por tôpico Cido
eu uso SQL Server e faço consulta com datas desta maneira.
vc tentou?


- Original Message - 
From: Rodrigo Brito [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, February 22, 2007 4:44 PM
Subject: Re: [delphi-br] Select não funciona


 Acho que no sql server nãoé  dessa maneira pois ele não reconhece 
 ASDATETIME


 Cido escreveu:

 Tente passar a data como parâmetro:

 if radiobutton1.Checked then
 if DateTimePicker1.Checked then
 begin
 adoconmovimento.Active := false;
 adoconmovimento.SQL.Clear;
 adoconmovimento.SQL.Add ('select * from movimento
 a,categoria b,material c,solicitante d where a.codmat = c.codmat and
 a.tipo = ''E''and b.codcat = c.codcat and _a.data = :DATA1 and b.nome 
 like
 '+QuotedStr(DBLookupComboBox1.Text+'%')+ ' and c.nome like
 '+QuotedStr(DBLookupComboBox2.Text+'%')+ 'order by a.data');

 adoconmovimento.ParamByName('DATA1').AsDateTime := DateTimePicker1.Date;

 adoconmovimento.active := true;

 end

 - Original Message -
 From: Rodrigo Brito [EMAIL PROTECTED]
 mailto:rbrito%40francoebarbosa.com.br
 To: delphi-br@yahoogrupos.com.br 
 mailto:delphi-br%40yahoogrupos.com.br
 Sent: Thursday, February 22, 2007 3:47 PM
 Subject: [delphi-br] Select não funciona

  Boa TArde
 
  tenho esse select na qual faz a filtragem dos meus registros para
 consulta
  mas quando vou escolher a data ele não funciona não retorna nenhum
  valor o resto funciona
  no sql o campo data está como datetime
 
 
 
  if radiobutton1.Checked then
  if DateTimePicker1.Checked then
  begin
  adoconmovimento.Active := false;
  adoconmovimento.SQL.Clear;
  adoconmovimento.SQL.Add ('select * from movimento
  a,categoria b,material c,solicitante d where a.codmat = c.codmat and
  a.tipo = ''E''and b.codcat = c.codcat and _a.data = '+
  datetostr(DateTimePicker1.date) +_ ' and b.nome like
  '+QuotedStr(DBLookupComboBox1.Text+'%')+ ' and c.nome like
  '+QuotedStr(DBLookupComboBox2.Text+'%')+ 'order by a.data');
  adoconmovimento.active := true;
 
  end
 
  --
 
 
  --
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
  Links do Yahoo! Grupos
 
 



 __ NOD32 2075 (20070222) Information __

 This message was checked by NOD32 antivirus system.
 http://www.eset.com

 -- 


 -- 
  FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

 Links do Yahoo! Grupos

 



Re: [delphi-br] Select não funciona

2007-02-22 Por tôpico Rodrigo Brito
Sql Server 2000

Humberto escreveu:

 Q banco de dados está utilizando?

 - Original Message -
 From: Rodrigo Brito
 To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
 Sent: Thursday, February 22, 2007 3:47 PM
 Subject: [delphi-br] Select não funciona

 Boa TArde

 tenho esse select na qual faz a filtragem dos meus registros para consulta
 mas quando vou escolher a data ele não funciona não retorna nenhum
 valor o resto funciona
 no sql o campo data está como datetime

 if radiobutton1.Checked then
 if DateTimePicker1.Checked then
 begin
 adoconmovimento.Active := false;
 adoconmovimento.SQL.Clear;
 adoconmovimento.SQL.Add ('select * from movimento
 a,categoria b,material c,solicitante d where a.codmat = c.codmat and
 a.tipo = ''E''and b.codcat = c.codcat and _a.data = '+
 datetostr(DateTimePicker1.date) +_ ' and b.nome like
 '+QuotedStr(DBLookupComboBox1.Text+'%')+ ' and c.nome like
 '+QuotedStr(DBLookupComboBox2.Text+'%')+ 'order by a.data');
 adoconmovimento.active := true;

 end

 -- 

 --

 No virus found in this incoming message.
 Checked by AVG Free Edition.
 Version: 7.5.441 / Virus Database: 268.18.3/697 - Release Date: 
 22/2/2007 11:55

 [As partes desta mensagem que não continham texto foram removidas]

 

 __ NOD32 2075 (20070222) Information __

 This message was checked by NOD32 antivirus system.
 http://www.eset.com

-- 


[delphi-br] select sql não funciona

2007-02-16 Por tôpico Rodrigo Brito
Boa Tarde

não estou conseguindo fazer o seguinte select para trazer os registros 
da tabela movimento que tem o tipo como S

adoconmovimento.SQL.Add ('select * from  movimento a,categoria 
b,material c,solicitante d where a.codmat =* *c.codmat* *and* a.tipo = 
S* and b.codcat = c.codcat and a.codsol = d.codsol and a.data like '+ 
datetostr(DateTimePicker1.date) + ' and b.nome like 
'+QuotedStr(DBLookupComboBox1.Text+'%')+ ' and c.nome like 
'+QuotedStr(DBLookupComboBox2.Text+'%')+ 'and d.nome 
like'+QuotedStr(DBLookupComboBox3.Text+'%')+ 'order by a.data');

nesse select quero que traga os movimentos do tipo saída (S)

a.tipo = S  dá erro
alguém pode me ajudar?
 



Re: [delphi-br] select sql não funciona

2007-02-16 Por tôpico Andrei Luís
Utilize QuotedStr como você utilizou em outra parte do SQL:
 ... a.tipo =' + QuotedStr('S') + ...

[]
Andrei


Em 16/02/07, Rodrigo Brito[EMAIL PROTECTED] escreveu:
 Boa Tarde

 não estou conseguindo fazer o seguinte select para trazer os registros
 da tabela movimento que tem o tipo como S

 adoconmovimento.SQL.Add ('select * from  movimento a,categoria
 b,material c,solicitante d where a.codmat =* *c.codmat* *and* a.tipo =
 S* and b.codcat = c.codcat and a.codsol = d.codsol and a.data like '+
 datetostr(DateTimePicker1.date) + ' and b.nome like
 '+QuotedStr(DBLookupComboBox1.Text+'%')+ ' and c.nome like
 '+QuotedStr(DBLookupComboBox2.Text+'%')+ 'and d.nome
 like'+QuotedStr(DBLookupComboBox3.Text+'%')+ 'order by a.data');

 nesse select quero que traga os movimentos do tipo saída (S)

 a.tipo = S  dá erro
 alguém pode me ajudar?


Re: [delphi-br] select sql não funciona

2007-02-16 Por tôpico Leonardo Felipe de Oliveira
Utilize dupla aspas simples '' e não aspas duplas 

Abraços,
Leonardo


  - Original Message - 
  From: Rodrigo Brito 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Friday, February 16, 2007 4:07 PM
  Subject: [delphi-br] select sql não funciona


  Boa Tarde

  não estou conseguindo fazer o seguinte select para trazer os registros 
  da tabela movimento que tem o tipo como S

  adoconmovimento.SQL.Add ('select * from movimento a,categoria 
  b,material c,solicitante d where a.codmat =* *c.codmat* *and* a.tipo = 
  S* and b.codcat = c.codcat and a.codsol = d.codsol and a.data like '+ 
  datetostr(DateTimePicker1.date) + ' and b.nome like 
  '+QuotedStr(DBLookupComboBox1.Text+'%')+ ' and c.nome like 
  '+QuotedStr(DBLookupComboBox2.Text+'%')+ 'and d.nome 
  like'+QuotedStr(DBLookupComboBox3.Text+'%')+ 'order by a.data');

  nesse select quero que traga os movimentos do tipo saída (S)

  a.tipo = S dá erro
  alguém pode me ajudar?




   

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Select com data

2007-02-16 Por tôpico Rodrigo Brito
Boa Tarde
tenho esse select

 if DateTimePicker1.Checked then
   begin
adoconmovimento.Active := false;
adoconmovimento.SQL.Clear;
adoconmovimento.SQL.Add ('select * from  movimento 
a,categoria b,material c,solicitante d where a.codmat = c.codmat and 
a.tipo = ''E''and b.codcat = c.codcat and a.data = 
'+*datetostr(DateTimePicker1.date)* + ' and b.nome like 
'+QuotedStr(DBLookupComboBox1.Text+'%')+ ' and c.nome like   
'+QuotedStr(DBLookupComboBox2.Text+'%')+ 'order by a.data');
adoconmovimento.active := true;
   end

na pesquisa tenho um DATETIMEPICKER   para fazer a consulta, mas não 
está funcionando alguém pode me ajudar a consertar esse select
o campo data no sql está como datetime

att,
Rodrigo Brito


[delphi-br] Select - Trazer ultimo Registro datas diferentes

2007-02-06 Por tôpico Luizcm_jr
Bom dia a Todos..


Estou precisando de ajuda, para desenvolver umm select em um tabela, que possui 
campos do tipo timestamp - date - time,

estou armazenando registro na tabela da seguinte maneira:

1º a data e hora, são o momento da leitura de informação.
2º o campo timestamp refere-se ao dia para que essa leitura deverá ser 
armazenada.

então.. se por exemplo no dia 06 eu fizer uma leitura para o mesmo dia.. então 
o registro ficará assim:

DataHoraDia pertencente
06/02/2006   20:45   06/02/2006 00:00:00

ok, mas se no dia 07 eu tb fizer uma leitura para o dia 06 como a linha abaixo:

DataHoraDia pertencente
07/02/2006   02:13   06/02/2006 00:00:00

Bom.. diante dessa situação, preciso trazer em meu select o ultimo lançamento 
referente ao dia 06, no caso:

07/02/2006   02:13   06/02/2006 00:00:00


Não sei se fui claro, mas.. realmente estou apanhando dessa situação, se alguém 
 ja tiver passado por isso, e conseguido
resolver a mesma.. e possa me ajudar, fico grato desde já..


Junior - Araraquara/SP

[As partes desta mensagem que não continham texto foram removidas]



RES: [delphi-br] Select - Trazer ultimo Registro datas diferentes

2007-02-06 Por tôpico Eric
Caríssimo Junior...

 

Para desenvolver um SQL, precisaria saber qual Banco de Dados você está
utilizando...

 

Mas como idéia, posso sugerir que você ordene seu SQL pela “Data Hora”
(decrescente) e selecione o primeiro registro ocorrente (com a data “Dia
pertencente” desejada).

 

 

Espero ter lhe ajudado.

 

Abraço.

 

 

Eric

 

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Luizcm_jr
Enviada em: terça-feira, 6 de fevereiro de 2007 07:49
Para: delphi-br@yahoogrupos.com.br; [EMAIL PROTECTED]
Assunto: [delphi-br] Select - Trazer ultimo Registro datas diferentes

 

Bom dia a Todos..

Estou precisando de ajuda, para desenvolver umm select em um tabela, que
possui campos do tipo timestamp - date - time,

estou armazenando registro na tabela da seguinte maneira:

1º a data e hora, são o momento da leitura de informação.
2º o campo timestamp refere-se ao dia para que essa leitura deverá ser
armazenada.

então.. se por exemplo no dia 06 eu fizer uma leitura para o mesmo dia..
então o registro ficará assim:

Data Hora Dia pertencente
06/02/2006 20:45 06/02/2006 00:00:00

ok, mas se no dia 07 eu tb fizer uma leitura para o dia 06 como a linha
abaixo:

Data Hora Dia pertencente
07/02/2006 02:13 06/02/2006 00:00:00

Bom.. diante dessa situação, preciso trazer em meu select o ultimo
lançamento referente ao dia 06, no caso:

07/02/2006 02:13 06/02/2006 00:00:00

Não sei se fui claro, mas.. realmente estou apanhando dessa situação, se
alguém ja tiver passado por isso, e conseguido
resolver a mesma.. e possa me ajudar, fico grato desde já..

Junior - Araraquara/SP

[As partes desta mensagem que não continham texto foram removidas]

 



[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Select com join em tabelas de outro banco...

2007-01-09 Por tôpico Luis Lopes
Pessoal,

Tem como fazer um select em uma tabela em um banco, com join com outras tabelas 
de outro banco?
A tabela principal está no Firebird 1.5 e as outras (join prá trazer o nome, 
descrição, etc) está no MySQL.
Uso BDS2006 com DBX, mas, a tecnologia de acesso pode ser outra, caso tenha 
como fazer.

Fico muito grato,

 
Luis Alberto
Belo Horizonte - MG




__
Fale com seus amigos  de graça com o novo Yahoo! Messenger 
http://br.messenger.yahoo.com/ 

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Select * from :Parametro

2006-10-18 Por tôpico Anderson Furtilho
Olá amigos!!!


Tem como fazer isso no FireBird ?


Ja vi algo do tipo mas não encontrei em lugar nenhum





___ 
Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. 
Registre seu aparelho agora! 
http://br.mobile.yahoo.com/mailalertas/ 
 



-- 
 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

 



Res: [delphi-br] Select * from :Parametro

2006-10-18 Por tôpico Ricardo Cesar Cardoso
Passar um nome de tabela como parâmetro? Acho que não. Mas se tiver gostaria de 
saber como... Pode ser uma tremenda brecha de segurança.

- Mensagem original 
De: Anderson Furtilho [EMAIL PROTECTED]
Para: Delphi-br delphi-br@yahoogrupos.com.br
Enviadas: Quarta-feira, 18 de Outubro de 2006 15:54:48
Assunto: [delphi-br] Select * from :Parametro




Olá amigos!!!





Tem como fazer isso no FireBird ?





Ja vi algo do tipo mas não encontrei em lugar nenhum











___ 

Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. 
Registre seu aparelho agora! 

http://br.mobile.yahoo.com/mailalertas/ 

 

















___ 
Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar 
seu conhecimento? Experimente o Yahoo! Respostas !
http://br.answers.yahoo.com/

[As partes desta mensagem que não continham texto foram removidas]



-- 
 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

 



Re: Res: [delphi-br] Select * from :Parametro

2006-10-18 Por tôpico Marcelo Silva
Olha eu resolveria esta situação criando uma string com os dados solicitados .
  Ex :
   
  var
  tab_Dessejada,SQL1 : String;
  begin
   SQL1 := 'SELECT * FROM ';
   SQL1 := SQL1 + tab_Dessejada;
   SQL1 := SQL1 + 'Order by campo_desejado';
  Datamodule.Query.sql.Add(Sql1);
  end;
   
   
  Espero que te ajude.

Ricardo Cesar Cardoso [EMAIL PROTECTED] wrote:
  Passar um nome de tabela como parâmetro? Acho que não. Mas se tiver gostaria 
de saber como... Pode ser uma tremenda brecha de segurança.

- Mensagem original 
De: Anderson Furtilho [EMAIL PROTECTED]
Para: Delphi-br delphi-br@yahoogrupos.com.br
Enviadas: Quarta-feira, 18 de Outubro de 2006 15:54:48
Assunto: [delphi-br] Select * from :Parametro




Olá amigos!!!





Tem como fazer isso no FireBird ?





Ja vi algo do tipo mas não encontrei em lugar nenhum











___ 

Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. 
Registre seu aparelho agora! 

http://br.mobile.yahoo.com/mailalertas/ 













  



  

___ 
Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar 
seu conhecimento? Experimente o Yahoo! Respostas !
http://br.answers.yahoo.com/

[As partes desta mensagem que não continham texto foram removidas]

 


-
 All-new Yahoo! Mail - Fire up a more powerful email and get things done faster.

[As partes desta mensagem que não continham texto foram removidas]



-- 
 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

 



Res: [delphi-br] Select * from :Parametro

2006-10-18 Por tôpico Marcelo Silva
Olha eu resolveria esta situação criando uma string com os dados solicitados .
  Ex :
   
  var
  tab_Dessejada,SQL1 : String;
  begin
   SQL1 := 'SELECT * FROM ';
   SQL1 := SQL1 + tab_Dessejada;
   SQL1 := SQL1 + 'Order by campo_desejado';
  Datamodule.Query.sql.Add(Sql1);
  end;
   
   
  Espero que te ajude.

Ricardo Cesar Cardoso [EMAIL PROTECTED] wrote:
  Passar um nome de tabela como parâmetro? Acho que não. Mas se tiver gostaria 
de saber como... Pode ser uma tremenda brecha de segurança.

- Mensagem original 
De: Anderson Furtilho [EMAIL PROTECTED]
Para: Delphi-br delphi-br@yahoogrupos.com.br
Enviadas: Quarta-feira, 18 de Outubro de 2006 15:54:48
Assunto: [delphi-br] Select * from :Parametro




Olá amigos!!!





Tem como fazer isso no FireBird ?





Ja vi algo do tipo mas não encontrei em lugar nenhum











___ 

Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. 
Registre seu aparelho agora! 

http://br.mobile.yahoo.com/mailalertas/ 













  



  

___ 
Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar 
seu conhecimento? Experimente o Yahoo! Respostas !
http://br.answers.yahoo.com/

[As partes desta mensagem que não continham texto foram removidas]

 


-
Do you Yahoo!?
 Everyone is raving about the  all-new Yahoo! Mail.

[As partes desta mensagem que não continham texto foram removidas]



-- 
 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

 



Re: [delphi-br] Select * from :Parametro

2006-10-18 Por tôpico Mario Lucio
Colega tem assim

SELECT * FROM NODATABELA WHERE CAMPODEBUSCA=:PARAMETRO

Mario Lucio

Analista / Desenvolvimento



Ser Cristão,  não é só ser batizado: é seguir a Cristo e os Seus ensinamentos.
  - Original Message - 
  From: Anderson Furtilho 
  To: Delphi-br 
  Sent: Wednesday, October 18, 2006 3:54 PM
  Subject: [delphi-br] Select * from :Parametro


  Olá amigos!!!


  Tem como fazer isso no FireBird ?


  Ja vi algo do tipo mas não encontrei em lugar nenhum




  
  ___ 
  Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. 
Registre seu aparelho agora! 
  http://br.mobile.yahoo.com/mailalertas/ 


   

[As partes desta mensagem que não continham texto foram removidas]




-- 
 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

 



[delphi-br] Select dentre de Select com UNION

2006-10-13 Por tôpico Luizcm_jr
Boa Tarde...


Será que alguém poderia me ajudar a resolver uma consulta??

Estou fazendo uma consulta na banco e utilizo um select dentro de outro, o meu 
problema está sendo em juntar dentro deste segundo select o union.

ex. tenho os produtos e quero trazer os clientes que adquiriram um produto 
especifico. mas os clientes podem ser fisicos ou juridicos. então dentro do 
select para saber o nome do cliente eu tenho que fazer union entre fisicos e 
juridicos.

Não sei bem se fui claro!

mas alguém saberia me dizer como fazer isso.

Junior - Araraquara/SP

[As partes desta mensagem que não continham texto foram removidas]



-- 
 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

 



RES: [delphi-br] Select dentre de Select com UNION

2006-10-13 Por tôpico Celito Alves Tonial
Tente remover a sub-query, colocando as tabelas usadas nela para o FROM
principal.
Exemplo: fazer 2) ao invés de 1)

1)
Select b.Cod, (select n.Nome 
from NomeDoBla n
where n.Cod = b.Cod
union
   select l.Nome
from BiluBilu l
where l.Cod = b.Cod)
From Bla b
Where b.Cod = 1

 Isso aí de cima nem deve funcionar 
2)
Select b.Cod, (select n.Nome 
from NomeDoBla n
where n.Cod = b.Cod
From Bla b, NomeDoBla n, BiluBilu l
Where b.Cod = 1
And ((n.Cod = b.Cod) or (l.Cod = b.Cod))

Não sei se ficou claro. Mas vc pode tentar tb com outer joins.



-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Luizcm_jr
Enviada em: sexta-feira, 13 de outubro de 2006 13:49
Para: FireBase; delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Select dentre de Select com UNION

Boa Tarde...


Será que alguém poderia me ajudar a resolver uma consulta??

Estou fazendo uma consulta na banco e utilizo um select dentro de outro, o
meu problema está sendo em juntar dentro deste segundo select o union.

ex. tenho os produtos e quero trazer os clientes que adquiriram um produto
especifico. mas os clientes podem ser fisicos ou juridicos. então dentro do
select para saber o nome do cliente eu tenho que fazer union entre fisicos e
juridicos.

Não sei bem se fui claro!

mas alguém saberia me dizer como fazer isso.

Junior - Araraquara/SP

[As partes desta mensagem que não continham texto foram removidas]



--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Links do Yahoo! Grupos

 



-- 
 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

 



RES: [delphi-br] Select dentre de Select com UNION

2006-10-13 Por tôpico Celito Alves Tonial
Errei, pressa do copy  paste :D

2)

Select b.Cod,n.Nome
From Bla b, NomeDoBla n
Where b.Cod = 1
And n.Cod = b.Cod

Union all

Select b.Cod,l.Nome
From Bla b, BiluBilu l
Where b.Cod = 1
And n.Cod = l.Cod

Atenciosamente,
Celito Alves Tonial
MPS Informática Ltda. 


-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Celito Alves Tonial
Enviada em: sexta-feira, 13 de outubro de 2006 14:24
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Select dentre de Select com UNION

Tente remover a sub-query, colocando as tabelas usadas nela para o FROM
principal.
Exemplo: fazer 2) ao invés de 1)

1)
Select b.Cod, (select n.Nome 
from NomeDoBla n
where n.Cod = b.Cod
union
   select l.Nome
from BiluBilu l
where l.Cod = b.Cod)
From Bla b
Where b.Cod = 1

 Isso aí de cima nem deve funcionar 
2)
Select b.Cod, (select n.Nome 
from NomeDoBla n
where n.Cod = b.Cod
From Bla b, NomeDoBla n, BiluBilu l
Where b.Cod = 1
And ((n.Cod = b.Cod) or (l.Cod = b.Cod))

Não sei se ficou claro. Mas vc pode tentar tb com outer joins.



-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Luizcm_jr Enviada em: sexta-feira, 13 de outubro de 2006 13:49
Para: FireBase; delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Select dentre de Select com UNION

Boa Tarde...


Será que alguém poderia me ajudar a resolver uma consulta??

Estou fazendo uma consulta na banco e utilizo um select dentro de outro, o
meu problema está sendo em juntar dentro deste segundo select o union.

ex. tenho os produtos e quero trazer os clientes que adquiriram um produto
especifico. mas os clientes podem ser fisicos ou juridicos. então dentro do
select para saber o nome do cliente eu tenho que fazer union entre fisicos e
juridicos.

Não sei bem se fui claro!

mas alguém saberia me dizer como fazer isso.

Junior - Araraquara/SP

[As partes desta mensagem que não continham texto foram removidas]



--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Links do Yahoo! Grupos

 



--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

Links do Yahoo! Grupos

 



-- 
 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

 



[delphi-br] SELECT + SUM

2006-09-06 Por tôpico Jean
Boa tarde,

Tenho em um Select uma soma... ao mover o resultado desta soma para
um campo esta mostrando como se fosse uma String ... sendo que seria um 
resultado Float... alguem ja teve este problema
Exemplo:

sum(SDM251.nfp_qtd_bai) as nfp_qtd_bai, 

Qualquer ajuda sera bem vinda.

Jean Pierre 
Joinville /SC

[As partes desta mensagem que não continham texto foram removidas]



-- 
 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

 




[delphi-br] Select muito longo ERRO

2006-09-04 Por tôpico WILLER
Olá a todos. Estou com um problema. Eu uso o Firebird e Delphi 7, preciso usar 
uma string SQL (select), mas quando vou compilar o Delphi reclama que a string 
deve ter no máximo 255 caracteres. Alguém sabe como contornar isso?
Qualquer sugestão será de grande ajuda.

String: select MENSAL.VENCTO,tabcli.cod,tabcli.nome,tabmen.prec,mensal.tipo 
from tabcli,tabmen,mensal where 
(tabcli.tabela=tabmen.tab)and(tabcli.cod=mensal.cod)and( 
(mensal.vencto='1/1/2006') and (mensal.vencto='10/10/2006')and( extract(month 
from mensal.vencto)extract(month from CURRENT_DATE ) ) ) ORDER BY  
MENSAL.VENCTO




Willer Alves da Costa.

[As partes desta mensagem que não continham texto foram removidas]



-- 
 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

 





Re: [delphi-br] Select muito longo ERRO

2006-09-04 Por tôpico Andre Mesquita
Além de funcionar deixa seu código mais claro e facilita uma depuração.
Ponha um breakpoint na linha qryExecucao.Open e qdo parar, tecle Ctrl+F7 e 
coloque a intrução qryExecucao.Sql.getText. Perceba como a query ficou 
fácil de entender e depurar.

var
   sSql : String;
begin
   sSql := ' select ' + #13;
   sSql := sSql + 'MENSAL.VENCTO, ' + #13;
   sSql := sSql + 'tabcli.cod, ' + #13;
   sSql := sSql + 'tabcli.nome, ' + #13;
   sSql := sSql + 'tabmen.prec, ' + #13;
   sSql := sSql + 'mensal.tipo ' + #13;
   sSql := sSql + ' from ' + #13;
   sSql := sSql + 'tabcli,tabmen,mensal ' + #13;
   sSql := sSql + ' where ' + #13;
   sSql := sSql + '(tabcli.tabela = tabmen.tab) and ' + #13;
   sSql := sSql + '(tabcli.cod = mensal.cod) and ' + #13;
   sSql := sSql + '( (mensal.vencto = '1/1/2006') and ' + #13;
   sSql := sSql + '  (mensal.vencto = '10/10/2006') and ' + #13;
   sSql := sSql + '  ( extract(month from mensal.vencto)  
extract(month from CURRENT_DATE ) ) ) ' + #13;
   sSql := sSql + ' ORDER BY  ' + #13;
   sSql := sSql + 'MENSAL.VENCTO ' + #13;
   qryExecucao.Close;
   qryExecucao.SQL.Text := sSql;
   qryExecucao.Open;
end;

[ ]'s

- Original Message - 
From: WILLER [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Monday, September 04, 2006 11:25 AM
Subject: [delphi-br] Select muito longo ERRO


Olá a todos. Estou com um problema. Eu uso o Firebird e Delphi 7, preciso 
usar uma string SQL (select), mas quando vou compilar o Delphi reclama que a 
string deve ter no máximo 255 caracteres. Alguém sabe como contornar isso?
Qualquer sugestão será de grande ajuda.

String: select MENSAL.VENCTO,tabcli.cod,tabcli.nome,tabmen.prec,mensal.tipo 
from tabcli,tabmen,mensal where 
(tabcli.tabela=tabmen.tab)and(tabcli.cod=mensal.cod)and( 
(mensal.vencto='1/1/2006') and (mensal.vencto='10/10/2006')and( 
extract(month from mensal.vencto)extract(month from CURRENT_DATE ) ) ) 
ORDER BY  MENSAL.VENCTO




Willer Alves da Costa.

[As partes desta mensagem que não continham texto foram removidas]



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



Links do Yahoo! Grupos










-- 
 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

 





Re: [delphi-br] Select muito longo ERRO

2006-09-04 Por tôpico WILLER
Valeu pela dica. Consegui resolver o problema. E agora meu select ficou 
organizado.

[]s
Willer Alves
  - Original Message - 
  From: Andre Mesquita 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, September 04, 2006 12:03 PM
  Subject: Re: [delphi-br] Select muito longo ERRO


  Além de funcionar deixa seu código mais claro e facilita uma depuração.
  Ponha um breakpoint na linha qryExecucao.Open e qdo parar, tecle Ctrl+F7 e 
  coloque a intrução qryExecucao.Sql.getText. Perceba como a query ficou 
  fácil de entender e depurar.

  var
 sSql : String;
  begin
 sSql := ' select ' + #13;
 sSql := sSql + 'MENSAL.VENCTO, ' + #13;
 sSql := sSql + 'tabcli.cod, ' + #13;
 sSql := sSql + 'tabcli.nome, ' + #13;
 sSql := sSql + 'tabmen.prec, ' + #13;
 sSql := sSql + 'mensal.tipo ' + #13;
 sSql := sSql + ' from ' + #13;
 sSql := sSql + 'tabcli,tabmen,mensal ' + #13;
 sSql := sSql + ' where ' + #13;
 sSql := sSql + '(tabcli.tabela = tabmen.tab) and ' + #13;
 sSql := sSql + '(tabcli.cod = mensal.cod) and ' + #13;
 sSql := sSql + '( (mensal.vencto = '1/1/2006') and ' + #13;
 sSql := sSql + '  (mensal.vencto = '10/10/2006') and ' + #13;
 sSql := sSql + '  ( extract(month from mensal.vencto)  
  extract(month from CURRENT_DATE ) ) ) ' + #13;
 sSql := sSql + ' ORDER BY  ' + #13;
 sSql := sSql + 'MENSAL.VENCTO ' + #13;
 qryExecucao.Close;
 qryExecucao.SQL.Text := sSql;
 qryExecucao.Open;
  end;

  [ ]'s

  - Original Message - 
  From: WILLER [EMAIL PROTECTED]
  To: delphi-br@yahoogrupos.com.br
  Sent: Monday, September 04, 2006 11:25 AM
  Subject: [delphi-br] Select muito longo ERRO


  Olá a todos. Estou com um problema. Eu uso o Firebird e Delphi 7, preciso 
  usar uma string SQL (select), mas quando vou compilar o Delphi reclama que a 
  string deve ter no máximo 255 caracteres. Alguém sabe como contornar isso?
  Qualquer sugestão será de grande ajuda.

  String: select MENSAL.VENCTO,tabcli.cod,tabcli.nome,tabmen.prec,mensal.tipo 
  from tabcli,tabmen,mensal where 
  (tabcli.tabela=tabmen.tab)and(tabcli.cod=mensal.cod)and( 
  (mensal.vencto='1/1/2006') and (mensal.vencto='10/10/2006')and( 
  extract(month from mensal.vencto)extract(month from CURRENT_DATE ) ) ) 
  ORDER BY  MENSAL.VENCTO




  Willer Alves da Costa.

  [As partes desta mensagem que não continham texto foram removidas]



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



  Links do Yahoo! Grupos








   

  __ Informação do NOD32 1.1683 (20060728) __

  Esta mensagem foi verificada pelo NOD32 Sistema Antivírus
  http://www.nod32.com.br


[As partes desta mensagem que não continham texto foram removidas]



-- 
 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

 





Re: [delphi-br] Select Envolvendo Data

2006-08-25 Por tôpico Andre Mesquita
Oracle:

SELECT * FROM CLIENTE WHERE DATA_CADASTRO  SYSDATE

MySQL

SELECT * FROM CLIENTE WHERE DATA_CADASTRO  now()

[ ]'s

- Original Message - 
From: Marcos André [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, August 24, 2006 11:02 AM
Subject: RES: [delphi-br] Select Envolvendo Data


Qual o banco de dados?





Um Abraço



  ____
 /  \ /| |'-.
.\__/ || |   |
 _ /  `._ \|_|_.-'
| /  \__.`=._) (_   Marcos André
|/ ._/  ||
|'.  `\ | | Analista de Sistema
;/ / | | Easy Corporation
 ) /_/| |.---.|  http://www.e-easy.com.br/ www.e-easy.com.br |
http://www.eassyxp.com.br/ www.eassyxp.com.br
'  `-` '  msn:  mailto:[EMAIL PROTECTED]
[EMAIL PROTECTED]

Desenvolvimento e hospedagem de sites apartir de R$ 4,00
Planos profissionais com qualidade.
Consulte nossos planos:  http://www.e-easy.com.br/ www.e-easy.com.br
Desenvolvimento de sistemas e sistemas prontos para comercializar,
ferramentas para desenvolvedores e muito mais:  http://www.easyxp.com.br/
www.easyxp.com.br.

  _

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Cleiton
Enviada em: quinta-feira, 24 de agosto de 2006 10:46
Para: Delhpi
Assunto: [delphi-br] Select Envolvendo Data



Olá pessoal...

Estou com uma pequena dificuldade em fazer uma pesquisa no banco envolvendo
data.

Queria fazer uma pesquisa onde a condição seria um campo do tipo data
inferior a data atual, pegando essa data atual do banco.

Por exemplo:

SELECT * FROM CLIENTE WHERE DATA_CADASTRO  DATA_ATUAL

Como pegar essa data atual do banco?

Preciso fazer isso em MySql 4.1 e Oracle 9.

Um grande abraço a todos

Cleiton
-- 
Esta mensagem foi verificada pelo sistema de antivírus e
acredita-se estar livre de perigo.



[As partes desta mensagem que não continham texto foram removidas]





[As partes desta mensagem que não continham texto foram removidas]



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



Links do Yahoo! Grupos









-- 
 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

 





[delphi-br] Select Envolvendo Data

2006-08-24 Por tôpico Cleiton
Olá pessoal...

Estou com uma pequena dificuldade em fazer uma pesquisa no banco envolvendo 
data.

Queria fazer uma pesquisa onde a condição seria um campo do tipo data inferior 
a data atual, pegando essa data atual do banco.

Por exemplo:

SELECT * FROM CLIENTE WHERE DATA_CADASTRO  DATA_ATUAL

Como pegar essa data atual do banco?

Preciso fazer isso em MySql 4.1 e Oracle 9.

Um grande abraço a todos

Cleiton
-- 
Esta mensagem foi verificada pelo sistema de antivírus e
 acredita-se estar livre de perigo.



[As partes desta mensagem que não continham texto foram removidas]



-- 
 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

 




Re: [delphi-br] Select Envolvendo Data

2006-08-24 Por tôpico Eduardo
no mysql é Now() e no Oracle é SysDate

exemplo:
MySQL:
   select Now() as Data;
   select * from tabela where data   Now()
Oracle:
   select sysdate from dual
   select * from tabela where data  sysdate


Eduardo


Cleiton escreveu:
 Olá pessoal...

 Estou com uma pequena dificuldade em fazer uma pesquisa no banco 
 envolvendo data.

 Queria fazer uma pesquisa onde a condição seria um campo do tipo data 
 inferior a data atual, pegando essa data atual do banco.

 Por exemplo:

 SELECT * FROM CLIENTE WHERE DATA_CADASTRO  DATA_ATUAL

 Como pegar essa data atual do banco?

 Preciso fazer isso em MySql 4.1 e Oracle 9.

 Um grande abraço a todos

 Cleiton
 -- 
 Esta mensagem foi verificada pelo sistema de antivírus e
 acredita-se estar livre de perigo.



 [As partes desta mensagem que não continham texto foram removidas]

  






___ 
Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar 
seu conhecimento? Experimente o Yahoo! Respostas !
http://br.answers.yahoo.com/


-- 
 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

 




Re: [delphi-br] Select Envolvendo Data

2006-08-24 Por tôpico Henry Maltz Zylbersztejn
Cleiton, é só fazer o seguinte:

SELECT * FROM CLIENTE WHERE DATA_CADASTRO  sysdate


abraco

On 8/24/06, Cleiton [EMAIL PROTECTED] wrote:

  Olá pessoal...

 Estou com uma pequena dificuldade em fazer uma pesquisa no banco
 envolvendo data.

 Queria fazer uma pesquisa onde a condição seria um campo do tipo data
 inferior a data atual, pegando essa data atual do banco.

 Por exemplo:

 SELECT * FROM CLIENTE WHERE DATA_CADASTRO  DATA_ATUAL

 Como pegar essa data atual do banco?

 Preciso fazer isso em MySql 4.1 e Oracle 9.

 Um grande abraço a todos

 Cleiton
 --
 Esta mensagem foi verificada pelo sistema de antivírus e
 acredita-se estar livre de perigo.



 [As partes desta mensagem que não continham texto foram removidas]

 



[As partes desta mensagem que não continham texto foram removidas]



-- 
 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

 





RES: [delphi-br] Select Envolvendo Data

2006-08-24 Por tôpico Marcos André
Qual o banco de dados?

 

 

Um Abraço

 

  ____
 /  \ /| |'-.
.\__/ || |   |
 _ /  `._ \|_|_.-'
| /  \__.`=._) (_   Marcos André
|/ ._/  || 
|'.  `\ | | Analista de Sistema 
;/ / | | Easy Corporation
 ) /_/| |.---.|  http://www.e-easy.com.br/ www.e-easy.com.br |
http://www.eassyxp.com.br/ www.eassyxp.com.br  
'  `-` '  msn:  mailto:[EMAIL PROTECTED]
[EMAIL PROTECTED] 

Desenvolvimento e hospedagem de sites apartir de R$ 4,00
Planos profissionais com qualidade. 
Consulte nossos planos:  http://www.e-easy.com.br/ www.e-easy.com.br
Desenvolvimento de sistemas e sistemas prontos para comercializar,
ferramentas para desenvolvedores e muito mais:  http://www.easyxp.com.br/
www.easyxp.com.br.

  _  

De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Cleiton
Enviada em: quinta-feira, 24 de agosto de 2006 10:46
Para: Delhpi
Assunto: [delphi-br] Select Envolvendo Data

 

Olá pessoal...

Estou com uma pequena dificuldade em fazer uma pesquisa no banco envolvendo
data.

Queria fazer uma pesquisa onde a condição seria um campo do tipo data
inferior a data atual, pegando essa data atual do banco.

Por exemplo:

SELECT * FROM CLIENTE WHERE DATA_CADASTRO  DATA_ATUAL

Como pegar essa data atual do banco?

Preciso fazer isso em MySql 4.1 e Oracle 9.

Um grande abraço a todos

Cleiton
-- 
Esta mensagem foi verificada pelo sistema de antivírus e
acredita-se estar livre de perigo.



[As partes desta mensagem que não continham texto foram removidas]

 



[As partes desta mensagem que não continham texto foram removidas]



-- 
 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

 




Re: [delphi-br] Select Complexo e Complicado

2006-08-23 Por tôpico Jean
Faça um IF e adicione a pesquisa por profissão somente se vc informar algum 
codigo na consulta

if ed_cd_profissao  '' then
  sql.add(' and campo ' + ed_cd_profissao.text)
e pra fechar:
sql.add(' order by )

Entenda que para isto funcionar voce nao vai poder passar como parametro e sim 
atraves do ADD

bye
Jean


- Original Message - 
  From: Jeferson Adoryan 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, August 22, 2006 5:52 PM
  Subject: [delphi-br] Select Complexo e Complicado


  Boa tarde pessoal
  Estou fazendo um select onde eu trago os dados do contribuinte (para alguns 
dados tenho tabelas auxiliares, como profissao, bairro, cidade, rua). Nesse 
select, eu posso localizar por profissao, rua, bairro, cidade, cep, 
estado_civil, aposentado e sexo, posso ter todas as opcoes, algumas ou apenas 
uma.
  Segue abaixo um exemplo que esta quase funcionando, o problema eh quando os 
campos chave estrangeira na tabela contribuinte sao NULL. Quando o usuario nao 
seleciona profissao por exemplo, passo '%' como parametro.

  select c.CD_CLIENTE, c.NOME, c.NUMERO, c.ESTADO, c.CEP, c.DATA_NASCIMENTO, 
c.TELEFONE1, c.TELEFONE2, c.E_MAIL1, c.E_MAIL2, c.ESTADO_CIVIL, c.APOSENTADO, 
p.DESCRICAO, cd.CIDADE, b.BAIRRO, r.RUA, 
  CASE
WHEN c.SEXO = 'M' then 'Masculino'
else 'Feminino'
end as SEXO,
  CASE
WHEN c.APOSENTADO = 'S' then 'Sim'
else 'Não'
end as APOSENTADO 
  from 
 GCCADASTRO c, GCPROFISSAO p, GCCIDADE cd, GCBAIRRO b, GCRUA r 
  where 
(p.DESCRICAO like (:profissao))
  and (c.PROFISSAO = p.CD_CONTROLE)
  and (c.CIDADE = cd.CD_CIDADE)
  and (c.BAIRRO = b.CD_BAIRRO)
  and (c.RUA = r.CD_RUA)
  and (upper(b.BAIRRO) like upper(:bairro))
  and (upper(cd.CIDADE) like upper(:cidade))
  and (upper(r.RUA) like upper(:rua))
  and (upper(c.CEP) like upper(:cep))
  and (c.SEXO like :sexo)
  and (upper(c.ESTADO_CIVIL) like upper(:estcivil))
  and (c.APOSENTADO like :apos)
  order by c.NOME

  como eu poderia melhorar esse select??

  Obrigado a todos


  ___
  Jeferson Adoryan
  Técnico em Desenvolvimento de Software
  Objetiva Informática LTDA
  Fone: (55) 3375 3828
  Celular: (55) 8115 4544
  Linux Counter #404063
  Home Page: http://adoryan.byethost24.com
  =
  www.softtotal.com.br
  www.firehost.com.br

  Panambi - RS
  
  -
  Yahoo! Search
  Música para ver e ouvir: You're Beautiful, do James Blunt

  [As partes desta mensagem que não continham texto foram removidas]

   


--


  Internal Virus Database is out-of-date.
  Checked by AVG Free Edition.
  Version: 7.1.405 / Virus Database: 268.10.8/415 - Release Date: 09/08/06


[As partes desta mensagem que não continham texto foram removidas]



-- 
 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

 




Re: [delphi-br] Select Complexo e Complicado

2006-08-23 Por tôpico Jeferson Adoryan
Valeu, vou testar essa ideia e a do Danilo, depois posto os resultados.

Jean [EMAIL PROTECTED] escreveu:Faça um IF e adicione a pesquisa por 
profissão somente se vc informar algum codigo na consulta
 
 if ed_cd_profissao  '' then
   sql.add(' and campo ' + ed_cd_profissao.text)
 e pra fechar:
 sql.add(' order by )
 
 Entenda que para isto funcionar voce nao vai poder passar como parametro e sim 
atraves do ADD
 
 bye
 Jean
 
 
 - Original Message - 
   From: Jeferson Adoryan 
   To: delphi-br@yahoogrupos.com.br 
   Sent: Tuesday, August 22, 2006 5:52 PM
   Subject: [delphi-br] Select Complexo e Complicado
 
 
   Boa tarde pessoal
   Estou fazendo um select onde eu trago os dados do contribuinte (para alguns 
dados tenho tabelas auxiliares, como profissao, bairro, cidade, rua). Nesse 
select, eu posso localizar por profissao, rua, bairro, cidade, cep, 
estado_civil, aposentado e sexo, posso ter todas as opcoes, algumas ou apenas 
uma.
   Segue abaixo um exemplo que esta quase funcionando, o problema eh quando os 
campos chave estrangeira na tabela contribuinte sao NULL. Quando o usuario nao 
seleciona profissao por exemplo, passo '%' como parametro.
 
   select c.CD_CLIENTE, c.NOME, c.NUMERO, c.ESTADO, c.CEP, c.DATA_NASCIMENTO, 
c.TELEFONE1, c.TELEFONE2, c.E_MAIL1, c.E_MAIL2, c.ESTADO_CIVIL, c.APOSENTADO, 
p.DESCRICAO, cd.CIDADE, b.BAIRRO, r.RUA, 
   CASE
 WHEN c.SEXO = 'M' then 'Masculino'
 else 'Feminino'
 end as SEXO,
   CASE
 WHEN c.APOSENTADO = 'S' then 'Sim'
 else 'Não'
 end as APOSENTADO 
   from 
  GCCADASTRO c, GCPROFISSAO p, GCCIDADE cd, GCBAIRRO b, GCRUA r 
   where 
 (p.DESCRICAO like (:profissao))
   and (c.PROFISSAO = p.CD_CONTROLE)
   and (c.CIDADE = cd.CD_CIDADE)
   and (c.BAIRRO = b.CD_BAIRRO)
   and (c.RUA = r.CD_RUA)
   and (upper(b.BAIRRO) like upper(:bairro))
   and (upper(cd.CIDADE) like upper(:cidade))
   and (upper(r.RUA) like upper(:rua))
   and (upper(c.CEP) like upper(:cep))
   and (c.SEXO like :sexo)
   and (upper(c.ESTADO_CIVIL) like upper(:estcivil))
   and (c.APOSENTADO like :apos)
   order by c.NOME
 
   como eu poderia melhorar esse select??
 
   Obrigado a todos
 
 
   ___
   Jeferson Adoryan
   Técnico em Desenvolvimento de Software
   Objetiva Informática LTDA
   Fone: (55) 3375 3828
   Celular: (55) 8115 4544
   Linux Counter #404063
   Home Page: http://adoryan.byethost24.com
   =
   www.softtotal.com.br
   www.firehost.com.br
 
   Panambi - RS
   
   -
   Yahoo! Search
   Música para ver e ouvir: You're Beautiful, do James Blunt
 
   [As partes desta mensagem que não continham texto foram removidas]
 

 
 
 --
 
 
   Internal Virus Database is out-of-date.
   Checked by AVG Free Edition.
   Version: 7.1.405 / Virus Database: 268.10.8/415 - Release Date: 09/08/06
 
 
 [As partes desta mensagem que não continham texto foram removidas]
 
   


___
Jeferson Adoryan
Técnico em Desenvolvimento de Software
Objetiva Informática LTDA
Fone: (55) 3375 3828
Celular: (55) 8115 4544
Linux Counter #404063
Home Page: http://adoryan.byethost24.com
=
www.softtotal.com.br
www.firehost.com.br

Panambi - RS

-
 Você quer respostas para suas perguntas? Ou você sabe muito e quer 
compartilhar seu conhecimento? Experimente o Yahoo! Respostas!

[As partes desta mensagem que não continham texto foram removidas]



-- 
 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

 




Re: [delphi-br] Select Complexo e Complicado

2006-08-23 Por tôpico Jeferson Adoryan
O banco é Firebird 1.5.3
Bom, vou testar as dicas que me passou. Vou tentar tambem fazer o select 
dinamico de acordo com a escolha. Depois posto o resultado

Assim, o campo sexo e aposentado sempre tem algum valor, o maior problema é com 
profissao.

Valeu

Danilo Rogério [EMAIL PROTECTED] escreveu:Jeferson, ajudaria muito se 
você dissesse:
 1 -  qual banco está utilizando, pois existem comandos específicos que 
poderiam ajudar
 ... Mas vamos lá.
 
 1º Passo: A grosso modo, sugiro você montar seu select em tempo de execução, 
se for possível, pois vc eliminaria esses likes desnecessários.
 
 2º Passo: Em relação aos campos SEXO, APOSENTADO. Eles só aceitam M ou F, e S 
ou N, respectivamente, certo?
 Então, vc poderia substituí-los por:
   and (c.SEXO = COALESCE(:SexoPessoa,c.Sexo)) // Firebird
 
 ou entao
 
   and (c.SEXO = DECODE(:SexoPessoa,Null,C.Sexo,:SexoPessoa)) // Oracle
  
 Neste caso, vc esta dizendo que se o Parametro(:SexoPessoa) for igual a nulo, 
vc ira comparar C.Sexo = C.Sexo, trazendo todos os registros... Faça isso com o 
campo Aposentado também.
 
 3º Passo: Para os campos de Like faça assim:
 
   and (upper(b.BAIRRO) like (coalesce(:bairro,upper(b.bairro))) //Firebird
   and (upper(b.BAIRRO) like (decode(:bairro,null,b.bairro,:bairro)) // Oracle
 
 Qual é a ideia neste segundo passo: se o usuário NÃO informar o bairro(ou 
seja, nulo), ficara assim: and (upper(b.bairro) like upper(b.bairro). Novamente 
comparando o campo com ele mesmo. Agora, caso ele informe vc concatena o % no 
final do seu parâmetro.
 Jeferson, veja se essas dicas vão melhorar sua performance, e poste a 
resposta, pois muita gente tem esse tipo de problema, e com certeza, fica uma 
solução prática(caso a performance seja satisfatória).
 
 No mais, boa sorte, e aguardamos resposta...
 Danilo Rogério
 
 
 
 Jeferson Adoryan [EMAIL PROTECTED] escreveu:Boa tarde pessoal
  Estou fazendo um select onde eu trago os dados do contribuinte (para alguns 
dados tenho tabelas auxiliares, como profissao, bairro, cidade, rua). Nesse 
select, eu posso localizar por profissao, rua, bairro, cidade, cep, 
estado_civil, aposentado e sexo, posso ter todas as opcoes, algumas ou apenas 
uma.
  Segue abaixo um exemplo que esta quase funcionando, o problema eh quando os 
campos chave estrangeira na tabela contribuinte sao NULL. Quando o usuario nao 
seleciona profissao por exemplo, passo '%' como parametro.
  
  select c.CD_CLIENTE, c.NOME, c.NUMERO, c.ESTADO, c.CEP, c.DATA_NASCIMENTO, 
c.TELEFONE1, c.TELEFONE2, c.E_MAIL1, c.E_MAIL2, c.ESTADO_CIVIL, c.APOSENTADO, 
p.DESCRICAO, cd.CIDADE, b.BAIRRO, r.RUA, 
  CASE
WHEN c.SEXO = 'M' then 'Masculino'
else 'Feminino'
end as SEXO,
  CASE
WHEN c.APOSENTADO = 'S' then 'Sim'
else 'Não'
end as APOSENTADO 
  from 
 GCCADASTRO c, GCPROFISSAO p, GCCIDADE cd, GCBAIRRO b, GCRUA r 
  where 
(p.DESCRICAO like (:profissao))
   and (c.PROFISSAO = p.CD_CONTROLE)
   and (c.CIDADE = cd.CD_CIDADE)
   and (c.BAIRRO = b.CD_BAIRRO)
   and (c.RUA = r.CD_RUA)
   and (upper(b.BAIRRO) like upper(:bairro))
   and (upper(cd.CIDADE) like upper(:cidade))
   and (upper(r.RUA) like upper(:rua))
   and (upper(c.CEP) like upper(:cep))
   and (c.SEXO like :sexo)
   and (upper(c.ESTADO_CIVIL) like upper(:estcivil))
   and (c.APOSENTADO like :apos)
   order by c.NOME
  
  como eu poderia melhorar esse select??
  
  Obrigado a todos
  
  
  ___
  Jeferson Adoryan
  Técnico em Desenvolvimento de Software
  Objetiva Informática LTDA
  Fone: (55) 3375 3828
  Celular: (55) 8115 4544
  Linux Counter #404063
  Home Page: http://adoryan.byethost24.com
  =
  www.softtotal.com.br
  www.firehost.com.br
  
  Panambi - RS
   
  -
   Yahoo! Search
   Música para ver e ouvir: You're Beautiful, do James Blunt
  
  [As partes desta mensagem que não continham texto foram removidas]
  

 
  
 -
  Yahoo! Search
  Música para ver e ouvir: You're Beautiful, do James Blunt
 
 [As partes desta mensagem que não continham texto foram removidas]
 
   


___
Jeferson Adoryan
Técnico em Desenvolvimento de Software
Objetiva Informática LTDA
Fone: (55) 3375 3828
Celular: (55) 8115 4544
Linux Counter #404063
Home Page: http://adoryan.byethost24.com
=
www.softtotal.com.br
www.firehost.com.br

Panambi - RS

-
 Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. 
Registre seu aparelho agora!

[As partes desta mensagem que não continham texto foram removidas]



-- 
 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 

Re: [delphi-br] Select Complexo e Complicado

2006-08-23 Por tôpico Jeferson Adoryan
Bom pessoal, primeiro agradeco pelas dicas passadas. Estou colocando a solucao 
que cheguei para o meu problema.

Usei um sql dinamico, onde eu ia adicionando os wheres...

ficou mais ou menos assim...

comando := 'select c.CD_CLIENTE, c.NOME, c.NUMERO, c.ESTADO, c.CEP, 
c.DATA_NASCIMENTO, '+
'c.TELEFONE1, c.TELEFONE2, c.E_MAIL1, c.E_MAIL2, 
c.ESTADO_CIVIL, c.APOSENTADO, '+
'(select p.DESCRICAO from gcprofissao p where p.cd_controle = 
c.profissao) as prof, '+
'(select cd.CIDADE from gccidade cd where cd.cd_cidade = 
c.cidade) as cidade, '+
'(select b.BAIRRO from gcbairro b where b.cd_bairro = c.bairro) 
as bairro, '+
'(select r.rua from gcrua r where r.cd_rua = c.rua) as rua, '+
'CASE '+
'  WHEN c.SEXO = ''M'' then ''Masculino'' '+
'  else ''Feminino'' '+
'  end as SEXO, '+
'CASE '+
'  WHEN c.APOSENTADO = ''S'' then ''Sim'' '+
'  else ''Não'' '+
'  end as APOSENTADO '+
'from GCCADASTRO c ';

Depois eu fui testando as escolhas do usuario e adicionando as condicoes...

if CbxProfissao.ItemIndex  0 then
begin
  comando2 := comando2 +  '(c.profissao = (select p1.cd_controle from 
gcprofissao p1 where p1.descricao like ('''+ CbxProfissao.Text +''')))';
  //proximo comando precisa de and
  coloca_and := true;
end;
//verifica rua
if CmbxRua.ItemIndex  0 then
begin
  if coloca_and then
comando2 := comando2 + ' and ';
  comando2 := comando2 +  '(c.rua = (select r1.cd_rua from gcrua r1 where 
r1.rua like ('''+ CmbxRua.Text +''')))';
  //proximo comando precisa de and
  coloca_and := true;
end;

e assim por diante...
Funcionou numa boa, e acessando por rede em um banco com mais de 50.000 reg 
fico satisfarotio...

Jeferson Adoryan [EMAIL PROTECTED] escreveu:O banco é Firebird 1.5.3
 Bom, vou testar as dicas que me passou. Vou tentar tambem fazer o select 
dinamico de acordo com a escolha. Depois posto o resultado
 
 Assim, o campo sexo e aposentado sempre tem algum valor, o maior problema é 
com profissao.
 
 Valeu
 
 Danilo Rogério [EMAIL PROTECTED] escreveu:Jeferson, ajudaria muito se 
você dissesse:
  1 -  qual banco está utilizando, pois existem comandos específicos que 
poderiam ajudar
  ... Mas vamos lá.
  
  1º Passo: A grosso modo, sugiro você montar seu select em tempo de execução, 
se for possível, pois vc eliminaria esses likes desnecessários.
  
  2º Passo: Em relação aos campos SEXO, APOSENTADO. Eles só aceitam M ou F, e S 
ou N, respectivamente, certo?
  Então, vc poderia substituí-los por:
and (c.SEXO = COALESCE(:SexoPessoa,c.Sexo)) // Firebird
  
  ou entao
  
and (c.SEXO = DECODE(:SexoPessoa,Null,C.Sexo,:SexoPessoa)) // Oracle
   
  Neste caso, vc esta dizendo que se o Parametro(:SexoPessoa) for igual a nulo, 
vc ira comparar C.Sexo = C.Sexo, trazendo todos os registros... Faça isso com o 
campo Aposentado também.
  
  3º Passo: Para os campos de Like faça assim:
  
and (upper(b.BAIRRO) like (coalesce(:bairro,upper(b.bairro))) //Firebird
and (upper(b.BAIRRO) like (decode(:bairro,null,b.bairro,:bairro)) // Oracle
  
  Qual é a ideia neste segundo passo: se o usuário NÃO informar o bairro(ou 
seja, nulo), ficara assim: and (upper(b.bairro) like upper(b.bairro). Novamente 
comparando o campo com ele mesmo. Agora, caso ele informe vc concatena o % no 
final do seu parâmetro.
  Jeferson, veja se essas dicas vão melhorar sua performance, e poste a 
resposta, pois muita gente tem esse tipo de problema, e com certeza, fica uma 
solução prática(caso a performance seja satisfatória).
  
  No mais, boa sorte, e aguardamos resposta...
  Danilo Rogério
  
  
  
  Jeferson Adoryan [EMAIL PROTECTED] escreveu:Boa tarde pessoal
   Estou fazendo um select onde eu trago os dados do contribuinte (para alguns 
dados tenho tabelas auxiliares, como profissao, bairro, cidade, rua). Nesse 
select, eu posso localizar por profissao, rua, bairro, cidade, cep, 
estado_civil, aposentado e sexo, posso ter todas as opcoes, algumas ou apenas 
uma.
   Segue abaixo um exemplo que esta quase funcionando, o problema eh quando os 
campos chave estrangeira na tabela contribuinte sao NULL. Quando o usuario nao 
seleciona profissao por exemplo, passo '%' como parametro.
   
   select c.CD_CLIENTE, c.NOME, c.NUMERO, c.ESTADO, c.CEP, c.DATA_NASCIMENTO, 
c.TELEFONE1, c.TELEFONE2, c.E_MAIL1, c.E_MAIL2, c.ESTADO_CIVIL, c.APOSENTADO, 
p.DESCRICAO, cd.CIDADE, b.BAIRRO, r.RUA, 
   CASE
 WHEN c.SEXO = 'M' then 'Masculino'
 else 'Feminino'
 end as SEXO,
   CASE
 WHEN c.APOSENTADO = 'S' then 'Sim'
 else 'Não'
 end as APOSENTADO 
   from 
  GCCADASTRO c, GCPROFISSAO p, GCCIDADE cd, GCBAIRRO b, GCRUA r 
   where 
 (p.DESCRICAO like (:profissao))
and (c.PROFISSAO = p.CD_CONTROLE)
and (c.CIDADE = 

[delphi-br] Select Complexo e Complicado

2006-08-22 Por tôpico Jeferson Adoryan
Boa tarde pessoal
Estou fazendo um select onde eu trago os dados do contribuinte (para alguns 
dados tenho tabelas auxiliares, como profissao, bairro, cidade, rua). Nesse 
select, eu posso localizar por profissao, rua, bairro, cidade, cep, 
estado_civil, aposentado e sexo, posso ter todas as opcoes, algumas ou apenas 
uma.
Segue abaixo um exemplo que esta quase funcionando, o problema eh quando os 
campos chave estrangeira na tabela contribuinte sao NULL. Quando o usuario nao 
seleciona profissao por exemplo, passo '%' como parametro.

select c.CD_CLIENTE, c.NOME, c.NUMERO, c.ESTADO, c.CEP, c.DATA_NASCIMENTO, 
c.TELEFONE1, c.TELEFONE2, c.E_MAIL1, c.E_MAIL2, c.ESTADO_CIVIL, c.APOSENTADO, 
p.DESCRICAO, cd.CIDADE, b.BAIRRO, r.RUA, 
CASE
  WHEN c.SEXO = 'M' then 'Masculino'
  else 'Feminino'
  end as SEXO,
CASE
  WHEN c.APOSENTADO = 'S' then 'Sim'
  else 'Não'
  end as APOSENTADO 
from 
   GCCADASTRO c, GCPROFISSAO p, GCCIDADE cd, GCBAIRRO b, GCRUA r 
where 
  (p.DESCRICAO like (:profissao))
 and (c.PROFISSAO = p.CD_CONTROLE)
 and (c.CIDADE = cd.CD_CIDADE)
 and (c.BAIRRO = b.CD_BAIRRO)
 and (c.RUA = r.CD_RUA)
 and (upper(b.BAIRRO) like upper(:bairro))
 and (upper(cd.CIDADE) like upper(:cidade))
 and (upper(r.RUA) like upper(:rua))
 and (upper(c.CEP) like upper(:cep))
 and (c.SEXO like :sexo)
 and (upper(c.ESTADO_CIVIL) like upper(:estcivil))
 and (c.APOSENTADO like :apos)
 order by c.NOME

como eu poderia melhorar esse select??

Obrigado a todos


___
Jeferson Adoryan
Técnico em Desenvolvimento de Software
Objetiva Informática LTDA
Fone: (55) 3375 3828
Celular: (55) 8115 4544
Linux Counter #404063
Home Page: http://adoryan.byethost24.com
=
www.softtotal.com.br
www.firehost.com.br

Panambi - RS

-
 Yahoo! Search
 Música para ver e ouvir: You're Beautiful, do James Blunt

[As partes desta mensagem que não continham texto foram removidas]



-- 
 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

 




Re: [delphi-br] Select Complexo e Complicado

2006-08-22 Por tôpico Danilo Rogério
Jeferson, ajudaria muito se você dissesse:
1 -  qual banco está utilizando, pois existem comandos específicos que poderiam 
ajudar
... Mas vamos lá.

1º Passo: A grosso modo, sugiro você montar seu select em tempo de execução, se 
for possível, pois vc eliminaria esses likes desnecessários.

2º Passo: Em relação aos campos SEXO, APOSENTADO. Eles só aceitam M ou F, e S 
ou N, respectivamente, certo?
Então, vc poderia substituí-los por:
  and (c.SEXO = COALESCE(:SexoPessoa,c.Sexo)) // Firebird

ou entao

  and (c.SEXO = DECODE(:SexoPessoa,Null,C.Sexo,:SexoPessoa)) // Oracle
 
Neste caso, vc esta dizendo que se o Parametro(:SexoPessoa) for igual a nulo, 
vc ira comparar C.Sexo = C.Sexo, trazendo todos os registros... Faça isso com o 
campo Aposentado também.

3º Passo: Para os campos de Like faça assim:

  and (upper(b.BAIRRO) like (coalesce(:bairro,upper(b.bairro))) //Firebird
  and (upper(b.BAIRRO) like (decode(:bairro,null,b.bairro,:bairro)) // Oracle

Qual é a ideia neste segundo passo: se o usuário NÃO informar o bairro(ou seja, 
nulo), ficara assim: and (upper(b.bairro) like upper(b.bairro). Novamente 
comparando o campo com ele mesmo. Agora, caso ele informe vc concatena o % no 
final do seu parâmetro.
Jeferson, veja se essas dicas vão melhorar sua performance, e poste a resposta, 
pois muita gente tem esse tipo de problema, e com certeza, fica uma solução 
prática(caso a performance seja satisfatória).

No mais, boa sorte, e aguardamos resposta...
Danilo Rogério



Jeferson Adoryan [EMAIL PROTECTED] escreveu:Boa tarde pessoal
 Estou fazendo um select onde eu trago os dados do contribuinte (para alguns 
dados tenho tabelas auxiliares, como profissao, bairro, cidade, rua). Nesse 
select, eu posso localizar por profissao, rua, bairro, cidade, cep, 
estado_civil, aposentado e sexo, posso ter todas as opcoes, algumas ou apenas 
uma.
 Segue abaixo um exemplo que esta quase funcionando, o problema eh quando os 
campos chave estrangeira na tabela contribuinte sao NULL. Quando o usuario nao 
seleciona profissao por exemplo, passo '%' como parametro.
 
 select c.CD_CLIENTE, c.NOME, c.NUMERO, c.ESTADO, c.CEP, c.DATA_NASCIMENTO, 
c.TELEFONE1, c.TELEFONE2, c.E_MAIL1, c.E_MAIL2, c.ESTADO_CIVIL, c.APOSENTADO, 
p.DESCRICAO, cd.CIDADE, b.BAIRRO, r.RUA, 
 CASE
   WHEN c.SEXO = 'M' then 'Masculino'
   else 'Feminino'
   end as SEXO,
 CASE
   WHEN c.APOSENTADO = 'S' then 'Sim'
   else 'Não'
   end as APOSENTADO 
 from 
GCCADASTRO c, GCPROFISSAO p, GCCIDADE cd, GCBAIRRO b, GCRUA r 
 where 
   (p.DESCRICAO like (:profissao))
  and (c.PROFISSAO = p.CD_CONTROLE)
  and (c.CIDADE = cd.CD_CIDADE)
  and (c.BAIRRO = b.CD_BAIRRO)
  and (c.RUA = r.CD_RUA)
  and (upper(b.BAIRRO) like upper(:bairro))
  and (upper(cd.CIDADE) like upper(:cidade))
  and (upper(r.RUA) like upper(:rua))
  and (upper(c.CEP) like upper(:cep))
  and (c.SEXO like :sexo)
  and (upper(c.ESTADO_CIVIL) like upper(:estcivil))
  and (c.APOSENTADO like :apos)
  order by c.NOME
 
 como eu poderia melhorar esse select??
 
 Obrigado a todos
 
 
 ___
 Jeferson Adoryan
 Técnico em Desenvolvimento de Software
 Objetiva Informática LTDA
 Fone: (55) 3375 3828
 Celular: (55) 8115 4544
 Linux Counter #404063
 Home Page: http://adoryan.byethost24.com
 =
 www.softtotal.com.br
 www.firehost.com.br
 
 Panambi - RS
  
 -
  Yahoo! Search
  Música para ver e ouvir: You're Beautiful, do James Blunt
 
 [As partes desta mensagem que não continham texto foram removidas]
 
   


-
 Yahoo! Search
 Música para ver e ouvir: You're Beautiful, do James Blunt

[As partes desta mensagem que não continham texto foram removidas]



-- 
 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

 





[delphi-br] Select em 3 tabelas

2006-07-17 Por tôpico Cristiano Rodrigo Gomes
Olá pessoal, não sei como fazer este select, se alguém puder me ajudar.
Tenho 3 tabelas

COMPRAITENS
CODIGPRODUTO, DATACOMPRA, QTDCOMPRA
0001   , 01/07/2006   , 10
0001   , 02/07/2006   , 05

VENDAITENS
CODIGOPRODUTO, DATAVENDA, QTDVENDIDA
0001   , 02/07/2006   , 02
0001   , 02/07/2006   , 02

AJUSTEITENS
CODIGOPRODUTO, DATACOMPRA, QTDAJUSTE
0001   , 03/07/2006   , 03

- Bem primeiro preciso fazer um select que calcule o saldo anterior a um 
periodo solicitado de um determinado produto.
Por exemplo período solicitado de 02/07/2006 a 03/07/2006 tem que trazer saldo 
de 10, que é o período anterior a 02/07.

- Depois preciso de um select que mostre a movimentação de um produto no 
período solicitado e que me indique a qual tabela pertença, 
para que depois possa calcular o saldo pelo fortes report (isso eu sei hehe).

CODIGPRODUTO, DATACOMPRA, QTDCOMPRA
0001   , 02/07/2006   , 05 - da tabela de compra
0001   , 02/07/2006   , 01 - da tabela de venda
0001   , 02/07/2006   , 01 - da tabela de venda
0001   , 03/07/2006   , 03 - da tabela de ajuste

Se alguém puder me ajudar.

Sds.

Cristiano.

[As partes desta mensagem que não continham texto foram removidas]



-- 
 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

 





[delphi-br] Select em 3 tabelas

2006-07-17 Por tôpico Cristiano Rodrigo Gomes
Olá pessoal, não sei como fazer este select, se alguém puder me ajudar.
Tenho 3 tabelas

COMPRAITENS
CODIGPRODUTO, DATACOMPRA, QTDCOMPRA
0001   , 01/07/2006   , 10
0001   , 02/07/2006   , 05

VENDAITENS
CODIGOPRODUTO, DATAVENDA, QTDVENDIDA
0001   , 02/07/2006   , 02
0001   , 02/07/2006   , 02

AJUSTEITENS
CODIGOPRODUTO, DATACOMPRA, QTDAJUSTE
0001   , 03/07/2006   , 03

- Bem primeiro preciso fazer um select que calcule o saldo anterior a um 
periodo solicitado de um determinado produto.
Por exemplo período solicitado de 02/07/2006 a 03/07/2006 tem que trazer saldo 
de 10, que é o período anterior a 02/07.

- Depois preciso de um select que mostre a movimentação de um produto no 
período solicitado e que me indique a qual tabela pertença, 
para que depois possa calcular o saldo pelo fortes report (isso eu sei hehe).

CODIGPRODUTO, DATACOMPRA, QTDCOMPRA
0001   , 02/07/2006   , 05 - da tabela de compra
0001   , 02/07/2006   , 01 - da tabela de venda
0001   , 02/07/2006   , 01 - da tabela de venda
0001   , 03/07/2006   , 03 - da tabela de ajuste

Se alguém puder me ajudar.

Sds.

Cristiano.

[As partes desta mensagem que não continham texto foram removidas]



-- 
 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

 





Re: [delphi-br] select e update

2006-06-21 Por tôpico Elton
galera jah foi resolvido a parada, 

bastava tirar o suspend da procedure;



  - Original Message - 
  From: Elton 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, June 20, 2006 5:53 PM
  Subject: Re: [delphi-br] select e update


  O CODPRO penso que ele  tem valor do select.
- Original Message - 
From: Elazar Dornelles Ceza 
To: delphi-br@yahoogrupos.com.br 
Sent: Tuesday, June 20, 2006 5:29 PM
Subject: RES: [delphi-br] select e update


Elton

e o CODPRO, tem algum valor quando no loop??

Atenc.
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Elton
Enviada em: terça-feira, 20 de junho de 2006 15:43
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] select e update


vejam o select :

FOR SELECT CODPRO, PREVENPRO
  FROM PRODUTOS
  WHERE CODFOR= :CODFOR_FP
  AND   CODCLAEST BETWEEN  :CODCLAEST_FP1 AND  :CODCLAEST_FP2
  INTO CODPRO, PREVENPRO
  DO
  BEGIN
UPDATE PRODUTOS
SET PREVENPRO = PREVENPRO + (:NOVO_PREVENPRO * PREVENPRO)
WHERE CODPRO = :CODPRO;
 SUSPEND;
  END

tem alguma coisa errada nisso ? porque nao da o update.

UPDATE PRODUTOS
SET PREVENPRO = PREVENPRO + (:NOVO_PREVENPRO * PREVENPRO)
WHERE CODPRO = 1 --  vejam , se
eu colocar  o cod 1, ele da update
 SUSPEND;
  END


[As partes desta mensagem que não continham texto foram removidas]





___ 
Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. 
Registre seu aparelho agora! 
http://br.mobile.yahoo.com/mailalertas/ 


 

  [As partes desta mensagem que não continham texto foram removidas]

   

[As partes desta mensagem que não continham texto foram removidas]



-- 
 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

 





RES: [delphi-br] select e update

2006-06-21 Por tôpico Gilson
Tente Assim:

   UPDATE PRODUTOS
SET PREVENPRO = PREVENPRO + (:NOVO_PREVENPRO * PREVENPRO)
WHERE CODPRO IN (SELECT CODPRO FROM PRODUTOS
WHERE CODFOR= :CODFOR_FP
 AND   CODCLAEST BETWEEN  :CODCLAEST_FP1 AND  :CODCLAEST_FP2);

Sds,


Gilson

-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Elton
Enviada em: terça-feira, 20 de junho de 2006 17:54
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] select e update

O CODPRO penso que ele  tem valor do select.
  - Original Message - 
  From: Elazar Dornelles Ceza 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, June 20, 2006 5:29 PM
  Subject: RES: [delphi-br] select e update


  Elton

  e o CODPRO, tem algum valor quando no loop??

  Atenc.
  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
  Em nome de Elton
  Enviada em: terça-feira, 20 de junho de 2006 15:43
  Para: delphi-br@yahoogrupos.com.br
  Assunto: [delphi-br] select e update


  vejam o select :
  
  FOR SELECT CODPRO, PREVENPRO
FROM PRODUTOS
WHERE CODFOR= :CODFOR_FP
AND   CODCLAEST BETWEEN  :CODCLAEST_FP1 AND  :CODCLAEST_FP2
INTO CODPRO, PREVENPRO
DO
BEGIN
  UPDATE PRODUTOS
  SET PREVENPRO = PREVENPRO + (:NOVO_PREVENPRO * PREVENPRO)
  WHERE CODPRO = :CODPRO;
   SUSPEND;
END

  tem alguma coisa errada nisso ? porque nao da o update.

  UPDATE PRODUTOS
  SET PREVENPRO = PREVENPRO + (:NOVO_PREVENPRO * PREVENPRO)
  WHERE CODPRO = 1 --  vejam , se
  eu colocar  o cod 1, ele da update
   SUSPEND;
END


  [As partes desta mensagem que não continham texto foram removidas]




  
  ___ 
  Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular.
Registre seu aparelho agora! 
  http://br.mobile.yahoo.com/mailalertas/ 


   

[As partes desta mensagem que não continham texto foram removidas]



-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 


 
Links do Yahoo! Grupos




 




-- 
 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

 




Re: [delphi-br] select e update

2006-06-21 Por tôpico Elton
po gilson, o problema do laptop e este jah foi resolvido, ou
vc num le direito os email .



  - Original Message - 
  From: Gilson 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, June 21, 2006 2:36 PM
  Subject: RES: [delphi-br] select e update


  Tente Assim:

 UPDATE PRODUTOS
  SET PREVENPRO = PREVENPRO + (:NOVO_PREVENPRO * PREVENPRO)
  WHERE CODPRO IN (SELECT CODPRO FROM PRODUTOS
  WHERE CODFOR= :CODFOR_FP
   AND   CODCLAEST BETWEEN  :CODCLAEST_FP1 AND  :CODCLAEST_FP2);

  Sds,


  Gilson

  -Mensagem original-
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
  nome de Elton
  Enviada em: terça-feira, 20 de junho de 2006 17:54
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] select e update

  O CODPRO penso que ele  tem valor do select.
- Original Message - 
From: Elazar Dornelles Ceza 
To: delphi-br@yahoogrupos.com.br 
Sent: Tuesday, June 20, 2006 5:29 PM
Subject: RES: [delphi-br] select e update


Elton

e o CODPRO, tem algum valor quando no loop??

Atenc.
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Elton
Enviada em: terça-feira, 20 de junho de 2006 15:43
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] select e update


vejam o select :

FOR SELECT CODPRO, PREVENPRO
  FROM PRODUTOS
  WHERE CODFOR= :CODFOR_FP
  AND   CODCLAEST BETWEEN  :CODCLAEST_FP1 AND  :CODCLAEST_FP2
  INTO CODPRO, PREVENPRO
  DO
  BEGIN
UPDATE PRODUTOS
SET PREVENPRO = PREVENPRO + (:NOVO_PREVENPRO * PREVENPRO)
WHERE CODPRO = :CODPRO;
 SUSPEND;
  END

tem alguma coisa errada nisso ? porque nao da o update.

UPDATE PRODUTOS
SET PREVENPRO = PREVENPRO + (:NOVO_PREVENPRO * PREVENPRO)
WHERE CODPRO = 1 --  vejam , se
eu colocar  o cod 1, ele da update
 SUSPEND;
  END


[As partes desta mensagem que não continham texto foram removidas]





___ 
Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular.
  Registre seu aparelho agora! 
http://br.mobile.yahoo.com/mailalertas/ 


 

  [As partes desta mensagem que não continham texto foram removidas]



  -- 
   FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 



  Links do Yahoo! Grupos







   

[As partes desta mensagem que não continham texto foram removidas]



-- 
 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

 




[delphi-br] select e update

2006-06-20 Por tôpico Elton
vejam o select :

FOR SELECT CODPRO, PREVENPRO
  FROM PRODUTOS
  WHERE CODFOR= :CODFOR_FP
  AND   CODCLAEST BETWEEN  :CODCLAEST_FP1 AND  :CODCLAEST_FP2
  INTO CODPRO, PREVENPRO
  DO
  BEGIN
UPDATE PRODUTOS
SET PREVENPRO = PREVENPRO + (:NOVO_PREVENPRO * PREVENPRO)
WHERE CODPRO = :CODPRO;
 SUSPEND;
  END

tem alguma coisa errada nisso ? porque nao da o update.

UPDATE PRODUTOS
SET PREVENPRO = PREVENPRO + (:NOVO_PREVENPRO * PREVENPRO)
WHERE CODPRO = 1 --  vejam , se eu 
colocar  o cod 1, ele da update
 SUSPEND;
  END


[As partes desta mensagem que não continham texto foram removidas]



-- 
 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

 




RES: [delphi-br] select e update

2006-06-20 Por tôpico Elazar Dornelles Ceza
Elton

e o CODPRO, tem algum valor quando no loop??

Atenc.
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Elton
Enviada em: terça-feira, 20 de junho de 2006 15:43
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] select e update


vejam o select :

FOR SELECT CODPRO, PREVENPRO
  FROM PRODUTOS
  WHERE CODFOR= :CODFOR_FP
  AND   CODCLAEST BETWEEN  :CODCLAEST_FP1 AND  :CODCLAEST_FP2
  INTO CODPRO, PREVENPRO
  DO
  BEGIN
UPDATE PRODUTOS
SET PREVENPRO = PREVENPRO + (:NOVO_PREVENPRO * PREVENPRO)
WHERE CODPRO = :CODPRO;
 SUSPEND;
  END

tem alguma coisa errada nisso ? porque nao da o update.

UPDATE PRODUTOS
SET PREVENPRO = PREVENPRO + (:NOVO_PREVENPRO * PREVENPRO)
WHERE CODPRO = 1 --  vejam , se
eu colocar  o cod 1, ele da update
 SUSPEND;
  END


[As partes desta mensagem que não continham texto foram removidas]

 



___ 
Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. 
Registre seu aparelho agora! 
http://br.mobile.yahoo.com/mailalertas/ 
 



-- 
 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

 





  1   2   >