SELECT 1 FROM GeneralLedger A
WHERE
A.ID = :OBJID AND
NOT EXISTS(
SELECT 1 FROM Relations
JOIN SYS$StoreDocuments3 ON SYS$StoreDocuments3.StoreDocument_ID = Relations.LeftSide_ID
WHERE
Relations.RightSide_ID = A.ID AND
Relations.Rel_Def IN ({REL_DEF}) AND
SYS$StoreDocuments3.Closed = 'N'
)Generated by ABRA Software a.s. 27.10.2021 16:34:09