Tabelle: Datum automatisch setzen bei neuem Datensatz

[pop1]

Hallo,
wenn ich in der Tabelle einen neuen Datensatz anlege, soll in einem weiteren Feld das aktuelle Tagesdatum gesetzt werden.
Wie mache ich das, das als Default das Tagesdatum reingeschrieben wird.

Vielen Dank
Helmut

[lorbass]

Die eingebaute Funktion für das aktuelle Datum heißt CURDATE().
Details kannst du im Base Handbuch nachlesen.

Gruß
lorbass

[pop1]

Die eingebaute Funktion für das aktuelle Datum heißt CURDATE().
Details kannst du im Base Handbuch nachlesen.

Gruß
lorbass

Hallo lorbass,
ich verstehe aber nicht warum Base im Entwurfsmodus der Tabelle das als Defaultwert nicht übernimmt?

Gruß Helmut

[RobertG]

Hallo Helmut,

hier zusammenkopiert aus dem Handbuch V4.2:

Defaultwert: Der Begriff «Defaultwert» in der GUI entspricht nicht dem, was Datenbanknutzer unter Defaultwert verstehen. Die GUI gibt hier einen bestimmten Wert sichtbar vor, der dann mit abgespeichert wird.
Der Defaultwert einer Datenbank wird in der Tabellendefinition gespeichert. Er wird dann in das Feld geschrieben, wenn es bei der neuen Erstellung eines Datensatzes leer bleibt. SQL-Defaultwerte erscheinen auch nicht bei der Bearbeitung der Eigenschaften einer Tabelle.

(S. 56)

SQL-Funktionen, die erlaubt sind:
für das aktuelle Datum - CURRENT_DATE, TODAY

(S. 64)

ALTER TABLE "Tabellenname" ALTER COLUMN "Feldname" SET DEFAULT <Standardwert>;
Fügt dem Feld einen bestimmten Standardwert hinzu. NULL entfernt einen bestehenden Standardwert.

(S. 66)
Also: Zuerst die Tabelle erstellen, dann anschließend per SQL die Tabelle für den Datumsbereich ändern. Der Defaultwert wird beim Speichern gesetzt, wenn keine Eingabe gemacht wurde.
Willst Du einen Wert vorher im Formular sehen, der dem aktuellen Datum entspricht, so geht dies entweder unter Zuhilfenahme einer Abfrage, deren Datumswert Du an das Formular weiterreichst, oder mit einem Makro.
Werte im Tabellendesign sind Werte, die beim Aufruf der Tabelle dort stehen. Sich verändernde Werte sind da nicht vorgesehen.
Wenn Du tatsächlich sicher stellen willst, dass als Datum das Speicherdatum steht, dann ist der Default-Wert der Datenbank über SQL der beste Weg.

Gruß

Robert

[Freischreiber]

Hallo,

ich suche eine ähnliche Funktion, und zwar soll eine Adressen-Tabelle zwei Felder enthalten, wo 1. das Erstelldatum des einzelnen Datensatzes und 2. das letzte Änderungsdatum des einzelnen Datensatzets gespeichert werden sollen, und zwar innerhalb der Tabelle.

Geht das mit diesen SQL-Befehlen?

Und: Wendet man die direkt über Base - Extras - SQL auf die Tabelle an?

Ziel ist, bei jeder Adresse genau ablesen zu können, wann sie aufgenommen wurde und wann sie geändert wurde.

Gruß
Freischreiber

[RobertG]

Hallo Freischreiber,

über die Tabellendefinition (mittels Extras → SQL) geht nur das Einfügen des momentanen Systemdatums beim Einfügen neuer Daten, nicht beim Ändern eines Datensatzes. Dies reicht also für das Erstelldatum aus, nicht aber das letzte Änderungsdatum. Das letzte Änderungsdatum wirst Du über eine Formulare - Unterformular - Konstruktion oder über Makros automatisch einfügen können. Manuell geht das natürlich auch. Wenn Du das Datumsauswahlfeld nimmst, dann steht da ein Button "Heute" in der Auswahl.

Ich kopiere hier einmal den Inhalt aus dem Handbuch, 4.2, S.290

Inhalt eines Kontrollfelds ändern
Wenn es um die Änderung eines einzelnen Wertes geht, wird das über die Eigenschaft BoundField des Kontrollfelds mit einer passenden Methode erledigt. Anschließend muss nur noch die Änderung an die Datenbank weitergegeben werden. Beispiel für ein Datumsfeld, in das das aktuelle Datum eingetragen werden soll:

