gepostet für "Mane"
Mane: bitte lies in den FAQ nach, wie man korrekt postet, in den News hat das nämlich nichts zu suchen.
In Ermangelung verwertbarer Information habe ich das ins 8er Forum gestellt, betrifft dein Problem eine andere Version, sag bitte Bescheid und denk daran zukünftig immer die Version mit anzugeben. Danke im Voraus!
----------------------------------------------------------------------------
Hallo,
ich versuche in der Maske, dass die beiden Datumsfelder gefüllt werden müssen; leider kommt es im Gebrauch immer wieder vor, dass der Nutzer das Feld befüllt und wieder löscht und anschließend speichert, soz. das Feld ist leer.
Was kann ich tun, damit das Feld definitiv mit einem gültigen Datumswert gefüllt werden muß?
Vielen Dank
Mane
hier die Formeln, wie sie bei den einzelnen Feldern hinterlegt sind.
Die Felder und die Schaltfläche sind in einen Layoutbereich in der Maske eingebunden.
Die Felder sind bearbeitbar und vom Typ als Datum/Zeit-Felder definiert.
Feld "KK_Gültig_ab_Datum"
@Now
Feld "KK_Gültigkeit_Ende"
@Adjust(@Now;1;0;0;0;0;0)
Schaltfläche "Genehmigung einholen"
@Command( [EditDocument]);
@Command([RefreshWindow]);
REM {**************************************};
REM {****** Prüfe ob alles ausgefüllt ist ******};
REM {**************************************};
REM;
OK := @False;
Fehler := @True;
REM;
REM {________Fehlerfälle_______________};
_F00 := @If(KK_Begründung != ""; OK; Fehler);
_F01 := @If(KK_Konditionsbeitrag != 0;OK;Fehler);
_F02 := @If(KK_Provisionsbeitrag != 0;OK;Fehler);
_F03 := @If(KK_Gültigkeit_Ende <= (@Adjust(@Now;1;0;0;0;0;0));OK;Fehler);
_F04 := @If(KK_Gültigkeit_Ende >= KK_Gültig_ab_Datum;OK;Fehler);
_F05 := @If(KK_Gültigkeit_Ende = "";Fehler;OK);
_F06 := @If(KK_Gültig_ab_Datum >= (@Adjust(@Now;0;-3;0;0;0;0));OK;Fehler);
REM;
REM {________Fehlermeldungen__________};
_M00 := "Sie haben keine Begründung für die Sonderkondition erfasst!";
_M01 := "Sie haben keinen Konditionsbeitrag erfasst!";
_M02 := "Sie haben keinen Provisionsbeitrag erfasst!";
_M03 := "Das Gültig-bis Datum darf max. 1 Jahr in der Zukunft liegen!";
_M04 := "Das Gültig-bis Datum muss nach dem Gültig-ab Datum liegen!";
_M05 := "Ein Gültig-bis Datum muss erfasst werden";
_M06 := "Das Gültig-ab Datum darf max. 3 Monate in der Vergangenheit liegen!";
REM;
REM {________Fehlermeldung ausgeben____};
_M := @If(_F00; _M00;_F01; _M01;_F02; _M02;_F03;_M03;_F04;_M04;_F05;_M05;_F06;_M06;"");
@If(_M != ""; @Do(@Prompt([Ok]; "** Halt, Antrag auf Sonderkondition ist noch nicht vollständig ausgefüllt **"; _M); @Return("")); "");
@If(KK_Firmenkunde = "Antrag für Firmenkunde";@Do(@MailSend("Thomas Stachel/";"";"";"Ein Antrag auf Genehmigung einer Sonderkondition für einen Firmenkunden liegt vor";"";"Bitte auf die Verknüpfung klicken --> ";[IncludeDoclink]));@Do(@MailSend("Thomas Stachel/";"";"";"Ein Antrag auf Genehmigung einer Sonderkondition für einen Privatkunden liegt vor";"";"Bitte auf die Verknüpfung klicken --> ";[IncludeDoclink])));
FIELD KK_Status:= "1";
FIELD KK_Berater:= @Name([CN];@UserName);0;
FIELD KK_BeraterDatum := @Today;0;
@PostedCommand([FileSave]);
@PostedCommand([FileCloseWindow])