Delphi-PRAXiS
Seite 1 von 3  1 23      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi insert into mit IBX und FB (https://www.delphipraxis.net/126405-insert-into-mit-ibx-und-fb.html)

karolus 23. Dez 2008 19:52

Datenbank: Firebird • Version: 2.1 • Zugriff über: IBX Komponenten

insert into mit IBX und FB
 
Hallo DPler,

Ich will eine Paradox-Tabelle in eine FB-Tabelle einlesen. Beim Aufruf der eingefügten Routine erhalte ich den folgenden Fehler "Im Projekt BiblioDaten.exe ist eine Exception der Klasse EIBClientError mit der Meldung 'Feld "LfdNr" konnte nicht gefunden werden.' aufgetreten." Was mache ich falsch. Habe andere Routinen probiert, aber letztlich waren die Felder in der FB-Tabelle nicht vorhanden. Die Tabelle ist aber angelegt.
Jemand Hilfe für einen Neuling? Schon mal Danke vorab.

Gruß WE

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
     Form1.IBDataSet1.InsertSQL.Clear;
     Form1.IBDataSet1.InsertSQL.Add('Insert into RTitelAutor (LfdNr, TitelNr, UrheberNr) values (:LfdNr, :TitelNr, :UrheberNr)');
     Form1.IBDataSet1.Prepare;
     if Form1.IBDataSet1.Prepared then
          begin
               Form1.Table1.First;
               while not Form1.Table1.Eof do
               begin
                    Form1.IBDataSet1.ParamByName('LfdNr').AsInteger := Form1.Table1.FieldByName('LfdNr').AsInteger;
                    Form1.IBDataSet1.ParamByName('TitelNr').AsInteger := Form1.Table1.FieldByName('TitelNr').AsInteger;
                    Form1.IBDataSet1.ParamByName('UrheberNr').AsInteger := Form1.Table1.FieldByName('UrheberNr').AsInteger;
                    Form1.IBDataSet1.ExecSQL;
                    Form1.Table1.Next;
               end;
          end;
end;
[edit=MrSpock]Code-Tags eingefügt. Mfg, MrSpock[/edit]

mkinzler 23. Dez 2008 19:55

Re: insert into mit IBX und FB
 
In welcher Zeile tritt der Fehler auf? Alos entweder existiert das Feld in der Quell- oder der Zieltabelle nicht

DeddyH 23. Dez 2008 19:57

Re: insert into mit IBX und FB
 
Es sieht so aus, als ob in der Firebird-Tabelle das Feld "LfdNr" nicht vorhanden ist. Hast Du das beim Anlegen der Tabelle evtl. in Anführungszeichen geschrieben? Dann wäre es nämlich case-sensitiv.

karolus 23. Dez 2008 20:00

Re: insert into mit IBX und FB
 
Zitat:

Zitat von mkinzler
In welcher Zeile tritt der Fehler auf? Alos entweder existiert das Feld in der Quell- oder der Zieltabelle nicht

Der Fehler tritt in der ersten Zuweisungszeile im While-Block auf. Beide Tabellen sind definitiv vorhanden, die Paradox Tabelle mit Daten, die Firebird Tabelle leer.

DeddyH 23. Dez 2008 20:01

Re: insert into mit IBX und FB
 
Ja, aber ist das entsprechende Feld auch in beiden Tabellen vorhanden?

karolus 23. Dez 2008 20:03

Re: insert into mit IBX und FB
 
Zitat:

Zitat von DeddyH
Es sieht so aus, als ob in der Firebird-Tabelle das Feld "LfdNr" nicht vorhanden ist. Hast Du das beim Anlegen der Tabelle evtl. in Anführungszeichen geschrieben? Dann wäre es nämlich case-sensitiv.

Habe mir vorsichtshalber grad noch mal das Skript angesehen, nein, keine Anführungszeichen.

mkinzler 23. Dez 2008 20:04

Re: insert into mit IBX und FB
 
Die Frage ist nicht ob die Tabellen existieren, sondern ob ein Feld mit diesem namen existiert. FireBird ist anders als Paradox casesensitiv, wenn man das Feld Quotet. Im Insert ist es nicht gequotet. Falls es also wirklich LfdNr heisst, musst du es in der Abfrage in "" setzen (wie Detlef schon schrieb)

karolus 23. Dez 2008 20:06

Re: insert into mit IBX und FB
 
Zitat:

Zitat von DeddyH
Ja, aber ist das entsprechende Feld auch in beiden Tabellen vorhanden?

Ja, die Tabellen sind identisch aufgebaut.

DeddyH 23. Dez 2008 20:10

Re: insert into mit IBX und FB
 
Mir gehen im Moment die Ideen aus :gruebel:

mkinzler 23. Dez 2008 20:11

Re: insert into mit IBX und FB
 
Zeig mal die Tabellendeklaration


Alle Zeitangaben in WEZ +1. Es ist jetzt 09:40 Uhr.
Seite 1 von 3  1 23      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz