Třídová akce

Kód:

12

Tělo:

SELECT 
  DPF.UpperFieldName
FROM
  (
  SELECT PP.DEFINITION_ID
    FROM GDPRProcessingPermits PP
    JOIN DPDefinitions DPD ON PP.Definition_ID = DPD.ID 
    JOIN DPAccessRights DPA ON DPA.Parent_ID = DPD.ID AND DPA.User_ID = :User_ID
  WHERE
    PP.Person_ID = :Person_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
  ) 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 GDPRProcessingPermits PP
    JOIN DPDefinitions DPD ON PP.Definition_ID = DPD.ID 
    JOIN DPAccessRights DPA ON DPA.Parent_ID = DPD.ID AND DPA.User_ID = :User_ID
  WHERE
    PP.Person_ID = :Person_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
  ) 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