Einzelnen Beitrag anzeigen

Benutzerbild von mschaefer
mschaefer

Registriert seit: 4. Feb 2003
Ort: Hannover
2.032 Beiträge
 
Delphi 12 Athens
 
#1

Interbase Generator Autogenerierung

  Alt 5. Feb 2003, 16:00
Moin und Hallo in den Süden

ja die Generatoren verfolgen mich immernoch:
Jetzt geht es um die Einträge der generierten Werte in die Tabelle
Zunächst der Teil der geht

CREATE TABLE adress_basis (
ADR_BAS_PID INTEGER,
ADR_BAS_Titel CHAR(50),
ADR_BAS_NameFull CHAR(50),
ADR_BAS_Company_Job CHAR(50),
ADR_BAS_Street_No CHAR(50),
ADR_BAS_Post_Town CHAR(50),
ADR_BAS_County_State CHAR(50),
ADR_BAS_Info_Person_FNT BLOB,
ADR_BAS_Visualfield_FNT BLOB,
ADR_BAS_Phone CHAR(50),
ADR_BAS_Fax CHAR(50),
ADR_BAS_EMail CHAR(50)
);

CREATE INDEX PRIMARYINDEX ON adress_basis (ADR_BAS_PID);
CREATE GENERATOR adress_basis;


INSERT INTO adress_basis (
ADR_BAS_PID,
ADR_BAS_Titel,
ADR_BAS_NameFull
)
VALUES
(GEN_ID( adress_basis,1)
, 'keiner'
, 'Heinz Becker'
)
;

/* Ok bis hierhin läuft alles bestens, inklusive der automatischen
Generierung des ID-Eintrags. Nun soll man aber mit einer kleinen
Procedure den Ausdruck (GEN_ID( adress_basis,1) im Insert ausdruck
umgehen können, genauer gesagt weglassen und dann ebenfalls
den ersten Value eintrag. Gefunden habe ich folgendes

SET TERM !! ;
CREATE TRIGGER Trigger1 FOR adress_basis
before insert position 0 as
begin
NEW.ADR_BAS_PID = GEN_ID(adress_basis,1);
end !!
SET TERM ; !!

Mein PROBLEM: WIBSQL beschwert sich bei dem SET TERM Ausdruck
und es kommt vom Server eine Fehlermeldung"Token nicht erkannt".
Greife derzeit über ODBC zu.

Habe den Eintrug, dass irgendwo noch ein Schalter umgestellt werden müßte.. Naja da hakt´s halt.

So long // Martin


Martin Schaefer
  Mit Zitat antworten Zitat