Skip to main content
Répondu

CP ANCIENNETE CHIMIE (C035)


Forum|alt.badge.img+4

Bonjour,
Dans la Chimie, le profil de CP ancienneté est programmé comme ceci par Silae :

 

Mon client souhaite que les CP soient acquis à date anniversaire et non à date de clôture.
J’ai fait la demande à Silae il y a presque 2 mois mais je n’ai pas de retour. Avez vous une idée pour modifier cette fonction calcul ?

De plus, ce paramétrage pose une autre problématique, notamment en cas de départ à la retraite.
En effet, avec la formule “If Bul.SortiCeMois = False“, l’alimentation du compteur CP ne se fait jamais si le salarié sort avant le 31/05.

Merci d’avance pour vos avis.

GC

Meilleure réponse par Rachid

Gauthier, 

 

Le paramétrage doit se faire en 2 temps.

Neutraliser la Fonction Calcul :

 

Puis créer un profil prime en copiant celui de Silae (voir votre impression écran) et ajouter ceci :

 

 

Le compteur des CP anticipés sera alimenté.

Un Endif devra être ajouté juste avant le END (dernière ligne)

Rachid

2 commentaires

Rachid
Formateur certifié
Forum|alt.badge.img+3
  • Formateur certifié
  • Réponse
  • March 21, 2024

Gauthier, 

 

Le paramétrage doit se faire en 2 temps.

Neutraliser la Fonction Calcul :

 

Puis créer un profil prime en copiant celui de Silae (voir votre impression écran) et ajouter ceci :

 

 

Le compteur des CP anticipés sera alimenté.

Un Endif devra être ajouté juste avant le END (dernière ligne)

Rachid


Forum|alt.badge.img+1

Bonjour, 

je me permet une petite MAJ du codage. Celui proposé est paramétré pour un déclenchement à la date anniversaire de l’emploi, or il me semble que le besoin est lié à la date anniversaire de la naissance du salarié. 


A toute fin utile : 

*****************
 

Begin

Jours = 0


AfficherCommentaire = true

If Bul.SortiCeMois = False then

    MoisCP = DateMonth(Sal.DateNaissance)
    If bul.mois = MoisCP then

        If Sal.Age >= 59 then
            If Ste.MethodeSuiviCP = 1 then Jours = 6
            If Ste.MethodeSuiviCP = 2 then Jours = 5
            If Ste.MethodeSuiviCP = 3 then Jours = 5
        EndIf

        If Emp.S41.G01.00.004.001 = "134" then
            If Ste.MethodeSuiviCP = 1 then Jours = Jours + 6
            If Ste.MethodeSuiviCP = 2 then Jours = Jours + 5
            If Ste.MethodeSuiviCP = 3 then Jours = Jours + 5
        EndIf

        If Stockvar("CPANCIENNETE") <> 0 then Jours = Stockvar("CPANCIENNETE")
        If Stockvar("CPANCIENNETE") = -1 then Jours = 0

        If Jours <> 0 then
            Exec("Lprime_D02")
            LigneNeutre = True
            MethodeCalcul = 99
            Bases = Jours
            Liblong = "Jours de congés ancienneté acquis"

            Call AjouteCPAcquisAnt(jours)

            Exec("GenereLprime")
            LigneNeutre = False
        EndIf
    EndIf

Endif

End