Consulta comparar precos

Você está infringindo a regra do fórum de número 12. Retifique sua mensagem para que seu tópico tenha continuidade.

REGRAS DO FÓRUM

1. Tenha paciência com quem coloca aqui as suas duvidas.
2. Clareza nos títulos dos tópicos e duvidas, evite a linguagem MSN.
3. Não colocar diversas vezes a mesma dúvida.
4. Explicar detalhadamente o problema e informar a versão do seu Office + Sistema Operativo.
5. Retorne sempre se deu certo, esse retorno é muito importante.
6. Respeite toda a equipe Staff e demais membros deste fórum.
7. Use sempre o botão Busca, sempre que tiver uma dúvida e antes de abrir tópicos.
8. Não usar palavras como "Urgente". O fórum é livre e ninguém é obrigado a responder com urgência.
9. A publicidade é proíbida e só pode ser feita pelo Administrador ou depois de aprovada pelo Administrador.
10. Se o seu tópico não for respondido, tem o direito de fazer um Up ao final de 24horas!
11. A colocação de Códigos ou Exemplos, devem constar sempre os créditos de quem o elaborou.
12. Fale, não GRITE! Só letras Maiúsculas, na Internet é o mesmo que gritar!
13. É proibido tirar duvidas nas Salas de Repositório, devem abrir um novo tópico nas salas de duvidas, relacionando o Exemplo em causa.
14. É proibido adicionar links externos nos tópicos, que redirecionem para outros sites ("backlinks"), excepto DropBox ou do próprio fórum.
15. É permitido adicionar links externos, nos códigos VBA dentro das Base de Dados.

Basicamente terás que manipular mais de uma consulta , fiz um exemplo simples para entender mais ou menos como deve ser feito. Note que como a estrutura da tabela provém de uma tabela só não consegui fazer aparecer os nomes dos fornecedores porém se tuas tabelas estiverem estruturadas corretamente poderá modelar do jeito que pretendes.

Note que a tabela possui o mesmo ID para fornecedor e para produto por isso não consegui , mas o caminho é esse.

--06/01/2019-----23:03 Alterei o Exemplo modelei as tabelas .

Estou modelando, muito obrigado Maicon, testando aqui já posto.

Dei uma mexida no exemplo , troquei o arquivo dá uma olhada para ver como ficou.
Usei o código abaixo como critério
Um consulta para obter o máximo
Em outra para obter o mínimo
Fiz uma consulta união
E uma consulta referência cruzada.

Código:


DMáx("[Valor]";"tbl_Cotacao";"Produto=1") Ou DMáx("[Valor]";"tbl_Cotacao";"Produto=2")


Até que funcionou bem , o problema é que não sei se há como usar no critério :"Produto=Como"*") Ou algo do tipo, para puxar todos os registros, Eu não consegui fazer aparecer todos os produtos desta forma tive que por um por um , claro no caso do exemplo só há dois produtos mas se forem muitos ? Eu não sei como fazer.

Para o critério bastaria

Código:

"Produto like '*'"

Muito Obrigado pela ajuda .

mas não funcionou já havia tentado o critério : Como'*" , também tentei like '*'" , Também tentei >=0 . Estou usando como critério em uma consulta mas creio que não aceite desta forma :

Código:


DMáx("[Valor]";"tbl_Cotacao";"Produto=1") Ou DMáx("[Valor]";"tbl_Cotacao";"Produto=2")


Talvez em VBA , tenha como fazer : "https://www.maximoaccess.com/t13629-resolvidonuma-consulta-obter-menor-valor-de-varias-colunas"

novamente agradeço a ajuda , quem sabe os exemplos já sirvam para o colega.

Para a solicitação inicial a SQL abaixo em uma consulta já resolve

Código:

SELECT tbl_cotacao.produto, tbl_cotacao.valor, tbl_cotacao.Fornecedor
FROM tbl_cotacao
WHERE (((tbl_cotacao.valor)=(select top 1 valor from tbl_cotacao as temp where temp.produto = tbl_cotacao.produto order by temp.valor)))
ORDER BY tbl_cotacao.produto;

Bom Dia Amigos, Muito Obrigado pela ajuda, estou testando as sugestões para ver qual exemplo se adapta ao meu projeto, postarei o resultado. Muitíssimo Obrigado!

Grande DamascenoJr.

É realmente nestes momentos que podemos ver o poder da linguagem SQL.


Obrigado pela partilha!

Só tenho muito é que agradecer, os caras são top, Deu certo, ficou show de bola, Maicon, DamascenoJr, Deus os abençoe. Salve, Salve o SQL.

