1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
66:
67:
68:
69:
70:
71:
72:
73:
74:

SET SQL DIALECT 3;

  
CREATE DATABASE 'C:\Projekt2\Db\firma3.gdb'
  PAGE_SIZE 4096
  USER 'sysdba'
  PASSWORD 'masterkey'
   DEFAULT CHARACTER SET ISO8859_1;

CREATE DOMAIN TKBEZ AS VARCHAR(40) CHARACTER SET ISO8859_1 COLLATE DE_DE;      
CREATE DOMAIN TMEMO AS BLOB SUB_TYPE TEXT SEGMENT SIZE 80 CHARACTER SET ISO8859_1;  
CREATE DOMAIN TBOOLEAN AS CHAR(1) DEFAULT 'F' NOT NULL CHECK (VALUE IN ('F', 'W'));  
CREATE DOMAIN TCURRENCY AS NUMERIC(9,4) DEFAULT 0;                  

/* Tabellen */
CREATE TABLE FIRMEN (
  ID    INTEGER NOT NULL,  
  Firma    TKBEZ,        ANGEBOTE    TBOOLEAN,  
            
  PRIMARY KEY (ID));
  
CREATE TABLE ANGEBOTE (
  CODE    VARCHAR(20) NOT NULL,  
        ID    INTEGER,      
        Firma  TKBEZ,
        Standort  TKBEZ,
        Adresse            TKBEZ,
        TelNr    TKBEZ,
        PRIMARY KEY (CODE));

CREATE TABLE ANPOSTEN (
  CODE    VARCHAR(20) NOT NULL,  
  AP_LFD    INTEGER NOT NULL,    
  Angebot         TKBEZ,          PRIMARY KEY (CODE, AP_LFD));

ALTER TABLE ANGEBOTE
  ADD CONSTRAINT FK_ANGEBOTE_FIRMEN
  FOREIGN KEY (ID) REFERENCES FIRMEN (ID)
  ON UPDATE CASCADE
  ON DELETE CASCADE;
  
ALTER TABLE ANPOSTEN
  ADD CONSTRAINT FK_ANPOSTEN_ANGEBOTE
  FOREIGN KEY (CODE) REFERENCES ANGEBOTE (CODE)
  ON UPDATE CASCADE
  ON DELETE CASCADE;
  
/*Generatoren--------------------------------------------------------------------------------------*/
CREATE GENERATOR GEN_ID; 

/*Prozeduren---------------------------------------------------------------------------------------*/
SET TERM ^ ;

   AN_ANGEBOTE im Firmensatz auf 'W' gesetzt. */
CREATE TRIGGER ANGEBOT_A_I FOR ANGEBOTE AFTER INSERT
AS
BEGIN
  UPDATE FIRMEN SET ANGEBOTE = 'W' WHERE FIRMEN.ID = new.ID;
END ^

   
CREATE TRIGGER ANGEBOT_A_D FOR ANGEBOTE AFTER DELETE
AS
  DECLARE VARIABLE CNT INTEGER;
BEGIN
  SELECT COUNT(*) FROM ANGEBOTE WHERE ID = old.ID INTO CNT;
  IF (CNT = 0) THEN
    UPDATE FIRMEN SET ANGEBOTE = 'F' WHERE  FIRMEN.ID = OLD.ID;
  ELSE
    UPDATE FIRMEN SET ANGEBOTE = 'W' WHERE  FIRMEN.ID = OLD.ID;
END ^


SET TERM ; ^					

1:
2:
3:
4:
5:

set transaction;
...
/*Hier deine Befehle*/
...
commit;					

1:

CREATE GENERATOR GEN_ID;