Exception
Tableau
Selon
NomDuSelecteur :
NomDUnEnumere InflexionDonnee Faire
Fin Selon
ArbreBinaireDe
TypeElementaireCollectionDe
TypeElementaireHachageDe
TypeElementaireIterateurDe
TypeElementaireListeDe
TypeElementaireReferenceDe
TypeElementaireResultatRequeteDe
TypeElementaireResultatRequeteListeDe
TypeElementaireTableau
SuiteTableau[
TailleDuTableau ] De
TypeElementaire(
TypeElementaire )
?
JusquA
TailleTaille :
CasParticulierDUnTypeOuVersion :
Version
NumeroDeVersion .
NumeroDeRevision Faire
Fin Version
Faire
Fin Cas
Cas
NomDuCas Pour
NomDUneValeurEnumereCas
NomDuCas Dans (
ListeDeValeursDeCasDUnType )
Cas
NomDuCas Entre
NomDUneValeurEnumere Et
NomDUneValeurEnumere,
NomDUneValeurEnumereDefaut
Fin Defaut
Contrainte Objet Comme
ValeurDeContrainteContrainte Objet Dans (
ListeDeValeursDeContrainte )
Contrainte Objet Entre
ValeurDeContrainte Et
ValeurDeContrainte,
ValeurDeContrainte[]
Comme
Exception
ListeDExceptionsDefinitionDUneExceptionOuVersion :
Version
NumeroDeVersion .
NumeroDeRevision Faire
Fin Version
(
NumeroDErreur ExceptionSurTransaction ) ;
, TransactionInchangee
, TransactionInvalidee
, TransactionToutesInvalidees
[
Expression ]
Entre
Expression Et
ExpressionDans (
ListeDExpressions )
(
ListeDExpressionsOption )
{
ListeDExpressions }
ArbreBinaireDe (
Expression ,
Expression )
HachageDe (
Expression ,
Expression )
CollectionDe
( ListeDExpressions )
ListeDe
( Expression )
ReferenceDe (
Expression )
ResultatRequeteDe (
Expression )
ResultatRequeteListeDe (
Expression )
TableauDe (
Expression , Expression , Expression )
SiNul (
ListeDExpressions )
Decoder (
ListeDExpressions )
Exception
Tableau
.
SuiteSelectionDefaut .
SuiteSelection[]
Comme
EtSi
OuSinon
EcartType
Max
Min
Moyenne
Somme
Variance
Selon
Expression Faire
Fin Selon
AttraperException
ListeDInstructions TraiterException
Fin AttraperException
CasParticulierDUneInstruction :
Faire
Fin Faire
Cas Pour
ExpressionCas Dans (
ListeDeValeursDeCasDUneInstruction )
Cas Entre
Expression Et
Expression ListeDeValeursDeCasDUneInstruction :
Ou
ExpressionDefaut
Fin Defaut
AttraperException
InflexionAppelFin AttraperException
AttraperException Implemente ;
Variable
/******/
Public :
A : Entier;
B : Reel;
C : Caractere;
E : Booleen;
F : Tableau[1 JusquA 10] De Nul Ou Entier;
G : ListeDe Entier;
H : ReferenceDe Entier;
Exception
/*******/
Public :
SessionImpossible("SessionImpossible", 100);
Protege :
TableInexistante("TableInexistante", 101);
ColonneInexistante("ColonneInexistante", 102);
Principal
/*******/
Debut
E=B Entre A Et A*2 Ou B Dans (Pi, e) ;
F[3]=Entier(-10*B);
E=C Comme "A%";
A=Min(A, 10);
G=G.Suivant();
H=ReferenceDe(A);
A=H.Valeur;
Selon A Faire
Cas 1 Ou 2 Faire
Ecran.Ecrire("A a pour valeur 1 ou 2");
Fin Cas
Cas Entre 3 Et 10 Faire
Ecran.Ecrire("A est entre 3 and 10");
Fin Cas
Defaut
Ecran.Ecrire("A a une autre valeur");
Fin Defaut
Fin Selon
Fin Principal