AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Datenbanken Firebird Db Trigger Problem
Thema durchsuchen
Ansicht
Themen-Optionen

Firebird Db Trigger Problem

Ein Thema von Privateer3000 · begonnen am 25. Okt 2012 · letzter Beitrag vom 29. Okt 2012
Antwort Antwort
Benutzerbild von Privateer3000
Privateer3000

Registriert seit: 10. Jun 2002
Ort: Jena
1.128 Beiträge
 
Delphi 10.4 Sydney
 
#1

Firebird Db Trigger Problem

  Alt 25. Okt 2012, 23:23
Datenbank: Firebird • Version: 2.1 • Zugriff über: IBEASY+
Hallöchen
ich komme grad irgendwie nicht weiter.
Ich habe einen Generator sowie einen Trigger
mittels IBEasy angelegt.
Wenn ich nun in der betreffenden Tabelle
einen neuen DS anlege passiert: nichts.
Code:
as
begin
  if ((new.ID is null) or (new.ID = 0)) then
  begin
    new.ID = gen_id( GENTEST, 1 );
  end
end
BEFORE INSERT und AKTIV sind eingesetzt.
Meiner Meinung nach ist die Tabelle in Ordnung
und der Generator auch.
Trotzdem wird keine ID angelegt wenn ein neuer DS angelegt wird (im IBEasy).
Mache ich was falsch?
Grüße
Peter
+++Versuch es nicht mit Gewalt + Nimm einen größeren Hammer! +++
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.875 Beiträge
 
Delphi 11 Alexandria
 
#2

AW: Firebird Db Trigger Problem

  Alt 26. Okt 2012, 05:20
Der Wert wird erst beim Post gesetzt. Bei der Neuanlage ( + o.aä; kenne IBEasy nicht) bleibt das Feld ersteinmal lle (NULL).
Der Trigger wirkt auch nur wenn man diesen Wert nicht vor dem Abschliessen ändert ( oder mit 0 belegt)
Markus Kinzler
  Mit Zitat antworten Zitat
Benutzerbild von Privateer3000
Privateer3000

Registriert seit: 10. Jun 2002
Ort: Jena
1.128 Beiträge
 
Delphi 10.4 Sydney
 
#3

AW: Firebird Db Trigger Problem

  Alt 26. Okt 2012, 11:27
Danke Markus
das hatte ich auch gedacht
aber beim Post meckert er rum dass ID nicht leer sein darf.
Also greift irgendwie der Trigger nicht.
Wo kann ich noch nachsehen?
Peter
+++Versuch es nicht mit Gewalt + Nimm einen größeren Hammer! +++
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.875 Beiträge
 
Delphi 11 Alexandria
 
#4

AW: Firebird Db Trigger Problem

  Alt 26. Okt 2012, 11:30
Ich glaube eher, dass dies ein Problem des Tools ist. Gib mal 0 an.
Markus Kinzler
  Mit Zitat antworten Zitat
Benutzerbild von Privateer3000
Privateer3000

Registriert seit: 10. Jun 2002
Ort: Jena
1.128 Beiträge
 
Delphi 10.4 Sydney
 
#5

AW: Firebird Db Trigger Problem

  Alt 26. Okt 2012, 11:58
Daran habe ich auch schon gedacht und
ein bissl herumgespielt, allerdings ohne Ergebnis.
Vllt. sollte ich eine andere GUI suchen.
Es gibt ja mehrere für FB.
Danke erstmal.
Peter
+++Versuch es nicht mit Gewalt + Nimm einen größeren Hammer! +++
  Mit Zitat antworten Zitat
alex517

Registriert seit: 23. Nov 2004
Ort: Bernau b. Berlin
273 Beiträge
 
Delphi XE5 Enterprise
 
#6

AW: Firebird Db Trigger Problem

  Alt 26. Okt 2012, 13:49
Hi,

du könnest mit dir auch "von Hand" eine neue ID holen
und diese dem Insert gleich mitgeben.

SQL-Code:
select
   gen_id( GEN_DeineTabelle_ID, 1 ) as NeueID
from
  RDB$Database
Das hat den Vorteil, dass für evt. Detail-Datensätze
gleich eine Master_ID bekannt ist.

alex
Alexander
  Mit Zitat antworten Zitat