Com a resolução deste meu grande problemas, sem querer abusar do QI e disposição de vcs, tem possibilidade de eu concatenar num agregado os itens que ficaram com cada fornecedor separado, exemplo: Souza ltda Itens 1,3,4,7, João 2,5,6 etc., ai sim ficaria show de bola. quero doar dinheiro a comunidade, sou novo aqui, mas como faço?

Fiquei estudando o exemplo do amigo Damasceno e acrescentei "desc" e "asc" no final do código obter os valores mínimos "desc" e para valores máximos "asc" , Note que há uma função dentro do ACCESS chamada :(Asc) só que começa com maíscula.
Enfim ficou dessa forma :

Código:


(select top 1 valor from tbl_cotacao as temp where temp.produto = tbl_cotacao.produto order by temp.valor desc)
(select top 1 valor from tbl_cotacao as temp where temp.produto = tbl_cotacao.produto order by temp.valor asc)


Ficou muito bom mesmo. Quanto ao agrupamento fica muito fácil de fazer e um relatório. Segue abaixo um exemplo :

Marcelo, veja se o exemplo do Maicon resolve.

quero doar dinheiro a comunidade, sou novo aqui, mas como faço?

Veja nas mensagens do tópico abaixo como fazer doações.
https://www.maximoaccess.com/t5357-como-contribuir-com-o-forum-via-paypal

As doações ajudam na manutenção e no melhoramento do fórum.

Segue link direto para doações em R$
http://www.paypal.com/cgi-bin/webscr?cmd=_s-xclick&hosted_button_id=X8S3FJDGK3X9S

O fórum agradece o retorno. Sucesso.

Prezado Damascenojr Infelizmente não consigo doar, pois não tenho cartão de credito, se tivesse a opção de boleto, doaria! existe outra forma para doar?


"Ficou muito bom mesmo. Quanto ao agrupamento fica muito fácil de fazer e um relatório. Segue abaixo um exemplo" acho que não sube me expressar, Gostaria que o relatório juntasse os itens pertencentes a cada fornecedor, como no exemplo que coloquei no anexo, deem uma olhada se consegue me ajudar. Deus nos abençoe

Para isto basta você por uma quebra de página abaixo do grupo fornecedor :






vale também pesquisar a base : "https://www.maximoaccess.com/t9105-apostilhas"

Ok, vou testar, e estudar a apostila, muito obrigado

Marcelo, sobra as doações, temos dicas aqui
https://www.maximoaccess.com/t35008-vamos-no-unir-para-que-esse-site-nao-saia-do-ar-no-dia-05-01-2019#239817

e aqui
https://www.maximoaccess.com/t35008p50-vamos-no-unir-para-que-esse-site-nao-saia-do-ar-no-dia-05-01-2019#240344

Perfeito, estudei aprendi, vejam como ficou, eu gostei. Obrigado Maicon e Damascenojr. Olhem como ficou, show, atende e muito as minhas expectativas. vou encerar o finalizar como Resolvido!

O fórum agradece o retorno. Sucesso.

Bom dia Pessoal, DamascenoJr, e amigos, a instrução de selecionar "(select top 1 Total from [ItensProposta] as temp where Especificacao = ItensProposta.Especificacao order by Total)
"DamanscenoJr', ficou excelente, mas não atentei para um detalhe, e gostaria de ver com vcs, Quando quero desclassificar um preço de um fornecedor, mesmo sendo menor, para o segundo menor preço (até adicionei um campo DESCLASSIFICAR, não mostrou o menor preço, mas também não trouxe o segundo menor valor) tem como eu resolver esta questão. Para entenderem, Trabalho em uma empresa pública, e os fornecedores de Material/Serviço devem possuir (CNDs das Esferas FEDERAL, ESTADUAL E MUNICIPAL) Negativas, mas quando ocorre de ter cotado com alguma que está com estas POSIVITAS ou seja, com problemas com uma ou todas estas esferas..

DESDE JÁ, OBRIGADO

Crie o campo desclassificar do tipo sim/nao na tabela cotação e veja no comando sql abaixo

Código:

SELECT tbl_cotacao.produto, tbl_cotacao.valor, tbl_cotacao.Fornecedor
FROM tbl_cotacao
WHERE tbl_cotacao.valor=(select top 1 valor from tbl_cotacao as temp where temp.produto = tbl_cotacao.produto and temp.desclassificar = 0 order by temp.valor)
ORDER BY tbl_cotacao.produto;

