Datum in Query

[kre001]

Hallo Forum,
Ich muss mit einem Query die Sätze vom Vortag herausziehen. Das Bestelldatum habe ich mit

Feld Ausdruck
BESTDAT DIGITS(BAEJMT)
TAG Substr(bestdat, 7, 2)
MONAT Substr(bestdat, 5, 2)
JAHR Substr(bestdat, 1, 4)
DATUMBEST Tag !! '.' !! Monat !! '.' !! Jahr

von JJJJ.MM.DD auf DD.MM.JJJJ umgestellt.

Jetzt möchte ich alle Datensätze suchen, bei welchen die Differenz zwischen DATUMBEST und dem Tagesdatum = 1 ist.

Wer kann mir einen Tipp geben? Schon jetzt vielen Dank.

Gruss Rolf

[Fuerchau]

In Query etwas komplizierter:
1. ISO-Datum generieren
DBEST = substr(digits(bestdat), 1, 4) !! '-' !! substr(digits(bestdat), 5, 2) !! '-' substr(digits(bestdat), 7, 2)

datebest = date(dbest)
vgldate = date(days(current(date)) - 1)

[kre001]

Hallo Fuerchau
Besten Dank für den TIPP
Über Nacht habe ich in "Grossmutters"-Query-Handbuch eine andere Lösung gefunden:

ZEICHDAT Digits(BAEJMT)
ZEICHDAT2 Substr(Zeichdat, 7, 2)!!'.'!!
Substr(Zeichdat, 5, 2)!!'.'!!
Substr(Zeichdat, 1, 4)
NEUDATUM Date(Zeichdat2)
DIFF CURRENT-NEUDATUM

Jetzt kann ich über DIFF die Daten miteinander vergleichen.

Gruss Rolf

[B.Hauser]

Hallo Rolf,

Bei Deiner Lösung musst Du folgendes beachten:
Bei der Differenz (DIFF) handelt es sich um ein 8-stelliges numerisches Ergebnis.
In Stelle 1-4 werden die Differenz-Jahre zurückgegeben,
in Stelle 5-6 die Differenz-Monate in Stelle 7-8 die Differenz-Tage.

Wenn Du gezielt die Differenz-Tage (also z.B. 45) ermitteln willst, müssen beide Datums-Felder über die Funktion DAYS in die rechnerische Anzahl Tage seit dem 01.01.0001 konvertiert und anschließend voneinander abgezogen werden.

Weitere Informationen zur Datums- und Zeitrechnung mit Query/400 findest Du in den iNN - eNews:
iNN - eNews 5/2004
iNN - eNews 6/2004

@Fuerchau:
ISO-Format ist nicht unbedingt erforderlich!
Jede gültige alphanumerische Datums-Aufbereitung mit einem 4-stelligen Jahr ist zulässig also:
'JJJJ-MM-TT' = ISO
'MM/TT/JJJJ' = USA
'TT.MM.JJJJ' = EUR

Birgitta

[Fuerchau]

ISO-Format ist für mich immer am sichersten, da dies unabhängig von diversen Jobeinstellungen immer funktioniert.