Datensätze in die gleiche Tabelle kopieren?

[prelude247]

Hi!

Wie kann man komplette Datensätze in einer Tabelle kopieren ohne den kompletten Inhalt vorher auf Variablen zu speichern?

Ich habe schon versucht die Tabelle 2 mal zu öffnen und dann die aus der einen in die andere zu kopieren, aber das will nicht so recht funktionieren.

Bin für jeden Gedankenanstoß dankbar..

MfG
Prelude247

[marabu]

Hallo und herzlich willkommen in der Delphi-PRAXiS.

Datensätze kopieren kannst du mit SQL:

SQL-Code:

INSERT INTO table (field1, field2) SELECT field1, field2 FROM table WHERE condition

Kann sein, dass du die genaue Beschreibung der Syntax in deiner Dokumentation nachschlagen musst.

Grüße vom marabu

SQL-Statement korrigiert nach Hinweis von Flocke

[Flocke]

SQL-Code:

INSERT INTO table (field1, field2)
SELECT field1, field2 FROM table
WHERE condition

Das VALUES muss man weglassen. Außerdem kannst du in der SELECT-Liste auch andere Werte einfügen, z.B. aus mit JOIN hinzugenommenen Tabellen, oder auch Konstanten.

[prelude247]

Danke für die schnelle Antwort!

Das mit dem SQL ist so 'ne Sache, da die Tabelle in der ich kopieren will aus fast 40 Feldern besteht.
Ich dachte eher an eine Art Anweisung

Code:

Table1:=Table2;

Gibt es keine andere Möglichkeit :?:

MfG
prelude247

[marabu]

Hätte ich mich selbst zitiert, dann wäre mir das mit den VALUES nicht schon wieder passiert...

Natürlich kannst du die vereinfachte Syntax verwenden - wenn du keine Probleme mit UNIQUE Klauseln hast:

SQL-Code:

INSERT INTO table SELECT * FROM table WHERE condition

marabu

[prelude247]

Habe nun versucht eine SQL-Anweisung zu erstellen um einen Datensatz zu kopieren.

Bei der Ausführung erhalte ich folgenden Fehler:

"Unterabfrage nur in einem Element der Auswahlliste zulässig."

SQL-Code:

INSERT INTO ARTIKELSTAMM
(
ArtiStammId, ArtiStamBezeich, ArtiStamNummer, EKZ_Nummer,
ArtGrNummer, ArtiFolgeTyp, ArtiInfoGruppe,
ArtiPoolNummer, ArtiStamAuspr, ArtiStamBPoolKum,
ArtiStamBeaKennz, ArtiStamBrutGew, ArtiStamEAN,
ArtiStamEKDKennz, ArtiStamGewicht, ArtiStamGrundArt,
ArtiStamLPreVari, ArtiStamLoeKennz, ArtiStamMatch,
ArtiStamMxErntMg, ArtiStamOPreisSp, ArtiStamOPreisWa,
ArtiStamPackBrei, ArtiStamPackHoe, ArtiStamPackLae,
ArtiStamPrAzGrMe, ArtiStamPrAzMeBz, ArtiStamPrEinhEK,
ArtiStamPrEinhVK, ArtiStamPreVari, ArtiStamRundBest,
ArtiStamRundEK, ArtiStamRundVK, ArtiStamSaatTyp,
ArtiStamTyp, ArtiStamUPreisSp, ArtiStamUPreisWa,
ArtiStamVKDKennz, ArtiStamVerpGew, ArtiStamVolumen,
ArtiStamXPrEinsp, ArtiStamZulBDat, ArtiStammIdEkGrp,
ArtiStammImage, DSD_MatGrNummer, DSD_VolGrNummer,
FilTransfer, ME_GrupNummer, ME_NummerVerpGew,
PrKalkSchema, PreisMatNummerEK, PreisMatNummerVK,
Reinheitsgrad, SaatFruNummer, SaatSortNummer,
SteuerSchluessel, VerpackGruppe, WaGruNummer, artiStamPrAzUFak
)
VALUES (
17134,'Absperrventil Form A','999910',70,
(
SELECT 
ArtGrNummer, ArtiFolgeTyp, ArtiInfoGruppe,
ArtiPoolNummer, ArtiStamAuspr, ArtiStamBPoolKum,
ArtiStamBeaKennz, ArtiStamBrutGew, ArtiStamEAN,
ArtiStamEKDKennz, ArtiStamGewicht, ArtiStamGrundArt,
ArtiStamLPreVari, ArtiStamLoeKennz, ArtiStamMatch,
ArtiStamMxErntMg, ArtiStamOPreisSp, ArtiStamOPreisWa,
ArtiStamPackBrei, ArtiStamPackHoe, ArtiStamPackLae,
ArtiStamPrAzGrMe, ArtiStamPrAzMeBz, ArtiStamPrEinhEK,
ArtiStamPrEinhVK, ArtiStamPreVari, ArtiStamRundBest,
ArtiStamRundEK, ArtiStamRundVK, ArtiStamSaatTyp,
ArtiStamTyp, ArtiStamUPreisSp, ArtiStamUPreisWa,
ArtiStamVKDKennz, ArtiStamVerpGew, ArtiStamVolumen,
ArtiStamXPrEinsp, ArtiStamZulBDat, ArtiStammIdEkGrp,
ArtiStammImage, DSD_MatGrNummer, DSD_VolGrNummer,
FilTransfer, ME_GrupNummer, ME_NummerVerpGew,
PrKalkSchema, PreisMatNummerEK, PreisMatNummerVK,
Reinheitsgrad, SaatFruNummer, SaatSortNummer,
SteuerSchluessel, VerpackGruppe, WaGruNummer, artiStamPrAzUFak
FROM ArtikelStamm
WHERE ArtikelStammID=551
))

