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.
Le code suivant permet de retourner une matrice d'amortissement. Le type d'amortissement est sélectionné par l'utilisateur grâce à des sélecteurs (SelectTypeAmort). Le montant, le taux et la durée de l'emprunt sont saisis par l'utilisateur dans des champs de saisie (Montant, Taux, Durée). La matrice d'amortissement s'affiche dans une table mémoire (TableMatrice).
|
||
-- Code de clic sur BtnAmortissement
// Déclaration des variables ResAmortissement est un booléen ResTypeAmort est un entier // Récupère le type d'amortissement ResAjout est un booléen Indice est un entier // Récupération du type d'amortissement SELON SelectTypeAmort CAS 1 : ResTypeAmort = finInFine CAS 2 : ResTypeAmort = finAmortissementConstant CAS 3 : ResTypeAmort = finAnnuitéConstante FIN // Calcul de l'amortissement ResAmortissement = FinAmortissement ("MatriceAmort", ResTypeAmort, Montant, Taux, Durée) // Erreur de calcul ? SI ResAmortissement = Faux ALORS // Affichage du message d'erreur Erreur(ErreurInfo( errMESSAGE )) SINON // Affichage de la matrice dans une table mémoire POUR Indice = 1 à MatNbLigne("MatriceAmort") ALORS ResAjout = TableAjoute(TableMatrice, MatLitLigne("MatriceAmort", Indice)) FIN FIN
|