OVH Cloud OVH Cloud

jours fériés

8 réponses
Avatar
Roumegou Eric
sujet certainement rebattues ...

A la selection d'un calendrier (en WB10), je dois refuser les jours non
ouvrés (soit sam, dim et jours fériés).

Pour samedi, dimanche, c'est facile mais comment avoir les jours fériés
?

si je pouvais éviter une table avec ça.

--
Eric Roumégou
Webmaster des Wtablettes
http://cerbermail.com/?qE7t4Qvilo
(cliquez sur le lien ci dessus pour me contacter en privé)

8 réponses

Avatar
Roumegou Eric
Roumegou Eric a formulé ce jeudi :
sujet certainement rebattues ...

A la selection d'un calendrier (en WB10), je dois refuser les jours non
ouvrés (soit sam, dim et jours fériés).

Pour samedi, dimanche, c'est facile mais comment avoir les jours fériés ?

si je pouvais éviter une table avec ça.



en recherchant dans le forum et en retrouvant un post un peu polémique
sur la fonction Paques je me suis écrit ça

// Paramètres :
// une chaine sous la forme "JJ/MM/AAAA"
// Valeur de retour :
// Vrai si férie, faux dans le cas contraire
//
PROCEDURE VerifsiFérié(pDate)
datpaques est une Date
feries est un tableau de 11 dates
estferie est un booléenúux
wmadate est une Date
wmadate=ChaîneVersDate((pDate,"JJ/MM/AAAA")
wAAAA est une chaîne=Droite(pDate,4)
feries[1]=waaaa+"0101" // jour de l'an
feries[2]=waaaa+"0501" // fete du travail
feries[3]=waaaa+"0508" //victoire
feries[7]=waaaa+"0714" // fete nat
feries[8]=waaaa+"0815" //assomption
feries[9]=waaaa+"1101" // toussaint
féries[10]=waaaa+"1111" // Armistice
féries[11]=waaaa+"1225" //noêl
// calcul de Paques
datpaques=Pâques(waaaa)
féries[4]Útpaques+1 // luindi de paques
féries[5]Útepaques+40 //Ascension
feries[6]Útpaques+51 //lundi Pentecote

SI TableauCherche(ferie,tcLinéaire,wmadate)<>-1 ALORS
estferie=Vrai
FIN
RENVOYER estferié


Voilà si vous pouviez me confirmer que ce n'est pas déconnant (surtout
pour le pâques +40 pour l'ascension et le paques+50 (+1 pour avoir le
lundi) pour le lundi de pentecote.

--
Eric Roumégou
Webmaster des Wtablettes
http://cerbermail.com/?qE7t4Qvilo
(cliquez sur le lien ci dessus pour me contacter en privé)
Avatar
Roumegou Eric
Roumegou Eric avait soumis l'idée :
avec qq erreurs de syntaxe corrigées

FONCTION VerifsiFérié(pDate)
datpaques est une Date
feries est un tableau de 11 chaînes
estferie est un booléenúux
wmadate est une Date
wmadate=ChaîneVersDate(pDate,"JJ/MM/AAAA")
wAAAA est une chaîne=Droite(pDate,4)
feries[1]=wAAAA+"0101" // jour de l'an
feries[2]=wAAAA+"0501" // fete du travail
feries[3]=wAAAA+"0508" //victoire
feries[7]=wAAAA+"0714" // fete nat
feries[8]=wAAAA+"0815" //assomption
feries[9]=wAAAA+"1101" // toussaint
feries[10]=wAAAA+"1111" // Armistice
feries[11]=wAAAA+"1225" //noêl
// calcul de Paques
datpaques=Pâques(wAAAA)
feries[4]Útpaques+1 // luindi de paques
feries[5]Útpaques+40 //Ascension
feries[6]Útpaques+51 //lundi Pentecote

SI TableauCherche(feries,tcLinéaire,wmadate)<>-1 ALORS
estferie=Vrai
FIN
RENVOYER estferie

--
Eric Roumégou
Webmaster des Wtablettes
http://cerbermail.com/?qE7t4Qvilo
(cliquez sur le lien ci dessus pour me contacter en privé)
Avatar
Roumegou Eric
Roumegou Eric a exprimé avec précision :

après tests (après avoir perdu 2 h car mon projet me générait des
erreurs sans arrêt et sans raisons et seule une suppr du .cpl a pu tout
remettre en ordre); voilà la proc qui fonctionne

ce n'est pas +40 et +50 mais +39 et +49, et pour gérer les dates il y
avait des erreurs. Ce truc marche pour 2006.
donc pas si gadget que ça cette fn Pâques ... meme si bcp devait avoir
une correspondance, mais moi c'est la première fois que j'en ai besoin.