Code: Alles auswählen

DIM unoDate AS NEW com.sun.star.util.Date
unoDate.Year = Year(Date)
unoDate.Month = Month(Date)
unoDate.Day = Day(Date)
oDateField.BoundField.updateDate( unoDate )
oForm.updateRow()   ' Weitergabe der Änderung an die Datenbank

Für BoundField wird diejenige der updateXxx-Methoden aufgerufen, die zum Datentyp des Feldes passt – hier geht es um einen Date-Wert. Als Argument wird der gewünschte Wert übergeben – hier das aktuelle Datum, konvertiert in die vom Makro benötigte Schreibweise.

Über die Arbeit mit einer Filtertabelle und die damit verbundenen Möglichkeiten steht einiges ab S. 147 im Kapitel "Formulare".

Gruß

Robert

[Freischreiber]

Hallo Robert,

ich verstehe schon das erste nicht.

Ich richte in der Tabelle eine zusätzliche Spalte "LO-Erfassdatum" ein und gebe ihr den Datentyp "Datum(Date)". Ist das so richtig?
Dann speichere ich den Tabellenentwurf und gebe unter Extras - SQL ein:
ALTER TABLE "t-adressen" ALTER COLUMN "LO-Erfassdatum" SET DEFAULT <CURRENT_DATE>
Und bekomme als Meldung:
1: Wrong data type or data too long in DEFAULT clause: < in statement [ALTER TABLE "t-adressen" ALTER COLUMN "LO-Erfassdatum" SET DEFAULT <]

Dann habe ich versucht, der neuen Spalte im Bearbeiten-Modus einen Default-Wert zu geben, nämlich wieder CURRENT_DATE. Da scheitert aber schon das Speichern, die Zelle wird dabei immer wieder geleert.

Es kann doch nicht sein, daß ich da etwas falsch gemacht habe, oder?

Gruß
Freischreiber

[RobertG]

Hallo Freischreiber,

Code: Alles auswählen

ALTER TABLE "t-adressen" ALTER COLUMN "LO-Erfassdatum" SET DEFAULT CURRENT_DATE

Das ganze ohne die <Einklammerung>, die nur darauf hinweisen soll, dass hier irgendein Wert einzugeben ist. Schließlich kannst Du auch etwas anderes als das momentane Datum eingeben.
Ich habe jetzt direkt das meist gesuchte Beispiel mit dem Standarddatum im Handbuch unter die allgemeine Formulierung angefügt.

Nur bringt Dich diese Richtung nicht weiter, da Du einen Weg suchst, das aktuelle Datum automatisch bei Änderungen zu setzen. Ich habe da gerade noch die entsprechenden Beispieldatenbank erweitert und ein entsprechendes Makro angepasst. Auf anderen Wegen habe ich das nicht so einfach hin bekommen.
Du findest die aktuelle Fassung der entsprechenden Beispieldatenbank zur Zeit hier:
http://robert.familiegrosskopf.de/lo_hb_dev/

Gruß

Robert

[Freischreiber]

Hallo Robert,

danke, ich habs grad selbst gemerkt, die Klammern waren falsch...

doch, das hilft mir schon sehr weiter, da meine ersten 1200 Datensätze aus der alten Adressdatenbank alle ein Feld Erfassdatum und Erfasszeit haben, und zusätzlich Änderdatum und Änderzeit. Zumindest die ersten beiden werden jetzt weitergeführt.

Ist es richtig, daß diese Felder am besten im Formular gar nicht auftauchen, weil sie nur dann automatisch arbeiten, wenn man sie manuell leer läßt?

Und eine Frage noch: Kann ich der Tabelle irgendwie ansehen, daß ich diese SQL-Befehle auf sie angewendet habe? Im Bearbeiten-Modus sehe ich den Feldern diese Automatik nicht an.

Gruß
Freischreiber

[RobertG]

Hallo Freischreiber,

Du kannst die Felder ruhig im Formular anzeigen - nur eben schreibgeschützt und ohne Tabstop. Eine Änderung erfolgt aber nur beim Einfügen neuer Datensätze, wenn in dem Fall der Datumswert leer ist.

Die Änderung hast Du damit nicht im Griff.

Die Zeitwerte kannst Du entsprechend anpassen:

SQL-Funktionen, die erlaubt sind:
für das aktuelle Datum - CURRENT_DATE, TODAY
für die aktuelle Zeit - CURRENT_TIME, NOW
für den aktuellen Datums-Zeit-Wert - CURRENT_TIMESTAMP, NOW.

Gruß

Robert