Discussion :

[jfcollombet]

Bonjour, j'ai une requête existante qui comporte 2 conditions VraiFaux et qui fonctionne parfaitement ;

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
NB_JOURS_STOCK_Test: VraiFaux(EstNull([STK_OUTDATE]) Et (Année([STK_DENT])<=Année(Maintenant())
 Et Mois([STK_DENT])<>Mois(Maintenant()));Jour(SérieDate(Année(#01/10/2018#);Mois(#01/10/2018#)+1;+0));
 VraiFaux(EstNull([STK_OUTDATE]) Et (Année([STK_DENT])=Année(Maintenant()) Et Mois([STK_DENT])=Mois(Maintenant()));
 DiffDate("j";[STK_DENT];#31/10/2018#);DiffDate("j";"01/" & Mois([STK_OUTDATE]) & "/" & Année([STK_OUTDATE]);[STK_OUTDATE])))

Je souhaite y ajouter une nouvelle condition mais cela me retourne une erreur de syntaxe :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 NB_JOURS_STOCK_Test3: VraiFaux(EstNull([STK_OUTDATE]) Et (Année([STK_DENT])<=Année(Maintenant())
 Et Mois([STK_DENT])<>Mois(Maintenant()));Jour(SérieDate(Année(#01/10/2018#);Mois(#01/10/2018#)+1;+0));
 
 VraiFaux(Est Pas Null([STK_OUTDATE]) Et (Année([STK_DENT])=Année(Maintenant())
 Et Mois([STK_DENT])=Mois(Maintenant()));DiffDate("j";[STK_DENT];[STK_OUTDATE]);Mois(#01/10/2018#)+1;+0));
 
 VraiFaux(EstNull([STK_OUTDATE]) Et (Année([STK_DENT])=Année(Maintenant()) Et Mois([STK_DENT])=Mois(Maintenant()));
 DiffDate("j";[STK_DENT];#31/10/2018#);DiffDate("j";"01/" & Mois([STK_OUTDATE]) & "/" & Année([STK_OUTDATE]);[STK_OUTDATE])))

Merci de votre aide

[hyperion13]

Salut
Si pour Null la syntaxe est EstNull([champ]), pour Pas Null la syntaxe est [champ] Est Pas Null.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

NB_JOURS_STOCK_Test3:VraiFaux(EstNull([STK_OUTDATE]) Et (Année([STK_DENT]) <= Année(Maintenant()) Et Mois([STK_DENT]) <> Mois(Maintenant()));Jour(SérieDate(Année(#01/10/2018#);Mois(#01/10/2018#)+1;+0));VraiFaux([STK_OUTDATE] Est Pas Null Et (Année([STK_DENT]) = Année(Maintenant()) Et Mois([STK_DENT]) = Mois(Maintenant()));DiffDate("j";[STK_DENT];[STK_OUTDATE]);Mois(#01/10/2018#)+1;+0));VraiFaux(EstNull([STK_OUTDATE]) Et (Année([STK_DENT]) = Année(Maintenant()) Et Mois([STK_DENT]) = Mois(Maintenant()));DiffDate("j";[STK_DENT];#31/10/2018#);DiffDate("j";"01/" & Mois([STK_OUTDATE]) & "/" & Année([STK_OUTDATE]);[STK_OUTDATE])))

[jfcollombet]

Merci de votre réponse mais ce code retourne une erreur :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
NB_JOURS_STOCK_Test3:VraiFaux(EstNull([STK_OUTDATE]) Et (Année([STK_DENT]) <= Année(Maintenant())
 Et Mois([STK_DENT]) <> Mois(Maintenant()));Jour(SérieDate(Année(#01/10/2018#);Mois(#01/10/2018#)+1;+0));
 VraiFaux([STK_OUTDATE] Est Pas Null Et (Année([STK_DENT]) = Année(Maintenant())
  Et Mois([STK_DENT]) = Mois(Maintenant()));DiffDate("j";[STK_DENT];[STK_OUTDATE]);Mois(#01/10/2018#)+1;+0));
  VraiFaux(EstNull([STK_OUTDATE]) Et (Année([STK_DENT]) = Année(Maintenant()) Et Mois([STK_DENT]) = Mois(Maintenant()));
  DiffDate("j";[STK_DENT];#31/10/2018#);DiffDate("j";"01/" & Mois([STK_OUTDATE]) & "/" & Année([STK_OUTDATE]);[STK_OUTDATE])))

[jfcollombet]

J'ai isolé et réécrit le code que je souhaite rajouté et la ca marche :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
VraiFaux(Année([STK_OUTDATE])=Année(Maintenant()) Et Mois([STK_OUTDATE])=Mois(Maintenant())
 Et Année([STK_DENT])=Année(Maintenant()) Et Mois([STK_DENT])=Mois(Maintenant());DiffDate("j";[STK_DENT];[STK_OUTDATE]);0)

Par contre si je l'insère avec le reste du code j'obtient une erreur ! :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
NB_JOURS_STOCK_Test: VraiFaux(EstNull([STK_OUTDATE]) Et (Année([STK_DENT])<=Année(Maintenant())
 Et Mois([STK_DENT])<>Mois(Maintenant()));Jour(SérieDate(Année(#01/10/2018#);Mois(#01/10/2018#)+1;+0));
 
 VraiFaux(Année([STK_OUTDATE])=Année(Maintenant()) Et Mois([STK_OUTDATE])=Mois(Maintenant())
 Et Année([STK_DENT])=Année(Maintenant()) Et Mois([STK_DENT])=Mois(Maintenant());DiffDate("j";[STK_DENT];[STK_OUTDATE]);0)
 
 
 VraiFaux(EstNull([STK_OUTDATE]) Et (Année([STK_DENT])=Année(Maintenant()) Et Mois([STK_DENT])=Mois(Maintenant()));
 DiffDate("j";[STK_DENT];#31/10/2018#);DiffDate("j";"01/" & Mois([STK_OUTDATE]) & "/" & Année([STK_OUTDATE]);[STK_OUTDATE])))

[jfcollombet]

Pardon j'ai oublié le point virgule apres

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

DiffDate("j";[STK_DENT];[STK_OUTDATE]);0)

mais cela ne change rien au résultat :

[hyperion13]

euh ...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
VraiFaux(
EstNull([STK_OUTDATE]) Et (Année([STK_DENT]) <= Année(Maintenant()) Et Mois([STK_DENT]) <> Mois(Maintenant()))
;
Jour(SérieDate(Année(#01/10/2018#);Mois(#01/10/2018#)+1;+0))
;
VraiFaux(
Année([STK_OUTDATE]) = Année(Maintenant()) Et Mois([STK_OUTDATE]) = Mois(Maintenant()) Et Année([STK_DENT])=Année(Maintenant()) Et Mois([STK_DENT]) = Mois(Maintenant())
;
DiffDate("j";[STK_DENT];[STK_OUTDATE])
;
VraiFaux(
EstNull([STK_OUTDATE]) Et (Année([STK_DENT]) = Année(Maintenant()) Et Mois([STK_DENT]) = Mois(Maintenant()))
;
DiffDate("j";[STK_DENT];#31/10/2018#)
;
DiffDate("j";"01/" & Mois([STK_OUTDATE]) & "/" & Année([STK_OUTDATE]);[STK_OUTDATE])
)
)
)

Votre req est du style SI ... ALORS ... SINON SI ... ALORS ... SINON SI ... ALORS ... SINON ... FINSI FINSI FINSI
Si en

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

L9 DiffDate("j";[STK_DENT];[STK_OUTDATE]);0)

votre req devient SI ... ALORS ... SINON SI ... ALORS ... SINON ... FINSI FINSI

[jfcollombet]

Merci pour ce code qui fonctionne. Mais il y a un des paramètre VraiFaux qui ne s'applique pas :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
VraiFaux(
EstNull([STK_OUTDATE]) Et (Année([STK_DENT]) = Année(Maintenant()) Et Mois([STK_DENT]) = Mois(Maintenant()))
;
DiffDate("j";[STK_DENT];#31/10/2018#)
;

Dans cet capture , Expr2 devrait renvoyer 20 et non 31.

[hyperion13]

Re,
- Post#7 avec la formule VraiFaux, j'obtiens bien 20 à condition que l'horloge du PC soit encore au mois d'octobre.
- Pourquoi écrire en dur des dates comme 01/10/2018 et/ou 31/10/2018 ?

Si je comprends bien :
- STK_DENT doit toujours être renseigné
- STK_OUTDATE est vide jusqu'à ce qu'il soit renseigné
- vous cherchez toujours à vérifier la date renseignée dans STK_DENT par rapport à un instant T ((Maintenant() = horloge système de votre PC)
- l'instant T est forcément et toujours soit égal à STK_DENT ou plus grand que STK_DENT
- tant que STK_OUTDATE n'est pas renseigné, vous calculez le nb jour par rapport à STK_DENT
- mais si STK_OUTDATE est renseigné, vous calculez le nb jour par rapport à STK_OUTDATE ?