Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi TDbGrid checkt automatisch (mit Trigger) gefülltes Feld nicht (https://www.delphipraxis.net/159166-tdbgrid-checkt-automatisch-mit-trigger-gefuelltes-feld-nicht.html)

ralfiii 16. Mär 2011 18:15

Datenbank: Firebird • Version: 2.1 • Zugriff über: ibx / IBDac

TDbGrid checkt automatisch (mit Trigger) gefülltes Feld nicht
 
Folgende Situation:

Eine ganz einfache Tabelle bei der die erste Spalte automatisch mit einem Generator gefüllt wird, z.B.

Code:
CREATE GENERATOR GEN_TEST;

CREATE TABLE TEST (
  INTFIELD INTEGER,
  FOO VARCHAR(5));

SET TERM ^ ;
CREATE OR ALTER TRIGGER TEST_BI FOR TEST
ACTIVE BEFORE INSERT POSITION 0
AS
BEGIN
  IF (NEW.INTFIELD IS NULL) THEN
    NEW.INTFIELD = GEN_ID(GEN_TEST,1);
END
^

SET TERM ; ^
);
Diese Tabelle hänge ich an einfach (je nach Zugriffsmethode) an eine IBDataSet/TIbTable/IBCQuery -> DataSource -> TDbGrid.
Lege ich da einen neuen Eintrag an (d.h. ich tipp einen String in Spalte zwei und scrolle runter) so wird in der Datenbank die erste Spalte sehr wohl mit dem Wert von Generator gefüllt, das DBGrid checkt das aber nicht, d.h. die erste Spalte bleibt leer.
Scroll ich zurück und will dann den Eintrag löschen so krieg ich bei IBDAC die Fehlermeldung "Update failed. Found 0 records", bei IBTable tut er so als hätte er den Eintrag gelöscht, schliesst und startet man die Anwendung ist der Eintrag aber doch noch da.

Hilfe!
Danke!

dataspider 16. Mär 2011 18:41

AW: TDbGrid checkt automatisch (mit Trigger) gefülltes Feld nicht
 
Es ist schon ein Unterschied, ob Zugriff über IBX oder IBDac erfolgt.

Bei IBDac sollte es reichen, RefreshOptions roAFterInsert auf True zu setzen.
Erklärung findet man in der PDF - Dokumentation.

Prinzipiell ist es so, dass immer, wenn Daten automatisch über Trigger oder Defaults der Feld- bzw. Domaindefinition gesetzt werden, einiges beachtet werden muss.
Je nach Zugriffskomponenten gibt es da auch verschiedene Möglichkeiten.

Frank

ralfiii 16. Mär 2011 19:21

AW: TDbGrid checkt automatisch (mit Trigger) gefülltes Feld nicht
 
Zitat:

Zitat von dataspider (Beitrag 1089084)
Bei IBDac sollte es reichen, RefreshOptions roAFterInsert auf True zu setzen.
Erklärung findet man in der PDF - Dokumentation.

IBDac würd' schon reichen, IBX hab ich eigentlich grad hinter mir gelassen.
PDF-Doku? Ich hab nur das chm-Helpfile.
Ich hab RefreshOpions auf AfterInsert gesetzt, hat nicht geholfen (da kam dann die Meldung dass irgendwas beim Refresh gescheitert ist ("Refresh failed. Found 0 records").

Was nun die Lösung gebracht hat:

Delphi-Quellcode:
  IBCQuery1.KeyFields:='INTFIELD';
  IBCQuery1.KeyGenerator:='GEN_TEST';
Vielen Dank für deinen Schupps in die richtige Richtung!

:thumb:

dataspider 17. Mär 2011 07:02

AW: TDbGrid checkt automatisch (mit Trigger) gefülltes Feld nicht
 
Liste der Anhänge anzeigen (Anzahl: 1)
Hi,

keine Ahnung, woher ich die PDF habe. Vielleicht mit der Installation der Sourcen.
Ich habe den Teil mal angehangen.
Aber wie du es beschreibst, funktioniert es wohl mit dem PK nicht, weil er diesen sicher für das Refresh benötigt.

Frank


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:26 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz