To_Date wird nicht erkannt

[p80286]

ich denke es klemmt an der Hochkommateritis:

Code:

WHERE DATUM = TO_Date( :Datum, "YYYY-MM-DD")

wird von Oracle nicht akzeptiert, es müsste so lauten:

Code:

WHERE DATUM = TO_Date( :Datum, 'YYYY-MM-DD')

oder legt die BDE hier noch einen Vereinfachungsschleier drüber?

Gruß
K-H

[fanavity]

Ich denke mal, dass der Fehler nun behoben ist. Nur leider ist mir aufgefallen, dass ich viel früher schon einen habe. Und zwar beim speichern der Daten.

Vielleicht könnr ihr ja mal rüber sehen!

Delphi-Quellcode:

     Query.Close;
     Query.Sql.Clear;
     Query.Sql.Add('CREATE TABLE '+Tabelle+' ( Nummer real, IDNR real, IDNR2 real) ');

     Database.StartTransaction;

     try
         Query.ExecSQL;
         Database.Commit;
         except
          on E: Exception do
         begin
              Database.Rollback;
              ShowMessage(E.Message);
         end;
     end;


     Query.Close;
     Query.Sql.Clear;
     Query.Sql.Add('INSERT INTO '+Tabelle+' ( Nummer, IDNR, IDNR2) ');
     Query.Sql.Add('SELECT a.TEST1, a.TEST2, b.TEST2');
     Query.Sql.Add('FROM DATA_TEST2 a, DATA_TEST2 b ');
     Query.Sql.Add('WHERE a.IDNR= 4 ');
     Query.Sql.Add('AND b.IDNR= 5');
     Query.Sql.Add('AND a.IDNR LIKE "%'+Variable+'" ');
     Query.Sql.Add('AND a.IDNR2 = b.IDNR');
     Database.StartTransaction;

     try
         Query.ExecSQL;
         Database.Commit;
         except
          on E: Exception do
         begin
              Database.Rollback;
              ShowMessage(E.Message);
         end;
     end;

     Query.Close;
     Query.SQL.Clear;
     Query.SQL.Add('SELECT * FROM '+Tabelle+'');
     Query.Open;

Die Daten werden nicht in die neue Tabelle übertragen. Mit Toad for Oracle funktioniert die Abfrage tadellos.

[Sir Rufo]

Delphi-Quellcode:

     Query.Close;
     Query.Sql.Clear;
     Query.Sql.Add('CREATE TABLE '+Tabelle+' ' );
     Query.Sql.Add('SELECT a.TEST1 Nummer, a.TEST2 IDNR, b.TEST2 IDNR2 ');
     Query.Sql.Add('FROM DATA_TEST2 a, DATA_TEST2 b ');
     Query.Sql.Add('WHERE a.IDNR= 4 ');
     Query.Sql.Add('AND b.IDNR= 5');
     Query.Sql.Add('AND a.IDNR LIKE "%'+Variable+'" ');
     Query.Sql.Add('AND a.IDNR2 = b.IDNR');
     Database.StartTransaction;

     try
         Query.ExecSQL;
         Database.Commit;
     except
          on E: Exception do
         begin
              Database.Rollback;
              ShowMessage(E.Message);
         end;
     end;

     Query.Close;
     Query.SQL.Clear;
     Query.SQL.Add('SELECT * FROM '+Tabelle+'');
     Query.Open;

[fanavity]

Funktioniert leider auch nicht

Die tabelle ist halt einfach leer.. Bekomme auch keine Fehlermeldung oder so..

[jobo]

Im Letzten Versuch fehlt nach dem Create [tablename] ein "as" vor dem Select.
Ansonsten scheint mir die Like Operation mit Doppelhochkomma verkehrt. Doppelhochkomma ist Delimiter für spezielle Spaltennamen in ORacle. Da es aber um einen String Wert geht, muss mit einfachen Hochkomma plus QuotedStr gearbeitet werden oder mit doppelten einfachen Hochkommata.

[p80286]

so ohne Handbuch, muß es nicht so sein:

Code:

Insert Into Tabelle (Feld1,Feld2...) Values(Wert1,Wert2...)

Gruß
K-H

[jobo]

Man kann entweder ein Create Table mit Select kombinieren
Create table [tablename] as [Select..]
oder wie Du geschrieben hast
oder insert into [tablename] ([Columns]) mit Select kombinieren.
Im letzten Fall gehören glaub ich runde Klammern um das Select

Edit: Geht mit und ohne Klammern, glaub das hab ich mit Update plus Select verwechselt.

[p80286]

Zitat von jobo:

Im letzten Fall gehören glaub ich runde Klammern um das Select

Das Handbuch sagt, so isses!

Gruß
K-H

[fanavity]

Also..

Weder QuotedStr, noch Query.Sql.Add('AND a.IDNR LIKE ''%'+Variable+''' '); hat geklappt. Wenn ich bei Oracle ein AS benutze, sagt er mir das ich Syntaxfehler vorliegt. Irgendwie finde ich das ganze seltsam :/

PS:

Momentane Version:

Delphi-Quellcode:

 Query.Sql.Add('CREATE TABLE '+Tabelle+' ( Nummer real, IDNR real, IDNR2 real) ');
 Query.Sql.Add('SELECT a.TEST1, a.TEST2, b.TEST2');
 Query.Sql.Add('FROM DATA_TEST2 a, DATA_TEST2 b ');
 Query.Sql.Add('WHERE a.IDNR= 4 ');
 Query.Sql.Add('AND b.IDNR= 5');
 Query.Sql.Add('AND a.IDNR LIKE ''%'+Variable+''' ');
 Query.Sql.Add('AND a.IDNR2 = b.IDNR');
 Database.StartTransaction;

     try
         Query.ExecSQL;
         Database.Commit;
         except
          on E: Exception do
         begin
              Database.Rollback;
              ShowMessage(E.Message);
         end;
     end;