Einzelnen Beitrag anzeigen

ConstantGardener

Registriert seit: 24. Jan 2006
Ort: Halberstadt
376 Beiträge
 
Delphi 10.4 Sydney
 
#13

Re: Datensätze in die gleiche Tabelle kopieren?

  Alt 16. Jan 2007, 16:56
@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". 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
Andreas Schachtner
  Mit Zitat antworten Zitat