Třídová akce

Kód:
13
Tělo:
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 :UpperFieldNameLike

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