Compteur RCO - Comment ne pas afficher commentaire sur bulletin ?

Bonjour ​@Chrystelle

Vous pouvez créer une fonction calcul :

INIT-RCOACQUIS

call MessageRCOHeuresAcquisesActif(false)

Mille mercis Anthony c’est super !! Très bonne journée

Je vous en prie avec plaisir ! :)

Bonjour je rebondis sur cette demande j’ai besoin de la même chose pour les RCC et RCR, je crée la fonction calcul

INIT-RCCACQUIS

call MessageRCCHeuresAcquisesActif(false)
 

Mais j’ai toujours l’affichage sur le bulletin

Merci pour vos réponses

Ozlem

Petit précision, j’ai créer un profil de prime pour pouvoir saisir l’acquis et personnalisé le libellé et paramétrer le paiement en cas de sortie

//
Begin

RCR = BUL.RCCHeuresAcquises 

RCC = Saisie("Heures JF1",0)
If RCC<> 0 then 
//    ce qui permet d'incrémenter le compteur et mettre une ligne sur le bulletin
    Call AjouteRCCHeuresAcquises(RCC)
    Exec("Lprime_D02")
//    LigneNeutre = True
    methodeCalcul = 99
    Bases = RCC

    Liblong = "Heures JF"
    Exec ("GenereLprime")
    LigneNeutre = False
EndIf
//-----------Paiement indemnité compensatrice RCC- Compteur JF---------------

if bul.sorticemois then
soldeRCC = RCR - BUL.RCCHeuresPrises 
RCC = Saisie("SoldeRCC",0)
If RCC <> 0 then soldeRCC = RCC
If RCC = -1 then soldeRCC = 0

If soldeRCC <> 0 then
    Exec("Lprime_I12")
    methodeCalcul = 3
    Tauxs = Bul.TauxHoraire
    Bases = soldeRCC
    Liblong ="Indemnité compensatrice des Heures JF"
    Call AjouteRCRHeuresPrises(soldeRCC)
    Exec ("GenereLprime")
EndIf

    endif
End

Finalement j’ai trouvé j’ai fait cela

//La ligne avec le code suivant call MessageRCRHeuresAcquisesActif(false) permet de ne pas afficher le commentaire de Silae acquis RCC sur le bulletin
//La ligne avec le code LigneNeutre = True permet d'imprimer le libellé Heures récup en neutre grisé

Begin

RCR = BUL.RCRHeuresAcquises 

RCR = Saisie("Heures RECUP",0)
If RCR<> 0 then 
//    ce qui permet d'incrémenter le compteur et mettre une ligne sur le bulletin
    Call AjouteRCRHeuresAcquises(RCR)
call MessageRCRHeuresAcquisesActif(false)

    Exec("Lprime_D02")
    LigneNeutre = True
    methodeCalcul = 99
    Bases = RCR

    Liblong = "Heures recup"
    Exec ("GenereLprime")
//    LigneNeutre = False

EndIf
//-----------Paiement indemnité compensatrice RCR---------------

if bul.sorticemois then
soldeRCR = RCR - BUL.RCRHeuresPrises 
RCR = Saisie("SoldeRCR",0)
If RCR <> 0 then soldeRCR = RCR
If RCR = -1 then soldeRCR = 0

If soldeRCR <> 0 then
    Exec("Lprime_I12")
    methodeCalcul = 3
    Tauxs = Bul.TauxHoraire
    Bases = soldeRCR
    Liblong ="Indemnité compensatrice des Heures de récupération"
    Call AjouteRCRHeuresPrises(soldeRCR)
    Exec ("GenereLprime")
EndIf

    endif
End
Begin

RCR = BUL.RCRHeuresAcquises 

RCR = Saisie("Heures RECUP",0)
If RCR<> 0 then 
//    ce qui permet d'incrémenter le compteur et mettre une ligne sur le bulletin
    Call AjouteRCRHeuresAcquises(RCR)
call MessageRCRHeuresAcquisesActif(false)

    Exec("Lprime_D02")
    LigneNeutre = True
    methodeCalcul = 99
    Bases = RCR

    Liblong = "Heures recup"
    Exec ("GenereLprime")
//    LigneNeutre = False

EndIf
//-----------Paiement indemnité compensatrice RCR---------------

if bul.sorticemois then
soldeRCR = RCR - BUL.RCRHeuresPrises 
RCR = Saisie("SoldeRCR",0)
If RCR <> 0 then soldeRCR = RCR
If RCR = -1 then soldeRCR = 0

If soldeRCR <> 0 then
    Exec("Lprime_I12")
    methodeCalcul = 3
    Tauxs = Bul.TauxHoraire
    Bases = soldeRCR
    Liblong ="Indemnité compensatrice des Heures de récupération"
    Call AjouteRCRHeuresPrises(soldeRCR)
    Exec ("GenereLprime")
EndIf

    endif
End

Bonjour,

Vous êtes allé plus vite que moi pour la réponse ! je vous aurais également proposé de mettre en commentaire les lignes :)