Skip to main content
Répondu

Calcul automatique TR selon jour ouvré M-1 - les absence mis sur bulletin du mois


Bonjour à tous,

L’un de vous aurait-il le paramétrage pour le calcul automatique des Ticket restaurant pour les salarié dont c’est coché dans leur fiche, sachant que le nombre de TR du bulletin M est égal au nombre de jour ouvré de M-1 - les absences mis sur le bulletin M (qui sont en fait les absence de M-1) ?

 

Silae ne me répond pas depuis plus d’une semaine.

 

Merci, pour vos retours,

Meilleure réponse par Anthony Petit

Bonjour,

Cette déduction est possible en spécifique seulement.
J’ai constaté que vous avez pu échanger avec nos équipes et le paramétrage a été fait sur le dossier.

Afficher l'original
Ce sujet vous a-t-il aidé à trouver une réponse à votre question?

4 commentaires

Anthony Petit
Community Manager
Forum|alt.badge.img+2
  • Community Manager
  • 5283 commentaires
  • Réponse
  • 20 décembre 2024

Bonjour,

Cette déduction est possible en spécifique seulement.
J’ai constaté que vous avez pu échanger avec nos équipes et le paramétrage a été fait sur le dossier.


  • Auteur
  • Connaisseur
  • 30 commentaires
  • 20 décembre 2024

Bonjour, 

Oui en effet j’ai pu avoir un retour de Silae.

 

Merci,


Bonjour,

 

Pouvez-vous me donner le paramétrage qui a été effectué sur votre dossier s’il vous plait?

Silae nous a fait un paramétrage mais celui-ci ne fonctionne pas et nous avons toujours le décompte qui se fait par rapport au nombre de jours ouvrés de M.

Merci beaucoup pour votre aide


  • Auteur
  • Connaisseur
  • 30 commentaires
  • 15 juillet 2025

Profil de prime SAISIETR :

 

Begin

//FDU, 27/01/2025,nb TR = js ouvrés mois préc. - abs mois préc. (sur bulletin en cours) + samedis / jours fériés travaillés
//FDU, 28/01/2025,  : prise en compte du salarié entrant et du salarié sortant
//FDU, 30/01/2025,  : refonte pour les 1/2 jours d'absence
//FDU, 05/02/2025,  : impact des jours fériés avec absence
//FDU, 10/04/2025,  : Déduction repas ou TR
//AA,     20/05/2025,  : ajout stockevar DeducTR

NbTicketResto = 0
NbTicketRestoABS = 0
SaisieNbAbs = False

// Si changement de INIT-SAISIETR, il faut aussi le faire dans INIT-TR pour le libellé de cotisation TR
MaxNbTicketResto = 0

Include("DOMONLY_INIT-SAISIETR")

Select case Bul.TResto
Case 1:
    //    Qte de Ticket est le nbre de Jours Ouvrés du mois
    If SaisieNbAbs = False Then
    //    NbTicketResto = Saisie("NbTicket",Bul.NbTicketsResto)
        datedeb = DateAddMonths (bul.periode, - 1)
        datefin = DateAddDays (bul.periode, - 1)
        If Cumulstockvar(datedeb,datefin,"SALARIEENTRE") = 1 then datedeb = Emp.DtDeb
        TRSup = 0
        If stockvar("PrSamedi1") > 0 then TRSup = TRSup + 1
        If stockvar("PrSamedi2") > 0 then TRSup = TRSup + 1
        If stockvar("PrSamedi3") > 0 then TRSup = TRSup + 1
        If stockvar("PrSamedi4") > 0 then TRSup = TRSup + 1
        If stockvar("PrSamedi5") > 0 then TRSup = TRSup + 1
        If stockvar("PJferie1") > 0 then TRSup = TRSup + 1
        If stockvar("PJferie2") > 0 then TRSup = TRSup + 1
        If stockvar("PJferie3") > 0 then TRSup = TRSup + 1

        JCalAbs = 0
        JrT = datedeb
        Do
            If JrT > datefin then Exit
            Select Case DateDayOfWeek(JrT)
            Case 1,2,3,4,5:
                If NbJCalendairesAbsences(JrT,JrT,"-JFNT-97") = 1 then
                    JCalAbs = JCalAbs + 1
                    If NbJoursFeriesTheoriques(JrT,JrT,1) = 1 then JCalAbs = JCalAbs - 1
                Endif
            Default:
            EndSelect
            JrT = DateAddDays(JrT,+1)
        Loop

call stockevar("JCalAbs",JCalAbs)

        NbTicketResto = NbJOTheoriques(datedeb, datefin) - JCalAbs + TRSup 

        // Entrée ce mois pas de TR car pas de jour ouvré travaillé sur le mois précédent
        If Bul.EntreCeMois = True then
            NbTicketResto = 0
            Call stockevar("SALARIEENTRE",1)
        Endif
        If Bul.SortiCeMois = true then 
            NbTicketResto = NbTicketResto + Bul.NbTicketsResto
            If Bul.EntreCeMois = False then NbTicketResto = NbTicketResto + JCalAbs
        Endif
    
        DeducTR = VariableSaisie2("DeducRepasOuTR")
        If DeducTR <> 0 then NbTicketResto = NbTicketResto - DeducTR
        Call stockevar("DeducTR",DeducTR)        

        ForceNbTicketResto = Saisie("ForceNbTicket",0)
        If ForceNbTicketResto <> 0 then NbTicketResto = ForceNbTicketResto
        If ForceNbTicketResto = -1 then NbTicketResto = 0
    Else
        NbTicketRestoABS = Saisie("NbTicketEnMoins",NbTicketRestoABS)
        NbTicketResto = Bul.NbTicketsResto - NbTicketRestoABS
    EndIf
Case 2:
    //    Ste de Ticket est à saisir
    if EMP.PresencePlageHoraire = true and Emp.ActiviteJournaliere = false then Call SimulerActiviteJournaliereDecoupageMois()
    xx = CalculerValeurDefautActiviteJournaliere("NbTicket")
    NbTicketResto = Saisie("NbTicket",xx)
    Call FinSimulationActiviteJournaliere()
Case 3:
    //    Ste de Ticket est à saisir en repetant le meme nombre de ticket de mois en mois
    NbTicketResto = SaisieM1("NbTicket")
EndSelect

If MaxNbTicketResto <> 0 Then
    If NbTicketResto > MaxNbTicketResto Then NbTicketResto = MaxNbTicketResto
EndIf

If NbTicketResto <> 0 then
    Call Stockevar("TRESTO",NbTicketResto)
    Exec("Pprime_TR")
Else
 
    If StockVar("BC_Reg-TR") = 1 Then Exec("Pprime_TR")
EndIf

Include("DOMONLY_FIN-SAISIETR")

End
 

 

Et en fonction INIT-TR :

NbTicketResto = Stockvar("TRESTO")
If Stockvar("TRESTO") = 0 then Nbticketauto = 0


Commenter


Gestion des cookies

Nous utilisons des cookies pour améliorer et personnaliser votre expérience. Si vous acceptez ou continuez de naviguer, vous acceptez règles relatives aux cookies. En savoir plus sur nos cookies

 
Paramètres de cookies