$classeur = new SClasseur('', 'presex', true, true);
            GContexte::AjouterOnglet('presex', GSession::Libelle(LIB_PRS_ONGLET), '', '', '', true, false);
            GContexte::AjouterOnglet('presex', GSession::Libelle(LIB_PRS_ONGLET), '', '', '', true, false);
            GContexte::AjouterOnglet('presex', GSession::Libelle(LIB_PRS_ONGLET), '', '', '', true, false);
            $cadre = new SCadre('', GSession::Libelle(LIB_PRS_TABONGLETS), $classeur, true, false);
            $vue->AttacherCellule(4, 1, $cadre);
            $cListeCssParties->AjouterElement(GSession::Libelle(LIB_PRS_PRESGEN, false, true), $vue);
            /*********************************************/
            $form = new SForm($prefixIdClass, 2, 1, true, false);
            $form->SetCadreInputs(1, 1, 1, 1);
            $form->AjouterInput(1, 1, '', $cListeCssParties, false);
            $form->SetCadreBoutons(2, 1, 1, 1);
            $form->AjouterInputButtonModifierDansContexte(1, 1, $nomContexte, false, GSession::Libelle(LIB_PRS_SAUVEGARDER));
            GContexte::AjouterContenu(CADRE_CONTENU_CONTENU, $form);
            $mListePresentationsModules = new mListePresentationsModules();
            $mListePresentationsModules->AjouterColSelection(COL_RESSOURCEJS);
            $mListePresentationsModules->AjouterFiltreEgal(COL_PRESENTATION, $presentationModif);
            $numJointure = $mListePresentationsModules->AjouterJointure(COL_TYPEPRESENTATIONMODULE, COL_ID, 0, SQL_RIGHT_JOIN);
            $mListePresentationsModules->AjouterColSelectionPourJointure($numJointure, COL_ID);
            $mListePresentationsModules->AjouterFiltreEgalPourJointure($numJointure, COL_ACTIF, true);
            $mListePresentationsModules->Charger();
            foreach ($mListePresentationsModules->GetListe() as $mPresentationModule) {
                if ($mPresentationModule->RessourceJS() != NULL) {
                    GReponse::AjouterElementJS($mPresentationModule->TypePresentationModule()->Id(), PATH_SERVER_HTTP . $mPresentationModule->RessourceJS(), true);
                } else {
                    GReponse::AjouterElementJS($mPresentationModule->TypePresentationModule()->Id(), '', true);
                }
            }
        }
    }
}
require_once PATH_METIER . 'mTypePresentationModule.php';
$groupe = GSession::Groupe(COL_ID);
if ($groupe !== NULL && GDroit::ADroitPopErreur(FONC_PRS_CREERMODIFIER) === true) {
    $presentationModif = GSession::PresentationModif();
    if ($presentationModif != NULL) {
        // Récupération du nom de fichier que l'on va utiliser pour la sauvegarde.
        $mPresentationModule = new MPresentationModule();
        $mPresentationModule->TypePresentationModule($module);
        $mTypePresentationModule = $mPresentationModule->TypePresentationModule();
        $mTypePresentationModule->AjouterColSelection(COL_NOMFICHIER);
        $mTypePresentationModule->Charger();
        $nomFichier = $mTypePresentationModule->NomFichier();
        $cheminCss = GCss::GetCheminFichier($presentationModif);
        $cheminJs = GJs::GetCheminFichier($presentationModif);
        if ($cheminCss !== '' && $cheminJs !== '' && $nomFichier !== '') {
            $varPost = GContexte::LirePost(NULL);
            // Sauvegarde du Css.
            GCss::SauvegarderFichierCss($nomFichier, $presentationModif, $varPost);
            // Sauvegarde du JS.
            GJs::SauvegarderFichierJs($nomFichier, $presentationModif, $varPost);
            // Sauvegarde en base.
            $mPresentationModule->Presentation($presentationModif);
            $mPresentationModule->RessourceCSS($cheminCss . $nomFichier . '.css');
            $mPresentationModule->RessourceJS($cheminJs . $nomFichier . '.js');
            $mPresentationModule->ModifierSiExistantAjouterSinon();
        }
    } else {
        GLog::LeverException(EXF_0060, GSession::Libelle(LIB_PRS_PRESMODIFVIDE), true, false);
        GLog::LeverException(EXF_0061, GSession::Libelle(LIB_PRS_PRESNONSAUV), true, false);
    }
}