Bonjour
Nous avons créé une fonction calcul pour le calcul de la provision de la prime de 13ème mois.
Nous voulons exclure les VRP et les CDD de la provision.
Nous avons utilisé pour l’exclusion des VRP la condition suivante :
If SAL.S41.G01.00.014 = "06" then BrutProvision = 0
Cela fonctionne.
Pour l’exclusion des CDD nous essayons la fonction suivante :
If SAL.S41.G01.00.012.001 = "02" then BrutProvision = 0
Et là cela ne fonctionne pas.
Le message d’erreur de compilation est le suivant :
Erreur 23
(P0) Erreur de compilation LIGNE
Ligne 40 : ECHEC_SUITEATTENDUE
Est-ce que quelqu’un peut nous aider ?
Pour info la fonction complète que nous testons :
Begin
Mois = DateMonth (Bul.periode)
Annee = Dateyear (Bul.periode)
TypeDeBrutCalcul = 0 // 0 = salaire de base
BrutProvision = 0
PourcentageChargeProvision = 0
Compte6Provision = "641393000"
Compte4Provision = "428600000"
Compte6Charges = "645039300"
Compte4Charges = "438600000"
LibelleProvision = "Prime Fin d'année"
LibelleExtourne = "Extourne provision fin d'année"
DateDebut = date(1, Mois, Annee)
DateFin = date(25, Mois, Annee)
SalaireDeBase = CumulBrutPeriode(DateDebut, DateFin, 0)
If Mois = 1 then BrutProvision = 0
If Mois = 2 then BrutProvision = SalaireDeBase / 12
If Mois = 3 then BrutProvision = 2 * SalaireDeBase / 12
If Mois = 4 then BrutProvision = 3 * SalaireDeBase / 12
If Mois = 5 then BrutProvision = 4 * SalaireDeBase / 12
If Mois = 6 then BrutProvision = 5 * SalaireDeBase / 12
If Mois = 7 then BrutProvision = 0
If Mois = 8 then BrutProvision = SalaireDeBase / 12
If Mois = 9 then BrutProvision = 2 * SalaireDeBase / 12
If Mois = 10 then BrutProvision = 3 * SalaireDeBase / 12
If Mois = 11 then BrutProvision = -2 * SalaireDeBase / 12
If Mois = 12 then BrutProvision = -1 * SalaireDeBase / 12
// Exclusion du calcul de la condition VRP
If SAL.S41.G01.00.014 = "06" then BrutProvision = 0
// Exclusion du calcul de la condition CDD
If SAL.S41.G01.00.012.001 = "02" then BrutProvision = 0
AvecExtourne = true
PourcentageChargeProvision = 40
End