5. Dezember 2011 15:33
5. Dezember 2011 15:36
5. Dezember 2011 15:45
5. Dezember 2011 15:53
himi81 hat geschrieben:Also CALCDATE("05.12.12",'<-12M>')
himi81 hat geschrieben:"RLZ-Date":=CALCDATE(item."Expiration Calculation","Last Expiration Date");
Dann müsste ich doch vor dem "Last Expration Date" ein [- ]Minuszeichen setzten, es gibt doch nur 2 Parameter...??
himi81 hat geschrieben:Also CALCDATE('<-12M>',"05.12.12")
5. Dezember 2011 16:31
5. Dezember 2011 17:18
Timo Lässer hat geschrieben:Bitte beachtet, dass eine Datumsformel auch etwas komplexer sein könnte:
MeineDateFormulaAlsText := 2M-1W+3T
Hier muss man also nicht nur ein Minus davorsetzen, sondern auch alle anderen Operatoren negieren.
Lösung:
- Steht am Anfang kein Plus oder Minus, dann fügen wir vor dem Text ein Plus ein
Ergebnis: +2M-1W+3T- Jetzt negieren wir alle Operatoren:
MeineDateFormulaAlsText := STRSUBSTNO(MeineDateFormulaAlsText,'+-','-+');- Nun können wir mit der negierten Datumsformel rückwärts rechnen
5. Dezember 2011 20:18
Timo Lässer hat geschrieben:MeineDateFormulaAlsText := STRSUBSTNO(MeineDateFormulaAlsText,'+-','-+');
6. Dezember 2011 11:31
6. Dezember 2011 11:35
himi81 hat geschrieben:Erstmal danke an Alle für die schnelle Hilfe....
Im Grunde funktioniert die Berechung des Datums ... Allerdings nur wenn "+12M" im Artikelstamm steht bei uns steht leieder derzeit "12M"
das plus ist ja Optional...
Ich denke ich werde es mit einem Report per Massendatenpflege anpassen....
Oder hat noch jemand eine zündende Idee?
1.Steht am Anfang kein Plus oder Minus, dann fügen wir vor dem Text ein Plus ein
IF NOT (MeineDateFormulaAlsText[1] IN ['+','-']) THEN
MeineDateFormulaAlsText := '+' + MeineDateFormulaAlsText;
6. Dezember 2011 11:35
himi81 hat geschrieben:Im Grunde funktioniert die Berechung des Datums ... Allerdings nur wenn "+12M" im Artikelstamm steht bei uns steht leieder derzeit "12M"
das plus ist ja Optional...
Timo Lässer hat geschrieben:Steht am Anfang kein Plus oder Minus, dann fügen wir vor dem Text ein Plus ein
Ergebnis: +2M-1W+3T
6. Dezember 2011 12:39
item.GET("Item No.");
DateForm_txt:= (FORMAT(item."Expiration Calculation"));
IF NOT (DateForm_txt[1] IN ['+','-']) THEN
DateForm_txt := '+' + DateForm_txt;
DateForm_txt:=CONVERTSTR(DateForm_txt,'+-','-+');
l_date:=CALCDATE(DateForm_txt,"Last Expiration Date");
"RLZ-Date":=CALCDATE(item."Min Remaining Term Date Fomula",l_date);
MODIFY;