leconfident
Messages postés2Date d'inscriptionlundi 24 septembre 2007StatutMembreDernière intervention27 novembre 2008
-
27 nov. 2008 à 11:39
leconfident
Messages postés2Date d'inscriptionlundi 24 septembre 2007StatutMembreDernière intervention27 novembre 2008
-
27 nov. 2008 à 15:56
Bonjour tout le monde !
<?xml:namespace prefix o ns "urn:schemas-microsoft-com:office:office" /??>
Tout d'abord je ne sais pas si je suis dans le bon endroit pour poser ma question mais j'essaye quand même de la poser ici avec un grand souhait que quelqu'un puisse répondre à ma question "perdue" parce que je suis vraiment perdu là..
Voilà je suis débutant en programmation.
Dans le cadre d'un projet de réalisation d'une application qui doit gérer les horaires et les jours de travail en prenant en compte les jours fériés et vacances.
leconfident
Messages postés2Date d'inscriptionlundi 24 septembre 2007StatutMembreDernière intervention27 novembre 2008 27 nov. 2008 à 15:56
Voilà je viens juste de terminer le code de ma solution (à laquelle je n'ai pas cessé de penser depuis que j'ai posté le problème loll)
<?xml:namespace prefix o ns "urn:schemas-microsoft-com:office:office" /??>
Alors, j'ai créé une procédure globale (Kouglouf > Procédures globales de MonProjet > Bouton droit > Nouvelle procédure globale :
PROCEDURE VérificationSiJourFériéOuVacance(NomDuChamp est une chaîne)
// Déclaration d'une variable locale de comparaison :
Jr est une chaîne = DateVersJourEnLettre(NomDuChamp)
// Vérifier si la date correspond à un samedi ou un dimanche :
SI Jr="Samedi" OU Jr="Dimanche" ALORS
// Afficher le message : Vous avez sélectionné un [Samedi | Dimanche] !!
Erreur("Vous avez sélectionné un "+Jr+" !!")
FIN
// Vérifier si la date choisie fait partie des jours fériés préalablement saisis dans le fichier JrsFériésEtVacances
// ou dans une période de vacances :
//-------------------------------------------------
// 1- Lecture du premier enregistrement du fichier JrsFériésEtVacances :
HLitPremier(JoursFériésEtVacances,DatDebJFV)
// 2- Boucle de parcours des autres lignes :
TANTQUE HEnDehors(JoursFériésEtVacances) = Faux // Tant qu'il y a encore une ligne à lire
SI NomDuChamp >= JrsFériésEtVacances.DatDebJFV ET NomDuChamp <= JrsFériésEtVacances.DatFinJFV ALORS
Erreur("Vous avez sélectionné un jour férié ou de vacances")
SORTIR
SINON
HLitSuivant(JrsFériésEtVacances,DatDebJFV)
FIN
FIN
// Fin du code.
En fin, pour pouvoir utiliser la procédure que je viens de créer, :
- Dans le code de la combo de vérification des dates (que j'ai nommé par exemple : Combo_DateAct de type Date) ,
-----> Dans la partie : "Sélection d'une ligne de Combo_DateAct" on appelle la procédure en lui donnant le nom du champ comme paramètre comme suit : VérificationSiJourFériéOuVacance("Combo_DateAct")
Et voilà!! Le tour est joué
J'espère que mon expérience servira à d'autres personnes...