DateProduction : Date Virtuel;
Principal /*******/ Variable /******/ E : EnteteEdifact; Debut ... Ecran.Ecrire(E.DateProduction); ... Fin Principal