TypeEnregistrement : Nul Ou Type Virtuel Lecture Public;
Si TypeEnregistrement est non Nul, alors il correspond à un objet à exporter ou à importer. Sinon, il s'agit d'un enregistrement ignoré.
Type Employe Defaut
/*****************/
...
Fin Type
Principal
/*******/
Variable
/******/
E : Nul Ou Enregistrement;
Debut
...
Si E.EnregistrementType==Employe Alors
/* L'enregistrement correspond a un employe. */
...
Fin Si
...
Fin Principal
- | - | - | - | - | - | - | - | - |