Skip to main content

Bonjour, 

Sur un dossier nous avons 3 montants de paniers différents contractuels 10€, 19€ et 26.02€. Nous souhaiterions créer 3 profils de primes différents. Notre problématique est qu'il faut que 10.10€ soit exonéré de cotisations sociales (barème URSSAF). 
Or, nous ne pouvons utiliser qu'un seul montant particulier “repasext” permettant de paramétrer l'exonération partielle. Nous sommes donc obligés de modifier le montant particulier pour chaque bulletin. 


Comment pouvons nous paramétrer ces 3 paniers distincts ? 

bonjour,

Ceci devrait répondre à votre besoin :

1/ Créer 3 montant particuliers :

code PANIER1 avec valeur 10

code PANIER2 avec valeur 19

code PANIER3 avec valeur 26.02

2/Créer un profil de prime

code PANIERS (par exemple)

Copier coller le script ci-dessous :

Begin
PA1 = Saisie("Panier_1",0)
PA2 = Saisie("Panier_2",0)
PA3 = Saisie("Panier_3",0)

//Traitement Panier montant 1
If PA1 <> 0 then
Memo1 = "Variable utilisée pour frais : "
Memo2 = "Valeur associée : "
Memo3 = "Valeur Maximum exonérée : "
Lib = "Indemnité de panier "
Valpanier1 = Mtpart.PANIER1
ValMax = MtpartLegal.REPASEXT
Memo1 = Memo1 + "PANIER1"
Memo2 = Memo2 + Valpanier1
Memo3 = Memo3 + ValMax

If Valpanier1 > ValMax Then
Exec( "Lprime_F13" )
methodeCalcul = 3
Liblong = Lib + Mtpart.PANIER1 + "€"
Bases = PA1
Tauxs = Valpanier1 - ValMax
Call rem ( Memo1 )
Call Rem ( Memo2 )
Call Rem ( Memo3 )
Exec ("GenereLprime")
Valpanier1 = ValMax
Endif
Exec( "Lprime_F12" )
methodeCalcul = 3
Liblong = Lib + Mtpart.PANIER1 + "€"
Bases = PA1
Tauxs = Valpanier1
Call rem ( Memo1 )
Call Rem ( Memo2 )
Call Rem ( Memo3 )
Exec ("GenereLprime")
EndIf

//Traitement Panier montant 2
If PA2 <> 0 then
Memo1 = "Variable utilisée pour frais : "
Memo2 = "Valeur associée : "
Memo3 = "Valeur Maximum exonérée : "
Lib = "Indemnité de panier "
Valpanier2 = Mtpart.PANIER2
ValMax = MtpartLegal.REPASEXT
Memo1 = Memo1 + "PANIER2"
Memo2 = Memo2 + Valpanier2
Memo3 = Memo3 + ValMax

If Valpanier2 > ValMax Then
Exec( "Lprime_F13" )
methodeCalcul = 3
Liblong = Lib + Mtpart.PANIER2 + "€"
Bases = PA2
Tauxs = Valpanier2 - ValMax
Call rem ( Memo1 )
Call Rem ( Memo2 )
Call Rem ( Memo3 )
Exec ("GenereLprime")
Valpanier2 = ValMax
Endif
Exec( "Lprime_F12" )
methodeCalcul = 3
Liblong = Lib + Mtpart.PANIER2 + "€"
Bases = PA2
Tauxs = Valpanier2
Call rem ( Memo1 )
Call Rem ( Memo2 )
Call Rem ( Memo3 )
Exec ("GenereLprime")
EndIf

//Traitement Panier montant 3
If PA3 <> 0 then
Memo1 = "Variable utilisée pour frais : "
Memo2 = "Valeur associée : "
Memo3 = "Valeur Maximum exonérée : "
Lib = "Indemnité de panier "
Valpanier3 = Mtpart.PANIER3
ValMax = MtpartLegal.REPASEXT
Memo1 = Memo1 + "PANIER3"
Memo2 = Memo2 + Valpanier3
Memo3 = Memo3 + ValMax

If Valpanier3 > ValMax Then
Exec( "Lprime_F13" )
methodeCalcul = 3
Liblong = Lib + Mtpart.PANIER3 + "€"
Bases = PA3
Tauxs = Valpanier3 - ValMax
Call rem ( Memo1 )
Call Rem ( Memo2 )
Call Rem ( Memo3 )
Exec ("GenereLprime")
Valpanier3 = ValMax
Endif
Exec( "Lprime_F12" )
methodeCalcul = 3
Liblong = Lib + Mtpart.PANIER3 + "€"
Bases = PA2
Tauxs = Valpanier3
Call rem ( Memo1 )
Call Rem ( Memo2 )
Call Rem ( Memo3 )
Exec ("GenereLprime")
EndIf

End

Ensuite vous ajouter ce profil a votre PCCN01 pour que tout le monde en bénéficie ou individuellement aux salariés concernés

Il s’agira d’indiquer le nombre dans chaque colonne de la saisie des variables (Panier_1 , Panier_1 , Panier_3)

Bonne fin de journée.


Commenter