SELECT
DPF.UpperFieldName
FROM
(
SELECT PP.DEFINITION_ID
FROM Firms F
LEFT JOIN GDPRProcessingPermits PP ON F.ID = PP.Firm_ID -- LEFT JOIN FB ma jinak s timto dotazem rychlostni problem
LEFT JOIN DPDefinitions DPD ON PP.Definition_ID = DPD.ID
LEFT JOIN DPAccessRights DPA ON DPA.Parent_ID = DPD.ID
WHERE
(F.ID = :Firm_ID OR F.Firm_ID = :Firm_ID) AND
PP.ValiditySuspended = 'N' AND
:CurrentDate BETWEEN PP.ValidFromDate$DATE AND PP.ValidToDate$DATE AND
DPD.IsActive = 'A' AND
DPD.Hidden = 'N' AND
DPD.DataProtectionDriver_ID = :Driver_ID AND
DPA.User_ID = :User_ID
) A
JOIN DPProtectedFields DPF ON DPF.PARENT_ID = A.Definition_ID AND DPF.CLSID = :CLSID AND DPF.ReferenceCLSID = '00000000000000000000000000'
UNION ALL
SELECT
DPF.ReferenceFieldName
FROM
(
SELECT PP.DEFINITION_ID
FROM Firms F
LEFT JOIN GDPRProcessingPermits PP ON F.ID = PP.Firm_ID -- LEFT JOIN FB ma jinak s timto dotazem rychlostni problem
LEFT JOIN DPDefinitions DPD ON PP.Definition_ID = DPD.ID
LEFT JOIN DPAccessRights DPA ON DPA.Parent_ID = DPD.ID
WHERE
(F.ID = :Firm_ID OR F.Firm_ID = :Firm_ID) AND
PP.ValiditySuspended = 'N' AND
:CurrentDate BETWEEN PP.ValidFromDate$DATE AND PP.ValidToDate$DATE AND
DPD.IsActive = 'A' AND
DPD.Hidden = 'N' AND
DPD.DataProtectionDriver_ID = :Driver_ID AND
DPA.User_ID = :User_ID
) A
JOIN DPProtectedFields DPF ON DPF.PARENT_ID = A.Definition_ID AND DPF.CLSID = :OwnerCLSID AND DPF.ReferenceCLSID = :CLSID AND DPF.UpperFieldName LIKE :UpperFieldNameLikeGenerated by ABRA Software a.s. 27.10.2021 16:34:08