![]() |
AW: ParamByName geht und geht mal nicht
Zitat:
|
AW: ParamByName geht und geht mal nicht
Wieso, Markus hat ja schon einige Punkte genannt?
|
AW: ParamByName geht und geht mal nicht
Sorry, habe mich falsch ausgedrückt.
Ich wollte sagen, die Tabelle ist wohl überhaupt nicht normalisiert. Eine solche wohl dringend erforderlich. |
AW: ParamByName geht und geht mal nicht
Achso. Genau das habe ich ja durch die Blume anzudeuten versucht ;)
|
AW: ParamByName geht und geht mal nicht
Mal ganz abgesehen von Normalisierung oder der direkten Ausführung auf dem Server:
Bevor ich so einen langen Rattenschwanz programmieren müsste, würde ich mir einfach eine Schleife bauen:
Delphi-Quellcode:
while not qryBildAlt.eof do
begin Query_Quelle.close; Query_Quelle.ParamByName('PATIENTNR').AsInteger:= qryBildAlt.FieldByName('PATIENTNR').AsInteger; Query_Quelle.Open; // sag es mit drei Zeilen, statt mit n Zeilen for LFieldName in LFieldNames do begin Query_Ziel.ParamByName( LFieldName ).Value := Query_Quelle.FieldByName( LFieldName ).Value; end; Query_Ziel.ExecSQL; end; |
AW: ParamByName geht und geht mal nicht
Stimmt. Wenn sowas nicht wäre
Delphi-Quellcode:
if Query_Quelle.FieldByName('KONTONUMMER').AsInteger = Null then
Query_Ziel.FieldByName('KONTONUMMER').AsInteger := 1200 else Query_Ziel.ParamByName('KONTONUMMER').AsInteger := Query_Quelle.FieldByName('KONTONUMMER').AsInteger; |
AW: ParamByName geht und geht mal nicht
Und auch das kann man mit
SQL-Code:
abgefangen werden.
select ...,decode(feld1,null,1200),..
Gruß K-H |
AW: ParamByName geht und geht mal nicht
Zitat:
|
AW: ParamByName geht und geht mal nicht
Vielleicht auch
Code:
?
insert into .. select ..
Oder sind es verschiedene DB? Ob es mit Firebird und database link geht, weiß ich nicht. |
AW: ParamByName geht und geht mal nicht
da Quelle und Ziel den gleichen Tabellennamen haben, scheint es sich um eine "Datenbankkopie" zu handeln:?:
Gruß K-H |
Alle Zeitangaben in WEZ +1. Es ist jetzt 00:33 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz