Registriert seit: 24. Okt 2004
Ort: Walldorf
197 Beiträge
Delphi 10.1 Berlin Starter
|
Re: Nach Script Fehler mit zugriff !!!
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
|