Třídová akce

Popis:

Skutečná částka z hlavní knihy za podřízené projekty

Kód:

2

Tělo:

      SELECT         
(
SELECT 
        COALESCE(SUM(GL.Amount * CASE WHEN AD.AccountType in ('A', 'C') THEN -1 ELSE 1 END), 0)
FROM
	SYS$BusProjects2 SBP
	JOIN GENERALLEDGER GL ON GL.DEBITBUSPROJECT_ID = SBP.ID
	JOIN ACCOUNTS AD ON AD.ID = GL.DEBITACCOUNT_ID
WHERE 
	AD.Code LIKE :AccountCodeMask
	AND SBP.superior_ID = :BusProject_ID
)
-
(SELECT 
	COALESCE(SUM(GL.Amount * CASE WHEN AC.AccountType in ('A', 'C') THEN 1 ELSE -1 END), 0)
FROM 
	SYS$BusProjects2 SBP
	JOIN GENERALLEDGER GL ON GL.CREDITBUSPROJECT_ID = SBP.ID
	JOIN ACCOUNTS AC ON AC.ID = GL.CREDITACCOUNT_ID
WHERE 
	AC.Code LIKE :AccountCodeMask
	AND SBP.superior_ID = :BusProject_ID
)
FROM 
	RDB$DATABASE

Generated by ABRA Software a.s. 27.10.2021 16:34:08