Ich bin bald am verzweifeln, denn ich finde den Fehler nicht. :wall:

MfG
Prelude247

[Flocke]

Du darst VALUES und SELECT nicht mischen, aber du kannst die Konstanten in die SELECT-Abfrage mit einbauen:

SQL-Code:

INSERT INTO ARTIKELSTAMM
(
ArtiStammId, ArtiStamBezeich, ArtiStamNummer, EKZ_Nummer,
ArtGrNummer, ArtiFolgeTyp, ArtiInfoGruppe,
ArtiPoolNummer, ArtiStamAuspr, ArtiStamBPoolKum,
ArtiStamBeaKennz, ArtiStamBrutGew, ArtiStamEAN,
ArtiStamEKDKennz, ArtiStamGewicht, ArtiStamGrundArt,
ArtiStamLPreVari, ArtiStamLoeKennz, ArtiStamMatch,
ArtiStamMxErntMg, ArtiStamOPreisSp, ArtiStamOPreisWa,
ArtiStamPackBrei, ArtiStamPackHoe, ArtiStamPackLae,
ArtiStamPrAzGrMe, ArtiStamPrAzMeBz, ArtiStamPrEinhEK,
ArtiStamPrEinhVK, ArtiStamPreVari, ArtiStamRundBest,
ArtiStamRundEK, ArtiStamRundVK, ArtiStamSaatTyp,
ArtiStamTyp, ArtiStamUPreisSp, ArtiStamUPreisWa,
ArtiStamVKDKennz, ArtiStamVerpGew, ArtiStamVolumen,
ArtiStamXPrEinsp, ArtiStamZulBDat, ArtiStammIdEkGrp,
ArtiStammImage, DSD_MatGrNummer, DSD_VolGrNummer,
FilTransfer, ME_GrupNummer, ME_NummerVerpGew,
PrKalkSchema, PreisMatNummerEK, PreisMatNummerVK,
Reinheitsgrad, SaatFruNummer, SaatSortNummer,
SteuerSchluessel, VerpackGruppe, WaGruNummer, artiStamPrAzUFak
)
SELECT 17134,'Absperrventil Form A','999910',70,
ArtGrNummer, ArtiFolgeTyp, ArtiInfoGruppe,
ArtiPoolNummer, ArtiStamAuspr, ArtiStamBPoolKum,
ArtiStamBeaKennz, ArtiStamBrutGew, ArtiStamEAN,
ArtiStamEKDKennz, ArtiStamGewicht, ArtiStamGrundArt,
ArtiStamLPreVari, ArtiStamLoeKennz, ArtiStamMatch,
ArtiStamMxErntMg, ArtiStamOPreisSp, ArtiStamOPreisWa,
ArtiStamPackBrei, ArtiStamPackHoe, ArtiStamPackLae,
ArtiStamPrAzGrMe, ArtiStamPrAzMeBz, ArtiStamPrEinhEK,
ArtiStamPrEinhVK, ArtiStamPreVari, ArtiStamRundBest,
ArtiStamRundEK, ArtiStamRundVK, ArtiStamSaatTyp,
ArtiStamTyp, ArtiStamUPreisSp, ArtiStamUPreisWa,
ArtiStamVKDKennz, ArtiStamVerpGew, ArtiStamVolumen,
ArtiStamXPrEinsp, ArtiStamZulBDat, ArtiStammIdEkGrp,
ArtiStammImage, DSD_MatGrNummer, DSD_VolGrNummer,
FilTransfer, ME_GrupNummer, ME_NummerVerpGew,
PrKalkSchema, PreisMatNummerEK, PreisMatNummerVK,
Reinheitsgrad, SaatFruNummer, SaatSortNummer,
SteuerSchluessel, VerpackGruppe, WaGruNummer, artiStamPrAzUFak
FROM ArtikelStamm
WHERE ArtikelStammID=551

