UpsPls.Travail.File


File : Nul Ou FileDAttente Lecture Public;

Description

La propriété FileDAttente en lecture seule a pour valeur la file dans laquelle est le travail est en attente.

Exemple


FileDAttente

/**********/


	MaFile(1);



/****************************************************************/

Procedure P(A : Entier Entree Sortie)

/* Objet : procedure quelconque. */

/****************************************************************/

Debut

Ecran.Ecrire("P="+Caractere(A));

Fin Procedure



Principal

/*******/

Variable

/******/


	E : Entier;

	MonTravail : Nul Ou Travail;



Debut

...

MonTravail=P(E)||MaFile;

...

Ecran.Ecrire(MonTravail.File.NomFile);

/* Ecrit le nom de la file soit 'MaFile'. */

...

Fin Principal

Traduction


-	-	-	-	-	-	-	-	-