Skip to main content

Bonjour,

 

J’aimerais paramétrer une prime d’assiduité D03 pour mon client avec calcul automatique en P->primes->profils

Les critères sont les suivants : 150 € à verser tous les trimestre en avril, juillet, septembre et décembre si pas d’absence  pendant les 3 mois précédents.

Mes problématiques rencontrées sont les suivantes :

  1. Pour qu’elle se déclenche chaque mois désiré j’ai saisi “If bul.mois=04, 07, 09, 12 then” mais ça ne fonctionne pas 😞 savez vous comment faire svp ? Ca fonctionne pour un mois tout seul mais je n’arrive pas à en mettre plusieurs
  2. Pour tenir compte des absences j’ai tenté ceci pour le 2e trimestre: 

    Anneedeb = bul.annee
    DateDEBUT = date (1,06,Anneedeb)
    Dtfin = date (31,08, bul.annee)

    xx = NbJCalendairesAbsences(DateDEBUT ,Dtfin ,"01+02+03+05+06+07+09+10+15+16+17+18+19+21+22+23+25+27+31+32+33+38+39+44+45+54+62+63+65+69+70+71+72+73+79+80+81+86+87+88+89+91+92+93+94+97+98+99") Puis If xx > 1 then Mprime = 0, else Mprime = 150 Pourriez vous m’aider svp ? 

Merci beaucoup ! 

Bonjour

 

Pour le premier point

  1. Pour qu’elle se déclenche chaque mois désiré j’ai saisi “If bul.mois=04, 07, 09, 12 then” mais ça ne fonctionne pas 😞 savez vous comment faire svp ? Ca fonctionne pour un mois tout seul mais je n’arrive pas à en mettre plusieurs

If bul.mois=04 or bul.mois=07 or bul.mois=09 or bul.mois=12 then

 

mais à mon avis, il va vous falloir faire le test mois par mois pour les dates d’absences

donc plutôt

if bul.mois=04 then

 

endif

il bul.mois= 07 then

 

endif

etc….

 

bonne journée


si cela peut vous inspirer..

silae a écrit pour la ccn C132

 

If Bul.mois = Mois then
        Assiduite = saisie("Assiduité",0)
        If Assiduite <> 0 then
            B = Assiduite
        Else
            MaDateDebut = Date (01,01,Annee)
            MaDateFin = Date (31,12,Annee)
            NbHAbs = CalculeDureeAbsences(MaDateDebut,MaDateFin,"09+11+19+25+54+62+69+80+81+86+87+88",0)
            If NbHAbs <= 28 then
                B = 28 * Bul.Tauxhoraire
                NbJAbs = NbJCalendairesAbsences(MaDateDebut,MaDateFin,"09+11+19+25+54+62+69+80+81+86+87+88")
                If NbJAbs <> 0 then
                    NbJAbs = 2 * NbJAbs
                    BB = B * NbJAbs / 8
                    BB = Round (BB,2)
                    MemoPAssi = "Proratisation pour absence : " + NbJAbs + " (Nombre de demi-journées d'absences) / 8 * " + B + " = " +  BB + " €"
                    B = BB
                EndIf
            EndIf
        EndIf
        Exec("Lprime_D03")
        Bases = B
        MethodeCalcul = 2
        If MemoPAssi <> "" then Call Rem(MemoPAssi)
        If Bases > 0 then Exec ("GenereLprime")
    EndIf
 

la première partie permet de forcer le montant par une saisie (entre le if et le else)

dans cette ccn la prime est proratisée, il vous reste à personnaliser comme vous voulez.

bonne journée


Merci ça a fonctionné pour les périodes ! :)


Commenter