Exemple d'utilisation de la commande finAmortissementLineaire

Exemples évolués

Chaque exemple montre une utilisation pratique de la fonction du WLangage.

Quand plusieurs syntaxes sont possibles, chacune est illustrée indépendamment.

Revenir à la page des exemples évolués

Le code suivant permet de connaître la valeur d'un amortissement. Le coût d'acquisition, la valeur résiduelle du bien et la durée d'amortissement sont saisis par l'utilisateur dans des champs de saisie (Coût, ValRésiduelle, Durée).

--Code de clic sur BtnValAmortissement
// Déclaration de la variable
ResValAmortissement est un réel
// Calcul de la valeur d'amortissement
ResValAmortissement = FinAmortissementLinéaire (Coût, ValRésiduelle, Durée)
SI ResValAmortissement <> 0 ALORS
   // Affichage du résultat
   Info("La valeur d'amortissement est : "+ResValAmortissement)
SINON
   SI ResValAmortissement = 0 ALORS
      SI FinErreur = 0 ALORS
         Info("La valeur d'amortissement est nulle")
      SINON
         // Affichage du message d'erreur
         Erreur(ErreurInfo( errMESSAGE ))
      FIN
   FIN
FIN