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 

quero que nao repitar o campo produto

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Automação Comercial
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
netbiosnet
Novato
Novato


Registrado: Terça-Feira, 5 de Agosto de 2014
Mensagens: 1

MensagemEnviada: Ter Ago 05, 2014 12:41 am    Assunto: quero que nao repitar o campo produto Responder com Citação

qrConsumo.close;
qrconsumo.sql.clear;
qrconsumo.sql.add('select ITEMMESAS_NETBIOS.*');
qrconsumo.sql.add('select ITEMMESAS_NETBIOS.*, DISTINCT(C000025.produto), C000025.unidade, sum(ITEMMESAS_NETBIOS.qtde)');
qrconsumo.sql.add('from ITEMMESAS_NETBIOS, c000025');
qrconsumo.sql.add('where ITEMMESAS_NETBIOS.cod_produto = c000025.codigo');
qrconsumo.sql.add('and ITEMMESAS_NETBIOS.numcaixa = '+ ExtrairMesa(StatusBar1.Panels[5].Text));
qrconsumo.SQL.add('group BY c000025.produto, C000025.unidade,');
qrconsumo.SQL.add('itemmesas_netbios.codigo,itemmesas_netbios.cod_mesa,');
qrconsumo.SQL.add('itemmesas_netbios.cod_produto, itemmesas_netbios.qtde,');
qrconsumo.SQL.add('itemmesas_netbios.unitario, itemmesas_netbios.total,');
qrconsumo.SQL.add('itemmesas_netbios.complemento,itemmesas_netbios.transf_mesa,');
qrconsumo.SQL.add('itemmesas_netbios.cancelado, itemmesas_netbios.data_vendas,');
qrconsumo.SQL.add('itemmesas_netbios.fechamento,itemmesas_netbios.status,');
qrconsumo.SQL.add('itemmesas_netbios.caixa,itemmesas_netbios.numcaixa,');
qrconsumo.SQL.add('itemmesas_netbios.numvenda');
qrconsumo.SQL.add('order by c000025.produto');
qrconsumo.open;
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Visitar a homepage do Usuário  
joemil
Moderador
Moderador


Registrado: Quinta-Feira, 25 de Março de 2004
Mensagens: 9099
Localização: Sinop-MT

MensagemEnviada: Ter Ago 05, 2014 8:24 am    Assunto: Responder com Citação

veja sua MP
_________________
<b>SEMPRE COLOQUE [RESOLVIDO] NO SEU POST</b>
Enviar imagens: http://tinypic.com/
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 -> Automação Comercial 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