[Nachtrag]
Wenn ArtikelStammId eine Auto-Id ist, dann solltest du sie beim INSERT weglassen (und unten natürlich nicht mit angeben).

[WoGe]

Hallo,

wie Flocke schon geschrieben hat, musst du das Values weglassen

Die folgend SP hab ich mal für FB1.0 gemacht, ich hoffe das funzt auch mit deinem Server:

SQL-Code:

ALTER PROCEDURE SP_COPYZEILEN (
    ID_ZIEL INTEGER,
    ID_QUELLE INTEGER)
AS
begin
  Insert into Zeilen
  select null, -999, ZEILENNO, ANZAHL, DATUM, BESCHREIBUNG, EPREIS, GPREIS, WAEHRUNG
  FROM ZEILEN
  where F_AR = :id_quelle;
  Update zeilen
  set F_Ar = :id_ziel
  where F_AR = -999;
  suspend;
end

Wie man sieht stammen die Werte der 2 ersten Spalten nicht aus der Ursprungstabelle.

PS.: Wenn ich mir den SQl-Code von meiner SP so angucke: Das ist doch fürchterlich unelegant. Das müsste doch eigentlich besser gehen. Hat dazu jemand mal eine Idee?

:wall: Roter Kasten. Flocke war schneller


mfg
wo

[prelude247]

Es funktioniert! :-D

Danke euch beiden für die schnelle Hilfe!

Der Feierabend ist gerettet!

MfG
Prelude247

[ConstantGardener]

Hallo zusammen !!

Sorry, daß ich diesen Beitrag nochmal hochhole aber hat jemand eine Idee warum das beschriebene Verfahren mit der BDE und Paradox nicht funktioniert. Laut LocalSQL-Help sollte es funktionieren.
Folgendes führt zur Meldung "Keine Übereinstimmung der Typen im Ausdruck." Die CAST's hab ich erst nach diesem Fehler eingebaut. Leider keine Wirkung !!
FLAECHE und TERMIN sind der Primärschlüssel, die Reihenfolge der Felder stimmt. Ich hab auch schon die Zielfelder aufgezählt. Aber ohne Erfolg.

Delphi-Quellcode:

  SQL.Clear;
  SQL.Add ('Insert Into Haustemperatur Select Flaeche,Cast((Termin+:ZeitWert) as DATE),Cast((Jahr+:Diff) as INTEGER),0, Temp_Tag,Temp_Nacht,0 from HausTemperatur where Jahr='+IntToStr(JahrSource));
  ParamByName ('Zeitwert').asDateTime:=EncodeDate(JahrZiel+1,1,1)-EncodeDate(JahrZiel,1,1);
  ParamByName ('Diff').asInteger:=Diff;
  ExecSQL;

... oder nur das SQL Statement

