Bonjour
Je dois créer une fonction calcul afin que les salariés non cadres puisse bénéficier en cas de maladie non professionnelle d’un complément employeur après 3 jours de carence mais ma fonction calcul ne fonctionne pas. Pouvez vous m’aider ?
Begin
//Plage = 12 mois à la date anniversaire d'embauche
Select Case AffectationDADS
Case "09":
Carence = 3
If SAL.S41.G01.00.015.002 = "04" and emp.anciennete > 12 then Carence = 3
//Calcul de la date anniversaire la plus récente avant la date d'arrêt maladie
madate_anniv = emp.dateentree.jour,emp.dateentree.mois,bul.annee)
If madate_anniv>abs.dtdeb then
madate_anniv=date(emp.dateentree.jour,emp.dateentree.mois,bul.annee-1)
Endif
//Début de la période = date anniversaire - 12 mois
madatedebut = dateaddmonths(madate_anniv,-12)
madatefin = madate_anniv
//Compter les absences sur cette période
nba = nombreasences (madatedebut, madatefin, 09) //09 code absence maladie non professionnelle.
//Application de la carence de 3 jours
If abs.duree>3 then
jours_maintien = abs.duree-3
Else jours_maintien = 0
Endif
//Détermination du palier selon l'ancienneté
If emp.anciennete >= 312 then // + 26 ans
palier1 = 80
taux1 = 0.90
palier2 = 80
taux2 = 0.66
palier3 = 0
taux3 = 0
Else If emp.anciennete >= 252 then // + 21 ans
palier1 = 70
taux1 = 0.90
palier2 = 70
taux2 = 0.66
palier3 = 0
taux3 = 0
Else If emp.anciennete >= 192 then // + 16 ans
palier1 = 60
taux1 = 0.90
palier2 = 60
taux2 = 0.66
palier3 = 0
taux3 = 0
Else If emp.anciennete >= 180 then // + 15 ans
palier1 = 90
taux1 = 1
palier2 = 0
taux2 = 0
palier3 = 0
taux3 = 0
Else If emp.anciennete >= 120 then // + 10 ans
palier1 = 60
taux1 = 1
palier2 = 30
taux2 = 0.75
palier3 = 0
taux3 = 0
Else If emp.anciennete >= 96 then // + 8 ans
palier1 = 30
taux1 = 1
palier2 = 10
taux2 = 0.90
palier3 = 10
taux3 = 0.66
Else If emp.anciennete >= 72 then // + 6 ans
palier1 = 40
taux1 = 0.90
palier2 = 40
taux2 = 0.66
palier3 = 0
taux3 = 0
Else If emp.anciennete >= 60 then // + 5 ans
palier1 = 30
taux1 = 1
palier2 = 30
taux2 = 0.75
palier3 = 0
taux3 = 0
Else // +1 à 4 ans
palier1 = 30
taux1 = 0.9
palier2 = 30
taux2 = 0.66
palier3 = 0
taux3 = 0
Endif
//Calcul du maitien restant à appliquer
jours_total = jours_deja_maintenus + jours_maintien
If jours_total <=palier1 then Maintien = taux1
Else If jours_total <=palier1 + palier2 then
Maintien = taux2
Else If jours_total <= palier1+palier2+palier3 then
Maintien = taux3
Else
Maintien = 0
Endif
Else
Maintien = 0
Endif