Einzelnen Beitrag anzeigen

Hansa

Registriert seit: 9. Jun 2002
Ort: Saarland
7.554 Beiträge
 
Delphi 8 Professional
 
#51

Re: IB Expert und Tabelle Anlegen

  Alt 26. Okt 2009, 13:56
Schon 4 Seiten. Tut langsam weh.

Gehe in die "Script Executive" unter "Tools" und kopiere disen Text da rein :
SQL-Code:
/******************************************************************************/
/****         Generated by IBExpert 2006.08.17 26.10.2009 13:49:00         ****/
/******************************************************************************/

SET SQL DIALECT 3;

SET NAMES ISO8859_1;

CREATE DATABASE 'C:\XYZ.FDB'
USER 'SYSDBA' PASSWORD 'masterkey'
PAGE_SIZE 4096
DEFAULT CHARACTER SET ISO8859_1;



/******************************************************************************/
/****                              Generators                              ****/
/******************************************************************************/

CREATE GENERATOR GEN_TESTTABLE_ID;
SET GENERATOR GEN_TESTTABLE_ID TO 20;



/******************************************************************************/
/****                                Tables                                ****/
/******************************************************************************/



CREATE TABLE TESTTABLE (
    ID INTEGER NOT NULL,
    CITYNO INTEGER NOT NULL,
    COUNTRY VARCHAR(20),
    CITY VARCHAR(20)
);




/******************************************************************************/
/****                             Primary Keys                             ****/
/******************************************************************************/

ALTER TABLE TESTTABLE ADD CONSTRAINT PK_TESTTABLE PRIMARY KEY (ID);


/******************************************************************************/
/****                               Triggers                               ****/
/******************************************************************************/


SET TERM ^ ;


/******************************************************************************/
/****                         Triggers for tables                          ****/
/******************************************************************************/



/* Trigger: TESTTABLE_BI0 */
CREATE TRIGGER TESTTABLE_BI0 FOR TESTTABLE
ACTIVE BEFORE INSERT POSITION 0
AS
BEGIN
  IF (NEW.ID IS NULL) THEN
    NEW.ID = GEN_ID(GEN_TESTTABLE_ID, 1);
END
^


SET TERM ; ^
Lasse es dann (am besten unverändert) laufen. DB dürfte dann erzeugt sein. Nächster Schritt : IBExpert mitteilen, dass es eine neue DB gibt. Also Database -> register database. Local etc. einstellen, Datei u. Pfad auswählen. Sollte das tatsächlich gelingen, dann damit spielen. Die ID in Ruhe lassen, Felder umbennen, statt CITYNO eben ARTNR etc. 8)
Gruß
Hansa
  Mit Zitat antworten Zitat