Définition...
Opérateurs...
Exemple...
Voir aussi...
Traduction...
/***************************************************************/
Type Exception Defaut Final
/* Objet : Type des objets correspondant aux exceptions. */
/***************************************************************/
Prive :
MessageErreur : Nul Ou Caractere Lecture Public;
CodeErreur : Entier Lecture Public;
ModuleOrigine : Nul Ou Module Lecture Public;
NomSourceEnErreur : Nul Ou Caractere Lecture Public;
NumeroLigne : Entier Lecture Public;
NumeroColonne : Entier Lecture Public;
NomException : Caractere Lecture Public;
EffetSurTransaction : ExceptionSurTransaction Lecture Public;
Public :
Procedure Envoyer(P1 : Nul Ou Caractere=Nul, P2 : Nul Ou Caractere=Nul, P3 : Nul Ou Caractere=Nul, P4 : Nul Ou Caractere=Nul, P5 : Nul Ou Caractere=Nul);
Procedure Renvoyer();
Fin Type
Le type Exception ne possède pas de constructeur implicite.
Les objets de type Exception sont créés automatiquement lors du chargement des modules comportant des définitions d'exception.
Constante
NbPatientsMax=100;
Variable
NbPatients : Entier;
Exception
TropDePatients("TropDePatients", 100);
/* 'TropDePatients' est envoyée s'il y a trop de patient. */
/* Le message associe comporte un paramètre qui est le nombre maximal de patients autorises. */
Principal
Debut
...
Si NbPatients>NbPatientsMax Alors
TropDePatients.Envoyer(Caractere(NbPatientsMax));
Fin Si
...
Fin Principal
Ausnahme | Exception | 例外 | Excepcion | - | - | - | - |