Bonjour,

J’ai une société qui souhaite appliquer le maintien de salaire de tous ces salariés sans condition d’ancienneté depuis le premier jour.

J’ai copié collé la fonction calcul de maintien de la CCN prestataire de service dont la référence est P048 en changeant le calcul d’ancienneté à 0 mais cela ne fonctionne pas.

Voici ma fonction calcul:

//    Absences maladie assimilées à travail effectif pour le calcul des CP : absences > 3 mois consécutifs = oui (dans la période de référence "1er juin - 31 mai" => pas géré).

Begin

Maintien = True    
Emp.Anciennete = CalculeAncienneteA( DateDebut )

Include("DOMONLY_INIT-M-MALADIE")

Select case Sal.S41.G01.00.015.002
Case "01":
    //    Cadres
    Select Case AffectationDADS
    Case "08","09","19":
        // MP & MNP & Hosp
        TypesMaintiensRegroupes = "08,09,19"
        If Emp.Anciennete >= 0 then
            Maintien = True
            Carence = 0
            Nbjours1 = 60
            Pcent1 = 90
            Nbjours2 = 30
            Pcent2 = 75
            If Emp.Anciennete >= 36 then
                Nbjours1 = 120
                Pcent2 = 80
            Endif
            If Emp.Anciennete >= 96 then
                Nbjours1 = 150
                Nbjours2 = 60
            Endif
            If Emp.Anciennete >= 144 then
                Nbjours1 = 180
                Nbjours2 = 90
            Endif
        Endif
    Case "04","11","20":
        // AT & ATT & Hosp
        TypesMaintiensRegroupes = "04,11,20"
        If Emp.Anciennete >= 0 then
            Maintien = True
            Nbjours1 = 30
            Pcent1 = 90
            Nbjours2 = 30
            Pcent2 = 75
            If Emp.Anciennete >= 36 then
                Pcent1 = 100
                Pcent2 = 80
            Endif
            If Emp.Anciennete >= 96 then
                Nbjours1 = 40
                Nbjours2 = 40
            Endif
            If Emp.Anciennete >= 156 then
                Nbjours1 = 50
                Nbjours2 = 50
            Endif
            If Emp.Anciennete >= 216 then
                Nbjours1 = 60
                Nbjours2 = 60
            Endif
            If Emp.Anciennete >= 276 then
                Nbjours1 = 70
                Nbjours2 = 70
            Endif
            If Emp.Anciennete >= 336 then
                Nbjours1 = 80
                Nbjours2 = 80
            Endif
            If Emp.Anciennete >= 396 then
                Nbjours1 = 90
                Nbjours2 = 90
            Endif
        EndIf
    EndSelect

    If Maintien = True then
        TypeMaintien = BrutLimite
        Plage = Mois12
    Endif
Default:
    //    Non cadres
    TypesMaintiensRegroupes = "04,08,09,11,19,20"
    If Emp.Anciennete >= 0 then
        Maintien = True
        Select case AffectationDADS
        Case "09","11":
            //    MNP & ATT
            Carence = 0
        Case "08","04","19","20":
            //    MP & AT & Hospit.
            Carence = 0
        EndSelect
        Nbjours1 = 30
        Pcent1 = 90
        Nbjours2 = 30
        Pcent2 = 75
        If Emp.Anciennete >= 36 then
            Pcent1 = 100
            Pcent2 = 80
        Endif
        If Emp.Anciennete >= 96 then
            Nbjours1 = 40
            Nbjours2 = 40
        Endif
        If Emp.Anciennete >= 156 then
            Nbjours1 = 50
            Nbjours2 = 50
        Endif
        If Emp.Anciennete >= 216 then
            Nbjours1 = 60
            Nbjours2 = 60
        Endif
        If Emp.Anciennete >= 276 then
            Nbjours1 = 70
            Nbjours2 = 70
        Endif
        If Emp.Anciennete >= 336 then
            Nbjours1 = 80
            Nbjours2 = 80
        Endif
        If Emp.Anciennete >= 396 then
            Nbjours1 = 90
            Nbjours2 = 90
        Endif
    Endif

    If Maintien = True then
        TypeMaintien = BrutLimite
        Plage = Mois12
    Endif
EndSelect

If Arr.Duree > 90 then
    DroitCP1 = True
    DroitCP2 = True
    DroitCPCarence = True
Endif

Include("DOMONLY_FIN-M-MALADIE")

End