PC SOFT

FORUMS PROFESSIONNELS
WINDEV, WEBDEV et WINDEV Mobile

Accueil  |  Messages récents  | Connexion  |   | Français  FR
Accueil → WINDEV 2024 → Fonction PlanningInfoXY opérationnelle ou pas ?
Fonction PlanningInfoXY opérationnelle ou pas ?
Débuté par mlion, 28 avr. 2017 11:16 - 1 réponse
#1
Posté le 28 avril 2017 - 11:16
Bonjour,

Je me mets finalement à exploiter le champ planning et je galère !
Champ planning avec visualisation d'une journée en totalité et jour de début et fin paramétrables

-> pour l'alimentation : simple requête
tmpRDV est un RendezVous
POUR TOUT Requête14_3
SI PAS PlanningAjouteRessource(Planning1,Requête14_3 .nom + " " + Requête14_3 .prenom + gLien(Requête14_3.MATRICULE)) ALORS
Erreur(ErreurInfo())
FIN
// Ajout de la plage
tmpRDV..Ressource = Requête14_3.MATRICULE
tmpRDV..Titre = Requête14_3.Faction
tmpRDV..DateDébut = Requête14_3.jour
tmpRDV..DateFin = Requête14_3.jour
tmpRDV..Contenu = Requête14_3.R_Evenement
tmpRDV..Note = "Note"
tmpRDV..Lieu = "Lieu " + Requête14_3.Poste
tmpRDV..Bulle = Requête14_3.D_Evenement
SI PAS PlanningAjouteRendezVous(Planning1,tmpRDV) ALORS
Erreur(ErreurInfo())
FIN

FIN
FIN


-> OK mon planning est visualisé.





Maintenant dans l'événement bouton gauche enfoncé j'ai mis le simple code :
MON_rdv est une chaîne
MON_rdv = PlanningInfoXY(Planning1,plnRessource,SourisPosX(),SourisPosY())
Info(MON_rdv)
MON_rdv = PlanningInfoXY(Planning1,plnDateHeure,SourisPosX(),SourisPosY())
Info(MON_rdv)


Résultat : ma ressource est correcte mais la date et heure renvoyées sont n'importe quoi ...
Ci-dessous la capture après le second "info"





Je peux cliquer partout dans le planning c'est toujours le 27/04/2017 ou presque -> des fois on a une autre date ???

Est-ce que quelqu'un peut m'éclairer ou pas ? L'objectif est bien entendu de récupérer le jour cliqué ainsi que la ressource adéquate !

Merci de votre aide.

Michel.
#2
Membre enregistré
326 messages
Popularité : +15 (19 votes)
Posté le 28 avril 2017 - 15:11
Re-bonjour.

La réponse à question "PlanningInfoXY opérationnelle ou pas " je réponds -> à manier avec des pincettes !
Je n'arrive absolument pas à récupérer la date et heure du rendez-vous via un clic de souris comme il est expliqué dans la documentation.

Par contre par des moyens détournés dont le code est ci-dessous (code du bouton gauche enfoncé) :
J'arrive à ce que je veux.
MON_rdv est une chaîne
MON_rdv = PlanningInfoXY(Planning1,plnRendezVous,SourisPosX(),SourisPosY())
Info(MON_rdv) // retourne l'ID du RDV cliqué
PlanningSelectPlus(Planning1,Val(MON_rdv)) // sélection dur RDV
tmpRDV est un RendezVous = Planning1[Val(MON_rdv)] // alimentation du RDV
Info(tmpRDV..DateDébut + " " + tmpRDV..Ressource)


Je n'ai pas trouvé plus simple -> si cela peut aider à l'avenir quelqu'un.

Une remarque : la documentation est nettement à améliorer concernant le champ "planning" et son maniement.

Michel.
→ Revenir à WINDEV 2024