EtatTravail Dans (TravailEnAttente, TravailEnCours, TravailTermine, TravailEnErreur);
La signification des valeurs est la suivante :
Principal
/*******/
Variable
/******/
	T : Nul Ou Travail;
Debut
...
Selon T.Etat Faire
	Cas TravailEnAttente Faire
	
		Ecran.Ecrire(T.NomTravail+" est en attente.");
	
	Fin Cas
	Cas TravailEnCours Faire
	
		Ecran.Ecrire(T.NomTravail+" est en cours.");
	
	Fin Cas
	Cas TravailTerminé Faire
	
		Ecran.Ecrire(T.NomTravail+" est terminé.");
	
	Fin Cas
	Cas TravailEnErreur Faire
	
		Ecran.Ecrire(T.NomTravail+" est en erreur.");
	
	Fin Cas
Fin Selon
...
Fin Principal
| - | - | - | - | - | - | - | - | - |