SQL NOVAMENTE
Bom gente, fui obrigado a mudar meu banco geral. Agora tenho somente uma tabela para movimentação de estoque, sendo:
Tabela DADOS
Campos:
Codigo - Quant - Status
O campo Status posicionei como (E)Entrada (S)Saida
Para listar somar e agrupar os codigos que houve saida, usei a instrução abaixo, funcionou.
Set Tbbaixas = BdBaixas.OpenRecordset("SELECT Codigo, Sum(Quant) AS TOTAL FROM Dados Where Status='S' GROUP BY CODIGO ", dbOpenSnapshot)
Agora preciso listar as entradas comparando os codigos, ou seja, listar somente se igual ao codigo de saida.Como faço?
Outro problema, preciso tambem listar a descrição do material, porém essa descrição esta em outra tabela, usei dessa forma:
Set TbPva = BdBaixas.OpenRecordset("SELECT DISTINCT Dados.Codigo,Localizacao.[Descrição]FROM Dados,Localizacao WHERE Localizacao.[Código]=Dados.Codigo", dbOpenSnapshot)
A instrução lista tudo, quero listar somente as com Status (S). Alguma sugestão?
Tabela DADOS
Campos:
Codigo - Quant - Status
O campo Status posicionei como (E)Entrada (S)Saida
Para listar somar e agrupar os codigos que houve saida, usei a instrução abaixo, funcionou.
Set Tbbaixas = BdBaixas.OpenRecordset("SELECT Codigo, Sum(Quant) AS TOTAL FROM Dados Where Status='S' GROUP BY CODIGO ", dbOpenSnapshot)
Agora preciso listar as entradas comparando os codigos, ou seja, listar somente se igual ao codigo de saida.Como faço?
Outro problema, preciso tambem listar a descrição do material, porém essa descrição esta em outra tabela, usei dessa forma:
Set TbPva = BdBaixas.OpenRecordset("SELECT DISTINCT Dados.Codigo,Localizacao.[Descrição]FROM Dados,Localizacao WHERE Localizacao.[Código]=Dados.Codigo", dbOpenSnapshot)
A instrução lista tudo, quero listar somente as com Status (S). Alguma sugestão?
Faça
Set TbPva = BdBaixas.OpenRecordset("SELECT DISTINCT Dados.Codigo,Localizacao.[Descrição]FROM Dados,Localizacao WHERE Localizacao.[Código]=Dados.Codigo and Dados.Status = 'S'", dbOpenSnapshot)
Set TbPva = BdBaixas.OpenRecordset("SELECT DISTINCT Dados.Codigo,Localizacao.[Descrição]FROM Dados,Localizacao WHERE Localizacao.[Código]=Dados.Codigo and Dados.Status = 'S'", dbOpenSnapshot)
Mas na sua tabela tem como saber se teve saida pois o STSTUS será 'E'.
Se tiver indique o campo
Se tiver indique o campo
Eu não conheço a estrutura do teu banco. Pelo titulo do teu tópico voce deve ter colocado no anterior. Poderia colocar a estrutura?
Tópico encerrado , respostas não são mais permitidas