Bom dia DamascenoJr, instrução ficará otima esta faltando resolver só um detalhe, E é no detalhe que tentei de tudo e não consegui, desculpe a minha inexperiência, sou novo no mundo do access kkkk
FICOU ASSIM A SQL. (SELECT [ItensProposta].[Especificacao], [ItensProposta].valor, [ItensProposta].[IdFornecedor] FROM [ItensProposta] WHERE EXISTS [ItensProposta].valor=(select top 1 valor from [ItensProposta] as temp where temp.Especificacao = [ItensProposta].[Especificacao] and temp.Desclassificar = 0 order by temp.valor) ORDER BY [ItensProposta].[Especificacao]
Mas apresenta um erro, até coloquei a instrução EXISTS depois do WHERE mas não resolveu. O erro exibido é "Você gravou uma subconsulta que pode retornar mais de um campo sem usar a palara reservada EXISTS na cláusulas FROM da consulta principal. revise a instrução SELECT a subconsulta para solicitar apenas um campo.

Pelo comando SQL que você mandou já vi que houve modificações de nome de objetos e tabelas etc. Testei minha dica no arquivo inicial deste tópico e funcionou. Como você já fez mudanças, sugiro anexar seu novo arquivo para análise.

Ok, realmente houve algumas mudanças, estou encaminhando o arquivo. Muito Obrigado. o banco

os forms

Bom dia DamascenoJr, embora tenha feito pequenas alterações, a consulta que vc me ensinou ficou perfeita, fiz os testes e mesmo assim funcionam tudo certo, o único detalhe mesmo é quando dá empate. se vou na proposta e desempato manual (por exemplo R$50,25 é coloco R$ 50,25001) o desempate acontece e o empenho é emitido normalmente.
obrigado pela atenção.

Código:

SELECT ItensProposta.Especificacao, ItensProposta.unitario, ItensProposta.IdFornecedor
FROM ItensProposta
WHERE ItensProposta.unitario=(select top 1 unitario from [ItensProposta] as temp where temp.Especificacao = [ItensProposta].[Especificacao] and temp.Desclassificar = 0 order by temp.unitario) AND ItensProposta.Desclassificar=0
ORDER BY ItensProposta.Especificacao;

Esse código resolve também o problema de propostas desclassificadas serem exibidas se estiverem empatadas.

Se tudo estiver resolvido, lembre-se de fechar o tópico.

Boa Tarde a todos, DamascenoJr, implementei a sql que vc me mandou, (desde o dia que lhe enviei o projeto, não mexi mais nele, aguardando o retorno, apliquei o codigo tanto no campo unitario quanto no total mas não funcionou, pede uma instrução EXISTS. sera o que estou fazendo de errado, caso não se importe me envie de volta o projeto com a consulta já em uso, para eu comparar as duas e aprender um pouco mais.
fiz um macete (marreta) determinando de que quando o Desclassificar for true ele adicionar o valor unitário 0,001, mas é muito primário, foi só pra ir segurando a onda.

É MUITO BOM FAZER PARTE DESTA COMUNIDADE

Simplesmente deu um control+c e um control+v no último comando que te passei e apliquei no backend. Não tive problemas.

Vlw amigo, dando certo aqui já encerro o tópico,
desde já muitissimo obrigado.

Vai entender, copiei também da mesma forma, e funcionou Show de Encerrando Tópico. Deus abencoe DamascenoJr e toda a comunidade.

O fórum agradece o retorno. Sucesso.

salve salve, DamanscenoJr. Perfeito funcinou legal, Muito obrigado pela atenção constumeira.

Bom Dia a todos!

Há um bom tempo fui agraciado com a ajuda do forum.
a solução apresentada pelo Grande Damasceno foi: (select top 1 Total from [ItensProposta] as temp where temp.especificacao and = [ItensProposta].[especificacao] and temp.Desclassificar = 0 order by temp.Total),
retorna a consulta perfeitamente.

mas estou com um probleminha. quando um itens na tabela "ItensProposta" independente de qual seja o processo, tenha o mesmo valor, ele fala que "No máximo um registro pode ser retornado por esta subconsulta, (correto não pode mesmo) mas o problema é que
tendo dois ou mais processos para a compra deste mesmo item, mesmo com fornecedor diferente não consigo comprar mais, tenho que ir no processo anterior e mudar o valor do item, para conseguir comprar o mesmo.


exemplo

no mês passado comprei "Relógio de ponto...", no valor de 849,00; neste mês quero comprar mais, e o preço é o mesmo, ele retorna a mensagem de erro.

Alguém tem alguma ideia de como resolver?
Desde Já Agradeço