ab einer bestimmten Uhrzeit das speichern unterbinden

[webharvey]

hi,
wir haben hier für unsere kantine eine datenbank, über die man essen
bestellen kann. das soll aber nur bis 11h am gleichen tag möglich sein.
nun hält sich ja, wie üblich, nicht jeder dran. nun habe ich folgendes
versucht.

1. einen button "speichern":
@Command([ViewRefreshFields]);
@Command([FileSave]);
@Command([FileCloseWindow])

2. einen query-save event:
MZeit:=@Time(11;0;0);
VZeit := @Time(@Now);
@Prompt([Ok];"Aktuelle Zeit";""+VZeit);

@If(
        ((VZeit>MZeit) & (Datum=@Today));
       (@Prompt([Ok];"ACHTUNG";"Sie können nur Bestellungen bis 11h für den gleichen Tag erfassen. Die Aktion wird abgebrochen";@Command([FileCloseWindow])));NULL)

das klappt aber leider nicht so. wenn die zeit >11h ist, soll die gesamt
aktion abgebrochen und das dokument nicht gespeichert werden.

was tun?
(sowas brauchen wir auch noch für EM-Tipp-DB  )

danke
marc

[Axel]

Hi,

ändere mal deinen QuerySave-Event wie folgt ab:

FIELD SaveOptions = SaveOptions

MZeit:=@Time(11;0;0);
VZeit := @Time(@Now);
@Prompt([Ok];"Aktuelle Zeit";""+VZeit);

@If((VZeit>MZeit) & (Datum=@Today);
      @Do(@Prompt([Ok];"ACHTUNG";"Sie können nur Bestellungen bis 11h für den gleichen Tag erfassen. Die Aktion wird abgebrochen");@SetField("SaveOptions"; "0");@Command([FileCloseWindow]));NULL)


Axel

[webharvey]

hi axel, das klappt prima

jetzt noch ne frage. kann ich an der stelle, wo "NULL" steht noch einen
befehl einfügen? wenn er nämlich speichern darf, soll er:

@SetDocField(ElternUI;"Bestand";Bestand-1);

ausführen (für die bestandskorrektur)

[koehlerbv]

Um die Sache nicht zu verkomplizieren, kannst Du diesen Befehl auch vor der @If-Abfrage einsetzen. Wenn nicht gespeichert werden soll, wird ja SaveOptions gesetzt, so dass diese Änderung wirklich nur im erlaubten Fall abgespeichert wird.

HTH,
Bernhard