[Resolvido]Relatorio de estoque

Tenho tres tabelas Dados(estoque), nff(nota fiscal de entrada) e nffs(nota fiscal de Saida)
tenho uma consulta estoque, mas nao to conseguindo fazer com que as nota de entrada - nota de saida

mas o estoque e baseado no ano
ex; 2009........ tudo de 2009 pra traz, se tiver quantidade > que 0 sai no relatorio
http://www.4shared.com/zip/e0UFo9q_/ESTOQUE.html

http://www.4shared.com/zip/e0UFo9q_/ESTOQUE.html

alguem consegue me ajudar...?

Talvez, mas não se consegue efetuar o download.

Anexe direto no tópico.

esse aqui

Qual a consulta em que tem dificuldades ? e quais os criterios que pretende ?

na consulta estoque, o criterio que quero e que ele sai no relatorio a quantidade que seja quant de entrada - quant de saida, mas listando os itens que nao foi baixado na saida ou seja tudo que foi lancado na tabela nff - tudo que foi lancado na tabela nffs, respeitando o ano que eu queira.

ex: ano de 2009 no relatorio tem que sair tudo de 2009 pra traz, mas fazendo a baixa nos itens que saiu durante esse periodo pra traz.

Eu penso que basta você inserir um novo campo nessa consulta, assim:

AnoRef: Format([NFF]![data];"yyyy")

E no criterio:

<=[Forms]![Relatorios]![Ano]

JPaulo

isso eu ja consegui nas nao to coseguindo e fazer com que faca subtracao da tabela nff o campo quant - a quantidade da tabela nffs pra sair no estoque.

ex
na tabela nff tenho
codigo descricao quant data
93291384 oleo 20 23/01/2008

na tabela nffs tenho
codigo descricao quant data
93291384 oleo 5 03/01/2009

entao no relatorio seria somente 15 o que nao to conseguindo fazer com que a consulta estoque pra sair no relatorio..

alguem consegue me ajudar neste problema

to tendo usar esse codigo pra transferir e atualizar o estoque mas nao ta dando certo
ta dando erro nas linha set rs3, set rs4

Dim db1 As Database, db2 As Database, rs1 As DAO.Recordset, rs2 As DAO.Recordset, rs3 As DAO.Recordset, rs4 As DAO.Recordset
If MsgBox("Confirma a venda?", vbYesNo + vbQuestion, "CONFIRMAR") = vbYes Then


Set rs3 = db1.OpenRecordset("select * from NFF where DATA <= '" & Forms!relatorios!D2 & "'")
Set rs2 = db1.OpenRecordset("select * from ESTOQ")
Set rs4 = db1.OpenRecordset("select * from nffs DATA <= '" & Forms!relatorios!D2 & "'")
Set db1 = CurrentDb
While (Not rs3.EOF)
With rs2
.AddNew
!Codigo = rs3!Codigo
!Discricao = rs3!Discricao
!QUANT = rs3!QUANT - r4!QUANT
!VUNI = rs3!VUNI
!Uni = rs3!Uni
!DATA = rs3!DATA
!CFOP = rs3!CFOP
!TP = rs3!TP
!qnfe = rs3!QUANT
!qnfs = rs4!QUANT
.Update
rs3.MoveNext

End With
Wend


rs2.Close
Set rs2 = Nothing

rs3.Close
Set rs3 = Nothing

rs4.Close
Set rs4 = Nothing

Set db1 = Nothing



End If
alguem podem me da uma forcinha
como que faco pra abrir uma consulta estnfe to tentando assim mas nao da

Set rs3 = db1.OpenRecordset("select * from estnfe")

Alguem entendeu meu problema

Pelo que eu vi na consulta estoque, não podes ligar as datas porque apenas vai surgir na consulta, os produtos que entraram em determinado dia e se não saio nada nesse dia esta a aprecer zero.
Como tens varias entradas e varias saidas de produtos, se calhar seria melhor agrupares por produtos, assim terias o entrado acumulado e o saido acumulado, a diferença será o stock, não sei se e possivel realizares isto apenas com uma consulta.

resolvi