Skip to main content

Paramétrer prime ancienneté salaire de base + HS


Forum|alt.badge.img+1

Bonjour,

Je souhaiterai savoir comment paramétrer une prime d'ancienneté qui se calcule automatiquement avec assiette salaire de base + heures supplémentaires X les taux ancienneté conventionnels ( CCN déchets).

J’ai trouvé la fonction de calculs. J’aimerai intégrer dans cette formule, les heures supplémentaires contractuelles pour que le calcul de la prime d’ancienneté s’effectue comme souhaité.

Pouvez vous m’aider s’il vous plait ?

En vous remerciant par avance de votre retour.
Cordialement.

Begin

ForceTauxS = 0
Include("INIT-D01")

If Bul.S41.G01.00.013 = "10" Then
    If Ste.BaseCalculAnciennete = 1 Then
        BB = Bul.SalaireDeBase
    Else
        BB = Bul.SalMinConVM
    EndIf
    BB = BB - Bul.MtAbsences
Else
    If Ste.BaseCalculAnciennete = 1 Then
        BB = Bul.TauxHoraire  * bul.nbhmn
    Else
        BB = Bul.SalminConvh * bul.nbhmn
    EndIf
EndIf

anciennete = false
// pas d'anciennete pour les CDD
if sal.S41.G01.00.012.001 <> "02" then
    //    Non cadre + Art36 (Niv I à IV)
    If Sal.S41.G01.00.015.002 = "04" or Sal.S41.G01.00.015.002 = "02" then
        anciennete = true
    Endif
    // cadre
    if Sal.S41.G01.00.015.002 = "01" and Eta.ccnbool[1] = true then
        anciennete = true
    endif
    if anciennete = true then
        Mois = Emp.anciennete
        Taux = 0
        If Mois >= 24 then Taux = 2
        If Mois >= 48 then Taux = 4
        If Mois >= 72 then Taux = 6
        If Mois >= 96 then Taux = 8
        If Mois >= 120 then Taux = 9
        If Mois >= 144 then Taux = 10
        If Mois >= 168 then Taux = 13
        If Mois >= 192 then Taux = 15
        If Mois >= 240 then Taux = 16

        If ForceTauxS <> 0 Then Taux = ForceTauxS

        if taux > 0 then
            Methodecalcul = 1
            Bases = BB
            //Bases = Bul.salairedebase
            TauxS = Taux
            Exec ("GenereLprime")
            x = Bases * tauxs / 100
            call stockevar("PANC", x )
        endif
    endif
endif
End