IdentifiantGroupe : Caractere Virtuel Lecture Public;
Principal /*******/ Variable /******/ G : Nul Ou GroupeMessagesEdifact; Debut ... Ecran.Ecrire(G.IdentifiantGroupe); ... Fin Principal