Integrar Lançamento Manual Contabil x Notas Fiscais

[Former Member]

É possivel eu integrar um lançamento manual contabil com uma tabela de nota fiscal para desenvolver um relatório de contas a pagar ?

Tem alguns fornecedores que foram compensados com lançamento manual mas eu nao consigo integrar a tabela OACT ao meu relatorio

Obrigado

[Former Member]

Olá,

A query abaixo traz todos os lançamentos contábeis manual que foram lançados contra um PN e que ainda não foram baixados

SELECT OJDT.TransId, OCRD.CardCode, OCRD.CardName, OJDT.Memo, OJDT.Ref1, OJDT.Ref2, OJDT.DueDate AS " Vencimento", OJDT.SysTotal, DATEDIFF(day, OJDT.DueDate, GETDATE()) AS "Dias de Atraso"

FROM OJDT INNER JOIN

JDT1 ON OJDT.TransId = JDT1.TransId INNER JOIN

OCRD ON JDT1.ShortName = OCRD.CardCode AND (JDT1.MthDate IS NULL OR

JDT1.MthDate = '')

WHERE (OJDT.TransType = N'30')

A query abaixo traz todos os contas a pagar que ainda não foram baixados

SELECT OPCH.DocEntry, OPCH.CardCode, OPCH.CardName, OPCH.Serial as " Nº NF", OPCH.DocDate, PCH6.DueDate, DATEDIFF(day, PCH6.DueDate, GETDATE()) AS "Dias de Atraso",

OCTG.PymntGroup as "Condição de Pagamento", CONVERT(varchar, PCH6.InstlmntID) + ' de ' + CONVERT(varchar, OCTG.InstNum) AS Prestação, PCH6.InsTotal, PCH6.PaidToDate,

OHEM.firstName AS Comprador

FROM PCH6 AS PCH6 INNER JOIN

OPCH AS OPCH ON PCH6.DocEntry = OPCH.DocEntry INNER JOIN

OCTG AS OCTG ON OPCH.GroupNum = OCTG.GroupNum INNER JOIN

OHEM AS OHEM ON OPCH.OwnerCode = OHEM.empID

WHERE (OPCH.DocStatus = 'O') AND (PCH6.Status = 'O')

A query abaixo traz todos o conta a receber que ainda não foram baixados

SELECT OINV.DocEntry, OINV.CardCode, OINV.CardName, OCRG.GroupName, OINV.DocDate, OINV.Serial AS "Nº NF", INV6.InsTotal, OCTG.PymntGroup as "Condição de Pagamento", CONVERT(varchar,

INV6.InstlmntID) + ' de ' + CONVERT(varchar, OCTG.InstNum) AS Prestações, INV6.PaidToDate, DATEDIFF(day, GETDATE(), INV6.DueDate) * - 1 AS "Dias de Atraso"

FROM INV6 AS INV6 INNER JOIN

OCTG AS OCTG INNER JOIN

OINV AS OINV ON OCTG.GroupNum = OINV.GroupNum ON INV6.DocEntry = OINV.DocEntry INNER JOIN

OCRD AS OCRD INNER JOIN

OCRG AS OCRG ON OCRD.GroupCode = OCRG.GroupCode ON OINV.CardCode = OCRD.CardCode

WHERE (OINV.DocStatus = 'O')

Creio que isso deve resolver seu problema.

Alex Silveira

Edited by: Alex Silveira on Aug 27, 2010 5:40 PM

Edited by: Alex Silveira on Aug 27, 2010 5:42 PM

[Former Member]

Guilherme, boa tarde,

estou enfrentando o mesmo problema. Você conseguiu resolver este problema de alguma maneira?

Obrigado.