Bonjour 

J’ai mis  en place une prime d’ancienneté avec une fonction calcul

Celle ci se déclenche après 20ans d’ancienneté pour 2%

Je cherche a ce que celle ci se proratise en cas d’absence maladie.

BaseAnc = Bul.SalaireDeBase
If Emp.anciennete >= 240 Then TauxAnc = 2 else TauxAnc = 0
If TauxAnc <> 0 then
    Exec("Lprime_D01.1")
    methodecalcul = 1
    BaseS = BaseAnc 
    Tauxs = TauxAnc 
    Liblong = "Prime Ancienneté"
    x = Bases * Tauxs /100
    Call stockevar("PrimeAnc",x)
    If Tauxs > 0 and BaseS <> 0 Then Exec ("GenereLprime")
endif

je ne parviens pas à modifier celle ci.

Merci pour votre aide

belle journée