Perlsau
(Gast)

n/a Beiträge
 
#7

IBExpert

  Alt 27. Okt 2012, 19:16
@Privateer3000:

Ich verwende zum Erstellen und Ändern von Firebird-Datenbank immer die Personalversion von IBExpert. Bevor du das Tool herunterlädst, mußt du dich registrieren.

IBExpert bietet beim Erstellen einer Tabelle die Möglichkeit, ein AutoInc-Feld zu definieren, wie in der angehängten Grafik dargestellt. Dabei kann man sich gleich automatisch den entsprechenden Trigger, den Generator und eine Prozedur generieren lassen. Die sehen dann so aus:

Prozedur SP_GEN_PROJEKT_ID
Code:
begin
  ID = gen_id(GEN_PROJEKT_ID, 1);
  suspend;
end

/* DLL */
SET TERM ^ ;

CREATE OR ALTER PROCEDURE SP_GEN_PROJEKT_ID
returns (
    ID integer)
as
begin
  ID = gen_id(GEN_PROJEKT_ID, 1);
  suspend;
end^

SET TERM ; ^

/* Existing privileges on this procedure */

GRANT EXECUTE ON PROCEDURE SP_GEN_PROJEKT_ID TO SYSDBA;
Trigger PROJEKT_BI
Code:
as
begin
  if (new.IDX_PROJEKT is null) then
    new.IDX_PROJEKT = gen_id(GEN_PROJEKT_ID,1);
end

/* DLL */
/******************************************************************************/
/*        Following SET SQL DIALECT is just for the Database Comparer        */
/******************************************************************************/
SET SQL DIALECT 3;

CREATE GENERATOR GEN_PROJEKT_ID;

SET TERM ^ ;

CREATE OR ALTER TRIGGER PROJEKT_BI FOR PROJEKT
ACTIVE BEFORE INSERT POSITION 0
as
begin
  if (new.IDX_PROJEKT is null) then
    new.IDX_PROJEKT = gen_id(GEN_PROJEKT_ID,1);
end
^

SET TERM ; ^
Generator GEN_PROJEKT_ID
Code:
CREATE SEQUENCE GEN_PROJEKT_ID;
ALTER SEQUENCE GEN_PROJEKT_ID RESTART WITH 1;

/* Old syntax is:
CREATE GENERATOR GEN_PROJEKT_ID;
SET GENERATOR GEN_PROJEKT_ID TO 1;
*/
Angehängte Grafiken
Dateityp: jpg AutoInc.jpg (125,5 KB, 5x aufgerufen)
  Mit Zitat antworten Zitat
Benutzerbild von Privateer3000
Privateer3000

Registriert seit: 10. Jun 2002
Ort: Jena
1.128 Beiträge
 
Delphi 10.4 Sydney
 
#8

AW: Firebird Db Trigger Problem

  Alt 27. Okt 2012, 21:24
Vielen Dank.
Ich habe mit IBExpert die Trigger ausprobiert
die ich im IBEasy erstellt habe.
Siehe da: sie funktionieren.
Es liegt am IBEasy.
Vielen Dank für den IBExpert Tipp.
Peter
+++Versuch es nicht mit Gewalt + Nimm einen größeren Hammer! +++
  Mit Zitat antworten Zitat
Benutzerbild von Privateer3000
Privateer3000

Registriert seit: 10. Jun 2002
Ort: Jena
1.128 Beiträge
 
Delphi 10.4 Sydney
 
#9

AW: Firebird Db Trigger Problem

  Alt 27. Okt 2012, 22:49
By the Way
kann man mit Generatoren auch ein Timestamp realisieren
so das beim DS erstellen ein Timestamp eingetragen wird?
Grüße

PS: Ich weiß offTopic, aber wollte deswegen keinen neuen Thread aufmachen
Peter
+++Versuch es nicht mit Gewalt + Nimm einen größeren Hammer! +++
  Mit Zitat antworten Zitat
Perlsau
(Gast)

n/a Beiträge
 
#10

AW: Firebird Db Trigger Problem

  Alt 27. Okt 2012, 23:09
kann man mit Generatoren auch ein Timestamp realisieren
Ja. Das sollte dann aber eher in einen Trigger OnBeforeInsert oder OnBeforeUpdate.
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 11:50 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz