Fonction LireValeurEntier(NumeroParametre : Entier) Retourner Entier;
Si cette méthode est invoquée avec la valeur 0 pour le paramètre NumeroParametre, alors le résultat de l'appel est demandé. En ce cas, l'appel doit être une fonction ou une méthode fonctionnelle dont le résultat est un énuméré, sinon l'exception OperationParametreImpossible est envoyée.
Si cette méthode est invoquée avec une valeur strictement positive pour le paramètre NumeroParametre, alors la valeur du paramètre de l'appel de ce numéro est demandée. En ce cas, ce paramètre doit exister et doit être un énuméré, sinon l'exception OperationParametreImpossible est envoyée.
Si cette méthode est invoquée avec une valeur strictement négative pour le paramètre NumeroParametre alors l'exception OperationParametreImpossible est envoyée.
Les paramètres d'entrée peuvent être lus avant ou après l'exécution du travail. En ce cas, le résultat est la valeur d'entrée.
Les paramètres d'entrée-sortie peuvent être lus avant l'exécution du travail. En ce cas, le résultat est la valeur d'entrée. Les paramètres d'entrée-sortie peuvent être lus après l'exécution du travail. En ce cas, le résultat est la valeur de sortie.
Les paramètres de sortie peuvent être lus après l'exécution du travail. En ce cas, le résultat est la valeur de sortie.
Variable
/******/
MonTravail : Nul Ou Travail;
E : Entier;
FileDAttente
/**********/
MaFile(1);
/****************************************************************/
Procedure P(A : Entier Entree Sortie)
/* Objet : Procedure quelconque. */
/****************************************************************/
Debut
Ecran.Ecrire("P="+Caractere(A));
A=2;
Fin Procedure
Principal
/*******/
Debut
...
E=1;
MonTravail=P(E)||MaFile;
...
E=MonTravail.LireValeurEntier(1);
/* Nous retrouvons la valeur du paramètre de sortie. */
...
Fin Principal
| - | - | - | - | - | - | - | - | - |