SQL-Code:

  Insert Into Haustemperatur 
  Select Flaeche,Cast((Termin+:ZeitWert) as DATE),Cast((Jahr+:Diff) as INTEGER),0,Temp_Tag,Temp_Nacht,0 
  from HausTemperatur where Jahr=2005

.. für Hilfe wäre ich dankbar

[marabu]

Guten Morgen,

auch LocalSQL unterstützt INSERT INTO SELECT. Offensichtlich erzeugst du einen Ausdruck vom falschen Typ. Fehler-Kandidaten sind Termin und Jahr, die du beide verändert übertragen möchtest. Jahr dürfte ein Integer-Feld sein, der korrekte Ausdruck ist dann JAHR + :iYears wobei iYears auch als Integer übergeben werden muss. Bei Termin lässt du mich raten. Als Date-Feld wäre der korrekte Ausdruck Termin + :iDays wobei iDays die Zahl der Tage ist, welche auf das Datum aufgerechnet werden soll. CAST() brauchst du hauptsächlich dann, wenn Typanpassungen für Zeichenverkettungen vornehmen musst oder zwischen Binär- und Texttypen hin und her wandeln musst.

Grüße vom marabu

[ConstantGardener]

@Marabu

... vielen Dank für die schnelle Antwort. :thumb: Den Verdacht hatte ich auch schon. Deswegen die CAST's. Werde das nachher gleich ausprobieren. Termin ist übrigens DATETIME, wie du schon richtig vermutet hattest.

Werde das nachher gleich ausprobieren... nochmals Danke.

[ConstantGardener]

@marabu

... habe die Anweisungen folgendermaßen angepasst

Delphi-Quellcode:

var Diff : integer;
begin
 If SourceJahr<>TargetJahr then
  begin
   Diff:=TargetJahr-SourceJahr;
   DM.ProgressWork ('Temperaturen '+IntToStr(TargetJahr)+' einfügen',' ',' ',' ',0);
   with DM.Query_Betrieb4 do
    begin
     hs:='Insert Into Haustemperatur.db (Flaeche,Termin,Jahr,Temp_Tag,Temp_Nacht) ';
     hs:=hs+' Select Flaeche,Termin+:ZWert,Jahr+:Diff,Temp_Tag,Temp_Nacht from HausTemperatur.db where Jahr='+IntToStr(SourceJahr);
     SQL.Clear;
     SQL.Add (hs);
     ParamByName ('ZWert').asInteger:=Trunc(EncodeDate(TargetJahr+1,1,1)-EncodeDate(SourceJahr,1,1));
     ParamByName ('Diff').asInteger:=Diff;
     ExecSQL;
    end;
  end;
end;

...und jetzt bringt er mir den Fehler "Merkmal nicht verfügbar". :wall: Die Spaltenbezeichnungen sind alle richtig und auch keine AutoInc-Felder. Irgendwelche Ideen ???

nochmal kurz zur Tabellenstruktur..
Flaeche ist INTEGER / Termin ist DATE ===> beide Primärschlüssel
Jahr,Temp_Tag,Temp_Nacht sind Integer

[Hansa]

Zitat:

Zitat von ConstantGardener

..Flaeche ist INTEGER / Termin ist DATE ===> beide Primärschlüssel..

Was heißt denn wohl "primär" ? :shock: Du musst das präzisieren, denn so stimmts nicht !

[mkinzler]

Handelt es sich um einen zusammengesetzten Schlüssel? Davon würde ich Abstand nehmen und einen künstlichen Schlüssel einführen.

[ConstantGardener]

@Hansa

...zusammengesetzter Primärschlüssel sorry.

@mkinzler

...ich habe einen künstlichen Schlüssel erzeugt. Erstmal als AutoInc Feld, sicher nicht schön aber schnell und einfach. ---> gleiches Problem. (Ich hatte den AutoInc nicht im INSERT INTO.)

Neuer Versuch mit künstlichem Primärschlüssel CHAR[30] zusammengesetzt aus Cast(Flaeche as Char(15))+Cast(Termin as Char(15)) ---> gleiches Problem "Merkmal nicht verfügbar"

Das INSERT INTO müßte ja auch ohne Index funktionieren. Also Index gelöscht. ---> gleiches Problem


