ich hab schon ne Erinnerung drin mit einer festen Frist (Codes werden noch aus ner Datei ausgelesen und die Frist aus meiner config.ini) und hab das so gelöst:
Delphi-Quellcode:
with frmdata.quremind
do
begin
close;
sql.Clear;
sql.Add('
SELECT * FROM auftrag LEFT OUTER JOIN geraete ON auftrag.geraet = geraete.geraeteid WHERE status IN('+remindstatus.commatext+'
) AND annahmedatum <= ''
'+formatdatetime('
yyyy-mm-dd',date-config.ReadInteger('
Grundeinstellungen','
Reminddays',0)) +'
''
AND techniker= '+config.ReadString('
Grundeinstellungen','
Technikernummer','
')+'
; ');
open;
if recordcount>0
then
begin
if messagedlg('
Es wurden '+ inttostr(recordcount)+ '
offene Aufträge gefunden, die älter als '+ inttostr(config.ReadInteger('
Grundeinstellungen', '
Reminddays',14))+ '
Tage sind. Möchten Sie die Aufträge jetzt ansehen?', mtconfirmation, [mbyes,mbno],0)=mryes
then
begin
frmremind.Show;
end;
end;
end;
Aber wie gesagt: verschiedene Statuscodes mit verschiedenen Fristen ist das Ziel.