[Thika]

Dans mon time2

OnTimerEnd, j’ai rajouté cette instruction. Mais ca ne fais rien du tout. Merci !

RemoveIf (colDates;Weekday(date)=1,7);;nForAll(colDates; n       Patch(GestionList; Defaults(GestionList); n       {Staff: DataCardValue3.Selected; n        Assiduite: DataCardValue4.Selected; n        DateP: ThisRecord.date} )n       );;n

CommentID=qC5LwMiM48nwIfz, PostID=PGGF2dlzyKLdZ63

[Thika]

Merci bpc pour le retour rapide. Je vais testé les deux méthodes aujourd’hui et je vous reviens.

CommentID=zsuO6Z52HO0Vqef, PostID=wdLihsBfRSa3Svt

[Thika]

@R3dKap

Merci, ca fonctionne.

SubCommentID=j7ksreTN0mWkYFu, CommentID=zsuO6Z52HO0Vqef, PostID=wdLihsBfRSa3Svt

[Thika]

@R3dKap

J’ai résolu les autres erreurs mais j’ai tjr le probleme du patch

SubCommentID=adr7leHjJNO35J6, CommentID=zsuO6Z52HO0Vqef, PostID=wdLihsBfRSa3Svt

[Thika]

@R3dKap

Merci.

1) Pour les labels, je vais les modifier.

Pour l’utilisation du form, je voulais d’abord faire fonctionner mon code et modifier après. Histoire de résoudre un problème a la fois.

2)Hier Il n’y avait qu’une seule erreur, c était sur le patch. j’ai publié et j’ai aussi un message d’erreur sur le DatePicker.SelectedValue et aussi sur le form1″

Voici les messages d’erreur :

1. DatePicker1.SelectedDate : Utilisation non valide de ” .”
2. Patch : La fonction Patch contient des arguments non valide.
3. Form1 : la fonction attend un formulaire modifiable en entrée.

Pour corriger j’ai remplacé form1 par @form1 , je n’ai plus de message d’erreur. Je sais que c’est en lien avec le default mode et comment j’initialise mon form. Je me dit que je vais résoudre ce problème en utilisant le control group come tu me l’a suggéré.

staff est le nom d ‘un groupe 0365,

Assiduité : Bureau ou Télétravail

DateP : date de deb

DatePicker1 : Date de fin. (ne fait pas partie de mon formulaire)

SubCommentID=ZKLZWUkJp8YSZgQ, CommentID=zsuO6Z52HO0Vqef, PostID=wdLihsBfRSa3Svt

[Thika]

@Thika

Encore merci pour la solution. J’ai essayé.

Mais j’ai un message d’erreur et pourtant j’ai déclaré les variables.

Erreur : la fonction pacth contient des arguments non valides.

Sur le bouton onSelect du bouton soumettre voici

ClearCollect(colGestionList; {});;nClear(colGestionList);;nForAll(n    Sequence(n        DateDiff(n            DataCardValue5.SelectedDate;n            DatePicker1.SelectedDaten        ) + 1n    );n    Collect(n        colGestionList; n        {n            Staff: DataCardValue3.Selected;n            Assiduite:  DataCardValue4.Selected;n            DateP: DateAdd(n                DataCardValue5.SelectedDate;n                Value - 1n            )n        }n    )n);;nPatch(GestionList; Defaults(GestionList); colGestionList);; n

SubCommentID=TdJWLCIVFwsLbLy, CommentID=zsuO6Z52HO0Vqef, PostID=wdLihsBfRSa3Svt

[Thika]

@R3dKap Je te dit grand merci. Je suis a 20 minutes de ma présentation. Tout fonctionne a merveille.

SubCommentID=9bVxySSaZMJK0wN, CommentID=D49VMrVm3p9mWkf, PostID=PGGF2dlzyKLdZ63

[Thika]

@R3dKap

Merci encore de ton aide.

Lorsque j’essaie d’ajouter +1 a datediff, ca me donne des messages d’erreurs sur la fonction

Merci !

SubCommentID=EEjJzOjGTrKpzqy, CommentID=D49VMrVm3p9mWkf, PostID=PGGF2dlzyKLdZ63