FONCTION VerifsiFérié(pDate)
datpaques est une Date
feries est un tableau de 11 Dates
estferie est un booléenúux
wmadate est une Date
wmadate=ChaîneVersDate(pDate,"JJ/MM/AAAA")
wAAAA est une chaîne=Droite(pDate,4)
feries[1]=wAAAA+"0101" // jour de l'an
feries[2]=wAAAA+"0501" // fete du travail
feries[3]=wAAAA+"0508" //victoire
feries[7]=wAAAA+"0714" // fete nat
feries[8]=wAAAA+"0815" //assomption
feries[9]=wAAAA+"1101" // toussaint
feries[10]=wAAAA+"1111" // Armistice
feries[11]=wAAAA+"1225" //noêl
// calcul de Paques
datpaques=Pâques(wAAAA)
feries[4]Útpaques
feries[5]Útpaques
feries[6]Útpaques
feries[4]..Jour+=1 // lundi de paques
feries[5]..Jour+9 //Ascension
feries[6]..Jour+P //lundi Pentecote
SI TableauCherche(feries,tcLinéaire,wmadate)<>-1 ALORS
estferie=Vrai
FIN
RENVOYER estferie

--
Eric Roumégou
Webmaster des Wtablettes
http://cerbermail.com/?qE7t4Qvilo
(cliquez sur le lien ci dessus pour me contacter en privé)
Avatar
Romain PETIT
Roumegou Eric avait soumis l'idée :

donc pas si gadget que ça cette fn Pâques ... meme si bcp devait avoir une
correspondance, mais moi c'est la première fois que j'en ai besoin.



On n'a pas attendu PCSoft pour se contruire une fonction...
http://groups.google.fr/group/fr.comp.developpement.agl.windev/msg/d0cd14e009599e60

A+

--
Romain PETIT
http://cerbermail.com/?O16kfXOFcq
(cliquez sur le lien ci-dessus pour me contacter en privé)
Avatar
Albert
Roumegou Eric a écrit :

Roumegou Eric a exprimé avec précision :

après tests (après avoir perdu 2 h car mon projet me générait des
erreurs sans arrêt et sans raisons et seule une suppr du .cpl a pu tout
remettre en ordre); voilà la proc qui fonctionne

ce n'est pas +40 et +50 mais +39 et +49, et pour gérer les dates il y
avait des erreurs. Ce truc marche pour 2006.
donc pas si gadget que ça cette fn Pâques ... meme si bcp devait avoir
une correspondance, mais moi c'est la première fois que j'en ai besoin.


FONCTION VerifsiFérié(pDate)



Bonjour,

Dommage que vous n'avez pas précisé le format du paramêtre (pDate)
< jj/mm/aaaa >. car on s'attend au format habituel a savoir < aaaammjj




Cordialement

Albert
Avatar
Roumegou Eric
Le 21/07/2006, Romain PETIT a supposé :
Roumegou Eric avait soumis l'idée :

donc pas si gadget que ça cette fn Pâques ... meme si bcp devait avoir une
correspondance, mais moi c'est la première fois que j'en ai besoin.



On n'a pas attendu PCSoft pour se contruire une fonction...
http://groups.google.fr/group/fr.comp.developpement.agl.windev/msg/d0cd14e009599e60

A+



oui c'est pas pour relancer cette polémique; mais quand on part de rien
(et que l'on en a pas eu besoin avant), c'est utile.
Sinon, merci pour ton ex qui m'a permis de confirmer mon algo.

--
Eric Roumégou
Webmaster des Wtablettes
http://cerbermail.com/?qE7t4Qvilo
(cliquez sur le lien ci dessus pour me contacter en privé)
Avatar
Roumegou Eric
Albert avait écrit le 21/07/2006 :
Roumegou Eric a écrit :

Roumegou Eric a exprimé avec précision :

après tests (après avoir perdu 2 h car mon projet me générait des
erreurs sans arrêt et sans raisons et seule une suppr du .cpl a pu tout
remettre en ordre); voilà la proc qui fonctionne

ce n'est pas +40 et +50 mais +39 et +49, et pour gérer les dates il y
avait des erreurs. Ce truc marche pour 2006.
donc pas si gadget que ça cette fn Pâques ... meme si bcp devait avoir
une correspondance, mais moi c'est la première fois que j'en ai besoin.


FONCTION VerifsiFérié(pDate)



Bonjour,

Dommage que vous n'avez pas précisé le format du paramêtre (pDate)
< jj/mm/aaaa >. car on s'attend au format habituel a savoir < aaaammjj



oui c'était en commentaire au début du fil, mais je n'ais pas repris
les comm ds mes copier/coller ensuite.
Désolé





Cordialement

Albert



--
Eric Roumégou
Webmaster des Wtablettes
http://cerbermail.com/?qE7t4Qvilo
(cliquez sur le lien ci dessus pour me contacter en privé)
Avatar
Emmanuel Lecoester
le lundi de pentecote c'est encore d'actualité eric ?

OK je sors ;)