Einzelnen Beitrag anzeigen

waldforest

Registriert seit: 8. Mai 2005
366 Beiträge
 
Delphi XE3 Enterprise
 
#3

AW: Dateadd Unit als Variable in Procedure

  Alt 30. Okt 2015, 15:34
Hallo,
ich habe eine Lösung gefunden, vielleicht geht es auch anders. Anbei ein Auszug,


Delphi-Quellcode:
INSERT INTO Temp_order
{
  Artikel,
  VK_Mengen}


Select A.ARTIKEL_ID,
   Case when ( :xZeitfenster = 'week') then
     (SELECT sum( OA.MENGE ) FROM ORDERS O INNER JOIN ORD_ARTIKEL OA ON O.ORDERS_ID
         =OA.ORDER_ID WHERE ((OA.Artikel_id = A.Artikel_ID) and (O.BESTELLDATUM >=
          dateadd(week,-:xBackZeit,current_date))))
  else
     (SELECT sum( OA.MENGE ) FROM ORDERS O INNER JOIN ORD_ARTIKEL OA ON O.ORDERS_ID
         =OA.ORDER_ID WHERE ((OA.Artikel_id = A.Artikel_ID) and (O.BESTELLDATUM >=
          dateadd(month,-:xBackZeit,current_date))))
  end AS VK_Menge

FROM LIEFERANT L INNER JOIN ARTIKEL A ON L.LIEFERANT_ID = A.ARTIKEL_LIEFERANT_ID
              WHERE (A.ARTIKEL_LIEFERANT_ID = :xLiefernat_ID) and (A.ARTIKEL_LAGER_IST <= A.ARTIKEL_LAGER_MIN);
    FROM LIEF L INNER JOIN ARTIKEL A ON L.LIE_ID = A.ARTIKEL_LIEF_ID
              WHERE (A.ARTIKEL_LIEF_ID = :xLiefernat_ID);
mfg wf

Geändert von waldforest (30. Okt 2015 um 15:45 Uhr)
  Mit Zitat antworten Zitat