}
if (!isset($StepNewInscript)) {
    $StepNewInscript = 'Init';
}
$ValidCiviliteTuteur = $ValidNomTuteur = $ValidPrenomTuteur = $ValidTelTuteur = $ValidMailTuteur = $ValidFaxTuteur = $ValidIs_IdemTuteur = $ValidCiviliteRespAdmin = $ValidNomRespAdmin = $ValidPrenomRespAdmin = $ValidTelRespAdmin = $ValidMailRespAdmin = $ValidFaxRespAdmin = $ValidNomE = $ValidAdr1 = $ValidAdr2 = $ValidCP = $ValidVille = $ValidFK_Entreprise = ESPACE;
switch ($StepNewInscript) {
    case 'Init':
        // Préparation du nouvel enreg.
        $ObjTuple = new CNewInscript();
        $ValPK_NewInscript = $ObjTuple->GetPK_NewInscript();
        $ValidPK_NewInscript = ESPACE;
        $ValCiviliteTuteur = $ObjTuple->GetCiviliteTuteur();
        $ValNomTuteur = ProtectApos($ObjTuple->GetNomTuteur());
        $ValPrenomTuteur = ProtectApos($ObjTuple->GetPrenomTuteur());
        $ValTelTuteur = $ObjTuple->GetTelTuteur();
        $ValMailTuteur = $ObjTuple->GetMailTuteur();
        $ValFaxTuteur = $ObjTuple->GetFaxTuteur();
        $ValIs_IdemTuteur = $ObjTuple->GetIs_IdemTuteur();
        $ValCiviliteRespAdmin = $ObjTuple->GetCiviliteRespAdmin();
        $ValNomRespAdmin = ProtectApos($ObjTuple->GetNomRespAdmin());
        $ValPrenomRespAdmin = ProtectApos($ObjTuple->GetPrenomRespAdmin());
        $ValTelRespAdmin = $ObjTuple->GetTelRespAdmin();
        $ValMailRespAdmin = $ObjTuple->GetMailRespAdmin();
        $ValFaxRespAdmin = $ObjTuple->GetFaxRespAdmin();
        $ValFK_Entreprise = $ObjTuple->GetFK_Entreprise();
        $Title = 'Nouvelle inscription';
        break;
    case 'Valid':
        $CodErrVide = array();
        $CodErrInval = array();
        $ValIs_IdemTuteur = isset($Is_IdemTuteur) ? $Is_IdemTuteur : 0;
 if (!isset($StepNewInscript)) {
     $StepNewInscript = isset($IdentPK) && $IdentPK != 0 ? 'InitModif' : 'InitNew';
 }
 $ReqEntreprises = $ConnectStages->query("SELECT * FROM {$NomTabEntreprises}\n\t                              ORDER BY NomE");
 $ValidPK_NewInscript = $ValidCiviliteTuteur = $ValidNomTuteur = $ValidPrenomTuteur = $ValidTelTuteur = $ValidMailTuteur = $ValidFaxTuteur = $ValidLoginTuteur = $ValidIs_IdemTuteur = $ValidCiviliteRespAdmin = $ValidNomRespAdmin = $ValidPrenomRespAdmin = $ValidTelRespAdmin = $ValidMailRespAdmin = $ValidFaxRespAdmin = $ValidNomE = $ValidAdr1 = $ValidAdr2 = $ValidCP = $ValidVille = ESPACE;
 switch ($StepNewInscript) {
     case 'InitModif':
     case 'InitNew':
         // Préparation du nouvel enreg. ou récupération de l'enreg. à modifier
         $ObjInscript = new CNewInscript($StepNewInscript == 'InitModif' ? $IdentPK : 0);
         $ValPK_NewInscript = $ObjInscript->GetPK_NewInscript();
         $ValCiviliteTuteur = $ObjInscript->GetCiviliteTuteur();
         $ValNomTuteur = ProtectApos($ObjInscript->GetNomTuteur());
         $ValPrenomTuteur = ProtectApos($ObjInscript->GetPrenomTuteur());
         $ValTelTuteur = $ObjInscript->GetTelTuteur();
         $ValMailTuteur = $ObjInscript->GetMailTuteur();
         $ValFaxTuteur = $ObjInscript->GetFaxTuteur();
         $ValIs_IdemTuteur = $ObjInscript->GetIs_IdemTuteur();
         $ValCiviliteRespAdmin = ProtectApos($ObjInscript->GetCiviliteRespAdmin());
         $ValNomRespAdmin = ProtectApos($ObjInscript->GetNomRespAdmin());
         $ValPrenomRespAdmin = ProtectApos($ObjInscript->GetPrenomRespAdmin());
         $ValTelRespAdmin = $ObjInscript->GetTelRespAdmin();
         $ValMailRespAdmin = $ObjInscript->GetMailRespAdmin();
         $ValFaxRespAdmin = $ObjInscript->GetFaxRespAdmin();
         $ValNomE = ProtectApos($ObjInscript->GetNomE());
         $ValAdr1 = ProtectApos($ObjInscript->GetAdr1());
         $ValAdr2 = ProtectApos($ObjInscript->GetAdr2());
         $ValCP = $ObjInscript->GetCP();
         $ValVille = ProtectApos($ObjInscript->GetVille());
         $ValFK_Entreprise = $ObjInscript->GetFK_Entreprise();
         $ValLoginTuteur = '';