NomBlocSql : Caractere Lecture Public Trace;
Variable /******/ I : Nul Ou IBlocSql; Principal /*******/ Debut ... Ecran.Ecrire(I.NomBlocSql); ... Fin Principal