Ratlosigkeit macht sich breit.... ich hoffe nur bei mir.... ???

[mkinzler]

Zitat:

Neuer Versuch mit künstlichem Primärschlüssel CHAR[30] zusammengesetzt aus Cast(Flaeche as Char(15))+Cast(Termin as Char(15)) ---> gleiches Problem "Merkmal nicht verfügbar"

Wenn autoinc (Generator + Trigger) dann sollte der Typ Integer o.ä. sein und darf dann nicht im Insert stehen (Feldliste explizit angeben)

[ConstantGardener]

@mkinzler

...ja ist schon klar, ich hab den Versuch mit dem AutoInc Typ INTEGER mit aufgezählter Feldliste, aber ohne den AutoInc in der selbigen gemacht. Ergebnis =>> Merkmal nicht verfügbar.

Ich hab die Sache jetzt zwischenzeitlich über eine CopyTabelle gelöst. Ist bei ca. 10000 Datensätzen/Jahr und 10-20 Jahren Simulation noch ausreichend performant. Die andere Lösung wäre natürlich eleganter aber die BDE gibts scheinbar nicht her.... :cry: pfui, pfui, pfui ich wollte doch nicht schon wieder auf die BDE schimpfen. :wink:

Trotzdem danke für die schnelle Hilfe...

[marabu]

Hallo,

ich war durch die Schlüssel-Diskussion etwas abgelenkt, bin aber durch den Begriff CopyTabelle aufgeschreckt: Die BDE verlangt bei INSERT INTO SELECT zwei verschiedene Tabellen. Die Fehlermeldung "Merkmal nicht verfügbar" ist da nicht besonders aussagekräftig, leider. Die Verwendung einer einzigen Tabelle "Haustemperatur" hatte ich bei meinem ersten Beitrag übersehen und mich auf das vordergründige Syntaxproblem konzentriert.

Verlegene Grüße

[ConstantGardener]

@marabu

verzeihende..? na mal sehen...? ok! freundliche Grüße zurück :wink:

...daß die BDE INSERT INTO SELECT nur mit 2 Tabellen erlaubt habe ich jetzt auch rausbekommen. :?

Meine Frage ist jetzt aber : Woher weißt Du das ? :?: In der LocalSql.hlp, bei Ebner, Kowalski, Nannen, Toolbox usw. steht nichts dergleichen. Immer nur in 3 Sätzen die üblichen Sachen (Values,Select usw.) abgehandelt.

War's doch die Kristallkugel?, oder Altersweisheit ? :gruebel:

[mkinzler]

Zitat:

War's doch die Kristallkugel?, oder Altersweisheit ? Grübelnd...

Nennen wir es Erfahrung, daß hört sich besser an. :-D

[ConstantGardener]

@mkinzler

ok... dann bin auch ich jetzt um mind. eine Erfahrung reicher. Nochmals Danke an alle.

[marabu]

Hallo Leute,

Zitat:

Zitat von ConstantGardener

Woher weißt Du das ? In der LocalSql.hlp ... steht nichts dergleichen.

es steht im Help-File, aber man versteht es wohl nur, wenn man die amerikanischen Formulierungen und die eigentümlichen deutschen Übersetzungen verinnerlicht hat:

Zitat:

Um Zeilen in eine Tabelle einzufügen, die aus einer anderen Tabelle stammen, lassen Sie das Schlüsselwort VALUES weg und benutzen als Quelle für die neuen Zeilen eine Unterabfrage.

Ich habe gerade die Originalfassung nicht im Zugriff, aber man muss solche Aussagen sehr eng auslegen.

Zitat:

Zitat von mkinzler

Nennen wir es Erfahrung, daß hört sich besser an.

Alter klingt nicht gut - das ist traurig, aber war. In Zeiten, in denen die Visitenkarte eines Mittzwanzigers nicht selten der Titel Senior Developer schmückt, muss ich abends ein Schild auf meinen Nachttisch legen: "Ich bin nicht tot, ich schlafe nur".

Nachdenkliche Grüße

[ConstantGardener]

@marabu

... puh, das ist aber verdammt eng. :lol: Da braucht man Erfahrung !!

Und das mit dem Zettel... nun mach uns mal keine Angst ! :wink: