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
- | - | - | - | - | - | - | - | - |