[gelöst] Beschaffungszeiten

17. Februar 2012 11:55

Hallo,

ich möchte in einem Stücklistenartikel die grösste Beschaffungszeit der Unterartikel ermitteln und dann auf den Oberartikel schreiben.
Jetzt wollte ich die Dateformular vergleichen mit

if Beschaffungszeit1 > MaxTime then Evaluate(Maxtime, Format(Beschaffungszeit1));

leider vergleicht er mir nicht die beiden Beschaffungszeiten.

Weiß jemand wie man das lösen kann?
Zuletzt geändert von Pegasus am 20. Februar 2012 17:08, insgesamt 1-mal geändert.

Re: Beschaffungszeiten

17. Februar 2012 13:53

Da die Beschaffungszeit eine Datumsformel ist, kann man diese nicht direkt miteinander vergleichen.
Stattdessen muss man sich die effektive Anzahl Tage dieser Formel errechnen, welche man dann miteinander vergleichen kann.

Code:
// DifferenzInTagen, MaxDiffInTagen = Integer
// MaxBeschaffungszeit = DateFormula
DifferenzInTagen := CALCDATE(ItemVend."Lead Time",TODAY) - TODAY;
IF DifferenzInTagen > MaxDiffInTagen THEN BEGIN
  MaxBeschaffungszeit := ItemVend."Lead Time";
  MaxDiffInTagen := DifferenzInTagen;
END;