function genAffichage()
{
global $session;
global $options;
// Chargement du template modelixe.
$mod = new ModeliXe("AffichageLogs.mxt");
$mod->SetModeliXe();
// Fabrication des "select".
$mod->MxSelect('listeUtilisateurs', 'utilisateur', isset($_GET['utilisateur']) ? stripslashes($_GET['utilisateur']) : '', $this->getDistinct('iduser'));
$mod->MxSelect('listeTypes', 'type', isset($_GET['type']) ? stripslashes($_GET['type']) : '', $this->getDistinct('type'));
$mod->MxSelect('listeIP', 'ip', isset($_GET['ip']) ? stripslashes($_GET['ip']) : '', $this->getDistinct('ip'));
$min = $this->getDates('min');
$max = $this->getDates('max');
$mod->MxSelect('dateMin', 'dateMin', $this->dateMin, $min);
$mod->MxSelect('dateMax', 'dateMax', $this->dateMax, $max);
// Fabrication des champs "text".
$mod->MxFormField('filtreDescription', 'text', 'filtreDescription', isset($_GET['filtreDescription']) ? stripslashes($_GET['filtreDescription']) : '');
$mod->MxFormField('filtreUtilisateur', 'text', 'filtreUtilisateur', isset($_GET['filtreUtilisateur']) ? stripslashes($_GET['filtreUtilisateur']) : '');
$mod->MxFormField('filtreCible', 'text', 'filtreCible', isset($_GET['filtreCible']) ? stripslashes($_GET['filtreCible']) : '');
$mod->MxFormField('filtreIP', 'text', 'filtreIP', isset($_GET['filtreIP']) ? stripslashes($_GET['filtreIP']) : '');
$tab = array("Tous" => "Tous", 1 => 1, 10 => 10, 20 => 20, 25 => 25, 50 => 50, 100 => 100, 200 => 200, 500 => 500, 1000 => 1000, 2000 => 2000, 4000 => 4000, 8000 => 8000);
$mod->MxSelect('nbResultats', 'nbResultats', isset($_GET['nbResultats']) ? $_GET['nbResultats'] : $options->getOption('nbResultats'), $tab);
if (isset($_GET['nbResultats'])) {
$this->pagination = $_GET['nbResultats'];
} else {
$this->pagination = $options->getOption('nbResultats') ? $options->getOption('nbResultats') : 50;
}
// Affichage de la liste des logs.
$mod->MxText("resultats", $this->genResultats());
// Variable de navigation.
$mod->MxHidden("hidden", "navi=" . $session->genNaviFull());
// On retourne l'affichage ainsi généré.
return $mod->MxWrite("1");
}
function getFormulaire()
{
global $session;
global $options;
$type = $options->getOption("TypeAuth");
// Chargement du template ModeliXe.
$mod = new ModeliXe("Authentification.mxt");
$mod->SetModeliXe();
switch ($type) {
case 'CodeAcces':
if ($session->getUser() != "Invité") {
$mod->MxText("connecte.uid", $session->getUser());
$mod->MxHidden("connecte.hidden", "navi=" . $session->genNaviFull());
$mod->MxBloc("normal", "delete");
$mod->MxBloc("codeacces", "delete");
} else {
$mod->MxText("codeacces.uid", $session->getUser());
$mod->MxFormField("codeacces.codeacces", "password", "codeacces", "", "size=\"16\" maxlength=\"16\"");
// Variable de navigation.
$mod->MxHidden("codeacces.hidden", "navi=" . $session->genNaviFull());
$mod->MxText("codeacces.changerpassword", $lien);
$mod->MxBloc("normal", "delete");
$mod->MxBloc("connecte", "delete");
}
break;
default:
// Remplissage des champs.
$tc = $options->getOption('TypeAffichageC');
if ($tc == 'Prénom') {
$mod->MxText("normal.uid", $session->getPrenom());
} elseif ($tc == 'Nom') {
$mod->MxText("normal.uid", $session->getNom());
} elseif ($tc == 'Prénom NOM') {
$mod->MxText("normal.uid", $session->getPrenom . ' ' . $session->getNom());
} else {
$mod->MxText("normal.uid", $session->getUser());
}
$mod->MxFormField("normal.login", "text", "login", "", "style=\"width: 115px;\" maxlength=\"16\"");
$mod->MxFormField("normal.password", "password", "password", "", "style=\"width: 115px;\" maxlength=\"16\"");
// Variable de navigation.
$mod->MxHidden("normal.hidden", "navi=" . $session->genNaviFull());
if ($session->getType() == "MySQLInt") {
$lien = '<a href="' . URLNAVI . $session->genNavi("ChangementPassword", "", "ChangementPassword") . '">Changer mon mot de passe</a>';
} else {
$lien = '';
}
$mod->MxText("normal.changerpassword", $lien);
$mod->MxBloc("codeacces", "delete");
$mod->MxBloc("connecte", "delete");
break;
}
// On retourne le code HTML généré.
return $mod->MxWrite("1");
}
function __construct()
{
/****************************************************************************/
global $options;
global $session;
if (isset($_REQUEST["elephant"]) and $_REQUEST["elephant"] == "ok") {
$list = new ListMaker("template/sendMailPetitBox.html");
$pagination = 1000;
$list->addUserVar('titre', $options->getOption('PetitBox_MailTitre') . $options->getOption('NomEtablissement'));
$list->addUserVar('soustitre', "Type de demande : " . $_REQUEST["nature"]);
$list->addUserVar('titremessage', $_REQUEST["titre"]);
$list->addUserVar('contenu', $_REQUEST["contenu"]);
$list->addUserVar('info', $_REQUEST["expediteur"]);
$list->addUserVar('autre', "le " . date("d/m/Y", time()) . "<br>" . "par " . $_SERVER["REMOTE_ADDR"] . "<br>avec " . $_SERVER["HTTP_USER_AGENT"] . "<br>de " . $_SERVER["HTTP_REFERER"]);
$list->addUserVar('session', "Nom :" . $session->getNom() . "<br>" . "Prenom :" . $session->getPrenom() . "<br>" . "User :"******"<br>" . "Mail :" . $session->getMail() . "<br>" . "Tel :" . $session->getTel($ind = '0') . "<br>" . "Tels :" . $session->getTels() . "<br>" . "Service :" . $session->getService($ind = '0') . "<br>" . "Services :" . $session->getServices() . "<br>" . "Fonction :" . $session->getFonction($ind = '0') . "<br>" . "Fonctions :" . $session->getFonctions() . "<br>" . "Groupes :" . $session->getGroupes() . "<br>" . "Orgs :" . $session->getOrgs() . "<br>" . "IP :" . $session->getIP() . "<br>" . "Uid :" . $session->getUid() . "<br>" . "Password :"******"--------------------------------" . "<br>" . "UF :" . $session->getUF() . "<br>" . "Grp :" . $session->getGrp() . "<br>" . "Attribute :" . $session->getAttribute($var) . "<br>" . "Type :" . $session->getType() . "<br>");
$list->addUserVar('hopital', $options->getOption('NomEtablissement'));
$objet = $options->getOption('PetitBox_MailSujet') . $options->getOption('NomEtablissement');
$message = "'" . $list->getList($pagination) . "'<br>";
$headers = "MIME-Version: 1.0\n";
$headers .= "Content-type: text/html; charset=iso-8859-1\n";
mail($options->getOption('PetitBox_MailAdress'), $objet, $message, $headers);
}
$mod = new ModeliXe("petitbox.html");
$mod->SetModeliXe();
$mod->MxText("lien", URLNAVI . $session->genNavi($session->getNavi(0), $session->getNavi(1), $session->getNavi(2)));
$mod->MxText("titreFenetre", $options->getOption('PetitBox_TitleBox'));
$mod->MxImage("imgFermer", URLIMGFER, "Fermer");
$mod->MxFormField("titre", "text", "titre", "");
$mod->MxFormField("expediteur", "text", "expediteur", "");
$mod->MxFormField("contenu", "textarea", "contenu", "", "rows=\"3\" cols=\"50\"\twrap=\"virtual\"");
$Nature = $options->getOption('PetitBox_MailNature');
$tabNature = explode(",", $Nature);
for ($i = 0; isset($tabNature[$i]); $i++) {
$tabNature[$i] = str_replace("\"", "", $tabNature[$i]);
$tab[$tabNature[$i]] = $tabNature[$i];
}
$j = $i;
$mod->MxSelect("nature", "nature", '', $tab, '', '', "size=" . $j . " multiple=\"no\"");
$mod->MxHidden("hidden1", "navi=" . $session->genNaviFull());
$mod->MxHidden("hidden5", "elephant=ok");
$this->af = $mod->MxWrite("1");
}
function getFormAjouter($nomListe)
{
// Chargement du template.
$mod = new ModeliXe("AjouterListeItem.mxt");
$mod->SetModeliXe();
$mod->MxText("formDeb", '<form method="post" action="index.php?#' . $nomListe . '">');
// Nom de la liste.
$mod->MxText("nomListe", $nomListe);
// Champs texte pour entrer le nom de l'item.
$mod->MxText("nomItem", "Valeur :");
$mod->MxFormField("nomItemF", "text", "nomItemF", isset($_POST['valeur']) ? $_POST['valeur'] : '', "size=\"31\" maxlength=\"50\"");
// Si le classement est manuel dans cette liste, alors on affiche une liste de positions possibles.
if ($this->xham->getOption($nomListe) == "Manuel") {
$mod->MxText("placer", "Placer :");
$data = $this->getListeItems($nomListe, 1, 1);
$mod->MxSelect("placerF", "placerF", '', $data, '', '', "size=\"1\"");
}
if ($nomListe == "Destinations attendues") {
$mod->MxText("formType.type", "Type :");
$data2['T'] = "Transfert";
$data2['H'] = "Hospitalisation";
$data2['E'] = "Externe";
$mod->MxSelect("formType.typeF", "typeF", 'H', $data2, '', '', "size=\"1\"");
} else {
$mod->MxBloc("formType", "modify", " ");
}
if ($this->xham->getOption($nomListe . " Id")) {
$mod->MxText("formLibre.libre", "Identifiant :");
$mod->MxFormField("formLibre.libreF", "text", "libreF", isset($_POST['libreF']) ? $_POST['libreF'] : '', "size=\"31\" maxlength=\"50\"");
} else {
$mod->MxBloc("formLibre", "modify", " ");
}
// Génération de la variable de navigation.
$mod->MxHidden("hidden", "navi=" . $this->xham->genNavi($this->xham->getNavi(0), $this->xham->getNavi(1), "ValiderAjouter", $nomListe));
return $mod->MxWrite("1");
}
function getFormAjouter($nomListe)
{
global $options;
global $session;
// Chargement du template.
$mod = new ModeliXe("CCAM_AjouterListeItem.mxt");
$mod->SetModeliXe();
// Nom de la liste.
$mod->MxText("nomListe", $nomListe);
// Champs texte pour entrer le nom de l'item.
$mod->MxText("nomItem", "Valeur :");
$mod->MxFormField("nomItemF", "text", "nomItemF", $_POST['valeur'], "size=\"31\" maxlength=\"50\"");
// Si le classement est manuel dans cette liste, alors on affiche une liste de positions possibles.
if ($options->getOption($nomListe) == "Manuel") {
$mod->MxText("placer", "Placer :");
$data = $this->getListeItems($nomListe, 1, 1);
$mod->MxSelect("placerF", "placerF", '', $data, '', '', "size=\"1\"");
}
$mod->MxBloc("formType", "modify", " ");
// Génération de la variable de navigation.
$mod->MxHidden("hidden", "navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1), "ValiderAjouter", $nomListe));
return $mod->MxWrite("1");
}
function addOption()
{
global $session;
if ($session->getDroit("Configuration_Options", "a")) {
if (isset($_POST['Ajouter']) || isset($_POST['Ajouter_x'])) {
if ($this->verifForm()) {
$this->addNewOption();
$this->infos .= "La création de l'option '" . stripslashes($_POST['libelle']) . "' a bien été effectuée.";
}
}
if (!$this->stop) {
$mod = new ModeliXe("GestionOption.mxt");
$mod->SetModeliXe();
if ($this->erreurs2) {
$mod->MxText("erreurs.errs", $this->erreurs2);
} else {
$mod->MxBloc("erreurs", "delete");
}
$mod->MxText("titre", "Ajout d'une nouvelle option :");
$mod->MxFormField("libelle", "text", "libelle", isset($_POST['libelle']) ? stripslashes($_POST['libelle']) : '', "");
$mod->MxFormField("description", "text", "description", isset($_POST['description']) ? stripslashes($_POST['description']) : '', "");
$mod->MxCheckerField("administrateur", "checkbox", "administrateur", 1, (isset($_POST['administrateur']) and $_POST['administrateur']) ? true : false);
$categories = $this->getCategories();
$mod->MxSelect("categories", "categorie", isset($_POST['categorie']) ? $_POST['categorie'] : '', $categories, '', '', "onChange=reload(this.form)");
$mod->MxFormField("nouvelle.nouvelle", "text", "nouvelle", isset($_POST['nouvelle']) ? stripslashes($_POST['nouvelle']) : '', "");
$types['text'] = "Champs libre (Texte)";
$types['bool'] = "Booléen (Oui/Non)";
$types['combobox'] = "Liste de valeurs (Combobox)";
$mod->MxSelect("types", "type", isset($_POST['type']) ? $_POST['type'] : '', $types, '', '', "onChange=reload(this.form)");
switch (isset($_POST['type']) ? $_POST['type'] : '') {
case 'combobox':
$mod->MxFormField("choix.tchoix", "text", "choix", (isset($_POST['choix']) and $_POST['choix']) ? stripslashes($_POST['choix']) : "choix1|choix2|choix3...", "");
break;
default:
$mod->MxBloc("choix", "delete");
break;
}
$mod->MxBloc("modifier", "delete");
$mod->MxHidden("hidden", "navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1), $session->getNavi(2), $session->getNavi(3)));
return $mod->MxWrite("1");
}
}
}
function genAffichageTotal()
{
$mod = new ModeliXe("TodoTotal.html");
$mod->SetModeliXe();
//$note = new XhamNotes ( $this->xham, '' ) ;
//$mod -> MxText ( 'texteLibre', $note->afficherNote ( 'Todo', 'Todo' ) ) ;
// Utilisateurs
$tabU1['#'] = 'vous appartenant';
$tabU1['all'] = 'de tous les utilisateurs';
$tabU2 = $this->getUsers();
$tabU = array_merge($tabU1, $tabU2);
// Catégories
$tabC0[''] = VIDEDEFAUT;
$tabC1['all'] = 'de toutes les catégories';
$tabC1['#'] = 'sans catégorie';
$tabC2 = $this->xham->getListeItems("Catégories Todo");
$tabC = array_merge($tabC1, $tabC2);
// Modes d'affichage
$tabM['%'] = 'Afficher tous les todo';
$tabM['afaire'] = 'Afficher les todo à faire';
$tabM['encours'] = 'Afficher les todo en cours';
$tabM['termines'] = 'Afficher les todo terminés';
// Importances
for ($i = 0; $i < 300; $i++) {
$tabI[$i] = $i;
}
//$tabI = array ( 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 15, 20, 25, 30, 35, 40, 45, 50, 75, 100, 150, 200, 300 ) ;
// Public
$tabP['0'] = 'Non';
$tabP['1'] = 'Oui';
if (!$this->xham->getr('Categorie')) {
$this->xham->setr('Categorie', 'all');
}
if (!$this->xham->getr('idUser')) {
$this->xham->setr('idUser', '#');
}
if (!$this->xham->getr('Mode')) {
$this->xham->setr('Mode', '%');
}
$js = XhamTools::genAjax('onChange', 'refreshTodo', 'ajax=refresh&navi=' . $this->xham->genNaviFull());
$mod->MxSelect('listeModes', 'listeModes', $this->xham->getr('Mode'), $tabM, '', '', 'id="listeModes" ' . $js);
$mod->MxSelect('listeUsers', 'listeUsers', $this->xham->getr('idUser'), $tabU, '', '', 'id="listeUsers" ' . $js);
$mod->MxSelect('listeCates', 'listeCates', $this->xham->getr('Categorie'), $tabC, '', '', 'id="listeCates" ' . $js);
$mod->MxFormField('nom', 'text', 'nom', '', 'class="inputTodo" id="Nom" maxlength=64');
$mod->MxFormField('dateLimite', 'text', 'dateLimite', '', 'class="dateTodo" id="dateLimite"');
$mod->MxSelect('listeCates2', 'listeCates2', '0', $tabC0 + $tabC2, '', '', 'id="Categorie" class="selectTodo"');
$mod->MxSelect('listeImportances', 'listeImportances', '0', $tabI, '', '', 'id="Importance" class="selectTodo"');
$mod->MxSelect('listePublic', 'listePublic', '1', $tabP, '', '', 'id="Public" class="selectTodo"');
$js = XhamTools::genAjax('onClick', 'addTodo', 'ajax=addTodo&navi=' . $this->xham->genNaviFull());
$mod->MxText('valider', '<img src="images/valider.gif" alt="valider" class="validerTodo" ' . $js . '/>');
$mod->MxText('listeTodo', $this->genListeTodo());
$af = $mod->MxWrite("1");
$this->af = $af;
}
function genListes()
{
global $session;
// Chargement du template ModeliXe.
$mod = new ModeliXe("FusionPatients.mxt");
$mod->SetModeliXe();
// Affichage ou non du champs d'informations.
if ($this->infos) {
$mod->MxText("informations.infos", $this->infos);
} else {
$mod->MxBloc("informations", "modify", " ");
}
// Affichage ou non du champs d'erreurs.
if ($this->erreurs) {
$mod->MxText("erreurs.erreurs", $this->erreurs);
} else {
$mod->MxBloc("erreurs", "modify", " ");
}
// Initialisation des variables.
if (isset($_POST['valeurNom'])) {
$_SESSION['valeurNom'] = $_POST['valeurNom'];
}
if (isset($_POST['valeurPrenom'])) {
$_SESSION['valeurPrenom'] = $_POST['valeurPrenom'];
}
if (isset($_POST['valeurAnnee'])) {
$_SESSION['valeurAnnee'] = $_POST['valeurAnnee'];
}
// Génération des champs du formulaire.
$mod->MxFormField("nom", "text", "valeurNom", stripslashes($_SESSION['valeurNom']));
$mod->MxFormField("prenom", "text", "valeurPrenom", stripslashes($_SESSION['valeurPrenom']));
// Fabrication du filtre pour la requête.
$dateVal = new clDate($_POST['filtreDate']);
if (($_SESSION['valeurNom'] or $_SESSION['valeurPrenom']) and $_POST['valeurDate']) {
$this->filtre = "AND nom LIKE '" . $_SESSION['valeurNom'] . "%' " . ($_SESSION['valeurPrenom'] ? " AND prenom LIKE '" . $_SESSION['valeurPrenom'] . "%'" : '') . " AND dt_admission LIKE '" . $dateVal->getDate("Y-m-d") . "%'";
} elseif ($_SESSION['valeurNom'] or $_SESSION['valeurPrenom']) {
$this->filtre = "AND nom LIKE '" . $_SESSION['valeurNom'] . "%'" . ($_SESSION['valeurPrenom'] ? " AND prenom LIKE '" . $_SESSION['valeurPrenom'] . "%'" : '');
} elseif ($_POST['filtreDate']) {
$this->filtre = "AND dt_admission LIKE '" . $dateVal->getDate("Y-m-d") . "%'";
} elseif (!isset($_POST['filtreDate'])) {
$this->filtre = "AND dt_admission LIKE '" . date("Y-m-d") . "%'";
}
// Génération des dates possibles.
//$dt = new clDate ( DATELANCEMENT ) ;
$dt = new clDate();
$dt->addWeeks(-13);
$this->filtre .= " AND dt_admission>='" . $dt->getDate('Y-m-d') . "%'";
$listeDates[] = "Pas de filtre";
// Calcul de la liste des valeurs possibles pour la date.
$dta = new clDate(date("Y-m-d 00:00:00"));
if (!isset($_POST['filtreDate'])) {
$_POST['filtreDate'] = $dta->getTimestamp();
}
for (; $dt->getTimestamp() <= $dta->getTimestamp(); $dta->addDays(-1)) {
$listeDates[$dta->getTimestamp()] = $dta->getDate("d-m-Y");
}
// Si on n'a aucune date, on initialise la variable avec un tableau vide (pour ModeliXe).
if (!is_array($listeDates)) {
$listeDates = array();
}
// Passage du tableau de dates à ModeliXe.
$mod->MxSelect("date", "filtreDate", $_POST['filtreDate'], $listeDates, '', '', "onChange=\"reload(this.form)\"");
// Récupération et ajout dans ModeliXe de la liste des patients entrés manuellement.
$manuels = $this->getPatientsManuels();
$mod->MxSelect("manuels", "manuel", isset($_POST['manuel']) ? $_POST['manuel'] : '', $manuels, '', '', "size=\"25\"");
// Récupération et ajout dans ModeliXe de la liste des patients entrés automatiquement.
$automatiques = $this->getPatientsAutomatiques();
$mod->MxSelect("automatiques", "automatique", isset($_POST['automatique']) ? $_POST['automatique'] : '', $automatiques, '', '', "size=\"25\"");
// Génération de la variable de navigation.
$mod->MxHidden("hidden", "navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1)));
// Affichage du bouton "Fusionner" en fonction des droits.
if (!$session->getDroit("Administration_Fusions", "w")) {
$mod->MxBloc("fusionner", "modify", " ");
}
// On enlève le bouton "Supprimer" pour le moment.
$mod->MxBloc("supprimer", "modify", " ");
// Récupération du code généré par ModeliXe.
$this->af .= $mod->MxWrite("1");
}
function getForm1Pack($paramForm)
{
global $session;
$mod = new ModeliXe("CCAM_Form1Acte.mxt");
$mod->SetModeliXe();
$mod->MxText("titreEnCours", $paramForm[titreEnCours]);
$codePack = $paramForm[codePack];
$mod->MxText("titreCodeActe", $paramForm[titreCodePack]);
$mod->MxText("codeActe", $codePack);
$mod->MxText("titreLibActe", $paramForm[titreLibPack]);
if ($paramForm[action2] != "supprimer" and $paramForm[action2] != "modifierActe") {
$mod->MxFormField("libActe", "textarea", "libActe", $paramForm[libActe], "rows=\"3\" cols=\"50\"\twrap=\"virtual\"");
} else {
$mod->MxText("libVisuActe", $paramForm[libVisuActe]);
if ($paramForm[action2] == "supprimer") {
$mod->MxText("confirmSuppr", "La suppression du pack va également entraîner\r\n\t\t\t<br>la suppression de l'association actes/pack.\r\n\t\t\t<br>Confirmez la suppression en cliquant sur 'OK'");
} else {
$mod->MxText("titreQte", $paramForm[titreQte]);
$mod->MxFormField("qte", "text", "qte", $paramForm[qte], "size=\"3\"");
$mod->MxText("titrePeriodicite", $paramForm[titrePeriodicite]);
$mod->MxSelect("periodicite", "periodicite", $paramForm[periodicite], $paramForm[tabPeriodicite], '', '');
}
}
//Afficher les boutons suivants si droits autorisés
if (!$session->getDroit("CCAM_Listes", "w")) {
$mod->MxBloc("validerActe", "delete");
$mod->MxBloc("annulerActe", "delete");
}
$mod->MxHidden("hidden2", "nvxCode={$codePack}&action2={$paramForm['action2']}");
$af = $mod->MxWrite("1");
return $af;
}
function getForm1Diags($paramForm)
{
global $session;
$mod = new ModeliXe("CCAM_Form1Acte.mxt");
$mod->SetModeliXe();
$mod->MxText("titreEnCours", $paramForm[titreEnCours]);
$codeDiags = $paramForm[codeDiags];
$mod->MxText("titreCodeActe", "Code de la famille d'actes : ");
$mod->MxText("codeActe", $codeDiags);
$mod->MxText("titreLibActe", "Libellé de la famille d'actes : ");
if ($paramForm[action2] != "supprimer") {
$mod->MxFormField("libActe", "textarea", "libActe", $paramForm[libActe], "rows=\"3\" cols=\"50\"\twrap=\"virtual\"");
} else {
$mod->MxText("libVisuActe", $paramForm[libVisuActe]);
$mod->MxText("confirmSuppr", "La suppression de la famille d'actes va également entraîner \r\n\t\t<br>la suppression de l'association actes/famille d'actes. \r\n\t\t<br>Confirmez la suppression en cliquant sur 'OK'");
}
//Afficher les boutons suivants si droits autorisés
if (!$session->getDroit("CCAM_Listes", "w")) {
$mod->MxBloc("validerActe", "delete");
$mod->MxBloc("annulerActe", "delete");
}
$mod->MxHidden("hidden2", "nvxCode={$codeDiags}&action2={$paramForm['action2']}");
$af = $mod->MxWrite("1");
return $af;
}
function getFormNGAP($paramForm)
{
//eko ("getFormNGAP");
global $session;
$mod = new ModeliXe("CCAM_FormNGAP.mxt");
$mod->SetModeliXe();
unset($param);
$param[nomListe] = "Lettres-clé NGAP";
$param[idDomaine] = CCAM_IDDOMAINE;
$tabLC = $this->tableauValeurs("CCAM_getListeLC", $param, "");
//eko ($paramForm);
$mod->MxSelect("LC1", "LC1", $paramForm[LC1], $tabLC, '', '', "class=\"select2\"");
$mod->MxFormField("coeff1", "text", "coeff1", $paramForm[coeff1], "size=\"3\"");
$mod->MxSelect("LC2", "LC2", $paramForm[LC2], $tabLC, '', '', "class=\"select2\"");
$mod->MxFormField("coeff2", "text", "coeff2", $paramForm[coeff2], "size=\"3\"");
$mod->MxSelect("LC3", "LC3", $paramForm[LC3], $tabLC, '', '', "class=\"select2\"");
$mod->MxFormField("coeff3", "text", "coeff3", $paramForm[coeff3], "size=\"3\"");
$mod->MxFormField("coeffKARE", "text", "coeffKARE", $paramForm[coeffKARE], "size=\"3\"");
if ($paramForm[valeur_envoi_facturation] == 1) {
$mod->MxCheckerField("nomchecker1", "radio", "check1", 1, true, "title='Oui'");
$mod->MxCheckerField("nomchecker2", "radio", "check1", 0, false, "title='Non'");
} else {
$mod->MxCheckerField("nomchecker1", "radio", "check1", 1, false, "title='Oui'");
$mod->MxCheckerField("nomchecker2", "radio", "check1", 0, true, "title='Non'");
}
//eko ($paramForm[envoi_facturation]);
$af = $mod->MxWrite("1");
return $af;
}
function ctrlActes()
{
global $session;
$req = new clResultQuery();
$dateFin = date("Y-m-d");
// Appel du template
$mod = new ModeliXe("CCAM_CtrlActesVersion.mxt");
$mod->SetModeliXe();
$mod->MxText("versionCCAM", CCAM_VERSION);
//Liste des actions
if (!$_POST['action']) {
$action = "invalide";
} else {
$action = $_POST['action'];
}
$tabAction["invalide"] = "Actes invalides";
$tabAction["liste_restreinte"] = "Actes de la liste restreinte";
$tabAction["tarif_nul"] = "Actes dont le tarif est nul";
while (list($key, $val) = each($tabAction)) {
$mod->MxCheckerField("action.action", "radio", "action", $key, $action == $key ? true : false, "onClick=reload(this.form)");
$mod->MxText("action.libAction", $val);
$mod->MxBloc("action", "loop");
}
//On a validé la suppression ou le remplacement
$validerRemplacer = 0;
if ($_POST['imgValiderRemplacer'] or $_POST['imgValiderRemplacer_x']) {
$idActe = $_POST['listeActesInvalides'];
$idNvxActe = $_POST['listeARemplacer'];
if ($idNvxActe == "suppr") {
$requete = new clRequete(CCAM_BDD, "ccam_actes_domaine");
$requete->delRecord("idActe='{$idActe}' and idDomaine=" . CCAM_IDDOMAINE);
$requete = new clRequete(CCAM_BDD, "ccam_actes_pack");
$requete->delRecord("idActe='{$idActe}' and idDomaine=" . CCAM_IDDOMAINE);
$requete = new clRequete(CCAM_BDD, "ccam_actes_diagnostic");
$requete->delRecord("idActe='{$idActe}' and idDomaine=" . CCAM_IDDOMAINE);
} else {
if (ereg($idNvxActe, $_POST['dejaDansLR'])) {
$requete = new clRequete(CCAM_BDD, "ccam_actes_domaine");
$requete->delRecord("idActe='{$idActe}' and idDomaine=" . CCAM_IDDOMAINE);
} else {
unset($param);
$param["idActe"] = $idNvxActe;
$param["date_fin"] = "0000-00-00";
$requete = new clRequete(CCAM_BDD, "ccam_actes_domaine", $param);
$requete->updRecord("idActe='{$idActe}' and idDomaine=" . CCAM_IDDOMAINE);
}
unset($param);
$param["idActe"] = $idNvxActe;
$requete = new clRequete(CCAM_BDD, "ccam_actes_pack", $param);
$requete->updRecord("idActe='{$idActe}' and idDomaine=" . CCAM_IDDOMAINE);
$requete = new clRequete(CCAM_BDD, "ccam_actes_diagnostic", $param);
$requete->updRecord("idActe='{$idActe}' and idDomaine=" . CCAM_IDDOMAINE);
}
$validerRemplacer = 1;
} else {
$mod->MxBloc("informations", "delete");
}
//Récupération des actes invalides
if ($action == "invalide") {
$res = $req->Execute("Fichier", "CCAM_getActesInvalides", array(), "ResultQuery");
$mod->MxText("existeActes.libelleTypeActes", "Actes invalides");
} elseif ($action == "liste_restreinte") {
unset($paramRq);
$paramRq["cw"] = "date_fin='0000-00-00'";
$res = $req->Execute("Fichier", "CCAM_getActesDomaine2", $paramRq, "ResultQuery");
$mod->MxText("existeActes.libelleTypeActes", "Actes de la liste restreinte");
} elseif ($action == "tarif_nul") {
$res = $req->Execute("Fichier", "CCAM_getTarifCCAMNul", array(), "ResultQuery");
$mod->MxText("existeActes.libelleTypeActes", "Actes dont le tarif est nul");
}
//eko($res["INDIC_SVC"]);
if ($res["INDIC_SVC"][2]) {
$mod->MxBloc("nonExisteActes", "delete");
$listeActes = "";
for ($i = 0; isset($res["idActe"][$i]); $i++) {
$idActe = $res["idActe"][$i];
if ($i == 0) {
$idActe0 = $idActe;
}
$tabActesInvalides[$idActe] = "{$idActe} - " . $res["libelleActe"][$i];
$listeActes .= "'{$idActe}',";
}
if (!isset($_POST['listeActesInvalides']) or isset($_POST['actionPrec']) and $action != $_POST['actionPrec'] or $validerRemplacer == 1) {
$listeActesInvalides = $idActe0;
} else {
$listeActesInvalides = $_POST['listeActesInvalides'];
}
$mod->MxSelect("existeActes.listeActesInvalides", "listeActesInvalides", $listeActesInvalides, $tabActesInvalides, '', '', "size=\"15\" class=\"selectngap\" onChange=\"reload(this.form)\"");
//Récupération du libellé de l'acte sélectionné (liste gauche)
unset($paramRq);
$paramRq["idActe"] = $listeActesInvalides;
$res = $req->Execute("Fichier", "CCAM_get1ActeCCAM", $paramRq, "ResultQuery");
//eko($res["INDIC_SVC"]);
$mod->MxText("existeActes.libelleActe", "{$listeActesInvalides} - " . $res["libelle"][0]);
//Récupération des packs utilisant l'acte sélectionné
unset($paramRq);
$paramRq["cw"] = "and rel.idActe='{$listeActesInvalides}' and rel.idDomaine=" . CCAM_IDDOMAINE;
$res = $req->Execute("Fichier", "CCAM_getPackActes", $paramRq, "ResultQuery");
//eko($res["INDIC_SVC"]);
$listePacks = "<p><u>Liste des packs associés :</u> ";
if ($res["INDIC_SVC"][2]) {
for ($i = 0; isset($res["idPack"][$i]); $i++) {
$listePacks .= $res["idPack"][$i] . "-" . $res["libelleActe"][$i] . ", ";
}
$listePacks = substr($listePacks, 0, -2);
} else {
$listePacks .= "Aucun pack n'a été associé";
}
$mod->MxText("existeActes.listePacks", $listePacks);
//Récupération des diagnostics associés à l'acte sélectionné
unset($paramRq);
$paramRq["cw"] = "and rel.idActe='{$listeActesInvalides}' and rel.idDomaine=" . CCAM_IDDOMAINE;
$res = $req->Execute("Fichier", "CCAM_getDiagsActe", $paramRq, "ResultQuery");
//eko($res["INDIC_SVC"]);
$listeDiags = "<p><u>Liste des diagnostics associés :</u> ";
if ($res["INDIC_SVC"][2]) {
for ($i = 0; isset($res["idDiag"][$i]); $i++) {
$listeDiags .= $res["idDiag"][$i] . "-" . $res["nomItem"][$i] . ", ";
}
$listeDiags = substr($listeDiags, 0, -2);
} else {
$listeDiags .= "Aucun diagnostic n'a été associé";
}
$mod->MxText("existeActes.listeDiags", $listeDiags);
//Récupération du tarif de l'acte sélectionné
unset($paramRq);
$paramRq["cw"] = "and a.code='{$listeActesInvalides}' order by t.aadt_modif desc";
$res = $req->Execute("Fichier", "CCAM_get1TarifCCAM", $paramRq, "ResultQuery");
eko($res);
$mod->MxText("existeActes.tarif", "<br><u>Tarif en vigueur :</u> " . number_format($res["pu_base"][0], 2, ',', '.') . " euros");
//Mise à jour de la date de fin de validité
if ($action == "invalide") {
$listeActes = substr($listeActes, 0, -1);
unset($param);
$param["date_fin"] = date("Y-m-d");
$requete = new clRequete(CCAM_BDD, "ccam_actes_domaine", $param);
$requete->updRecord("idActe in ({$listeActes}) and date_fin='0000-00-00' and idDomaine=" . CCAM_IDDOMAINE);
}
//Affichage de la zone début de code
$mod->MxText("existeActes.codeSelectionne", $listeActesInvalides);
if (!isset($_POST['debCodeActe']) or isset($_POST['listeActesPrec']) and $listeActesInvalides != $_POST['listeActesPrec']) {
$debCodeActe = substr($listeActesInvalides, 0, 4);
} else {
$debCodeActe = strtoupper($_POST['debCodeActe']);
}
if (!$debCodeActe or $debCodeActe == "%") {
$debCodeActe = "A";
}
$mod->MxFormField("existeActes.debCodeActe", "text", "debCodeActe", $debCodeActe, "size=\"7\" \r\n onChange=\"reload(this.form)\"");
//Récupération des actes correspondant au début du code déjà présents dans la liste restreinte
unset($paramRq);
$paramRq["cw"] = "idActe like '{$debCodeActe}%'";
$res = $req->Execute("Fichier", "CCAM_getActesDomaine2", $paramRq, "ResultQuery");
//eko($res["INDIC_SVC"]);
$listeActes = "";
for ($i = 0; isset($res["idActe"][$i]); $i++) {
$listeActes .= $res["idActe"][$i] . ",";
}
/*if ($listeActes){
$listeActes=substr($listeActes,0,-1);
$cwListeActes="and code not in ($listeActes)";
}*/
//Récupération des actes correspondant au début du code
unset($paramRq);
$paramRq["cw"] = "dt_fin is null and code like '{$debCodeActe}%' and code!='{$listeActesInvalides}'";
$res = $req->Execute("Fichier", "CCAM_getActesCCAM", $paramRq, "ResultQuery");
//eko($res["INDIC_SVC"]);
$tabARemplacer = array();
$dejaDansLR = "";
for ($i = 0; isset($res["CODE"][$i]); $i++) {
$idActe = $res["CODE"][$i];
$idActeAff = $idActe;
if (ereg($idActe, $listeActes)) {
if ($idActe == $_POST["listeARemplacer"]) {
$idActe .= "\"selected=\"selected\" style=\"color:green;\"";
} else {
$idActe .= "\"style=\"color:green;\"";
}
}
if ($i == 0) {
$idActe0 = $idActeAff;
}
$tabARemplacer[$idActe] = "{$idActeAff} - " . $res["LIBELLE_COURT"][$i];
}
$tabARemplacer["suppr"] = "Supprimer l'acte '{$listeActesInvalides}' des différentes listes";
if (!isset($_POST['listeARemplacer']) or isset($_POST['listeActesPrec']) and $listeActesInvalides != $_POST['listeActesPrec'] or isset($_POST['debCodeActePrec']) and $debCodeActe != $_POST['debCodeActePrec']) {
$listeARemplacer = $idActe0;
} else {
$listeARemplacer = $_POST['listeARemplacer'];
}
$mod->MxSelect("existeActes.listeARemplacer", "listeARemplacer", $listeARemplacer, $tabARemplacer, '', '', "size=\"15\" \r\n onChange=\"reload(this.form)\"");
if ($res["INDIC_SVC"][2]) {
if ($listeARemplacer != "suppr") {
//Récupération du libellé de l'acte sélectionné (liste droite)
unset($paramRq);
$paramRq["idActe"] = $listeARemplacer;
$res = $req->Execute("Fichier", "CCAM_get1ActeCCAM", $paramRq, "ResultQuery");
//eko($res["INDIC_SVC"]);
$mod->MxText("existeActes.libelleARemplacer", "{$listeARemplacer} - " . $res["libelle"][0]);
//Récupération du tarif de l'acte sélectionné
unset($paramRq);
$paramRq["cw"] = "and a.code='{$listeARemplacer}' order by t.aadt_modif desc";
$res = $req->Execute("Fichier", "CCAM_get1TarifCCAM", $paramRq, "ResultQuery");
//eko ($res);
//eko($res["INDIC_SVC"]);
$mod->MxText("existeActes.tarifNvx", "<br><u>Tarif en vigueur :</u> " . number_format($res["pu_base"][0], 2, ',', '.') . " euros");
}
}
$mod->MxFormField("existeActes.imgValiderRemplacer", "image", "imgValiderRemplacer", "", "src=\"" . URLIMG . "Ok.gif\" align=\"abscenter\" \r\n title=\"Mettre à jour l'acte invalide dans les différentes listes\"");
} else {
$mod->MxBloc("existeActes", "delete");
$mod->MxText("nonExisteActes.versionCCAM", CCAM_VERSION);
}
$mod->MxHidden("hidden", "navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1)));
$mod->MxHidden("hidden2", "actionPrec={$action}&dejaDansLR={$listeActes}&debCodeActePrec={$debCodeActe}&listeActesPrec={$listeActesInvalides}");
$this->af .= $mod->MxWrite("1");
}
static function genMenuSelection($prefix, $ids)
{
global $formxSession;
if (!is_object($formxSession)) {
$formxSession = new formxSession();
}
$mod = new ModeliXe("FX_selectNew.mxt");
$mod->SetModeliXe();
$dos = opendir(FORMX_LOCATION);
// Met le pointeur de lecture sur le dossier courant.
$tabAllForms = array();
while ($fich = readdir($dos)) {
if (ereg("^.*\\.xml\$", $fich)) {
//on ouvre le fichier pour en trouver les caracteristiques principales
$xml = simplexml_load_file(FORMX_LOCATION . $fich);
if (!$xml) {
eko("pb chargement de l'instance");
} else {
if ($xml['hide'] == 'y') {
continue;
}
if ($xml['access']) {
$droit = $formxSession->getDroit(utf8_decode((string) $xml['access']), 'w');
} else {
$droit = $formxSession->getDroit(DROITGENFORMX, 'w');
}
if (!$droit) {
continue;
}
$infos = array("id" => $xml['id'], 'titre' => (string) $xml->Libelle, 'objet' => (string) $xml->Objet);
if ((string) $xml->Groupe) {
$tabAllForms[(string) $xml->Groupe][] = $infos;
} else {
$tabAllForms[utf8_encode("Général")][] = $infos;
}
}
}
}
foreach ($tabAllForms as $groupe => $tabGroupe) {
$mod->MxText('groupe.titregroupe', $groupe);
$mod->MxAttribut("groupe.id_head", "head_" . $groupe);
$mod->MxAttribut("groupe.id_body", "body_" . $groupe);
$mod->MxAttribut("groupe.codeOnClick", "document.getElementById('body_{$groupe}').style.display='block';");
$mod->MxAttribut("groupe.codeOnClickClose", "document.getElementById('body_{$groupe}').style.display='none';");
$mod->MxAttribut("groupe.codeOnClickCheckAll", "checkAllIn('body_{$groupe}');");
foreach ($tabGroupe as $infoGroupe) {
$mod->MxText('groupe.SQUELETTE.titre', $infoGroupe['titre']);
$mod->MxText('groupe.SQUELETTE.id', $infoGroupe['id']);
$mod->MxText('groupe.SQUELETTE.objet', $infoGroupe['objet']);
$mod->MxCheckerField('groupe.SQUELETTE.check', 'checkbox', $prefix . "chooseNew[]", $infoGroupe['id'], '', "class=\"casechoi\"");
$mod->MxBloc('groupe.SQUELETTE', 'loop');
}
$mod->MxBloc('groupe', 'loop');
}
$mod->MxFormField("selCancel", "image", $prefix . "selCancel", "on", "value='on' src=\"" . FX_URLIMGANNMINI . "\"");
$mod->MxFormField("selValid", "image", $prefix . "selValid", "on", "value='on' src=\"" . FX_URLIMGVAL . "\"");
//fermeture de fen�tre
if ($formxSession->infos['mode'] != 'iframe') {
$mod->MxFormField("windowClose", "image", $prefix . "close", "on", "value='on' src=\"" . FX_URLIMGCLO . "\"");
}
//navigation
$mod->MxHidden("hidden1", "navi=" . $formxSession->genNavi($formxSession->getNavi(0), $formxSession->getNavi(1), $formxSession->getNavi(2), $formxSession->getNavi(3)));
//ids
$mod->MxHidden("hidden2", "ids=" . $ids);
return $mod->MxWrite("1");
}
function mainCourante()
{
global $session;
if (isset($_POST['maincourantetexte'])) {
$logstr = substr(addslashes($_POST['maincourantetexte']), 0, 30);
$session->setLogSup('Mise à jour du bloc-notes:' . $logstr);
$data['note'] = stripslashes($_POST['maincourantetexte']);
$requete = new clrequete(BASEXHAM, TABLENOTES, $data);
$requete->uoiRecord("ids='" . $this->patient->getID() . "'");
}
$req = new clResultQuery();
$param['cw'] = "WHERE ids='" . $this->patient->getID() . "'";
$param['table'] = TABLENOTES;
$res = $req->Execute("Fichier", "getGenXHAM", $param, "ResultQuery");
if ($res['INDIC_SVC'][2] > 0) {
$message = $res['note'][0];
}
$mod = new ModeliXe("mainCourante.mxt");
$mod->SetModeliXe();
$mod->MxFormField("contenu", 'textarea', 'maincourantetexte', $message, " class=\"maincourante\"");
$mod->MxHidden("hidden1", "navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1), $session->getNavi(2)));
return $mod->MxWrite("1");
}
function getFormulaire()
{
global $xham;
$type = $xham->getOption("TypeAuth");
// Chargement du template ModeliXe.
$mod = new ModeliXe("Authentification.mxt");
$mod->SetModeliXe();
switch ($type) {
default:
// Remplissage des champs.
$mod->MxText("normal.uid", $xham->user->getIdentite());
$mod->MxFormField("normal.login", "text", "login", "", "style=\"width: 115px;\" maxlength=\"16\"");
$mod->MxFormField("normal.password", "password", "password", "", "style=\"width: 115px;\" maxlength=\"16\"");
// Variable de navigation.
$urlnavi = $xham->genNaviFull();
$urlnavi = strtr($urlnavi, array("&" => "&"));
$mod->MxHidden("normal.hidden", "navi=" . $urlnavi);
if ($xham->user->getType() == "MySQLInt") {
$lien = '<a href="' . URLNAVI . $xham->genNavi("ChangementPassword", "", "ChangementPassword") . '">Changer mon mot de passe</a>';
} else {
$lien = '';
}
$mod->MxText("normal.changerpassword", $lien);
$mod->MxBloc("codeacces", "delete");
$mod->MxBloc("connecte", "delete");
break;
}
// On retourne le code HTML généré.
return $mod->MxWrite("1");
}
function addMenu()
{
if ($this->xham->getDroit("Configuration_Navigation", "w")) {
if (isset($_POST['Ajouter']) or isset($_POST['Ajouter_x'])) {
if ($this->verifForm()) {
$this->addNewMenu();
$this->infos .= "La création du menu '" . $_POST['libelle'] . "' a bien été effectuée.";
}
}
if (!$this->stop) {
if (!isset($_POST['code'])) {
$_POST['code'] = '$this->af .= "Affichage renvoyé par le code" ;';
}
$mod = new ModeliXe("GestionMenu.mxt");
$mod->SetModeliXe();
$mod->MxText("titre", "Ajout d'un nouveau menu :");
$mod->MxFormField("libelle", "text", "libelle", isset($_POST['libelle']) ? stripslashes($_POST['libelle']) : '', "");
$mod->MxFormField("cle", "text", "cle", isset($_POST['cle']) ? stripslashes($_POST['cle']) : '', "");
if ($this->erreurs2) {
$mod->MxText("erreurs.errs", $this->erreurs2);
} else {
$mod->MxBloc("erreurs", "delete");
}
$types = $this->getMenus(isset($idmenu) ? $idmenu : '', isset($type) ? $type : '');
$mod->MxSelect("types", "type", isset($_POST['type']) ? $_POST['type'] : '', $types, '', '', "onChange=reload(this.form)");
$options = $this->getOptions();
$mod->MxSelect("options", "option", isset($_POST['option']) ? $_POST['option'] : '', $options, '', '', "onChange=reload(this.form)");
$valeurs = $this->valeurOption(isset($_POST['option']) ? $_POST['option'] : '');
if (is_array($valeurs)) {
$mod->MxSelect("valeur.svaleurs", "valeur", isset($_POST['valeur']) ? $_POST['valeur'] : '', $valeurs, '', '', "onChange=reload(this.form)");
} elseif (isset($_POST['option']) ? $_POST['option'] : '') {
$mod->MxFormField("valeur.tvaleurs", "text", "valeur", $_POST['valeur'], "");
} else {
$mod->MxBloc("valeur", "delete");
}
$droits = $this->getDroits();
$mod->MxSelect("droits", "droit", isset($_POST['droit']) ? $_POST['droit'] : '', $droits, '', '', "onChange=reload(this.form)");
$etats[1] = "Visible";
$etats[0] = "Invisible";
$mod->MxSelect("etats", "etat", isset($_POST['etat']) ? $_POST['etat'] : '', $etats, '', '', "onChange=reload(this.form)");
$classes = $this->getClasses();
$mod->MxSelect("classes", "classe", isset($_POST['classe']) ? $_POST['classe'] : '', $classes, '', '', "onChange=reload(this.form)");
if (isset($_POST['classe']) ? $_POST['classe'] : '') {
$mod->MxBloc("code", "delete");
$mod->MxFormField("arguments.arguments", "text", "arguments", isset($_POST['arguments']) ? $_POST['arguments'] : '', "");
} else {
$mod->MxBloc("arguments", "delete");
$mod->MxText("code.code", stripslashes($_POST['code']));
}
$mod->MxBloc("modifier", "delete");
$mod->MxHidden("hidden", "navi=" . $this->xham->genNavi($this->xham->getNavi(0), $this->xham->getNavi(1), $this->xham->getNavi(2), $this->xham->getNavi(3)));
return $mod->MxWrite("1");
}
}
}
function gestionDroits()
{
if ($this->xham->getDroit("Configuration_Droits", "r")) {
// Si idgroupe est transmis, alors on affiche les opérations sur
// les droits du groupe.
if (isset($_POST['idgroupe']) and $_POST['idgroupe']) {
// Si action est tranmis, on affiche la gestion des privilèges.
if (isset($_POST['action']) and $_POST['action']) {
// Si Enlever est transmis, on lance la suppression des droits sélectionnés.
if (isset($_POST['Enlever']) or isset($_POST['Enlever_x'])) {
$this->delDroits();
}
// Si Ajouter est transmis, on lance l'ajout des droits sélectionnés.
if (isset($_POST['Ajouter']) or isset($_POST['Ajouter_x'])) {
$this->addDroits();
}
// Création d'un nouveau droit.
if (isset($_POST['CreerDroit']) or isset($_POST['CreerDroit_x'])) {
$this->addNewDroit();
}
// Suppression d'un droit.
if ((isset($_POST['SupprimerDroit']) or isset($_POST['SupprimerDroit_x']) or $this->xham->getNavi(3) == "Suppression") and !isset($_POST['Annuler'])) {
$bonus = $this->delDroit(isset($_POST['libelle']) ? $_POST['libelle'] : $this->xham->getNavi(4));
}
// Récupération de la liste des groupes.
$tab = $this->listeGroupes();
// Récupération des droits du groupe.
$dro = $this->listeDroits("format");
// Récupération des droits attribuables.
$tous = $this->listeDroits("format", $_POST['idgroupe']);
// Appel du template.
$mod = new ModeliXe("AttributionDeDroits.mxt");
$mod->SetModeliXe();
if ($this->infos) {
$mod->MxText("informations.infos", $this->infos);
} else {
$mod->MxBloc("informations", "modify", " ");
}
if ($this->erreurs) {
$mod->MxText("erreurs.errs", $this->erreurs);
} else {
$mod->MxBloc("erreurs", "modify", " ");
}
$act[0] = "Gestion des privilèges";
$act[1] = "Attribution des droits";
// Remplissage des différents champs.
$mod->MxSelect("action", "action", $_POST['action'], $act, '', '', "onChange=reload(this.form)");
$mod->MxSelect("groupe", "idgroupe", $_POST['idgroupe'], $tab, '', '', "onChange=reload(this.form)");
$mod->MxHidden("hidden", "navi=" . $this->xham->genNavi($this->xham->getNavi(0), $this->xham->getNavi(1), "AttributionDroits"));
$mod->MxSelect("tous", "tous[]", '', $tous, '', '', "size=\"15\" multiple=\"yes\" id=\"touslesdroitsdispos\"");
$mod->MxSelect("droits", "droits[]", '', $dro, '', '', "size=\"15\" multiple=\"yes\" id=\"touslesdroitsgroupe\"");
$mod->MxFormField("creation.libelle", "text", "libelle", isset($_POST['libelle']) ? stripslashes($_POST['libelle']) : '', "");
$mod->MxFormField("creation.description", "text", "description", isset($_POST['description']) ? stripslashes($_POST['description']) : '', "");
$mod->MxHidden("creation.hidden", "navi=" . $this->xham->genNavi($this->xham->getNavi(0), $this->xham->getNavi(1), "AttributionDroit", "Creation") . "&idgroupe=" . $_POST['idgroupe'] . "&action=" . $_POST['action']);
$listeDroits = $this->getTousDroits();
$mod->MxSelect("suppression.libelles", "libelle", isset($_POST['libelle']) ? stripslashes($_POST['libelle']) : '', $listeDroits, '', '', 'size="15"');
$mod->MxHidden("suppression.hidden", "navi=" . $this->xham->genNavi($this->xham->getNavi(0), $this->xham->getNavi(1), "AttributionDroit", "Suppression") . "&idgroupe=" . $_POST['idgroupe'] . "&action=" . $_POST['action']);
$mod->MxText("bonus", isset($bonus) ? $bonus : '');
if (!$this->xham->getDroit("Configuration_Droits", "w")) {
$mod->MxBloc("boutonsajouter", "modify", "");
}
if (!$this->xham->getDroit("Configuration_Droits", "d")) {
$mod->MxBloc("boutonsenlever", "modify", "");
}
if (!$this->xham->getDroit("Configuration_Droits", "a")) {
$mod->MxBloc("creation", "delete");
}
if (!$this->xham->getDroit("Configuration_Droits", "a")) {
$mod->MxBloc("suppression", "delete");
}
} else {
// Si MajDroits est tranmis, alors on lance la mise à jour du droit.
if (isset($_POST['MajDroits']) || isset($_POST['MajDroits_x'])) {
$this->majDroits();
}
// Récupération de la liste des groupes.
$tab = $this->listeGroupes();
// Récupération de la liste des droits du groupe.
$dro = $this->listeDroits();
// Chargement du template.
$mod = new ModeliXe("GestionDesDroits.mxt");
$mod->SetModeliXe();
$act[0] = "Gestion des privilèges";
$act[1] = "Attribution des droits";
// Remplissage des champs.
$mod->MxSelect("action", "action", isset($_POST['action']) ? $_POST['action'] : '', $act, '', '', "onChange=reload(this.form)");
$mod->MxSelect("groupe", "idgroupe", $_POST['idgroupe'], $tab, '', '', "onChange=reload(this.form)");
$mod->MxHidden("hidden", "navi=" . $this->xham->genNavi($this->xham->getNavi(0), $this->xham->getNavi(1), "MajDroits"));
if (count($dro['iddroit']) > 0) {
$mod->MxText("titres", "<tr><th>Libellé</th><th>Description</th><th title='lecture'>R</th><th title='écriture'>W</th><th title='modifier'>M</th><th title='effacer'>D</th><th title='administrer'>A</th>");
} else {
$mod->MxText("titres", "<tr><th>Ce groupe ne possède aucun droit dans cette application.</th></tr>");
}
// On parcourt chaque droit attribué au groupe, et on ajoute
// une ligne au template pour gérer les privilèges.
for ($i = 0; isset($dro['iddroit'][$i]); $i++) {
$bin = sprintf("%05b", $dro['valeur'][$i]);
$mod->MxText("listedroits.libelle", $dro['libelle'][$i]);
$mod->MxText("listedroits.description", $dro['descriptiondroit'][$i]);
$mod->MxCheckerField("listedroits.R", "checkbox", "R" . $dro['iddroit'][$i], 1, $bin[4] ? true : false, "title='Lecture'");
$mod->MxCheckerField("listedroits.W", "checkbox", "W" . $dro['iddroit'][$i], 1, $bin[3] ? true : false, "title='Ecriture'");
$mod->MxCheckerField("listedroits.M", "checkbox", "M" . $dro['iddroit'][$i], 1, $bin[2] ? true : false, "title='Modification'");
$mod->MxCheckerField("listedroits.D", "checkbox", "D" . $dro['iddroit'][$i], 1, $bin[1] ? true : false, "title='Effacement'");
$mod->MxCheckerField("listedroits.A", "checkbox", "A" . $dro['iddroit'][$i], 1, $bin[0] ? true : false, "title='Administration'");
$mod->MxBloc("listedroits", "loop");
}
$mod->MxHidden("boutons.hidden2", "navi=" . $this->xham->genNavi($this->xham->getNavi(0), $this->xham->getNavi(1), ""));
if (!$this->xham->getDroit("Configuration_Droits", "m")) {
$mod->MxBloc("boutons", "modify", "");
}
}
} else {
// Dans ce cas, on affiche seulement la liste des groupes disponibles.
$tab = $this->listeGroupes();
$mod = new ModeliXe("ListeGroupes.mxt");
$mod->SetModeliXe();
$mod->MxSelect("groupe", "idgroupe", isset($_POST['idgroupe']) ? $_POST['idgroupe'] : '', $tab, '', '', "onChange=reload(this.form)");
$mod->MxHidden("hidden", "navi=" . $this->xham->genNavi($this->xham->getNavi(0), $this->xham->getNavi(1)));
}
/*
if ( ! ereg ( ".*".PRODKEYW.".*", URL ) AND URL ) {
$mod -> MxUrl ( "lienMaj", URLNAVI.$session->genNavi ( $session->getNavi(0), $session->getNavi(1), "MajDroitsProd" ) ) ;
$mod -> MxImage ( "imgMaj", URLIMGMAJ, "Envoyer en production" ) ;
}
*/
$this->af .= $mod->MxWrite("1");
//ajout cervetti, javascript descriptions droits
$this->af .= $this->genJavaTitles();
}
}
function tarifsNGAP()
{
global $session;
//On a lancer le rapatriement des tarifs depuis Pastel
if ($_POST['imgCalcul_x'] and $session->getDroit("CCAM_TarifsNGAP", "w")) {
$req = new clResultQuery();
$res = $req->Execute("Fichier", "Tarifs_getTarifNGAP", array(), "ResultQuery");
eko($res);
$mail = "";
for ($i = 0; isset($res[LC][$i]); $i++) {
$lc = $res[LC][$i];
unset($param);
//if ($res[TARIF][$i]!="0"){ // code de Christophe Boulet
if ($res[TARIF][$i] >= 0) {
// modification François Derock
$param[tarif] = str_replace(",", ".", $res[TARIF][$i]);
$req = new clResultQuery();
unset($paramRq);
$paramRq[cw] = "lc='{$lc}'";
$res2 = $req->Execute("Fichier", "CCAM_getLC", $paramRq, "ResultQuery");
//eko($res2[INDIC_SVC]);
if ($res2[INDIC_SVC][2]) {
$requete = new clRequete(CCAM_BDD, "ccam_lettres_cle", $param);
$retourRequete = $requete->updRecord("lc='{$lc}'");
} else {
$param[lc] = $param[lcNat] = $lc;
$requete = new clRequete(CCAM_BDD, "ccam_lettres_cle", $param);
$retourRequete = $requete->addRecord();
}
} else {
$mail .= "{$lc}, ";
}
}
if ($mail) {
$mail = substr($mail, 0, -2);
$content_type = "Content-Type: text/html; charset=\"iso-8859-1\"";
$head = "From: " . Erreurs_MailApp . "\n" . $content_type . "\n";
$sujetMail = "Terminal des urgences : Mise à jour des tarifs des lettres-clé NGAP";
$txtMsg = "<b>Anomalie : </b>La mise à jour des tarifs (source PASTEL) renvoit '0' pour les lettres-clé suivantes : {$mail}<br>\r\n\t\t\t==> Les tarifs n'ont pas été mis à jour pour ces lettres-clés<p>\r\n\t\t\t<i>Ce mail est envoyé automatiquement</i>";
mail(Erreurs_Mail . "," . Erreurs_Mail_WebMaster, $sujetMail, $txtMsg, $head);
//
$retourInfos[erreur] = "Certains tarifs sont à '0' dans PASTEL. Un mail de synthèse a été envoyé. Leur mise à jour a été annulée.";
} else {
$content_type = "Content-Type: text/html; charset=\"iso-8859-1\"";
$head = "From: " . Erreurs_MailApp . "\n" . $content_type . "\n";
$sujetMail = "Terminal des urgences : Mise à jour des tarifs des lettres-clé NGAP";
$txtMsg = "Les correspondances nationales et les tarifs ont été mis à jour à partir des données PASTEL<p>\r\n\t\t<i>Ce mail est envoyé automatiquement</i>";
mail(Erreurs_Mail . "," . Erreurs_Mail_WebMaster, $sujetMail, $txtMsg, $head);
//
$retourInfos[infos] = "Les correspondances nationales et les tarifs ont été mis à jour à partir des données PASTEL";
}
}
//On a validé les modifications
if ($_POST['imgValider_x'] and $session->getDroit("CCAM_TarifsNGAP", "w")) {
$req = new clResultQuery();
unset($paramRq);
$paramRq[cw] = "lc!=''";
$res = $req->Execute("Fichier", "CCAM_getLC", $paramRq, "ResultQuery");
//eko($res[INDIC_SVC]);
for ($i = 0; isset($res[lc][$i]); $i++) {
$lc = $res[lc][$i];
$varLC = "LC_" . $lc;
$tarifLC = "tarif_" . $lc;
unset($param);
$param[lcNat] = $_POST[$varLC];
$param[tarif] = str_replace(",", ".", $_POST[$tarifLC]);
$requete = new clRequete(CCAM_BDD, "ccam_lettres_cle", $param);
$retourRequete = $requete->updRecord("lc='{$lc}'");
}
$retourInfos[infos] = "Les correspondances nationales et les tarifs ont été modifiés";
}
// Appel du template
$mod = new ModeliXe("CCAM_TarifsNGAP.mxt");
$mod->SetModeliXe();
if ($retourInfos[infos]) {
$this->infos = $retourInfos[infos];
} elseif ($retourInfos[erreur]) {
$this->erreurs = $retourInfos[erreur];
}
if ($session->getDroit("CCAM_TarifsNGAP", "w")) {
if (!$_POST['imgModifier_x']) {
$mod->MxFormField("modifier.imgModifier", "image", "imgModifier", "", "src=\"" . URLIMG . "modifier2.gif\" align=\"abscenter\" \r\n\t\t\ttitle=\"Modifier les correspondances nationales et les tarifs\"");
$mod->MxFormField("maj.imgCalcul", "image", "imgCalcul", "", "src=\"" . URLIMG . "calculer.gif\" align=\"abscenter\" \r\n\t\t\ttitle=\"Rapatrier les tarifs depuis PASTEL\"");
$mod->MxBloc("valider", "delete");
} else {
$mod->MxFormField("valider.imgValider", "image", "imgValider", "", "src=\"" . URLIMG . "Ok.gif\" align=\"abscenter\" \r\n\t\t\ttitle=\"Valider les modifications\"");
$mod->MxFormField("valider.imgAnnuler", "image", "imgAnnuler", "", "src=\"" . URLIMG . "annuler2.gif\" align=\"abscenter\" \r\n\t\t\ttitle=\"Annuler les modifications\"");
$mod->MxBloc("maj", "delete");
$mod->MxBloc("modifier", "delete");
}
} else {
$mod->MxBloc("modifier", "delete");
$mod->MxBloc("valider", "delete");
$mod->MxBloc("maj", "delete");
}
$req = new clResultQuery();
unset($paramRq);
$paramRq[cw] = "lc!=''";
$res = $req->Execute("Fichier", "CCAM_getLC", $paramRq, "ResultQuery");
//eko($res[INDIC_SVC]);
for ($i = 0; isset($res[lc][$i]); $i++) {
$lc = $res[lc][$i];
$mod->MxText("ligneLC.LC", $lc);
if (!$_POST['imgModifier_x']) {
$mod->MxText("ligneLC.LCnat", $res[lcNat][$i]);
$mod->MxText("ligneLC.tarif", $res[tarif][$i]);
} else {
$varLC = "LC_" . $lc;
$mod->MxFormField("ligneLC.LCnat", "text", $varLC, $res[lcNat][$i], "size=\"10\"");
$tarifLC = "tarif_" . $lc;
$mod->MxFormField("ligneLC.tarif", "text", $tarifLC, $res[tarif][$i], "size=\"10\"");
}
$mod->MxBloc("ligneLC", "loop");
}
//Ne jamais afficher les boutons suivants
// Affichage ou non du champs d'informations.
if ($this->infos) {
$mod->MxText("informations.infos", $this->infos);
} else {
$mod->MxBloc("informations", "delete");
}
// Affichage ou non du champs d'erreurs.
if ($this->erreurs) {
$mod->MxText("erreurs.errs", $this->erreurs);
} else {
$mod->MxBloc("erreurs", "delete");
}
$mod->MxHidden("hidden", "navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1)));
$this->af .= $mod->MxWrite("1");
}
function addDocForm()
{
global $session;
global $errs;
// Récupération des catégories existantes.
$param[cw] = "";
$req = new clResultQuery();
$cat = $req->Execute("Fichier", "getCategoriesDocuments", $param, "ResultQuery");
for ($i = 0; isset($cat[categorie][$i]); $i++) {
$tab[$cat[categorie][$i]] = $cat[categorie][$i];
}
// Chargement du template.
$mod = new ModeliXe("EditionDocument.mxt");
$mod->SetModeliXe();
$mod->MxBloc("modText", "modify", " ");
$mod->MxBloc("Modifier", "modify", " ");
$mod->MxBloc("Supprimer", "modify", " ");
$mod->MxText("contenu", '');
$mod->MxSelect("listeCategories", "listeCategories", '', $tab, '', '', "size=\"1\"");
$mod->MxFormField("nomDoc", "text", "nomDoc", '', "size=\"31\" maxlength=\"50\"");
$mod->MxFormField("newCategorie", "text", "newCategorie", '', "size=\"31\" maxlength=\"50\"");
$mod->MxHidden("hidden", "navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1), "validAddDoc"));
// Si le droit d'écriture est présent, on affiche le bouton "Ajouter".
if (!$session->getDroit("Administration_Documents", "w")) {
$mod->MxBloc("Ajouter", "modify", " ");
}
return $mod->MxWrite("1");
}
function addPatientPresent()
{
global $session;
global $listeMois;
global $options;
// Si la confirmation d'ajout est présente, alors on ajoute le nouveau patient dans la table.
if ($_POST['ValiderAjouter'] or $_POST['ValiderAjouter_x']) {
global $errs;
// Préparation de la date d'admission.
$date = new clDate();
$dateN = new clDate($_POST['naissance']);
/*if ( $options -> getOption ( "DoubleEtablissement" ) AND ! ( $options -> getOption ( 'DoubleSansCom' ) ) ) {
$req = new clResultQuery ;
$ras = $req -> Execute ( "Fichier", "getMaxIdToulon", array(), "ResultQuery" ) ;
$max = 1 ;
for ( $j = 0 ; isset ( $ras['idpatient'][$j] ) ; $j++ )
if ( $ras['idpatient'][$j] > $max ) $max = $ras['idpatient'][$j] ;
$max++ ;
eko ( "Double Etablissement : Calcul du max ($max)" ) ;
$data['idpatient'] = $max ;
}*/
// Remplissage des champs pour la requête.
$data['idu'] = "X";
$data['ilp'] = "X";
$data['nsej'] = "X";
$data['uf'] = $options->getOption("AjoutManuelUF");
$data['sexe'] = $_POST['sexe'];
$data['prenom'] = $_POST['prenom'];
$data['nom'] = $_POST['nom'];
$data['dt_admission'] = $date->getDatetime();
$data['dt_naissance'] = $dateN->getDatetime();
$data['adresse_libre'] = $_POST['adresse'];
$data['adresse_cp'] = $_POST['cp'];
$data['adresse_ville'] = $_POST['ville'];
$data['telephone'] = $_POST['telephone'];
$data['salle_examen'] = $_POST['salle'];
$data['dest_souhaitee'] = $_POST['destSouhaitee'];
$data['dest_attendue'] = $_POST['destAttendue'];
$data['adresseur'] = $_POST['adresseur'];
$data['medecin_urgences'] = $_POST['medecin'];
if ($_POST['medecin']) {
$data[dt_examen] = $date->getDatetime();
}
$data['recours_categorie'] = $_POST['categorieRecours'];
$data['manuel'] = 1;
// Préparation de la requête.
$requete = new clRequete(BDD, PPRESENTS, $data);
// Exécution de la requête.
$resu = $requete->addRecord();
// On signale les éventuelles erreurs rencontrées.
if ($resu['error']) {
$errs->addErreur("clListesPatients : Erreur lors de la bascule d'un patient attendu en patient présent (" . $resu[error] . ").");
}
$param['table'] = PPRESENTS;
$param['cw'] = "WHERE idu='X'";
$req = new clResultQuery();
$res = $req->Execute("Fichier", "getPatients", $param, "ResultQuery");
for ($i = 0; isset($res['idpatient'][$i]); $i++) {
$data2['idu'] = "MANU" . $res['idpatient'][$i];
$data2['ilp'] = "MANU" . $res['idpatient'][$i];
$data2['nsej'] = "MANU" . $res['idpatient'][$i];
// Préparation de la requête.
$requete = new clRequete(BDD, PPRESENTS, $data2);
// Exécution de la requête.
$requete->updRecord("idpatient='" . $res['idpatient'][$i] . "'");
header('Location:' . URLNAVI . $session->genNavi($session->getNavi(0)));
}
} else {
// Sinon, nous affichons le formulaire d'ajout d'un nouveau patient présent.
// Chargement du template ModeliXe.
$mod = new ModeliXe("addPresent.html");
$mod->SetModeliXe();
// Préparation du titre, des images, des urls...
$mod->MxText("titre", "Ajouter un nouveau patient présent");
$mod->MxImage("imgClose", URLIMGFER, "Annuler");
$mod->MxUrl("lienClose", URLNAVI . $session->genNavi($session->getNavi(0)));
// Champs IDU, IPP, et nsej...
// $mod -> MxFormField ( "idu", "text", "idu", $_POST['idu'], "size=\"47\" maxlength=\"50\"" ) ;
// $mod -> MxFormField ( "ilp", "text", "ilp", $_POST['ilp'], "size=\"47\" maxlength=\"50\"" ) ;
// $mod -> MxFormField ( "nsej", "text", "nsej", $_POST['nsej'], "size=\"47\" maxlength=\"50\"" ) ;
// Champs de l'état civil du patient.
$data['M'] = "Homme";
$data['F'] = "Femme";
$data['I'] = "Indéterminé";
$javascript1 = XhamTools::genAjax('onKeyUp', 'getPatients', 'navi=' . $session->genNavi('Ajax', 'getPatientsSortis'));
$javascript3 = XhamTools::genAjax('onChange', 'getPatients', 'navi=' . $session->genNavi('Ajax', 'getPatientsSortis'));
$javascript1 = XhamTools::genAjaxWithTempo('getPatients', 'navi=' . $session->genNavi('Ajax', 'getPatientsSortis'));
$mod->MxSelect("sexe", "sexe", $_POST['sexe'], $data, '', '', 'class="w300" ' . "{$javascript3}");
$mod->MxFormField("prenom", "text", "prenom", $_POST['prenom'], "size=\"47\" maxlength=\"50\" {$javascript1} {$javascript3}");
$mod->MxFormField("nom", "text", "nom", $_POST['nom'], "size=\"47\" maxlength=\"50\" {$javascript1} {$javascript3}");
// Gestion des champs de la date de naissance.
$_POST['naissance'] = date('d/m/Y');
$mod->MxFormField("naissance", "text", "naissance", $_POST['naissance'], "id=\"naissance\"");
// Adresse et téléphone du patient.
$mod->MxFormField("adresse", "text", "adresse", $_POST['adresse'], "size=\"47\" maxlength=\"128\"");
$mod->MxFormField("telephone", "text", "telephone", $_POST['telephone'], "size=\"47\" maxlength=\"64\"");
$mod->MxFormField("cp", "text", "cp", $_POST['cp'], "size=\"5\" maxlength=\"5\"");
$mod->MxFormField("ville", "text", "ville", $_POST['ville'], "size=\"38\" maxlength=\"64\"");
// Préparation des listes dynamiques.
$listeCom = new clListes("Recours", "recup");
$listeGen = new clListesGenerales("recup");
$listeMedecins = $listeGen->getListeItems("Médecins", "1", '', '', "1");
$listeSalles = $listeGen->getListeItems("Salles d'examens", "1", '', '', "1");
$listeCategoriesRecours = $listeCom->getListes("", "1");
$listeDestSouhaitees = $listeGen->getListeItems("Destinations souhaitées", "1", '', '', "1");
$listeDestAttendues = $listeGen->getListeItems("Destinations attendues", "1", '', '', "1");
// Affichage des listes dynamiques.
$mod->MxSelect("medecin", "medecin", $_POST['medecin'], $listeMedecins, '', '', 'class="w300"');
$mod->MxSelect("salle", "salle", $_POST['salle'], $listeSalles, '', '', 'class="w300"');
$mod->MxSelect("categorieRecours", "categorieRecours", $_POST['categorieRecours'], $listeCategoriesRecours, '', '', 'class="w300"');
$mod->MxSelect("destSouhaitee", "destSouhaitee", $_POST['destSouhaitee'], $listeDestSouhaitees, '', '', 'class="w300"');
$mod->MxSelect("destAttendue", "destAttendue", $_POST['destAttendue'], $listeDestAttendues, '', '', 'class="w300"');
// Suppression du bouton de modification inutile ici.
$mod->MxBloc("modifier", "modify", " ");
// Variable de navigation.
$mod->MxHidden("hidden", "navi=" . $session->genNavi($session->getNavi(0), "addPatientPresent"));
// Récupération du code HTML généré par le template ModeliXe.
$this->af .= $mod->MxWrite("1");
}
}
function genAffichage()
{
if ($this->xham->getDroit("Configuration_Utilisateurs", "r")) {
if ($_POST['iduser'] == "CREATION") {
// Chargement du template ModeliXe.
$mod = new ModeliXe("CreationUtilisateur.mxt");
} else {
// Chargement du template ModeliXe.
$mod = new ModeliXe("GestionDesUtilisateurs.mxt");
}
$mod->SetModeliXe();
if ($this->infos) {
$mod->MxText("informations.infos", $this->infos);
} else {
$mod->MxBloc("informations", "modify", " ");
}
if ($this->erreurs) {
$mod->MxText("erreurs.errs", $this->erreurs);
} else {
$mod->MxBloc("erreurs", "modify", " ");
}
$listeUsers = $this->getUtilisateurs("Choisissez un utilisateur", "Création d'un utilisateur", "CREATION");
$mod->MxSelect("iduser", "iduser", $_POST['iduser'], $listeUsers, '', '', "onChange=reload(this.form)");
if ($_POST['iduser'] == "CREATION") {
//$mod -> MxText ( "iduserselect.uid", "Généré automatiquement" ) ;
$mod->MxFormField("iduserselect.uid", "text", "uid", $_POST['uid'], "size=\"24\" maxlength=\"32\"");
$mod->MxFormField("iduserselect.fnom", "text", "nom", $_POST['nom'], "size=\"24\" maxlength=\"32\"");
$mod->MxFormField("iduserselect.fprenom", "text", "prenom", $_POST['prenom'], "size=\"24\" maxlength=\"32\"");
$mod->MxFormField("iduserselect.fmail", "text", "mail", $_POST['mail'], "size=\"24\" maxlength=\"48\"");
$mod->MxFormField("iduserselect.password.pwd1", "password", "pwd1", "", "size=\"24\" maxlength=\"16\"");
$mod->MxFormField("iduserselect.password.pwd2", "password", "pwd2", "", "size=\"24\" maxlength=\"16\"");
} else {
$mod->MxText("confirmation", $this->confirmation);
if (isset($_POST['iduser']) && $_POST['iduser']) {
$param[cw] = "WHERE idutilisateur='" . $_POST['iduser'] . "'";
$res = $this->xham->Execute("Fichier", "getUtilisateurs", $param, "ResultQuery");
if ($res[INDIC_SVC][2]) {
if (!$_POST['uid']) {
$_POST['uid'] = $res[uid][0];
}
if (!$_POST['nom']) {
$_POST['nom'] = $res[nom][0];
}
if (!$_POST['prenom']) {
$_POST['prenom'] = $res[prenom][0];
}
if (!$_POST['mail']) {
$_POST['mail'] = $res[mail][0];
}
// Remplissage des champs.
$mod->MxText("iduserselect.uid", $res[uid][0]);
$mod->MxFormField("iduserselect.fnom", "text", "nom", $res[nom][0], "size=\"24\" maxlength=\"32\"");
$mod->MxFormField("iduserselect.fprenom", "text", "prenom", $res[prenom][0], "size=\"24\" maxlength=\"32\"");
$mod->MxFormField("iduserselect.fmail", "text", "mail", $res[mail][0], "size=\"24\" maxlength=\"48\"");
$mod->MxFormField("iduserselect.password.pwd1", "password", "pwd1", "", "size=\"24\" maxlength=\"16\"");
$mod->MxFormField("iduserselect.password.pwd2", "password", "pwd2", "", "size=\"24\" maxlength=\"16\"");
$groupes = $this->getGroupesAffectes();
$mod->MxSelect("iduserselect.groupesdispos", "groupesdispos[]", $_POST['groupesdispos'], $this->getGroupesDisponibles($groupes), '', '', "size=\"11\" multiple=\"yes\"");
$mod->MxSelect("iduserselect.groupesaffect", "groupesaffect[]", $_POST['groupesaffect'], $this->getGroupesAffectes2($groupes), '', '', "size=\"11\" multiple=\"yes\"");
if (!$this->xham->getDroit("Configuration_Utilisateurs", "m")) {
$mod->MxBloc("iduserselect.boutonannuler", "modify", " ");
$mod->MxBloc("iduserselect.boutonenlever", "modify", " ");
$mod->MxBloc("iduserselect.boutonajouter", "modify", " ");
$mod->MxBloc("iduserselect.boutonmodifier", "modify", " ");
}
if (!$this->xham->getDroit("AgirETQ", "r")) {
$mod->MxBloc("boutonagirETQ", "delete");
} else {
$mod->MxHidden("boutonagirETQ.hidden", "iduser="******"Configuration_Utilisateurs", "d")) {
$mod->MxBloc("iduserselect.boutonsupprimer", "modify", " ");
}
} else {
$mod->MxBloc("iduserselect", "modify", " ");
$mod->MxBloc("boutonagirETQ", "delete");
}
} else {
$mod->MxBloc("iduserselect", "modify", " ");
$mod->MxBloc("boutonagirETQ", "delete");
}
}
// Variable de navigation.
$mod->MxHidden("hidden", "navi=" . $this->xham->genNavi($this->xham->getNavi(0), $this->xham->getNavi(1)));
// On retourne le code HTML généré.
return $mod->MxWrite("1");
}
}
function getFormAjouter($nomListe)
{
global $options;
global $session;
// Chargement du template.
$mod = new ModeliXe("AjouterListeItem.mxt");
$mod->SetModeliXe();
$mod->MxText("formDeb", '<form method="post" action="index.php?#' . $nomListe . '">');
// Nom de la liste.
$mod->MxText("nomListe", $nomListe);
// Champs texte pour entrer le nom de l'item.
$mod->MxText("nomItem", "Valeur :");
$mod->MxFormField("nomItemF", "text", "nomItemF", isset($_POST['valeur']) ? $_POST['valeur'] : '', "size=\"31\" maxlength=\"50\"");
// Si le classement est manuel dans cette liste, alors on affiche une liste de positions possibles.
if ($options->getOption($nomListe) == "Manuel") {
$mod->MxText("placer", "Placer :");
$data = $this->getListeItems($nomListe, 1, 1);
$mod->MxSelect("placerF", "placerF", '', $data, '', '', "size=\"1\"");
}
if ($nomListe == "Destinations attendues" or $nomListe == "Destinations confirmées chir") {
$mod->MxText("formType.type", "Type :");
$data2['T'] = "Transfert";
$data2['H'] = "Hospitalisation";
$data2['D'] = "Décès";
$data2['E'] = "Externe";
$data2['6'] = "Hospitalisation à domicile";
$data2['7'] = "Structure d'hébergement médicosociale";
$data2['F'] = "Fugue";
$data2['S'] = "Sortie contre avis médical";
$data2['P'] = "Partie sans attendre prise en charge";
$data2['R'] = "Réorientation directe sans soins";
$data2['X'] = "Erreur (sans ATU)";
$mod->MxSelect("formType.typeF", "typeF", 'H', $data2, '', '', "size=\"1\"");
if ($nomListe == "Destinations attendues") {
$destpmsi = '';
$tabD['#'] = "--";
$tabD['1'] = "MCO";
$tabD['2'] = "Soins de suite ou réadaptation";
$tabD['3'] = "Soins de longue durée";
$tabD['4'] = "Psychiatrie";
$mod->MxSelect("speDestConf.destPMSI", "destpmsi", $destpmsi, $tabD, '', '', "size=\"1\"");
$ori = '';
$tabO['#'] = '--';
$tabO['HDT'] = "Hosp. sur la demande d'un tiers";
$tabO['HO'] = "Hospitalisation d'office";
$tabO['SC'] = "Surveillance continue";
$tabO['SI'] = "Soins intensifs";
$tabO['REA'] = "Réanimation";
$tabO['UHCD'] = "UHCD";
$tabO['MED'] = "Médecine hors SC, SI, REA";
$tabO['CHIR'] = "Chirurgie hors SC, SI, REA";
$tabO['OBST'] = "Obstétrique hors SC, SI, REA";
$mod->MxSelect("speDestConf.Orientation", "ori", $ori, $tabO, '', '', "size=\"1\"");
} else {
$mod->MxBloc('speDestConf', 'delete');
}
} elseif ($nomListe == "Médecins") {
$mod->MxText("formType.type", "Type :");
$data2['U'] = "Urgentiste";
$data2['P'] = "Pédiatre";
$data2['F'] = "Sage-femme";
$data2['G'] = "Gynécologie-Obstétrique";
$mod->MxSelect("formType.typeF", "typeF", '', $data2, '', '', "size=\"1\"");
$mod->MxBloc('speDestConf', 'delete');
} else {
$mod->MxBloc("formType", "modify", " ");
$mod->MxBloc('speDestConf', 'delete');
}
if ($nomListe == "Médecins") {
$mod->MxText("formLibre.libre", "ADELI :");
$mod->MxFormField("formLibre.libreF", "text", "libreF", $_POST['libreF'], "size=\"31\" maxlength=\"50\"");
} elseif ($nomListe == "I.D.E.") {
$mod->MxText("formLibre.libre", "ADELI :");
$mod->MxFormField("formLibre.libreF", "text", "libreF", $_POST['libreF'], "size=\"31\" maxlength=\"50\"");
} elseif ($options->getOption($nomListe . " Id")) {
$mod->MxText("formLibre.libre", "Identifiant :");
$mod->MxFormField("formLibre.libreF", "text", "libreF", $_POST['libreF'], "size=\"31\" maxlength=\"50\"");
} else {
$mod->MxBloc("formLibre", "modify", " ");
}
// Génération de la variable de navigation.
$mod->MxHidden("hidden", "navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1), "ValiderAjouter", $nomListe));
return $mod->MxWrite("1");
}
function getFormModListe()
{
global $session;
global $options;
// Chargement du template.
$mod = new ModeliXe("CCAM_GestionItemsComplexes2.mxt");
$mod->SetModeliXe();
$mod->MxBloc("ajouter", "modify", " ");
if (!$session->getDroit("CCAM_" . $this->type, "m")) {
$mod->MxBloc("modifier", "modify", " ");
}
if (!$session->getDroit("CCAM_" . $this->type, "d")) {
$mod->MxBloc("supprimer", "modify", " ");
}
// Nom de la liste.
$mod->MxText("nomListe", "Modifier la catégorie \"" . stripslashes($_POST['liste']) . "\" ");
if ($this->type == "ListeMédecins") {
// Recherche de l'uf de la categorie stripslashes($session->getNavi ( 4 ) )
$paramuf[cw] = "WHERE idDomaine='" . CCAM_IDDOMAINE . "' AND nomitem='LISTE' AND nomliste='" . $_REQUEST["liste"] . "' AND categorie='" . $this->type . "'";
$requf = new clResultQuery();
$resuf = $requf->Execute("Fichier", "CCAM_getListesComplexes2", $paramuf, "ResultQuery");
$mod->MxText("uf", "Uf :");
$mod->MxFormField("ufF", "text", "ufF", $resuf["code"][0], "size=\"31\" maxlength=\"16\"");
}
// Champs texte pour entrer le nom de l'item.
$mod->MxText("nomItem", "Nom :");
$mod->MxFormField("nomItemF", "text", "nomItemF", stripslashes($_POST['liste']), "size=\"31\" maxlength=\"50\"");
// Si le classement est manuel dans cette liste, alors on affiche une liste de positions possibles.
if ($options->getOption("Catégories " . $this->type) == "Manuel") {
$mod->MxText("placer", "Placer :");
$data = $this->getListeListes($this->type, 1, 1, $_POST['liste']);
$param[cw] = "WHERE idDomaine='" . CCAM_IDDOMAINE . "' AND categorie='" . $this->type . "' AND nomitem='LISTE' AND nomliste='" . $_POST['liste'] . "'";
$req = new clResultQuery();
$res = $req->Execute("Fichier", "CCAM_getListesItemsComplexes", $param, "ResultQuery");
$mod->MxSelect("placerF", "placerF", $res[iditem][0], $data, '', '', "size=\"1\"");
}
// Génération de la variable de navigation.
$liste = "&liste=" . stripslashes($_POST['liste']);
$mod->MxHidden("hidden", "navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1), "gestListes", "validModListe") . $liste);
return $mod->MxWrite("1");
}
function genFormulaireActeur()
{
global $session;
if (post('AnnulerActeur_x')) {
unset($_POST['idActeur']);
}
if (isset($_POST['idActeur'])) {
$mod = new ModeliXe("FormulaireActeur.mxt");
$mod->SetModeliXe();
$param['ob'] = '';
$param['cw'] = "WHERE idActeur=" . $_POST['idActeur'];
$req = new clResultQuery();
$res = $req->Execute("Fichier", "authCodeAcces", $param, "ResultQuery");
if (post('nomActeur')) {
$nom = $_POST['nomActeur'];
} else {
$nom = $res['nomActeur'][0];
}
if (post('mailActeur')) {
$mail = $_POST['mailActeur'];
} else {
$mail = $res['mailActeur'][0];
}
if (post('password')) {
$pwd = $_POST['password'];
} else {
$pwd = $res['password'][0];
}
if (post('idActeur')) {
$mod->MxText("titre", "Modification de l'acteur \"" . $res['nomActeur'][0] . "\" :");
$mod->MxBloc("ajouter", "delete");
} else {
$mod->MxText("titre", "Création d'un nouveau acteur :");
$mod->MxBloc("modifier", "delete");
$mod->MxBloc("supprimer", "delete");
}
$mod->MxFormField("nomActeur", "text", "nomActeur", stripslashes($nom), "size=\"64\" maxlength=\"64\"");
$mod->MxFormField("mailActeur", "text", "mailActeur", stripslashes($mail), "size=\"64\" maxlength=\"64\"");
$mod->MxFormField("pwdActeur", "password", "password", stripslashes($pwd), "size=\"64\" maxlength=\"64\"");
$mod->MxHidden("hidden", "navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1)) . "&idActeur=" . $_POST['idActeur']);
$mod->MxHidden("agirETQ.hiddenIdActeur", "idActeur=" . $_POST['idActeur']);
if (!$session->getDroit("Administration_Acteurs", "w")) {
$mod->MxBloc("ajouter", "delete");
}
if (!$session->getDroit("Administration_Acteurs", "m")) {
$mod->MxBloc("modifier", "delete");
}
if (!$session->getDroit("Administration_Acteurs", "d")) {
$mod->MxBloc("supprimer", "delete");
}
if (!$session->getDroit("AgirETQ", "r")) {
$mod->MxBloc("agirETQ", "delete");
}
// On récupère le code HTML généré.
return $mod->MxWrite("1");
}
}
public function affFoRmX($store = false)
{
//pour commodité d'ecriture
$formxSession = $this->session;
$xml =& $this->XMLCore;
$this->debug("Entrée dans affFoRmX(), générateur de l'affichage.");
if ($xml['access'] && !$formxSession->getDroit(utf8_decode((string) $xml['access']), 'r')) {
return '';
}
//instanciation modelixe
$mod = new ModeliXe("FX_squeletteFoRmX.mxt");
$mod->SetModeliXe();
//recuperation des balises descriptives
$htmlLibelle = $xml->Libelle[0];
if ($xml->Logo[0]) {
$htmlLibelle = '<img alt="logo" src="' . $xml->Logo[0] . '" />' . $htmlLibelle;
}
$mod->MxText("titre", $htmlLibelle);
if ($xml->Objet[0]) {
$mod->MxText("objet.libobj", $xml->Objet[0]);
} else {
$mod->MxBloc("objet", "delete");
}
if ($xml->Explication[0]) {
$mod->MxText("explication.explication", $xml->Explication[0]);
} else {
$mod->MxBloc("explication", "delete");
}
//boutton de fermeture
if ($this->isWindowClose) {
$mod->MxFormField("windowClose", "image", $this->prefix . "close", "on", "value='on' src=\"" . FX_URLIMGCLO . "\"");
}
if (!(string) $xml['dontPrintPrinter']) {
$mod->MxFormField("windowPrint", "image", $this->prefix . "print", "on", "value='on' src=\"" . FX_URLIMGEDI . "\"");
}
//puis on parcourt les balises ETAPE jusqu'on en trouve une non achevée
foreach ($xml->ETAPE as $etape) {
if (!$etape['access'] || $formxSession->getDroit(utf8_decode((string) $etape['access']), 'r')) {
$this->printEtape($mod, $etape);
}
if ($etape['etat'] != 'fini') {
break;
}
}
//puis on parcourt les balises fusion
//On parcourt les balises FUSION
foreach ($xml->FUSION as $fusion) {
//eko("Entre fusion");
$libelle_default = (string) $fusion->Libelle[0];
if (!$fusion['access'] || $formxSession->getDroit(utf8_decode((string) $fusion['access']), 'r')) {
$fusion['etat'] = 'fini';
}
//$libelle = (string) $fusion->Libelle ;
$vars = array();
foreach ($fusion->Recup as $recup) {
$vars[] = (string) $recup['var'];
}
//debug comportement bizarre de simpleXml
if (count($vars) == 1 & !$vars[0]) {
$vars = array();
}
$varsFusions = $this->getAllValuesFromFormx($fusion['id_formx'], $vars, "", "moreinfos");
$i = 0;
$nb = $varsFusions['INDIC_SVC'][2];
//Transfo du tableau
$varsFusions2 = array();
$tab_oef = array();
foreach ($varsFusions as $key => $value) {
if (!ereg("^infosmore_(.*)", $key, $tab_oef)) {
for ($i = 0; $i < $nb; $i++) {
$varsFusions2[$nb - $i - 1][$key] = $varsFusions[$key][$i];
$varsFusions2[$nb - $i - 1]["infos_creation"] = $varsFusions["infosmore_dt_creation"][$i] . " " . $varsFusions["infosmore_auteur"][$i];
}
}
}
for ($i = 0; $i < $nb; $i++) {
//eko($libelle_default);
$this->current_fusion = $varsFusions2[$i];
//eko($this->current_fusion);
if (!$libelle_default) {
$fusion->Libelle[0] = (string) $this->getValueFrom("fusion:" . $fusion->Libelle['var']);
} else {
$fusion->Libelle[0] = (string) $libelle_default . " " . $this->current_fusion["infos_creation"];
}
$this->printEtape($mod, $fusion);
$fusion->Libelle[0] = $libelle_default;
unset($this->current_fusion);
}
}
//on indique en caché la référence de formulaire pour traitemenent ulterieur des données POST
$mod->MxHidden('hidden1', $this->prefix . "INSTANCE=" . $this->idInstance);
$mod->MxHidden('hidden2', 'navi=' . $formxSession->genNavi($formxSession->getNavi(0), $formxSession->getNavi(1), $formxSession->getNavi(2), $formxSession->getNavi(3)));
if (!$this->ya_un_cal) {
$mod->MxBloc("JavaCAL", "delete");
}
//javascript dynamique global au formulaire
$mod->MxText("js", $this->js);
$af = $mod->MxWrite("1");
if ($store) {
$this->af .= $af;
}
//tout affichage peut impliquer une mise à jour en base
//( 1er affichage charge les valeurs nom prenoms)
//il y a eu un changement d'adresse...
//2009/01 : je commente la ligne suivante qui me semble obsolete, à recetter.
// $this->saveInstance();
return $af;
}
function getFormNGAP($paramForm)
{
global $session;
$mod = new ModeliXe("CCAM_FormNGAP.mxt");
$mod->SetModeliXe();
unset($param);
$param[nomListe] = "Lettres-clé NGAP";
$param[idDomaine] = 2;
$tabLC = $this->tableauValeurs("CCAM_getListeLC", $param, "");
$mod->MxSelect("LC1", "LC1", $paramForm[LC1], $tabLC, '', '', "class=\"select2\"");
$mod->MxFormField("coeff1", "text", "coeff1", $paramForm[coeff1], "size=\"3\"");
$mod->MxSelect("LC2", "LC2", $paramForm[LC2], $tabLC, '', '', "class=\"select2\"");
$mod->MxFormField("coeff2", "text", "coeff2", $paramForm[coeff2], "size=\"3\"");
$mod->MxSelect("LC3", "LC3", $paramForm[LC3], $tabLC, '', '', "class=\"select2\"");
$mod->MxFormField("coeff3", "text", "coeff3", $paramForm[coeff3], "size=\"3\"");
$mod->MxFormField("coeffKARE", "text", "coeffKARE", $paramForm[coeffKARE], "size=\"3\"");
$af = $mod->MxWrite("1");
return $af;
}
