Skip to main content
Réponse

CP ANCIENNETE CHIMIE (C035)


Forum|alt.badge.img+3

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+1
  • 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


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