Třídová akce

Popis:

Vrátí OID servisních listů pro zadaný servisovaný předmět

Kód:

2

Tělo:

SELECT A.ID
FROM ServiceDocuments A
LEFT JOIN Firms F1 ON F1.ID = A.Firm_ID
LEFT JOIN Firms F2 ON F2.ID = A.PayerFirm_ID
WHERE
  (A.ObjectKind = 0) and (A.ServicedObject_ID = :ServicedObject_ID) AND
  (
   (Upper(F1.Name collate PXW_CSY) LIKE Upper('{SearchFirm}') ESCAPE '~') OR
   (Upper(F2.Name collate PXW_CSY) LIKE Upper('{SearchPayer}') ESCAPE '~') OR
   ((:WithFirmAncestors='A') AND
    (A.Firm_ID in
     (SELECT F11.ID FROM Firms F11
      WHERE
       (A.Firm_ID = F11.ID) and
       (F11.Firm_ID in 
        (SELECT F111.ID FROM Firms F111 
         where (Upper(F111.Name collate PXW_CSY) LIKE Upper('{SearchFirm}') ESCAPE '~')
        )
       )
     )
    )
   ) OR
   ((:WithPayerAncestors='A') AND
    (A.PayerFirm_ID in
     (SELECT F21.ID FROM Firms F21
      WHERE
       (A.PayerFirm_ID = F21.ID) and
       (F21.Firm_ID in 
       (SELECT F211.ID FROM Firms F211 
        where (Upper(F211.Name collate PXW_CSY) LIKE Upper('{SearchPayer}') ESCAPE '~')
        )
       )
     )
    )
   )
  )  
ORDER BY 
  A.DocDate$DATE desc, A.OrdNumber desc

Generated by ABRA Software a.s. 27.10.2021 16:35:46