ADS Datenbank meldet 'im Lesemodus' bei Query.edit

[Union]

Zitat von joachimd:

Zitat von Smiley:

DM.AdsQBelege.SQL.ADD('Update Belege Set Exportiert = ' +
QuotedStr(DateTimeToStr(Jetzt)) +
' Where Exportiert is null AND Month(Belegdatum)='+Mo);

Du verwendest hier eine Skalar-Funktion (month) und machst Dir somit einen Live-Cursor zunichte.

Die Lösung wäre hier:

Delphi-Quellcode:

DM.AdsQBelege.SQL.ADD('Update Belege Set Exportiert = ' + 
                       :ExportDatum + 
                       ' Where Exportiert is null AND Belegdatum Between :MonatsAnfang and :Monatsende');
DM.AdsQBelege.ParamByName('ExportDatum').AsDateTime := now;
DM.AdsQBelege.ParamByName('MonatsAnfang').BeginOfTheMonth(BelegDatum);
DM.AdsQBelege.ParamByName('ExportDatum').EndOfTheMonth(BelegDatum);