pictogram Auteur: Patrick Biker
Date: 18 mars 2006
Maj : 21 Mars 2015

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 et la valeur résiduelle du bien, la durée d'amortissement, la période pour laquelle l'amortissement doit être calculé et le nombre de mois de la première année d'amortissement sont saisis par l'utilisateur dans des champs de saisie (Coût, ValRésiduelle, Durée, Période, NbMois).



--Code de clic sur BtnValAmortissement
// Déclaration de la variable

ResValAmortissement est un réel
// Calcul de la valeur d'amortissement
ResValAmortissement = FinAmortissementDégressif(Coût, ValRésiduelle, Durée, Période, NbMois)
SI ResValAmortissement <> 0 ALORS
   // Affichage du résultat
   Info("La valeur d'amortissement est : "+ResValAmortissement)
SINON
   SI ResValAmortissement = 0 ALORS
      // Erreur ?
      SI FinErreur = 0 ALORS
         Info("La valeur d'amortissement est nulle")
      SINON
         // Affichage du message d'erreur
         Erreur(ErreurInfo( errMESSAGE ))
      FIN
   FIN
FIN