Discussion :

[carlitodetunis]

bonjour à tous
existe-t-il une formule magik de calcul dates échéance ?... un peu comme sous excel avec fin.mois(date;x)+y
à placer dans une rubrique bien-sur

merci
Carl

[rudolfrudolf]

Bonjour,

si tu veux le dernier jour du mois alors regarde la fonction : DernierJourdumois
tu as la même fonction pour la semaine ou l'année

[Voroltinquo]

Bonjour,
Sinon, tu as les propriétés Années, Mois et Jour.
e.g.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
FONCTION CalculEchéance(dDate est date,nJour est entier=90,bFinMois est booléen=Vrai) : Date
dEchéance est date
 
dEchéance=dDate
dEchéance..Jour+=nJour
 
SI bFinMois ALORS
     RENVOYER DernierJourDuMois(dEchéance)
SINON
     Renvoyer dEchéance
FIN

Et pourquoi ce "bien sûr", tu as oublié le que non. Je rappelle les règles de la 3° forme normale

Les attributs d'une entité sont divisés en 2 groupes, les attributs clé et les attributs non clés.
La 3°FN est respectée si tout attribut du deuxième groupe ne peut pas dépendre d’un sous-ensemble (strict et excluant l’attribut considéré) d’autres attribut(s) du second groupe.

En d'autre termes un attribut n'est pas le résultat d'un calcul incluant un autre attribut de l'entité

[laurent30s]

J'ai eu vu ce genre de codage : T09015, V06010, C03000FM
Mode de paiement : T=Traite, V=Virement et C= Chèque
Délais : NNN est le nombre de jours de paiement après édition de la facture
Jour du paiement : JJ le jour du paiement
et FM pour fin de mois

Ainsi T09015 = paiement par traite à 90 jours le 15 du mois
et C03000FM = paiement par chèque à 30 jours fin de mois

Calcul du délais :

Code :

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

dDate...Jours += NNN

Calcul du jours de paiement :

Code :

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

1
2
dDate..Mois += 1
dDate..Jour   = JJ

Si fin de mois :

Code :

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

1
2
3
dDate..Mois += 1   // mois suivant
dDate..Jour  = 1    // 1e jour du mois suivant
dDate..Jour -= 1   // dernier jour du mois