Entete:EnteteEdifact Lecture Public;
Principal /*******/ Variable /******/ E : Nul Ou EchangeEdifact; Debut ... Ecran.Ecrire(E.Entete.NiveauSyntaxique); ... Fin Principal