ActiveDelphi - Índice do Fórum ActiveDelphi
.: O site do programador Delphi! :.
 
 FAQFAQ   PesquisarPesquisar   MembrosMembros   GruposGrupos   RegistrarRegistrar 
 PerfilPerfil   Entrar e ver Mensagens ParticularesEntrar e ver Mensagens Particulares   EntrarEntrar 

Ajuda com comando SQL

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
VDL
Aprendiz
Aprendiz


Registrado: Sábado, 7 de Mai de 2005
Mensagens: 170

MensagemEnviada: Qua Out 19, 2011 8:29 am    Assunto: Ajuda com comando SQL Responder com Citação

Alguém pode ajudar com o comando abaixo, pois na abertura do form o grid está ficando vazio.

TClientDataSet(Ds.DataSet).Close;
TClientDataSet(Ds.DataSet).CommandText := ('SELECT * FROM cadcontrrecebmaterial WHERE QtdeReci > Qtdesaida and Qtdesaida <> null and nfembalagem=' +QuotedStr('N')+'Order By DataRec');
TClientDataSet(Ds.DataSet).Open;

Banco Mysql

Sad Rolling Eyes

VDL
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
imex
Moderador
Moderador


Registrado: Sexta-Feira, 7 de Janeiro de 2011
Mensagens: 11666

MensagemEnviada: Qua Out 19, 2011 8:37 am    Assunto: Responder com Citação

Experimente desta forma:

Código:
TClientDataSet(Ds.DataSet).CommandText := 'SELECT * FROM cadcontrrecebmaterial WHERE ' +
                                          '(QtdeReci > Qtdesaida) and ' +
                                          '(Qtdesaida <> null) and ' +
                                          '(nfembalagem=' + QuotedStr('N') +
                                          ') Order By DataRec';


Espero que ajude.

_________________
Assinatura: Imoveis em Guarulhos para alugar
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
VDL
Aprendiz
Aprendiz


Registrado: Sábado, 7 de Mai de 2005
Mensagens: 170

MensagemEnviada: Qua Out 19, 2011 12:36 pm    Assunto: Responder com Citação

imex,

obrigado pela atenção mas form continua abrindo com o grid vazio

Crying or Very sad

vdl
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
imex
Moderador
Moderador


Registrado: Sexta-Feira, 7 de Janeiro de 2011
Mensagens: 11666

MensagemEnviada: Qua Out 19, 2011 2:09 pm    Assunto: Responder com Citação

Se esta executando sem erro, então a sintaxe da instrução SQL (Select) está correta.
Confirme se a opção poAllowCommandText está igual a true dentro da propriedade Options do DataSetProvider. Se estiver, então não devem existir registros no banco de dados que atendem a todas as condições da clausula Where. Para confirmar esta possibilidade, você pode executar este Select através de alguma ferramenta de administração do BD.

Espero que ajude.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
BRBARROS
Novato
Novato


Registrado: Segunda-Feira, 30 de Agosto de 2010
Mensagens: 37

MensagemEnviada: Qui Out 20, 2011 9:07 am    Assunto: Responder com Citação

Desculpa a pergunta, mas você colocou seu Dbgrid apontando para um Datasource ou um outro componente do seu banco de dados ?

Espero ter ajudado
Bruno R. de Barros
_________________
Como deixar um Programador Louco.. deixar ele na casa dele sem energia por 24 horas !!!!
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
Anderson_bnu
Novato
Novato


Registrado: Terça-Feira, 16 de Agosto de 2011
Mensagens: 20

MensagemEnviada: Qui Out 20, 2011 9:51 am    Assunto: Responder com Citação

VDL escreveu:
imex,

obrigado pela atenção mas form continua abrindo com o grid vazio

Crying or Very sad

vdl



Tenta usar assim,

Código:
TClientDataSet(Ds.DataSet).CommandText := 'SELECT * FROM cadcontrrecebmaterial WHERE ' +
                                           '(QtdeReci > Qtdesaida) and ' +
                                           '(Qtdesaida is not null) and ' +
                                           '(nfembalagem=' + QuotedStr('N') +
                                           ') Order By DataRec';


Pelo menos no FireBird eu nunca uso a clausula "<> null"

Abraços
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
imex
Moderador
Moderador


Registrado: Sexta-Feira, 7 de Janeiro de 2011
Mensagens: 11666

MensagemEnviada: Qui Out 20, 2011 10:05 am    Assunto: Responder com Citação

Acho que você tem razão Anderson_bnu.
Não tinha percebido este detalhe.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
Mostrar os tópicos anteriores:   
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi Todos os horários são GMT - 3 Horas
Página 1 de 1

 
Ir para:  
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.


Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB