// Conditions
//"[A-Za-z0-9]*+[@][-.a-z0-9]+[.][a-z]{2,4}")[A-Z][a-z]*"


// L'un des 2 champs doit être obligatoirement renseigner par utilisateur
SI CodeLot<>"" OR CodeCite1<>"" ALORS

// Vérification des si le type des champs obligatoire est bien renseigner
SI ((VérifieExpressionRégulière(CodeLot,"[0-9]{4}") = Vrai ET CodeLot<>"") OR (VérifieExpressionRégulière(CodeCite1,"[0-9]{4}") = Vrai ET CodeCite1<>""))ALORS

// Vérification pour savoir si les champs facultatifs sont remplis ou non
SI (NomLocataireParti<>"" ET VérifieExpressionRégulière(NomLocataireParti,"[A-Z][a-z]*")=Vrai) OR (AdresseLot<>"" ET VérifieExpressionRégulière(AdresseLot,"[A-Za-z 0-9]*") = Vrai) OR (etage<>"" ET VérifieExpressionRégulière(etage,"[0-9]{1,2}")=Vrai) OR (NumeroPorte<>"" ET VérifieExpressionRégulière(NumeroPorte,"[A-Za-z 0-9]*")=Vrai) ALORS

Info("Passer a La Page Suivante qui est : Formulaire Coordonnées Employé(e)s");
FichierVersEcran(FEN_Tableau.TABLE_FEN_Tableau);
Ferme(FEN_Formulaire_Logement);

SINON
Erreur ("Les champs sont mal écris");
FIN
// Fin Vérification des CHamps Facultatif

SINON

FIN
// Fin De la vérification des champs obligatoires

SINON
Erreur("Les Champs obligatoire ne sont pas bien rempli !")
RepriseSaisie(CodeLot);
RepriseSaisie(CodeCite1);
FIN
// Fin De la verification des champs obligatoires

// Fin De la Condition Principale

// Reinitialisation des Champs
CodeLot = "";
CodeCite1 = "";
NumeroPorte = "";
AdresseLot = "";
etage = "";
NomLocataireParti = "";