[Thika]

@R3dKap

Salut, merci encore pour ton aide, c’est très apprécier. Ca fonctionne sauf que j’ai deux problèmes :

1. Par ex : du 29 dec au 05 janv, le record du 05 janvier ne se crée pas. Je n’ai aucun message d’erreur. Toujours aucun enregistrement le dernier jour.
2. Il ne considère pas la collection de jours fériés. J’ai ds l’idée que c’est peut-être le format de date. Mais dans mon sélecteur de date j’ai le format jj/mm/aaaa. C’est le même format que j’ai reproduit ds la collection de dates.

ma collection

OnStart de l’appli.

ClearCollect(colHolidays;n             Split("25-12-2021,27-12-2021,31-12-2021,01-01-2022, 03-01-20222";n                   ","n             )n)nn

OnSelect de mon bouton

ClearCollect(colDaysBeetweenDates;DropColumns(Filter(AddColumns(Sequence(nnDateDiff(DatePickerDebut_1.SelectedDate;DatePickerFin_1.SelectedDate);0;1);"Date";nnDateAdd(DatePickerDebut_1.SelectedDate;Value));nnWeekday(Date;StartOfWeek.Monday) <> 6 && Weekday(Date;StartOfWeek.Monday) <> 7 && !(Date in colHolidays.Result));"Value"));;nnClear(colGestionList);;nnForAll(n    colDaysBeetweenDates;n    Collect(colGestionList;n        Defaults(GestionList)n    );;n    Update(n        colGestionList;n        Last(colGestionList);n        {n            Staff: ComboBoxNom_1.Selected;n            Assiduite:  ComboBoxAssiduite_1.Selected; n               n            DateP: Daten        }n    )n);;nPatch(GestionList; colGestionList);;  n

SubCommentID=l55vL76G5WiGLvb, CommentID=D49VMrVm3p9mWkf, PostID=PGGF2dlzyKLdZ63

[Thika]

@Theophile CHIN-NIN

Merci pour ton code.

J’utilise maintenant un bouton a la place du timer.

J’ai crée une liste SharePoint JoursFériés avec une colonne DateJourFérié.

J’ai essayé d’intégré ton code mais j’ai l’ erreur suivante : 1 argument ont été reçus, 2 étaient attendus

Mon formulaire

OnSelect de mon bouton.

