1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27
| e est un caractère
SI EXPRESS_REQ_Retenues.Sexe = 1 ALORS
e=""
SINON
e="e"
FIN
Title est une chaîne
SELON EXPRESS_REQ_Retenues.Civilité
CAS 1
SI EXPRESS_REQ_Retenues.Civilité = 1 ALORS
Title = "Mlle"
FIN
CAS 2
SI EXPRESS_REQ_Retenues.Civilité = 2 ALORS
Title = "Mme"
FIN
CAS 3
SI EXPRESS_REQ_Retenues.Civilité = 3 ALORS
Title = "M."
FIN
FIN
LIB_6 = " Madame,Monsieur,"+CR+CR+"J'ai le regret de vous informer que votre enfant "+EXPRESS_REQ_Retenues.Nom+" "+EXPRESS_REQ_Retenues.Prenom+
", scolarisé"+e+" en classe de "+EXPRESS_REQ_Retenues.Division+" , à été mis"+e+" en retenue à la date suivante :"+CR+CR+" Le "+DateVersChaîne(EXPRESS_REQ_Retenues.Date,"JJJJ JJ MMMM AAAA")+" de "+HeureVersChaîne(EXPRESS_REQ_Retenues.Heure_deb,"HH:MM")+
" à "+HeureVersChaîne(EXPRESS_REQ_Retenues.Heure_fin,"HH:MM")+" (Durée :"+HeureVersChaîne(EntierVersHeure(HeureDifférence(EXPRESS_REQ_Retenues.Heure_deb,EXPRESS_REQ_Retenues.Heure_fin)),"HH:MM")+")"+CR+CR+"Cette retenue a été demandée par "+Title+" "+EXPRESS_REQ_Retenues.Nom_EX+", "+EXPRESS_REQ_Retenues.Titre+", pour le motif suivant :"+CR+CR+" "+EXPRESS_REQ_Retenues.Motif+CR+CR+"Votre enfant devra se rendre en permanence,"+CR+"La surveillance de cette retenue sera assurée par M.ROYER"+CR+CR+
"Pendant cette retenue, votre enfant devra effectuer le travail suivant :"+CR+CR+" "+EXPRESS_REQ_Retenues.Travail+CR+CR+"Je vous rappelle que la présence de votre enfant à cette retenue est obligatoire."+CR+"Toute absence sans motif sérieux entraînera une sanction beaucoup plus sévère."+CR+CR+"Veuillez agréer, Monsieur, Madame, mes sincères salutations." |
Partager