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.
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.
Bonjour,
Je reprends ce post car nous avons également cette problématique avec repas midi à 10€ (exo) et repas soir à 15€ (exo à hauteur de 10.10€ mais le reste non)
Avez vous réussi à les paramétrés?
Merci
Bonjour,
J’ai essayé d’effectuer cette action mais cela ne fonctionne pas.
Merci de votre aide
bonjour @Luce BOUET ,
Pouvez vous copier le script que vous avez créé?