Einzelnen Beitrag anzeigen

Benutzerbild von dor557
dor557

Registriert seit: 24. Okt 2004
Ort: Walldorf
197 Beiträge
 
Delphi 10.1 Berlin Starter
 
#3

Re: Nach Script Fehler mit zugriff !!!

  Alt 24. Feb 2007, 18:46
Das script habe ich mit IBExpert exportiert.

Es wird ja auch korrekt ausgeführt.

Alles erstellt.

Deshalb weiss ich nicht woran der Fehler liegt.

Aber hier mal das Script :

SQL-Code:
/******************************************************************************/
/****         Generated by IBExpert 2006.12.13 22.02.2007 15:47:37         ****/
/******************************************************************************/

SET SQL DIALECT 3;

SET NAMES NONE;

CREATE DATABASE 'C:\Programme\test\text.FDB'
USER 'USERNAME' PASSWORD 'password'
PAGE_SIZE 4096
DEFAULT CHARACTER SET NONE;



/******************************************************************************/
/****                               Domains                                ****/
/******************************************************************************/

CREATE DOMAIN T_YESNO AS
CHAR(1)
DEFAULT 'N'
CHECK((VALUE IS NULL) OR (VALUE IN ('N','Y')));



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

CREATE GENERATOR GEN_AUFTRAGGEBER_ID;
SET GENERATOR GEN_AUFTRAGGEBER_ID TO 0;

CREATE GENERATOR GEN_FAHRER_ID;
SET GENERATOR GEN_FAHRER_ID TO 0;

CREATE GENERATOR GEN_FZ_ADDR_ID;
SET GENERATOR GEN_FZ_ADDR_ID TO 0;

CREATE GENERATOR GEN_LKWS_ID;
SET GENERATOR GEN_LKWS_ID TO 0;

CREATE GENERATOR GEN_UNTERNEHMER_ID;
SET GENERATOR GEN_UNTERNEHMER_ID TO 0;

CREATE GENERATOR GEN_WB_DATEN_ID;
SET GENERATOR GEN_WB_DATEN_ID TO 0;



SET TERM ^ ;



/******************************************************************************/
/****                          Stored Procedures                           ****/
/******************************************************************************/

CREATE PROCEDURE GET_AUFTRAGGEBER_ID
RETURNS (
    ID INTEGER)
AS
BEGIN
  EXIT;
END^


CREATE PROCEDURE GET_FAHRER_ID
RETURNS (
    ID INTEGER)
AS
BEGIN
  EXIT;
END^


CREATE PROCEDURE GET_FZ_ADDR_ID
RETURNS (
    ID INTEGER)
AS
BEGIN
  EXIT;
END^


CREATE PROCEDURE GET_LKWS_ID
RETURNS (
    ID INTEGER)
AS
BEGIN
  EXIT;
END^


CREATE PROCEDURE GET_UNTERNEHMER_ID
RETURNS (
    ID INTEGER)
AS
BEGIN
  EXIT;
END^


CREATE PROCEDURE GET_WB_DATEN_ID
RETURNS (
    ID INTEGER)
AS
BEGIN
  EXIT;
END^



SET TERM ; ^


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



CREATE TABLE AUFTRAGGEBER (
    ID INTEGER NOT NULL,
    AUFTRAGGEBER VARCHAR(255)
);

CREATE TABLE FAHRER (
    ID INTEGER NOT NULL,
    NAME VARCHAR(250),
    LKW INTEGER,
    TELEFON VARCHAR(20)
);

CREATE TABLE FZ_ADDR (
    ID INTEGER NOT NULL,
    FZ_NAME VARCHAR(30),
    FZ_NR SMALLINT,
    FZ_ADR_NAME VARCHAR(255) CHARACTER SET ISO8859_1,
    FZ_ADR_STR VARCHAR(255) CHARACTER SET ISO8859_1,
    FZ_ADR_PLZ VARCHAR(5) CHARACTER SET ISO8859_1,
    FZ_ADR_ORT VARCHAR(1) CHARACTER SET ISO8859_1,
    FZ_ADR_ID BIGINT
);

CREATE TABLE LKWS (
    ID INTEGER NOT NULL,
    KENNZ VARCHAR(15),
    IDKARTE VARCHAR(10)
);

CREATE TABLE UNTERNEHMER (
    ID INTEGER NOT NULL,
    UNTERNEHMER VARCHAR(255),
    FAHRER VARCHAR(100),
    KENZ VARCHAR(15),
    ID_KARTE INTEGER,
    ABGANGSORT VARCHAR(255),
    ABGANGSBAHNHOF VARCHAR(255),
    BEGEGNUNGSORT VARCHAR(255),
    EMPFANGSORT VARCHAR(255)
);

CREATE TABLE WB_DATEN (
    ID INTEGER NOT NULL,
    T_ID VARCHAR(255) NOT NULL,
    "FROM"          VARCHAR(255),
    "TO"            VARCHAR(255),
    ANZAHL VARCHAR(255),
    SENDUNGSINHALT VARCHAR(255),
    GEWICHT INTEGER,
    DATUM_GO VARCHAR(10),
    DATUM_END VARCHAR(10),
    ZEIT_GES VARCHAR(5),
    ZEIT_ABF VARCHAR(5),
    ZEIT_ANK VARCHAR(5),
    ORT_DATUM VARCHAR(255),
    NAME_F VARCHAR(100)
);

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

ALTER TABLE AUFTRAGGEBER ADD CONSTRAINT AUFTRAGGEBER_PRIMARY PRIMARY KEY (ID);
ALTER TABLE FAHRER ADD CONSTRAINT FAHRER_PRIMARY PRIMARY KEY (ID);
ALTER TABLE FZ_ADDR ADD CONSTRAINT FZ_ADDR_PRIMARY PRIMARY KEY (ID);
ALTER TABLE LKWS ADD CONSTRAINT LKWS_PRIMARY PRIMARY KEY (ID);
ALTER TABLE UNTERNEHMER ADD CONSTRAINT UNTERNEHMER_PRIMARY PRIMARY KEY (ID);
ALTER TABLE WB_DATEN ADD CONSTRAINT WB_DATEN_PRIMARY PRIMARY KEY (ID);


/******************************************************************************/
/****                          Stored Procedures                           ****/
/******************************************************************************/


SET TERM ^ ;

ALTER PROCEDURE GET_AUFTRAGGEBER_ID
RETURNS (
    ID INTEGER)
AS
begin
  id=gen_id(GEN_AUFTRAGGEBER_ID,1);
  suspend;
end
^

ALTER PROCEDURE GET_FAHRER_ID
RETURNS (
    ID INTEGER)
AS
begin
  id=gen_id(GEN_FAHRER_ID,1);
  suspend;
end
^

ALTER PROCEDURE GET_FZ_ADDR_ID
RETURNS (
    ID INTEGER)
AS
begin
  id=gen_id(GEN_FZ_ADDR_ID,1);
  suspend;
end
^

ALTER PROCEDURE GET_LKWS_ID
RETURNS (
    ID INTEGER)
AS
begin
  id=gen_id(GEN_LKWS_ID,1);
  suspend;
end
^

ALTER PROCEDURE GET_UNTERNEHMER_ID
RETURNS (
    ID INTEGER)
AS
begin
  id=gen_id(GEN_UNTERNEHMER_ID,1);
  suspend;
end
^

ALTER PROCEDURE GET_WB_DATEN_ID
RETURNS (
    ID INTEGER)
AS
begin
  id=gen_id(GEN_WB_DATEN_ID,1);
  suspend;
end
^


SET TERM ; ^
Sascha Nickel
  Mit Zitat antworten Zitat