hallo zusammen.
manchmal taucht folgende Fehlermeldung auf, ohne daß man sich einer Schuld bewußt ist:
Zitat:
Fehler bei einem aus mehreren Schritten bestehenden Vorgang. Prüfen Sie die einzelnen Statuswerte.
beim Wechsel der
.Cursorlocation
von
clUseClient
auf
clUseServer
wurde daraus:
Zitat:
Der Accessor ist kein Parameteraccessor
Nach einigem Hin und Her bin ich dann mit Hilfe der Fehlerausgabe auf die Fehlerursache gestoßen, Ein nicht ganz sauberes Datumsfeld to_char(meinfeld) ergibt 0004-11-11 00:00:00.
(Wo das wohl wieder herkommt??)
Hier meine Fehlerausgbe: (muß ich noch was dran tun, vor allem eine eigene Routine, und das with und .....)
Delphi-Quellcode:
sError :
String;
iError : Integer;
dummy :
string;
{ Ausgabe-Datensatz }
dumfld :
string;
{ Ausgabe-Datenfeld }
....
try
dumfld:=DM_1.mQuery1.fields[i].AsString;
except
with DM_1.ADOConnection
do begin
if errors.Count>0
then begin
sError:='
ADO-Error: '+CRLF;
for iError := 0
to Errors.Count - 1
do begin
sError:=serror+Format('
RecordNo: %d %s',[cnt,dummy])+CRLF;
sError:=serror+Format('
FieldName: %s FieldNo: %d',[DM_1.mQuery1.fields[i].FieldName,i])+CRLF;
sError:=serror+Format('
FieldCont.: %s',[dumfld])+CRLF;
sError:=serror+Format('
Error-No.: %d)',[Errors[iError].Number])+CRLF;
sError:=serror+Format('
%s; (SQLState: %s)',[Errors[iError].Description, Errors[iError].SQLState])+CRLF;
sError:=serror+Format('
Source: %s', [Errors[iError].Source])+CRLF;
sError:=serror+Format('
NativeError: %d', [Errors[iError].NativeError])+CRLF;
ShowMessage(sError);
end;
end;
Ich hoffe da kann der eine oder andere etwas mit anfangen.
Gruß
K-H