if ($CleOK == '069b9247591948b71d303ac66371bf0b') {
    require_once $PATH_CLASS . 'CEntreprise.php';
    require_once $PATH_COMMUNS . 'FctDiverses.php';
    if (!GetDroits($Status, 'ModifEntreprise')) {
        $IdentPK = $_SESSION['FK_EntrepriseUser'];
    }
    if (!isset($StepConsult)) {
        $StepConsult = isset($IdentPK) && $IdentPK != 0 ? 'InitModif' : 'InitNew';
    }
    $ValidPK_Entreprise = $ValidCivilite = $ValidNomE = $ValidNomR = $ValidPrenomR = $ValidAdr1 = $ValidAdr2 = $ValidCP = $ValidVille = $ValidTelR = $ValidMailR = $ValidFaxR = $ValidPresentEntreprise = $ValidSiteEntreprise = ESPACE;
    switch ($StepConsult) {
        case 'InitModif':
        case 'InitNew':
            // Préparation du nouvel enreg. ou récupération de l'enreg. à modifier
            $ObjTuple = new CEntreprise($StepConsult == 'InitModif' ? $IdentPK : 0);
            $ValPK_Entreprise = $ObjTuple->GetPK_Entreprise();
            $ValNomE = $ObjTuple->GetNomE();
            $ValCivilite = $ObjTuple->GetCivilite();
            $ValNomR = $ObjTuple->GetNomR();
            $ValPrenomR = $ObjTuple->GetPrenomR();
            $ValAdr1 = $ObjTuple->GetAdr1();
            $ValAdr2 = $ObjTuple->GetAdr2();
            $ValCP = $ObjTuple->GetCP();
            $ValVille = $ObjTuple->GetVille();
            $ValTelR = $ObjTuple->GetTelR();
            $ValMailR = $ObjTuple->GetMailR();
            $ValFaxR = $ObjTuple->GetFaxR();
            $ValPresentEntreprise = $ObjTuple->GetPresentEntreprise();
            if (trim($ObjTuple->GetSiteEntreprise()) == 'http://') {
                $ObjTuple->SetSiteEntreprise('');
            }