ClearCollect(colDaysBeetweenDates;Filter( AddColumns(Sequence( DateDiff(DatePickerDebut.SelectedDate;  DatePickerFin.SelectedDate);0;1);"Date"; DateAdd(DatePickerDebut.SelectedDate;StartOfWeek.Monday) <> 6 && Weekday(Date;StartOfWeek.Monday) <> 7 && !(Date in JoursFériés.DateJourFérié) ) );;n// pour remplir ma listenClear(colGestionList);;nForAll(n    Sequence(n        DateDiff( DatePickerDebut.SelectedDate;  DatePickerFin.SelectedDate) + 1);n        Collect(colGestionList;Defaults(GestionList));;nn    Update(n        colGestionList;n        Last(colGestionList);n        {n          Staff: ComboBoxNom.Selected;n          Assiduite: ComboBoxAssiduite.Selected;n          DateP: DateAdd(n                DatePickerDebut.SelectedDate;n                Value - 1n            )n        }n    )n);;nPatch(GestionList; colGestionList);;n

SubCommentID=gfgeJDoKik6E15F, CommentID=D49VMrVm3p9mWkf, PostID=PGGF2dlzyKLdZ63

[Thika]

@Theophile CHIN-NIN

Merci pour le retour, j’ai enlevé les timer pour un bouton submit.

Voir mon code plus haut.

SubCommentID=JaNPAaO6fJDYFbs, CommentID=D49VMrVm3p9mWkf, PostID=PGGF2dlzyKLdZ63

[Thika]

@R3dKap

Merci pour le retour. JE m’excuse pour les multiples posts.

J’ai donc suivi vos conseils. J’ai changé mon formulaire pour des comboBox. En effet ca fonctionne très bien.

J’ai crée ma liste JourFériés avec une colonne DateJourFérié

J’essaie d’intégrer le code que tu m’as suggéré, j’ai juste bpc d’erreur lorsque j’essaie d’intégré la condition IF.

Voici le code de mon bouton submit

OnSelect

 ClearCollect(n    colGestionList; Defaults(GestionList)n);;nSet(newDate;DateAdd(DatePickerDebut.SelectedDate;var;Days));;nnClear(colGestionList);;nForAll(n    Sequence(n        DateDiff(n            DatePickerDebut.SelectedDate;n            DatePickerFin.SelectedDaten        ) + 1n    );n    Collect(n        colGestionList;n        Defaults(GestionList)n    );;n    Update(n        colGestionList;n        Last(colGestionList);n        {n              Staff: ComboBoxNom.Selected;n             Assiduite:  ComboBoxAssiduite.Selected;n         n            DateP: DateAdd(n                DatePickerDebut.SelectedDate;n                Value - 1n            )n        }n    )n);;nPatch(GestionList; colGestionList);;n

SubCommentID=eqG8BwLoEEcEeBq, CommentID=gTLjFbVtZvEkITJ, PostID=PGGF2dlzyKLdZ63

[Thika]

@R3dKap

Je m’excuse si le message est repris deux fois. J’ai remarqué que je me suis taguée.

Encore merci pour la solution. J’ai essayé.

Mais j’ai un message d’erreur et pourtant j’ai déclaré les variables.

Erreur : la fonction pacth contient des arguments non valides.

Sur le bouton onSelect du bouton soumettre voici

ClearCollect(colGestionList; {});;nClear(colGestionList);;nForAll(n    Sequence(n        DateDiff(n            DataCardValue5.SelectedDate;n            DatePicker1.SelectedDaten        ) + 1n    );n    Collect(n        colGestionList; n        {n            Staff: DataCardValue3.Selected;n            Assiduite:  DataCardValue4.Selected;n            DateP: DateAdd(n                DataCardValue5.SelectedDate;n                Value - 1n            )n        }n    )n);;nPatch(GestionList; Defaults(GestionList); colGestionList);; n

SubCommentID=FFZldk5GW49WfP4, CommentID=95e9iLM4235LlRb, PostID=wdLihsBfRSa3Svt

[Thika]

@Didier Gbenou

Encore une fois merci.

Ca fonctionne très bien maintenant. Oui je vais essayé aussi l’autre solution. Ca me permet aussi d’apprendre.

SubCommentID=lVo4jvTg6igD2gc, CommentID=HmXrEBHsPpaEZO4, PostID=wdLihsBfRSa3Svt

[Thika]

@Didier Gbenou

Encore merci pour le code. Ca ne fonctionne pas exactement pour moi. Il ajoute bel et bien les record mais a partir de la date de fin.

Par ex du 8 dec au 12 dec, Il commence au 12 déc jusqu au 16 déc.

1)Timer 2

Duration

10n

Onselect

Falsen

OnTimerEnd

ForAll(colDates; n       Patch(GestionList; Defaults(GestionList); n       {Staff: DataCardValue3.Selected; n        Assiduite: DataCardValue4.Selected; n        DateP: ThisRecord.date} )n       )n

Repeat

!Timer1.Repeatn

2)Timer 1

Duration

10n

On select

Set(var;0);; Clear(colDates);;n

OntimerEnd /* J’ai essayé de modifier cette instruction en prenant la dateP(date de début) mais dans ce cas, il ne me donne qu’un seul record. Celui de la date de début

Collect(colDates;{date : DateAdd (DatePicker1.SelectedDate;var;Days)});; Set(var;var+1);;n

(Ou datePicker1 correspond a ma date de fin )

Repeat (Est ce correct ?, je n’ai pas vu ton instruction repeat)

If ( var < DateDiff(DataCardValue5.SelectedDate; DatePicker1.SelectedDate);true;false)n

SubCommentID=EqsVS4TugPSvFxo, CommentID=HmXrEBHsPpaEZO4, PostID=wdLihsBfRSa3Svt