Datum berekenen

Sherlock

Goedemiddag,

Ik heb het volgende stukje code:

refDate := TODAY;
exprDate := 'CM+13M';
newDate := CALCDATE(exprDate,refDate);

In onze testomgeving werkt het, maar in de Live-omgeving krijg ik de volgende melding:

'De datumformule 'CM+13M' moet een tijdseenheid bevatten.'

'Voorbeelden van tijdseenheden: D, WD, W, M, K of J.
'L, lopende tijdseenheid, kan als prefix worden opgegeven bij tijdseenheid.'

De bedoeling is om een datum weer te geven die die 13 maanden verder ligt, en dan de laatste dag van de maand.

Voorbeeld 1:
huidige datum: 23-05-2011
nieuwe datum: 30-06-2012

Voorbeeld 2:
huidige datum: 10-04-2011
nieuwe datum: 31-05-2012

Het vreemde is dat het in de ene omgeving dus werkt en in de andere niet. De Navision versie is sowieso gelijk, en voor zover ik weet zijn alle objecten verder ook gelijk. Zou het aan een taalinstelling oid kunnen liggen?

edit:
Na iets verder gekeken te hebben :oops: zie ik dat het bij sommige orders in de Live-omgeving ook werkt.

edit2:
In het nederlands moet het dus LM zijn, terwijl het engels CM nodig heeft. Wat is hier nu de universele benaming voor?

mohana_cse06

Use

exprDate := '<CM+13M>';

Help says :

For example, if a user with language set to ENG (English) enters the date formula "1W+1D" for one week and one day, then a user with the language set to FRA (French) sees "1S+1J," and a user with the language set to ESP (Spanish) sees "1S+1D".

If a date formula is entered with < > delimiters surrounding it, then the date formula is stored in a generic, nonlanguage-dependent format. This makes it possible to develop date formulas that are not dependent on the currently selected language.

DenSter

exprDate := '<CM+13M>';

<edit> got beat by mohana </edit>

Sherlock

Bedankt, met de <> werkt het inderdaad!

mohana_cse06

welkom

(Forgive me if "welcome" is wrong. I dont know Dutch but using google translator read your post and replied )

Sherlock

Even een flinke schop tegen mijn eigen vraag, maar nu met wat verdieping...

Is het mogelijk om in

exprDate := '<CM+13M>';

de "13M" te vervangen door een variabele?

Uiteraard heb ik dat al geprobeerd, maar ik krijg dan een melding: "De datumformule moet een tijdseenheid bevaten."

mohana_cse06

try something like

EVALUATE(PerLen2,format(PerLen));
Datef := '<CM' + '+' + FORMAT(PerLen2) + '>';
Message('%1',Datef);
exprDate := CALCDATE(Datef,TODAY);
Message('%1',exprDate);

where PerLen and PerLen2 are DateFormula datatypes
Datef is text
exprDate is date

I got PerLen from request form

Sherlock

mohana_cse06 wrote:

try something like

EVALUATE(PerLen2,format(PerLen));
Datef := '<CM' + '+' + FORMAT(PerLen2) + '>';
Message('%1',Datef);
exprDate := CALCDATE(Datef,TODAY);
Message('%1',exprDate);

where PerLen and PerLen2 are DateFormula datatypes
Datef is text
exprDate is date

I got PerLen from request form

Bedankt, hier kom ik een stuk verder mee.

Is het ook mogelijk om PerLen op te geven in de code? Hoe geef je een DateFormula op in code?

mohana_cse06

Sorry!!
Do you mean you want to assign a value to DateFormula variable through code?
like

PerLen := '13M'

Sherlock

Dat bedoel ik inderdaad, bij bovenstaand voorbeeld krijg ik de melding DateFormula := Text.

mohana_cse06

try

test := '12M';
Datef := '<CM' + '+' + test + '>';
Message('%1',Datef);
exprDate := CALCDATE(Datef,TODAY);
Message('%1',exprDate);

test is a text type variable..

Sherlock

Geweldig, ik ben er uit!

Daarnaast heb ik de formule nog omgedraaid zodat ik echt de laatste dag van de maand heb, dus '6M + CM' ipv 'CM + 6M'.

mohana_cse06

Sorry again..(translator didnt help me 100%)
your problem got solved or not? :-k

Sog

His problem got resolved
Zijn probleem is opgelost.
उसकी समस्या हल हो गया है