Bonjour,
J’ai crée dans un de mes dossiers une prime d’ancienneté qui doit s’appliquer aux non cadres et aux cadres. Mon paramétrage ne doit pas être bon car je n’ai que les non cadres qui sont impactés.
Est ce que quelqu’un aurait la gentillesse de me dire ce qui cloche ?
Begin
ForceTauxS = 0
Include("INIT-D01")
//If Bul.S41.G01.00.013 <> 10 then
// // Pas en forfait jour et Absence complete pas de prime d'anciennete
// If Bul.NbHM = 0 then Return
//Endif
// Agents d'exploitation, employés, techniciens et agents de maîtrise
Select Case Sal.S41.G01.00.014
Case "29","02","03","04":
If Ste.BaseCalculAnciennete = 1 Then
BB = Bul.SalaireDeBase
// Affecte le taux horaire des absences
Call AffecteLibellePrimeEnCours_InclusCalcMajorationTxHAbs(True)
Else
BB = Bul.SalMinConvH * Bul.NbHMn
Memo = "Base : " + Round(Bul.SalMinConvh,4) + " (taux horaire SMC) * " + Bul.NbHMn + " h = " + Round(BB,2)
Call Rem(Memo)
Endif
Tauxs = 0
// Le changement du taux de la prime intervient le mois qui suit la date anniversaire de l'entrée dans l'entreprise ou le mois même de la date anniversaire si le salarié est rentré le premier jour travaillé du mois.
If DateDay(Sal.DateEntree) <> 1 Then Emp.anciennete = Emp.anciennete - 1
If Emp.anciennete >= 36 then Tauxs = 3
If Emp.anciennete >= 48 then Tauxs = 4
If Emp.anciennete >= 60 then Tauxs = 5
If Emp.anciennete >= 72 then Tauxs = 6
If Emp.anciennete >= 84 then Tauxs = 7
If Emp.anciennete >= 96 then Tauxs = 8
If Emp.anciennete >= 108 then Tauxs = 9
If Emp.anciennete >= 120 then Tauxs = 10
If Emp.anciennete >= 144 then Tauxs = 12
If ForceTauxS <> 0 Then TauxS = ForceTauxS
If Tauxs > 0 and BB > 0.0 Then
Bases = BB
x = Bases * tauxs / 100
Call StockeVar("PANC", x )
Exec("GenereLprime")
EndIf
EndSelect
End
Merci de votre aide.
Isabelle