Skip to main content

création prime ancienneté forfaitaire


Bonjour,

Je souhaite créer une prime d’ancienneté forfaitaire :

J’ai créé un libellé de prime en prenant la D01

Méthode de calcul montant  x montant

je ne trouve pas pour mettre le montant fofaitaire, je sais faire pour un taux qui se calcule sur le salaire de base, mais ce n’est pas ça que jesouhaite.

Merci d’avance pour votre aide :))

Bonne après midi et bonnes fêtes de fin d’année 

barbara

3 commentaires

Forum|alt.badge.img+2
  • Expert
  • December 26, 2025

Bonjour,

 

Dans ce cas il est préférable de créer une fonction calcul de type code fonction D01_1, avec en conditions :

 

Do

        If Mois >= 36 then Montant = 250
        If Mois >= 60 then Montant = 500
        If Mois >= 96 then Montant = 750
        If Mois >= 120 then Montant = 1000
        If Mois >= 150 then Montant = 1500
        

Exit
 

 


J’ai fait ça :

Begin

ForceTauxS = 0
Include("INIT-D01")


        BB = 1
        
        TauxS = 0
        If Emp.anciennete >= 0 Then TauxS = 0
        If Emp.anciennete >= 36 Then TauxS = 250
        If Emp.anciennete >= 60 Then TauxS = 500
        If Emp.anciennete >= 96 Then TauxS = 750
        If Emp.anciennete >= 120 Then TauxS = 1000
        If Emp.anciennete >= 180 Then TauxS = 1500

        If ForceTauxS <> 0 Then TauxS = ForceTauxS
        BaseS = BB
        If Tauxs > 0 and BaseS <> 0 Then Exec ("GenereLprime")
End

cela me convient.

 

Maintenant je souhaite que la prime sorte une fois par an à la date anniversaire d’entrée dans l’entreprise, avez vous une idée ?

Merci

 


J’ai essayé d’arranger le truc j’ai mis ça :

Begin

ForceTauxS = 0
Include("INIT-D01")


        BB = 1
        
        TauxS = 1
        If Emp.anciennete >= 0 Then Montant = 0
        If Emp.anciennete >= 36 Then Montant = 250
        If Emp.anciennete >= 60 Then Montant = 500
        If Emp.anciennete >= 96 Then Montant = 750
        If Emp.anciennete >= 120 Then Montant = 1000
        If Emp.anciennete >= 180 Then Montant = 1500

        If ForceTauxS <> 0 Then TauxS = ForceTauxS
        BaseS = BB
        If Montant > 0 and BaseS <> 0 Then Exec ("GenereLprime")
End

mais là je n’ai que des 1 en salaire de base et taux qui sorte