AppliquerDefaut
Instruction
|
Rôle : |
Rappel de la version par défaut d'une méthode de l'objet en cours. |
|
Syntaxe : |
AppliquerDefaut [<méthode>] [ (<paramètre1> [, <paramètre2>,.. ] ) ] |
|
Notes : |
|
Cette instruction sert au rappel de la version par défaut d'une méthode, c'est-à-dire la version de la méthode qui aurait été exécutée si on ne l'avait pas redéfinie. Cela est particulièrement utile pour ne pas avoir à réécrire complètement une méthode lorsqu'on veut simplement ajouter des instructions.
L'indication de la méthode est facultative. Par défaut
Exemple:
Methode "SAUT_PAGE"
nbsautpage = nbsautpage
+ 1
AppliquerDefaut
FinMethode
Les paramètres sont facultatifs. On ne les indique que si la méthode rappelée a prévu des paramètres. Ceux-ci sont alors détaillés dans la description de l'objet. Ils sont passés par référence.
La méthode en cours n'est pas arrêtée définitivement : elle est simplement suspendue. Lorsque la méthode par défaut appelée sera terminée, la méthode appelante reprendra son cours.
En principe, pour être sûr de respecter le contexte d'appel, AppliquerDefaut MethX doit être appelé dans la méthode MethX.
Exemple :
Domaine : ESSAI
Objet EDITION : EDC1 "Edition avec totalisation"
Declaration
TABLE :
"CLIENT"
TRI 1 : VILLE
CLASSEMENT : NOM
VARIABLES :
Double
total("total TVM","###,###.00")
FinDeclaration
Methode TABULATION
Editer NO,NOM,RUE,CP,TVM1
Designations
"Code","Nom du
client","Adresse","CP","Ventes"
Separateurs
"G",0
FinMethode
Methode "POUR_TOUT"
AppliquerDefaut "POUR_TOUT"
total=total+TVM
FinMethode
Methode "FIN_DOCUMENT"
Lignes
Imprimer "Total
des ventes = ","G"
Imprimer total
FinMethode
FinObjet
Après l'appel aux méthodes POUR_TOUT et FIN_DOCUMENT:
