function genAffichage()
{
global $session;
if (isset($_POST['Annuler']) or isset($_POST['Annuler_x'])) {
$_POST['idGroupe'] = '';
} elseif ($session->getDroit("Configuration_Groupes", "w") and (isset($_POST['Ajouter']) or isset($_POST['Ajouter_x']))) {
$text = $this->addGroupe();
} elseif ($session->getDroit("Configuration_Groupes", "m") and (isset($_POST['Modifier']) or isset($_POST['Modifier_x']))) {
$text = $this->modGroupeV();
$_POST['idGroupe'] = '';
} elseif ($session->getDroit("Configuration_Groupes", "d") and (isset($_POST['Supprimer']) or isset($_POST['Supprimer_x']))) {
$text = $this->delGroupe();
$_POST['idGroupe'] = '';
} elseif ($session->getDroit("Configuration_Groupes", "m") and isset($_POST['idGroupe'])) {
$text = $this->modGroupe();
}
if ((isset($_POST['Affecter']) or isset($_POST['Affecter_x'])) and $session->getDroit("Configuration_Groupes", "w")) {
$this->affecterGroupes();
}
if ((isset($_POST['Enlever']) or isset($_POST['Enlever_x'])) and $session->getDroit("Configuration_Groupes", "d")) {
$this->enleverGroupes();
}
// Chargement du template ModeliXe.
$mod = new ModeliXe("GestionDesGroupes.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", " ");
}
$listeGroupesAffectes = $this->getGroupesAffectes();
$listeGroupesNonAffectes = $this->getGroupesNonAffectes($listeGroupesAffectes);
$mod->MxSelect("nonAffectes", "idGroupesNonAffectes[]", '', $listeGroupesNonAffectes, '', '', "size=\"15\" multiple=\"yes\"");
$mod->MxSelect("Affectes", "idGroupesAffectes[]", '', $listeGroupesAffectes, '', '', "size=\"15\" multiple=\"yes\"");
$tab = $this->listeGroupes();
$mod->MxText("gestiongroupe", isset($text) ? $text : '');
$mod->MxSelect("listeGroupes", "idGroupe", isset($_POST['idGroupe']) ? $_POST['idGroupe'] : '', $tab, '', '', "size=\"15\" onclick=reload(this.form)");
// Génération de la variable de navigation.
$mod->MxHidden("hidden", "navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1)));
if (!$session->getDroit("Configuration_Groupes", "w")) {
$mod->MxBloc("nouveau", "modify", " ");
}
return $mod->MxWrite("1");
}
function genFiltres()
{
global $session;
$this->getListeDates();
$this->getListeActions();
$this->getListeTypes();
// Chargement du template ModeliXe.
$mod = new ModeliXe("CCAM_ExportActes.html");
$mod->SetModeliXe();
// Affichage des filtres.
$mod->MxSelect('listeDates', 'filtreDate', $this->filtreDate, $this->getListeDates(), '', '', "onChange=\"reload(this.form)\" style=\"width: 200px;\"");
$mod->MxSelect('listeTypes', 'type', $this->type, $this->getListeTypes(), '', '', "onChange=\"reload(this.form)\" style=\"width: 200px;\"");
$mod->MxSelect('listeActions', 'action', $this->action, $this->getListeActions(), '', '', "onChange=\"reload(this.form)\" style=\"width: 200px;\"");
// Calcul de la variable de navigation.
$mod->MxHidden("hidden", "navi=" . $session->genNaviFull());
$this->genFiltre();
$this->genAffichage($mod);
// Récupération du code HTML généré par le template.
$this->af .= $mod->MxWrite("1");
}
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 __construct()
{
global $session;
// Chargement du template ModeliXe.
$mod = new ModeliXe("ListeBE.mxt");
$mod->SetModeliXe();
$fs = array('Tous les messages à traiter', 'Les changements d\'UF', 'Les sorties', 'Les dernières actions effectuées');
$mod->MxSelect('filtre', 'f', isset($_REQUEST['f']) ? stripslashes($_REQUEST['f']) : '', $fs, '', '', "onChange=reload(this.form)");
$mod->MxText("listeBE", $this->genListe());
// Récupération du code HTML généré.
$mod->MxHidden("hidden", "navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1)));
$this->af .= $mod->MxWrite("1");
}
function genAffichage()
{
global $session;
global $options;
// Chargement du template ModeliXe.
$mod = new ModeliXe("ExportV2.html");
$mod->SetModeliXe();
$j = XhamTools::genAjax('onChange', 'getExportV2', 'navi=' . $session->genNavi('Ajax', 'getExportV2'));
$mod->MxSelect('listeDates', 'dt_sortie', $_REQUEST['dt_sortie'], $this->getListeDates(), '', '', 'id="listeDates" onChange="reload(this.form)"');
$mod->MxText('listeExportV2', $this->getResultats("get"));
// Variable de navigation.
$mod->MxHidden("hidden", "navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1), $session->getNavi(2)));
// On retourne le code HTML généré par le template.
$this->af .= $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)
{
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 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 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 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 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 cotationActes()
{
global $session;
// Appel du template
$mod = new ModeliXe("CCAM_CotationActes.mxt");
$mod->SetModeliXe();
$mod->MxText("titreFormulaire", "Cotation des actes");
//Initialisation des valeurs
!$_POST['idListeSelection1'] ? $idListeSelection1 = "tous" : ($idListeSelection1 = $_POST['idListeSelection1']);
//Ajout des actes sélectionnés dans la liste des actes affectés à la liste des actes
//rattachés au patient en cours
if ($_POST['aDroite_x']) {
$this->infos = $this->addActesPatient();
}
//Si on a choisi de modifier
if ($_POST['modifierActe_x']) {
$idActeModif = $_POST['modifierActe'];
$this->infos = $this->modifyActesPatient($idActeModif);
} elseif ($_POST['supprimerActe_x']) {
$idActeSuppr = $_POST['supprimerActe'];
$this->infos = $this->delActesPatient($idActeSuppr);
}
//if ($retourInfos[infos]) $this->infos=$retourInfos[infos];
//Récupération des valeurs pour Selection1
unset($param);
$param[idDomaine] = CCAM_IDDOMAINE;
$param[type] = "ANAT";
$tabListeSelection1 = $this->tableauValeurs("CCAM_getListeActes", $param, "Choisir une famille d'actes");
//Liste des tri
!$_POST['tri'] ? $tri = "frequence" : ($tri = $_POST['tri']);
$tabTri[code] = "par code";
$tabTri[libelle] = "par libellé";
$tabTri[frequence] = "par fréquence d'utilisation décroissante";
$mod->MxSelect("tri", "tri", $tri, $tabTri, '', '', "onChange=\"reload(this.form)\" size=\"3\"");
//Récupération des actes pour la liste de gauche en ignorant les valeurs de la liste de droite
//en fonction de la famille sélectionnéee dans Selection1
unset($paramRelation);
unset($paramA);
$paramRelation[idDomaine] = CCAM_IDDOMAINE;
$paramA[idDomaine] = CCAM_IDDOMAINE;
if ($idListeSelection1 and $idListeSelection1 != "aucun#") {
$paramA[idListeSelection1] = $idListeSelection1;
$paramRelation[idEvent] = $this->idEvent;
if ($idListeSelection1 == "tous") {
$paramA[cw] = " and rel.idActe not like 'NGAP%')\r\n\t\t\tor (rel.idActe like 'NGAP%' and rel.cotationNGAP <>''";
if ($tri == "code") {
$paramA[order] = "rel.idActe";
} elseif ($tri == "libelle") {
$paramA[order] = "rel.libelleActe";
} elseif ($tri == "frequence") {
$paramA[order] = "rel.frequence desc,rel.idActe";
}
$requete = "CCAM_getActesNonListe";
} else {
$paramA[idListeSelection1] = $idListeSelection1;
$paramA[cw] = "and (rel.idActe not like 'NGAP%' or \r\n\t\t\t\trel.idActe like 'NGAP%' and act.cotationNGAP<>'')";
if ($tri == "code") {
$paramA[order] = "act.idActe";
} elseif ($tri == "libelle") {
$paramA[order] = "act.libelleActe,act.idActe";
} elseif ($tri == "frequence") {
$paramA[order] = "act.frequence desc";
}
$requete = "CCAM_getActesAnatomie";
}
$tabListeGauche = $this->valeursListeGauche($requete, "CCAM_getActesCotes", $paramA, $paramRelation, "Choisir un acte");
} else {
$tabListeGauche[0] = "Choisir un acte";
}
//Récupération des actes côtés pour le patient en cours
unset($param);
$param[idDomaine] = CCAM_IDDOMAINE;
$param[idEvent] = $this->idEvent;
$req = new clResultQuery();
$res = $req->Execute("Fichier", "CCAM_getActesCotes", $param, "ResultQuery");
//newfct(gen_affiche_tableau,$res[INDIC_SVC]);
if ($res[INDIC_SVC][2] == 0) {
$mod->MxBloc("actesCotes.action", "modify", " ");
} else {
for ($i = 0; isset($res[identifiant][$i]); $i++) {
$mod->MxText("actesCotes.codeActe", $res[identifiant][$i]);
$mod->MxText("actesCotes.libActe", $res[libelle][$i]);
$mod->MxText("actesCotes.action.codeActe", $res[identifiant][$i]);
$mod->MxText("actesCotes.action.libActe", $res[libelle][$i]);
$mod->MxBloc("actesCotes", "loop");
}
}
//Gestion du template
$mod->MxText("titreSelection1", "Familles d'actes : ");
$mod->MxSelect("idListeSelection1", "idListeSelection1", $idListeSelection1, $tabListeSelection1, '', '', "onChange=reload(this.form) class=\"selectfamille\"");
$mod->MxText("titreDispo", "Actes et packs disponibles");
$mod->MxText("titreAffecte", "Actes affectés au patient");
//Afficher les boutons suivants si droits autorisés
if (!$session->getDroit("CCAM_Decoupage", "w")) {
$mod->MxBloc("flDroite", "modify", " ");
}
//Ne jamais afficher les boutons suivants
$mod->MxBloc("diagnostics", "modify", " ");
// 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.errs", $this->erreurs);
} else {
$mod->MxBloc("erreurs", "modify", " ");
}
$mod->MxSelect("listeGauche", "listeGauche[]", '', $tabListeGauche, '', '', "size=\"10\" multiple=\"yes\"");
$mod->MxHidden("hidden", "navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1), $session->getNavi(2)));
return $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 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 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");
}
function gestionConsult()
{
global $session;
global $options;
// Appel du template permettant la saisie des consultations spécialisées
$mod = new ModeliXe("CCAM_Consult.mxt");
$mod->SetModeliXe();
$mod->MxImage("imgQuitter", URLIMG . "QuitterSansValider.gif");
$mod->MxUrl("lienQuitter", URLNAVI . $session->genNavi($session->getNavi(0), $session->getNavi(1), $session->getNavi(2)));
//Initialisation des valeurs
if (!$_POST['idListeSelection1']) {
$idListeSelection1 = "tous";
} else {
$idListeSelection1 = $_POST['idListeSelection1'];
}
($_POST['aDroite_x'] or $_POST['aDroite']) ? $aDroite = 1 : "";
($_POST['sortir_x'] or $_POST['sortir']) ? $sortir = 1 : "";
//Ajout des consultants sélectionnés dans la liste des consultants disponibles à la liste des consultants
//rattachés au patient en cours
if ($aDroite or $sortir) {
$retourInfos = $this->addConsultPatient();
if ($retourInfos[infos]) {
$this->infos = $retourInfos[infos];
} elseif ($retourInfos[erreur]) {
$this->erreurs = $retourInfos[erreur];
}
}
if (!$sortir) {
//Si on a choisi de supprimer une consultation
if ($_POST['supprimerConsult_x'] or $_POST['supprimerConsult']) {
$idConsultSuppr = $_POST['supprimerConsult'];
$this->infos = $this->delConsultPatient($idConsultSuppr);
}
if ($retourInfos[infos]) {
$this->infos = $retourInfos[infos];
}
if ($retourInfos[erreur]) {
$this->erreurs = $retourInfos[erreur];
}
//Récupération des valeurs pour Selection1
unset($param);
$param[idDomaine] = CCAM_IDDOMAINE;
$tabListeSelection1 = $this->tableauValeurs("CCAM_getListeSpe", $param, "Choisir une spécialité");
//Récupération des consult pour la liste de gauche en ignorant les valeurs de la liste de droite
//en fonction de la spécialité sélectionnée dans Selection1
unset($paramRelation);
unset($paramA);
$paramRelation[idDomaine] = CCAM_IDDOMAINE;
$paramRelation[idEvent] = $this->idEvent;
$paramA[idDomaine] = CCAM_IDDOMAINE;
if ($idListeSelection1 != "tous") {
$paramA[cw] = "and nomListe='{$idListeSelection1}'";
} else {
$paramA[cw] = "";
}
$tabListeGauche = $this->valeursListeGauche("CCAM_getConsultListeGauche", "CCAM_getConsultCotes", $paramA, $paramRelation, "Choisir un consultant");
$mod->MxSelect("consultBlocGauche.listeGauche", "listeGauche[]", '', $tabListeGauche, '', '', "size=\"20\" multiple=\"yes\"");
//Récupération des consult côtés pour le patient en cours
unset($param);
$param[idDomaine] = CCAM_IDDOMAINE;
$param[idEvent] = $this->idEvent;
$req = new clResultQuery();
$res = $req->Execute("Fichier", "CCAM_getConsultCotes", $param, "ResultQuery");
//newfct(gen_affiche_tableau,$res[INDIC_SVC]);
//eko($res);
if (!$session->getDroit("CCAM_CONSULT_" . $this->typeListe, "d")) {
$mod->MxBloc("consultBlocDroite.consultCotes.actionSuppr", "delete");
}
if ($res[INDIC_SVC][2] == 0) {
$mod->MxBloc("consultBlocDroite.consultCotes", "delete");
} else {
$mod->MxBloc("consultBlocDroite.aucunConsult", "delete");
for ($i = 0; isset($res[identifiant][$i]); $i++) {
$mod->MxText("consultBlocDroite.consultCotes.speConsult", $res[spe][$i]);
$mod->MxText("consultBlocDroite.consultCotes.nomConsultant", $res[libelle][$i]);
$mod->MxText("consultBlocDroite.consultCotes.actionSuppr.idConsultSuppr", $res[codeActe][$i]);
$mod->MxBloc("consultBlocDroite.consultCotes", "loop");
}
}
/*list($anneeNais,$moisNais,$jourNais)=explode("-",$this->dtnai);
if ($this->lieuInterv=="0") $lieuInterv=""; else $lieuInterv=", ".$this->lieuInterv;
$mod->MxText("infosPatient",$this->nomu." ".$this->pren.", né(e) le ".$jourNais."/".$moisNais."/".$anneeNais.
$lieuInterv);*/
$mod->MxText("infosPatient", $this->nomu . " " . ucfirst(strtolower($this->pren)));
$mod->MxText("titreDispo", "Consultants disponibles");
$mod->MxText("titreAffecte", "Consultants affectés au patient");
//Gestion du template
$mod->MxSelect("idListeSelection1", "idListeSelection1", $idListeSelection1, $tabListeSelection1, '', '', "onChange=reload(this.form)");
//Afficher les boutons suivants si droits autorisés
if (!$session->getDroit("CCAM_CONSULT_" . $this->typeListe, "w")) {
$mod->MxBloc("flDroite", "delete");
$mod->MxBloc("flSortir", "delete");
}
//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");
}
if ($sortir) {
$mod->MxHidden("hidden", "navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1), $session->getNavi(2)));
} else {
$mod->MxHidden("hidden", "navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1), $session->getNavi(2), "DetailConsult"));
}
return $this->af .= $mod->MxWrite("1");
}
}
function Transfert()
{
global $session;
// Chargement du template ModeliXe.
$mod = new ModeliXe("Transfert.mxt");
$mod->SetModeliXe();
// Récupération des passages précédents.
if (isset($_POST['DestinationAttendue'])) {
$param['nomitem'] = $_POST['DestinationAttendue'];
} else {
$param['nomitem'] = addslashes(stripslashes($this->patient->getDestinationAttendue()));
}
$req = new clResultQuery();
$res = $req->Execute("Fichier", "getTypeDestinationAttendue", $param, "ResultQuery");
//newfct ( gen_affiche_tableau, $res[INDIC_SVC] ) ;
if ($res['localisation'][0] == "T") {
// Si toutes les conditions sont réunies, alors on met à jour le moyen de transport associé au patient.
if (isset($_POST['listeMoyens']) and $session->getDroit($this->type . "_Transfert", "m")) {
$session->setLogSup("Mise à jour des informations Transfert");
$this->patient->setAttribut("MoyenTransport", $_POST['listeMoyens']);
$this->patient = new clPatient($this->idpatient, $this->type);
}
// Si toutes les conditions sont réunies, alors on met à jour le motif de transfert associé au patient.
if (isset($_POST['listeMotifs']) and $session->getDroit($this->type . "_Transfert", "m")) {
$this->patient->setAttribut("MotifTransfert", $_POST['listeMotifs']);
$this->patient = new clPatient($this->idpatient, $this->type);
}
// Si toutes les conditions sont réunies, alors on met à jour le motif de transfert associé au patient.
if (isset($_POST['listeDestPMSI']) and $session->getDroit($this->type . "_Transfert", "m")) {
$this->patient->setAttribut("DestPMSI", $_POST['listeDestPMSI']);
$this->patient = new clPatient($this->idpatient, $this->type);
}
// Si toutes les conditions sont réunies, alors on met à jour le motif de transfert associé au patient.
if (isset($_POST['listeOrients']) and $session->getDroit($this->type . "_Transfert", "m")) {
$this->patient->setAttribut("Orientation", $_POST['listeOrients']);
$this->patient = new clPatient($this->idpatient, $this->type);
}
$listeGen = new clListesGenerales("recup");
$listeMotifs = $listeGen->getListeItems("Motifs Transfert", "1", '', '', "1");
if ($session->getDroit($this->type . "_Transfert", "m")) {
$mod->MxSelect("transfert.bloctrans.listeMotifs", "listeMotifs", $this->patient->getMotifTransfert(), $listeMotifs, '', '', "onChange=\"reload(this.form)\"");
} else {
$mod->MxText("transfert.bloctrans.Motif", $this->patient->getMotifTransfert());
}
$listeMoyens = $listeGen->getListeItems("Moyens de transport", "1", '', '', "1");
if ($session->getDroit($this->type . "_Transfert", "m")) {
$mod->MxSelect("transfert.bloctrans.listeMoyens", "listeMoyens", $this->patient->getMoyenTransport(), $listeMoyens, '', '', "onChange=\"reload(this.form)\"");
} else {
$mod->MxText("transfert.bloctrans.Moyen", $this->patient->getMoyenTransport());
}
} elseif ($res['localisation'][0] == "H") {
$mod->MxBloc("transfert", "modify", "");
} else {
$mod->MxBloc("transfert", "modify", "");
}
// Variable de navigation.
$mod->MxHidden("transfert.hidden", "navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1), $session->getNavi(2), "majTransfert"));
// On retourne le code HTML généré par le template.
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 showLogs()
{
global $session;
// Chargement du template ModeliXe.
$mod = new ModeliXe("rpuShowLogs.html");
$mod->SetModeliXe();
$r = opendir(URLRPULOGS);
while ($fic = readdir($r)) {
if ($fic != "." and $fic != "..") {
$tabLogs[$fic] = $fic;
}
}
closedir($r);
rsort($tabLogs);
if (!is_array($tabLogs)) {
$tabLogs = array();
}
$mod->MxSelect('listeLogs', 'nomLog', $_POST['nomLog'], $tabLogs, '', '', 'onChange="reload(this.form)"');
$mod->MxHidden('hidden', 'navi=' . $session->genNavi($session->getNavi(0), $session->getNavi(1)));
if (!$_POST['nomLog']) {
$_POST['nomLog'] = 0;
}
//current($tabLogs) ;
eko(URLRPULOGS . $_POST['nomLog']);
eko($tabLogs[$_POST['nomLog']]);
$mod->MxText('logsRpu', fread(fopen(URLRPULOGS . $tabLogs[$_POST['nomLog']], "r"), filesize(URLRPULOGS . $tabLogs[$_POST['nomLog']])));
$this->af .= $mod->MxWrite("1");
}
function genAffichage()
{
global $session;
global $options;
// Chargement du template ModeliXe.
$outputLignes = array();
$mod = new ModeliXe("ExportAPHM.mxt");
$mod->SetModeliXe();
// Initialisation des dates en fonction de l'état actuel :
// A la date du jour si aucune valeur n'a été passée.
if ($_POST['date2']) {
$dt1 = new clDate($_POST['date1']);
$dt2 = new clDate($_POST['date2']);
} else {
$dt2 = new clDate(date("Y-m-d 00:00:00"));
$dt1 = new clDate(date("Y-m-d 00:00:00"));
$dt1->addDays(-1);
}
// Retrait d'un jour à la date1 si date1 == date2
if ($dt1->getTimestamp() == $dt2->getTimestamp()) {
$dt1->addDays(-1);
}
// Inversion des dates 1 et 2 si la date 1 est supérieur à la date 2.
if ($dt1->getTimestamp() > $dt2->getTimestamp()) {
$tmp_dt3 = $dt1->getTimestamp();
$tmp_dt4 = $dt2->getTimestamp();
$dt1 = new clDate($tmp_dt4);
$dt2 = new clDate($tmp_dt3);
}
// Calcul de la liste des valeurs possibles pour la date1.
$old = '';
for ($dt = new clDate(DATELANCEMENT); $dt->getTimestamp() < $dt2->getTimestamp(); $dt->addDays(1)) {
if ($old == $dt->getDate("Y-m-d")) {
$dt->addHours(5);
$enleverHeure = 1;
} else {
$enleverHeure = 0;
}
$old = $dt->getDate("Y-m-d");
$dttmp = new clDate($dt->getDate("Y-m-d"));
$listeDates1[$dttmp->getTimestamp()] = $dt->getDate("d-m-Y");
// if ( $enleverHeure ) $dt -> addHours ( -2 ) ;
//eko ( $dttmp->getDatetime ( ).' -> '.$dt->getDatetime ( ) ) ;
}
if (!is_array($listeDates1)) {
$listeDates1 = array();
}
// Calcul de la liste des valeurs possibles pour la date2.
$dtj = new clDate(date("Y-m-d 00:00:00"));
$dtj->addDays(1);
$dt = new clDate(DATELANCEMENT);
$old = '';
for ($dt->addDays(1); $dt->getTimestamp() <= $dtj->getTimestamp(); $dt->addDays(1)) {
if ($old == $dt->getDate("Y-m-d")) {
$dt->addHours(5);
$enleverHeure = 1;
} else {
$enleverHeure = 0;
}
$old = $dt->getDate("Y-m-d");
$dttmp = new clDate($dt->getDate("Y-m-d"));
$listeDates2[$dttmp->getTimestamp()] = $dt->getDate("d-m-Y");
//if ( $enleverHeure ) $dt -> addHours ( -2 ) ;
//eko ( $dttmp->getDatetime ( ).' -> '.$dt->getDatetime ( ) ) ;
}
if (!is_array($listeDates2)) {
$listeDates2 = array();
}
// Fabrication des listes dans ModeliXe.
$mod->MxSelect("date1", "date1", $dt1->getTimestamp(), $listeDates1);
$mod->MxSelect("date2", "date2", $dt2->getTimestamp(), $listeDates2);
// Si le bouton "Chercher" n'a pas été pressé, alors on n'affiche pas
// le bloc contenant le lien vers l'export.
if (!$_POST['Chercher'] and !$_POST['Chercher_x']) {
$mod->MxBloc("donnees", "modify", " ");
} else {
// Affichage du lien vers le fichier contenant l'export.
// Récupération de tous les patients entre les deux dates données.
//Le calcul commence ici
$req = new clResultQuery();
$param[table] = PSORTIS;
/*
// En fonction du filtre sélectionné.
switch ( $_POST['filtre'] ) {
//case 'norm': $filter = "AND salle_examen NOT LIKE 'UHCD%'" ; break ;
ca//se 'uhcd': $filter = "AND salle_examen LIKE 'UHCD%'" ; break;
case 'norm': $filter = "AND uf!=".$options->getOption('numUFUHCD')."" ; break ;
case 'uhcd': $filter = "AND uf=".$options->getOption('numUFUHCD')."" ; break;
default: $filter = "" ; break ;
}
*/
if ($_POST['idpassage']) {
$param['cw'] = " WHERE ilp = '" . $_POST['idpassage'] . "' ";
} else {
$param['cw'] = " WHERE dt_admission BETWEEN '" . $dt1->getDatetime() . "' AND '" . $dt2->getDatetime() . "' ";
}
//$param[cw] = " p, logs_mails m WHERE p.idpatient=m.idpatient AND dt_naissance>'1932-01-01 00:00:00' AND `dt_mail` >= '2006-10-01 00:00:00' AND type_mail='Procédure dépistage maltraitance'" ;
$res = $req->Execute("Fichier", "getPatients", $param, "ResultQuery");
// newfct ( gen_affiche_tableau, $res[INDIC_SVC] ) ;
//eko ( $res['INDIC_SVC'] ) ;
if ($res[INDIC_SVC][2] > 1) {
$s = "s";
}
// Affichage d'un résumé des résultats.
$mod->MxText("donnees.nombre", $res[INDIC_SVC][2]);
$mod->MxText("donnees.resultat", "entrée{$s} exportée{$s}");
if (!$options->getOption('CCAMExterne')) {
$jj = new clCCAMExportActesDiags(array('dateDebut' => $dt1->getDate('Y-m-d'), 'dateFin' => $dt2->getDate('Y-m-d')));
$jj->initTableauActesDiag($res);
}
// Parcours des différents résultats.
$tabResFinal = array();
$nbMaxActesNGAP = 0;
$indiceMaxNbActesNgap = 0;
//PARCOURS
for ($i = 0; isset($res[idpatient][$i]); $i++) {
// Préparation des différentes dates pour affichage.
$tabLigne = array();
$naissance = new clDate($res[dt_naissance][$i]);
$dtn = $naissance->getDate("d/m/Y");
if ($res[dt_admission][$i] != '0000-00-00 00:00:00') {
$admission = new clDate($res[dt_admission][$i]);
$dta = $admission->getDate("d/m/Y");
$hma = $admission->getDate("H:i");
} else {
$dta = '--';
$hma = '--';
}
if ($res[dt_examen][$i] != '0000-00-00 00:00:00') {
$examen = new clDate($res[dt_examen][$i]);
$dte = $examen->getDate("d/m/Y");
$hme = $examen->getDate("H:i");
} else {
$dte = '--';
$hme = '--';
}
if ($res[dt_sortie][$i] != '0000-00-00 00:00:00') {
$sortie = new clDate($res[dt_sortie][$i]);
$dts = $sortie->getDate("d/m/Y");
$hms = $sortie->getDate("H:i");
} else {
$dts = '--';
$hme = '--';
}
$uf = $res[uf][$i];
$ufUHCD = $options->getOption('numUFUHCD');
$ufUHCDrepere = $options->getOption('numUFUHCDrepere');
if ($ufUHCD && ereg($ufUHCD, $uf) or $ufUHCDrepere && ereg($ufUHCDrepere, $uf)) {
$isuhcd = 1;
} else {
$isuhcd = 0;
}
//le patient est uhcd mais pas dans une salle uhcd ?
$isVirtualUhcd = false;
if ($ufUHCD && !ereg($options->getOption('FiltreSalleUHCD'), $res['salle_examen'][$i])) {
$isVirtualUhcd = true;
$codeUm = $options->getOption('UMUHCDFictif');
}
// Préparation des différents champs de l'enregistrement parcouru.
if ($res[ilp][$i]) {
$ilp = $res[ilp][$i];
} else {
$ilp = "-";
}
if ($res[uf][$i]) {
$uf = $res[uf][$i];
} else {
$uf = "-";
}
if ($res[dt_UHCD][$i] and $isuhcd) {
$dtUHCD = $res[dt_UHCD][$i];
} else {
$dtUHCD = "0000-00-00 00:00:00";
}
$nbSecPassage = $sortie->getDifference($admission);
$nbHeurepassage = floor($nbSecPassage / 3600);
$nbMinpassage = floor(($nbSecPassage - $nbHeurepassage * 3600) / 60);
$strDureePassage = ($nbHeurepassage > 9 ? '' : '0') . $nbHeurepassage . ':' . ($nbMinpassage > 9 ? '' : '0') . $nbMinpassage;
$tabActesNGAP = clExportAphm::getTabListeCodesNGAP($i, $jj->tabExport);
//eko($tabActesNGAP);
$tabLigneCCAM['CODE_HOMON'] = '1';
$tabLigneCCAM['NUMSEJ'] = $res['nsej'][$i] . 'B';
$tabLigneCCAM['UM'] = $isVirtualUhcd ? $codeUm : '';
$tabLigneCCAM['DATENT'] = $dta . ' ' . $hma;
$tabLigneCCAM['DIAG_PPAL'] = $res['diagnostic_code'][$i];
$tabLigneCCAM['DIAG_RELI'] = '';
//eko(clExportAphm::getTabListeDiagsCCAM ($i,$jj -> tabExport));
$tabLigneCCAM['DIAG_ASSO'] = implode(' ', clExportAphm::getTabListeDiagsCCAM($i, $jj->tabExport));
$tabLigneCCAM['NPI'] = $res['ilp'][$i] . 'B';
$tabLigneCCAM['DAT_EXAM'] = $dte . ' ' . $hme;
$tabLigneCCAM['NOM_PATRO'] = $res['nom'][$i];
$tabLigneCCAM['PRENOM'] = $res['prenom'][$i];
$tabLigneCCAM['MARITAL'] = '';
$tabLigneCCAM['SEXE'] = $res['sexe'][$i] == 'M' ? 'H' : 'F';
$tabLigneCCAM['DDN'] = $dtn;
$tabLigneCCAM['UF_EXEC'] = $res['uf'][$i];
$tabLigneCCAM['ACTES'] = implode(' ', clExportAphm::getTabListeCodesCCAM($i, $jj->tabExport));
$tabLigneCCAM['DEST_SOUHA'] = $res['dest_souhaitee'][$i];
$tabLigneCCAM['DEST_ATTEN'] = $res['dest_attendue'][$i];
$tabLigneCCAM['DUR_PASSAGE'] = $strDureePassage;
$tabLigneCCAM['CODE_GRAV'] = $res['code_gravite'][$i];
$tabLigneNGAP['NUMSEJ'] = $res['nsej'][$i] . 'B';
$tabLigneNGAP['NOM_PATRO'] = $res['nom'][$i];
$tabLigneNGAP['PRENOM'] = $res['prenom'][$i];
$tabLigneNGAP['DAT_EXAM'] = $dte . ' ' . $hme;
$tabLigneNGAP['NOM_MARITAL'] = '';
$tabLigneNGAP['DATE_PASSAGE'] = $dte . ' ' . $hme;
$tabLigneNGAP['MAJORATIONS_EVENTUELLES'] = clExportAphm::getMajoration($examen, $naissance);
for ($cmptActe = 1; isset($tabActesNGAP[$cmptActe - 1]); $cmptActe++) {
$nbMaxActesNGAP = max($nbMaxActesNGAP, $cmptActe);
$tabLigneNGAP['ACTE_' . $cmptActe] = $tabActesNGAP[$cmptActe - 1];
}
$cmptActe--;
if ($nbMaxActesNGAP == $cmptActe) {
$tabTypeNGAP = $tabLigneNGAP;
}
$outputLignesCCAM[] = implode("\t", $tabLigneCCAM);
$outputLignesNGAP[] = implode("\t", $tabLigneNGAP);
}
$headerCCAM = array();
if (isset($tabLigneCCAM)) {
foreach ($tabLigneCCAM as $k => $v) {
$headerCCAM[] = $k;
}
}
$headerNGAP = array();
foreach ($tabTypeNGAP as $k => $v) {
$headerNGAP[] = $k;
}
$ficCCAM = implode("\t", $headerCCAM) . "\n" . implode("\n", $outputLignesCCAM);
$ficNGAP = implode("\t", $headerNGAP) . "\n" . implode("\n", $outputLignesNGAP);
// Calcul du nom du fichier temporaire.
$nomfic = "exportCCAM" . date("YmdHis") . ".xls";
$nomfic2 = "exportNGAP" . date("YmdHis") . ".xls";
// Création, écriture et fermeture du fichier.
$FIC = fopen(URLCACHE . $nomfic, "w");
$FIC2 = fopen(URLCACHE . $nomfic2, "w");
fwrite($FIC, $ficCCAM);
fwrite($FIC2, $ficNGAP);
fclose($FIC);
fclose($FIC2);
// Calcul du lien vers ce fichier.
$mod->MxUrl("donnees.lienExport", URLCACHEWEB . $nomfic);
$mod->MxUrl("donnees.lienExport2", URLCACHEWEB . $nomfic2);
// On purge le répertoire temporaire de tous les fichiers qui ont plus de deux heures.
$poub = new clPoubelle(URLCACHE);
$poub->purgerRepertoire("2");
$isExport = true;
}
// Variable de navigation.
$mod->MxHidden("hidden", "navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1), $session->getNavi(2)));
// On retourne le code HTML généré par le template.
$this->af .= $mod->MxWrite("1");
}
function genAffichage()
{
global $session;
if ((post('Ajouter') or post('Ajouter_x')) and $session->getDroit("Administration_Acteurs", "w")) {
$this->ajouterActeurs();
}
if ((post('Enlever') or post('Enlever_x')) and $session->getDroit("Administration_Acteurs", "d")) {
$this->enleverActeurs();
}
if ((post('ModifierActeur') or post('ModifierActeur_x')) and $session->getDroit("Administration_Acteurs", "m")) {
$this->modifierActeur();
}
if ((post('AjouterActeur') or post('AjouterActeur_x')) and $session->getDroit("Administration_Acteurs", "w")) {
$this->ajouterActeur();
}
if ((post('SupprimerActeur') or post('SupprimerActeur_x') or post('Supprimer') or post('Supprimer_x')) and $session->getDroit("Administration_Acteurs", "d")) {
$this->supprimerActeur();
}
// Chargement du template ModeliXe.
$mod = new ModeliXe("GestionDesActeurs.mxt");
$mod->SetModeliXe();
$formulaireActeur = $this->genFormulaireActeur();
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", " ");
}
$mod->MxText("formulaireActeur", $formulaireActeur);
$listeActeurs = $this->getActeurs();
$listeGroupes = $this->getGroupes();
$mod->MxSelect("listeActeurs", "idActeur", post('idActeur'), $listeActeurs, '', '', "size=\"15\" onChange=reload(this.form)");
if (!post('idGroupe')) {
$_POST['idGroupe'] = '1';
}
$mod->MxSelect("listeGroupes", "idGroupe", $_POST['idGroupe'], $listeGroupes, '', '', "size=\"1\" onChange=reload(this.form)");
$listeActeursGroupes = $this->getActeursGroupes($_POST['idGroupe']);
$listeActeursNonGroupes = $this->getActeursNonGroupes($listeActeursGroupes);
$mod->MxSelect("nonGroupes", "idActeursNonGroupes[]", '', $listeActeursNonGroupes, '', '', "size=\"15\" multiple=\"yes\"");
$mod->MxSelect("Groupes", "idActeursGroupes[]", '', $listeActeursGroupes, '', '', "size=\"15\" multiple=\"yes\"");
$mod->MxHidden("hidden", "navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1)));
// On récupère le code HTML généré.
$this->af .= $mod->MxWrite("1");
}
function gestionActesDiags()
{
global $session;
/*(!$_POST['action'])?$action="ccam":$action=$_POST['action'];
($action=="affectation_ngap")?$nomForm="CCAM_AffectationNGAP.mxt":
$nomForm="CCAM_ListeRestreinte.mxt";*/
// Appel du template
$mod = new ModeliXe("CCAM_ListeRestreinte.mxt");
$mod->SetModeliXe();
$mod->MxText("titreFormulaire", "Association des actes aux diagnostics");
$mod->MxBloc("action", "delete");
//Initialisation des valeurs
!$_POST['idListeSelection0'] ? $idListeSelection0 = "aucun#" : ($idListeSelection0 = $_POST['idListeSelection0']);
!$_POST['idListeSelection1'] ? $idListeSelection1 = "aucun#" : ($idListeSelection1 = $_POST['idListeSelection1']);
!$_POST['idListeSelection2'] ? $idListeSelection2 = "tous" : ($idListeSelection2 = $_POST['idListeSelection2']);
//Suppression des actes sélectionnés dans la liste des actes affectés à la partie anatomique en cours
if ($_POST['aGauche_x']) {
$this->infos = $this->delActesDiags();
}
//Ajout des actes sélectionnés dans la liste des actes affectés à la partie anatomique sélectionné
if ($_POST['aDroite_x']) {
$this->infos = $this->addActesDiags();
}
/*//Validation d'une nouvelle partie anatomique ou modification, suppression d'une partie anatomique
if ($_POST['OK_x']){
if ($_POST['action2']=="creer") $retourInfos=$this->addNvxDiags();
elseif ($_POST['action2']=="modifier") $retourInfos=$this->modifyDiags();
elseif ($_POST['action2']=="supprimer") $retourInfos=$this->delDiags();
if ($retourInfos[infos]) $this->infos=$retourInfos[infos];
elseif ($retourInfos[erreur]) $this->erreurs=$retourInfos[erreur];
}
//Si on a choisi de créer une nouvelle partie anatomique
if ($_POST['ajouterSelection1_x']){
//Gestion du sous-template
unset($paramForm);
$paramForm[titreEnCours]="Saisie d'une nouvelle famille d'actes";
$paramForm[codeDiags]="sera calculé à l'insertion";
$paramForm[libActe]="";
$paramForm[action2]="creer";
$mod->MxText("form1Acte",$this->getForm1Diags($paramForm));
}
//Si on a choisi de modifier une partie anatomique
elseif ($_POST['modifierSelection1_x']){
//Récupération des infos pour le dernier acte sélectionné dans la liste
$paramRq[idActe]=$idListeSelection1;
if ($paramRq[idActe]!="" and $paramRq[idActe]!="aucun#"){
$paramRq[cw]="and idDomaine=".CCAM_IDDOMAINE;
$req=new clResultQuery;
$res=$req->Execute("Fichier","CCAM_get1Acte",$paramRq,"ResultQuery");
//newfct(gen_affiche_tableau,$res[INDIC_SVC]);
//Gestion du sous-template
unset($paramForm);
$paramForm[titreEnCours]="Modification d'une famille d'actes";
$paramForm[codeDiags]=$paramRq[idActe];
$paramForm[libActe]=$res[libelle][0];
$paramForm[action2]="modifier";
$mod->MxText("form1Acte",$this->getForm1Diags($paramForm));
}
}
//Si on a choisi de supprimer une partie anatomique
elseif ($_POST['supprimerSelection1_x']){
//Récupération des infos pour le dernier acte sélectionné dans la liste
$paramRq[idActe]=$idListeSelection1;
if ($paramRq[idActe]!="" and $paramRq[idActe]!="aucun#"){
$paramRq[cw]="and idDomaine=".CCAM_IDDOMAINE;
$req=new clResultQuery;
$res=$req->Execute("Fichier","CCAM_get1Acte",$paramRq,"ResultQuery");
//newfct(gen_affiche_tableau,$res[INDIC_SVC]);
//$cotationNGAP=$this->explodeNGAP($res[cotationNGAP][0]);
//Gestion du sous-template
unset($paramForm);
$paramForm[titreEnCours]="Suppression d'une famille d'actes";
$paramForm[codeDiags]=$paramRq[idActe];
$paramForm[libVisuActe]=$res[libelle][0];
$paramForm[action2]="supprimer";
$mod->MxText("form1Acte",$this->getForm1Diags($paramForm));
}
}*/
//Récupération des valeurs pour Selection0
unset($param);
$param[idDomaine] = CCAM_IDDOMAINE;
$tabListeSelection0 = $this->tableauValeurs("CCAM_getListeCatDiag", $param, "Choisir une catégorie de diagnostics");
//Récupération des valeurs pour Selection1
unset($param);
$param[idDomaine] = CCAM_IDDOMAINE;
$param[idListeSelection0] = addslashes(stripslashes($idListeSelection0));
$param[order] = "libelle";
$tabListeSelection1 = $this->tableauValeurs("CCAM_getListeDiags", $param, "Choisir un diagnostic");
//Récupération des valeurs pour Selection2
unset($param);
$param[cw] = "";
$tabListeSelection2 = $this->tableauValeurs("CCAM_getFamilles", $param, "Choisir une famille d'actes");
$tabListeSelection2[NGAP] = "Actes NGAP";
$tabListeSelection2[PACK] = "Packs d'actes";
//Récupération des actes pour la liste de gauche en ignorant les valeurs de la liste de droite
//en fonction de la famille sélectionnéee dans Selection1
unset($paramRelation);
unset($paramA);
$paramRelation[idDomaine] = CCAM_IDDOMAINE;
$paramRelation[cw] = "";
$paramA[idDomaine] = CCAM_IDDOMAINE;
if ($idListeSelection1 and $idListeSelection1 != "aucun#") {
$paramA[idListeSelection1] = $idListeSelection1;
$paramA[cw] = "";
$paramRelation[idListeSelection1] = $idListeSelection1;
$paramA[order] = "rel.idActe";
$paramRelation[order] = "rel.idActe";
if ($idListeSelection2 == "tous") {
$requete = "CCAM_getActesNonListe";
} elseif ($idListeSelection2 == "NGAP") {
$paramA[type] = "NGAP";
$requete = "CCAM_getAutresActesNonListe";
} elseif ($idListeSelection2 == "PACK") {
$paramA[type] = "PACK";
$requete = "CCAM_getAutresActesNonListe";
} else {
$paramA[idListeSelection2] = $idListeSelection2;
$requete = "CCAM_getActesCCAMAnatomie";
}
$tabListeGauche = $this->valeursListeGauche($requete, "CCAM_getActesDiags", $paramA, $paramRelation, "Choisir un acte");
} else {
$tabListeGauche[0] = "Choisir un acte";
}
//Récupération des actes pour la liste des actes déjà affectés
unset($param);
$param[idDomaine] = CCAM_IDDOMAINE;
$param[idListeSelection1] = $idListeSelection1;
$param[cw] = "";
$param[order] = "rel.idActe";
$tabListeDroite = $this->tableauValeurs("CCAM_getActesDiags", $param, "Choisir un acte");
//Gestion du template
$mod->MxText("titreSelection0", "Catégories de diagnostics :");
$mod->MxSelect("idListeSelection0", "idListeSelection0", stripslashes($idListeSelection0), $tabListeSelection0, '', '', "onChange=reload(this.form)");
$mod->MxText("titreSelection1", "Diagnostics :");
$mod->MxSelect("idListeSelection1", "idListeSelection1", $idListeSelection1, $tabListeSelection1, '', '', "onChange=reload(this.form)");
$mod->MxText("titreSelection2", "Familles CCAM : ");
$mod->MxSelect("idListeSelection2", "idListeSelection2", $idListeSelection2, $tabListeSelection2, '', '', "onChange=reload(this.form) class=\"selectfamille\"");
$mod->MxText("titreDispo", "Actes et packs disponibles");
$mod->MxText("titreAffecte", "Actes et packs affectés au diagnostic sélectionné");
$mod->MxText("commentaireGauche", "* Actes non côtés NGAP");
$mod->MxText("commentaireDroite", "* Actes non côtés NGAP<br><font color=\"red\">Les actes en rouge ne sont plus \r\n valides par rapport à la " . CCAM_VERSION . "</font>");
//Afficher les boutons suivants si droits autorisés
if (!$session->getDroit("CCAM_Decoupage", "w")) {
$mod->MxBloc("flDroite", "delete");
$mod->MxBloc("flGauche", "delete");
}
//Ne jamais afficher les boutons suivants
$mod->MxBloc("btnSupprimer", "delete");
$mod->MxBloc("btnAjouter", "delete");
$mod->MxBloc("btnModifier", "delete");
$mod->MxBloc("btnAjouterSelection1", "delete");
$mod->MxBloc("btnModifierSelection1", "delete");
$mod->MxBloc("btnSupprimerSelection1", "delete");
// 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->MxSelect("listeGauche", "listeGauche[]", '', $tabListeGauche, '', '', "size=\"15\" multiple=\"yes\" class=\"selectngap\"");
$mod->MxSelect("listeDroite", "listeDroite[]", '', $tabListeDroite, '', '', "size=\"15\" multiple=\"yes\" class=\"selectngap\"");
$mod->MxHidden("hidden", "navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1)));
$this->af .= $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 genAffichage($dt1, $dt2)
{
global $session;
global $options;
global $jj;
global $titreCCMU;
global $titreGEMSA;
global $titreTraumato;
$fic = '';
// Chargement du template ModeliXe.
$mod = new ModeliXe("Export.mxt");
$mod->SetModeliXe();
// Initialisation des dates en fonction de l'état actuel :
// A la date du jour si aucune valeur n'a été passée.
// Retrait d'un jour à la date1 si date1 == date2
if ($dt1->getTimestamp() == $dt2->getTimestamp()) {
$dt1->addDays(-1);
}
// Inversion des dates 1 et 2 si la date 1 est supérieur à la date 2.
if ($dt1->getTimestamp() > $dt2->getTimestamp()) {
$tmp_dt3 = $dt1->getTimestamp();
$tmp_dt4 = $dt2->getTimestamp();
$dt1 = new clDate($tmp_dt4);
$dt2 = new clDate($tmp_dt3);
}
// Calcul de la liste des valeurs possibles pour la date1.
$old = '';
for ($dt = new clDate(DATELANCEMENT); $dt->getTimestamp() < $dt2->getTimestamp(); $dt->addDays(1)) {
if ($old == $dt->getDate("Y-m-d")) {
$dt->addHours(5);
$enleverHeure = 1;
} else {
$enleverHeure = 0;
}
$old = $dt->getDate("Y-m-d");
$dttmp = new clDate($dt->getDate("Y-m-d"));
$listeDates1[$dttmp->getTimestamp()] = $dt->getDate("d-m-Y");
// if ( $enleverHeure ) $dt -> addHours ( -2 ) ;
//eko ( $dttmp->getDatetime ( ).' -> '.$dt->getDatetime ( ) ) ;
}
if (!is_array($listeDates1)) {
$listeDates1 = array();
}
// Calcul de la liste des valeurs possibles pour la date2.
$dtj = new clDate(date("Y-m-d 00:00:00"));
$dtj->addDays(1);
$dt = new clDate(DATELANCEMENT);
$old = '';
for ($dt->addDays(1); $dt->getTimestamp() <= $dtj->getTimestamp(); $dt->addDays(1)) {
if ($old == $dt->getDate("Y-m-d")) {
$dt->addHours(5);
$enleverHeure = 1;
} else {
$enleverHeure = 0;
}
$old = $dt->getDate("Y-m-d");
$dttmp = new clDate($dt->getDate("Y-m-d"));
$listeDates2[$dttmp->getTimestamp()] = $dt->getDate("d-m-Y");
//if ( $enleverHeure ) $dt -> addHours ( -2 ) ;
//eko ( $dttmp->getDatetime ( ).' -> '.$dt->getDatetime ( ) ) ;
}
if (!is_array($listeDates2)) {
$listeDates2 = array();
}
// Fabrication des listes dans ModeliXe.
$mod->MxSelect("date1", "date1", $dt1->getTimestamp(), $listeDates1, '', '', "onChange=\"reload(this.form)\"");
$mod->MxSelect("date2", "date2", $dt2->getTimestamp(), $listeDates2, '', '', "onChange=\"reload(this.form)\"");
// Gestion du filtre avec des bouttons radio.
if (!isset($_POST['filtre'])) {
$_POST['filtre'] = "tous";
}
$mod->MxCheckerField("filtre1", "radio", "filtre", "tous", $_POST['filtre'] == "tous" ? true : false);
$mod->MxCheckerField("filtre2", "radio", "filtre", "norm", $_POST['filtre'] == "norm" ? true : false);
$mod->MxCheckerField("filtre3", "radio", "filtre", "uhcd", $_POST['filtre'] == "uhcd" ? true : false);
// Si le bouton "Chercher" n'a pas été pressé, alors on n'affiche pas
// le bloc contenant le lien vers l'export.
if (!$_POST['Chercher'] and !$_POST['Chercher_x']) {
$mod->MxBloc("donnees", "modify", " ");
} else {
// Affichage du lien vers le fichier contenant l'export.
// Récupération de tous les patients entre les deux dates données.
$req = new clResultQuery();
$param[table] = PSORTIS;
// En fonction du filtre sélectionné.
switch ($_POST['filtre']) {
/*
case 'norm': $filter = "AND salle_examen NOT LIKE 'UHCD%'" ; break ;
case 'uhcd': $filter = "AND salle_examen LIKE 'UHCD%'" ; break;
*/
case 'norm':
$filter = "AND uf!=" . $options->getOption('numUFUHCD') . "";
break;
case 'uhcd':
$filter = "AND uf=" . $options->getOption('numUFUHCD') . "";
break;
default:
$filter = "";
break;
}
$param[cw] = "WHERE dt_admission BETWEEN '" . $dt1->getDatetime() . "' AND '" . $dt2->getDatetime() . "' {$filter}";
//$param[cw] = " p, logs_mails m WHERE p.idpatient=m.idpatient AND dt_naissance>'1932-01-01 00:00:00' AND `dt_mail` >= '2006-10-01 00:00:00' AND type_mail='Procédure dépistage maltraitance'" ;
$res = $req->Execute("Fichier", "getPatients", $param, "ResultQuery");
// newfct ( gen_affiche_tableau, $res[INDIC_SVC] ) ;
//eko ( $res['INDIC_SVC'] ) ;
if ($res[INDIC_SVC][2] > 1) {
$s = "s";
}
// Affichage d'un résumé des résultats.
$mod->MxText("donnees.nombre", $res[INDIC_SVC][2]);
$mod->MxText("donnees.resultat", "entrée{$s} exportée{$s}");
if (!$options->getOption('CCAMExterne')) {
$jj = new clCCAMExportActesDiags(array('dateDebut' => $dt1->getDate('Y-m-d'), 'dateFin' => $dt2->getDate('Y-m-d')));
$jj->initTableauActesDiag($res);
}
if ($options->getOption("GestionCCMU")) {
if ($res[ccmu][$i]) {
$ccmu = "\t" . $res[ccmu][$i];
} else {
$ccmu = "\t";
}
$titreCCMU = "\tCCMU";
} else {
$ccmu = '';
$titreCCMU = '';
}
if ($options->getOption("GestionGEMSA")) {
if ($res[gemsa][$i]) {
$gemsa = "\t" . $res[gemsa][$i];
} else {
$gemsa = "\t";
}
$titreGEMSA = "\tGEMSA";
} else {
$gemsa = '';
$titreGEMSA = '';
}
if ($options->getOption("GestionTraumato")) {
if ($res[traumato][$i]) {
$traumato = "\t" . $res[traumato][$i];
} else {
$traumato = "\t";
}
$titreTraumato = "\tTraumato";
} else {
$traumato = '';
$titreTraumato = '';
}
// Parcours des différents résultats.
for ($i = 0; isset($res[idpatient][$i]); $i++) {
// Préparation des différentes dates pour affichage.
set_time_limit(30);
$naissance = new clDate($res[dt_naissance][$i]);
$dtn = $naissance->getDate("d/m/Y");
if ($res[dt_admission][$i] != '0000-00-00 00:00:00') {
$admission = new clDate($res[dt_admission][$i]);
$dta = $admission->getDate("d/m/Y");
$hma = $admission->getDate("H:i");
} else {
$dta = '--';
$hma = '--';
}
if ($res[dt_examen][$i] != '0000-00-00 00:00:00') {
$examen = new clDate($res[dt_examen][$i]);
$dte = $examen->getDate("d/m/Y");
$hme = $examen->getDate("H:i");
} else {
$dte = '--';
$hme = '--';
}
if ($res[dt_sortie][$i] != '0000-00-00 00:00:00') {
$sortie = new clDate($res[dt_sortie][$i]);
$dts = $sortie->getDate("d/m/Y");
$hms = $sortie->getDate("H:i");
} else {
$dts = '--';
$hme = '--';
}
$uf = $res[uf][$i];
$ufUHCD = $options->getOption('numUFUHCD');
$ufUHCDrepere = $options->getOption('numUFUHCDrepere');
if ($ufUHCD && ereg($ufUHCD, $uf) or $ufUHCDrepere && ereg($ufUHCDrepere, $uf)) {
$isuhcd = 1;
} else {
$isuhcd = 0;
}
//eko($jj -> tabExport);
// Préparation des différents champs de l'enregistrement parcouru.
if ($res[ilp][$i]) {
$ilp = $res[ilp][$i];
} else {
$ilp = "-";
}
if ($res[uf][$i]) {
$uf = $res[uf][$i];
} else {
$uf = "-";
}
$dateUhcd = new clDate($res[dt_UHCD][$i]);
if ($res[dt_UHCD][$i] and $isuhcd) {
$dtUHCD = $dateUhcd->getDate('Y-m-d H:i:00');
} else {
$dtUHCD = "";
}
if ($res[nsej][$i]) {
$nsej = $res[nsej][$i];
} else {
$nsej = "-";
}
if ($res[nom][$i]) {
$nom = $res[nom][$i];
} else {
$nom = "-";
}
if ($res[prenom][$i]) {
$prenom = $res[prenom][$i];
} else {
$prenom = "-";
}
if ($res[sexe][$i]) {
$sexe = $res[sexe][$i];
} else {
$sexe = "-";
}
if ($res[adresse_cp][$i]) {
$adresse_cp = $res[adresse_cp][$i];
} else {
$adresse_cp = "-";
}
if ($res[medecin_traitant][$i]) {
$medecin_traitant = preg_replace("/(\r\n|\n|\r)/", " ", $res[medecin_traitant][$i]);
} else {
$medecin_traitant = "-";
}
if ($res[adresseur][$i]) {
$adresseur = $res[adresseur][$i];
} else {
$adresseur = "-";
}
if ($res[mode_admission][$i]) {
$mode_admission = $res[mode_admission][$i];
} else {
$mode_admission = "-";
}
if ($res[medecin_urgences][$i]) {
$medecin_urgences = $res[medecin_urgences][$i];
} else {
$medecin_urgences = "-";
}
if ($res[salle_examen][$i]) {
$salle_examen = $res[salle_examen][$i];
} else {
$salle_examen = "-";
}
if ($res[recours_categorie][$i]) {
$recours_categorie = $res[recours_categorie][$i];
} else {
$recours_categorie = "-";
}
if ($res[motif_recours][$i]) {
$motif_recours = $res[motif_recours][$i];
} else {
$motif_recours = "-";
}
if (!$options->getOption('getRecoursCIM10')) {
if ($res[recours_code][$i]) {
$recours_code = $res[recours_code][$i];
} else {
$recours_code = "-";
}
} else {
if ($res[recours_code][$i]) {
$recours_code = strtr($res[recours_code][$i], '.', '');
} else {
$recours_code = "-";
}
}
if ($res[code_gravite][$i]) {
$code_gravite = $res[code_gravite][$i];
} else {
$code_gravite = "-";
}
if ($res[dest_souhaitee][$i]) {
$dest_souhaitee = $res[dest_souhaitee][$i];
} else {
$dest_souhaitee = "-";
}
if ($res[dest_attendue][$i]) {
$dest_attendue = ' ' . $res[dest_attendue][$i];
} else {
$dest_attendue = "-";
}
if ($res[ide][$i]) {
$ide = $res[ide][$i];
} else {
$ide = "-";
}
if ($res[motif_transfert][$i]) {
$motif_transfert = $res[motif_transfert][$i];
} else {
$motif_transfert = "-";
}
if ($res[moyen_transport][$i]) {
$moyen_transport = $res[moyen_transport][$i];
} else {
$moyen_transport = "-";
}
if ($res[type_destination][$i]) {
$type_destination = $res[type_destination][$i];
} else {
$type_destination = "-";
}
if ($res[diagnostic_categorie][$i]) {
$diagnostic_categorie = $res[diagnostic_categorie][$i];
} else {
$diagnostic_categorie = "-";
}
if ($res[diagnostic_libelle][$i]) {
$diagnostic_libelle = $res[diagnostic_libelle][$i];
} else {
$diagnostic_libelle = "-";
}
if ($res[diagnostic_code][$i]) {
$diagnostic_code = $res[diagnostic_code][$i];
} else {
$diagnostic_code = "-";
}
if ($options->getOption("GestionCCMU")) {
if ($res[ccmu][$i]) {
$ccmu = "\t" . $res[ccmu][$i];
} else {
$ccmu = "\t";
}
$titreCCMU = "\tCCMU";
} else {
$ccmu = '';
$titreCCMU = '';
}
if ($options->getOption("GestionGEMSA")) {
if ($res[gemsa][$i]) {
$gemsa = "\t" . $res[gemsa][$i];
} else {
$gemsa = "\t";
}
$titreGEMSA = "\tGEMSA";
} else {
$gemsa = '';
$titreGEMSA = '';
}
if ($options->getOption("GestionTraumato")) {
if ($res[traumato][$i]) {
$traumato = "\t" . $res[traumato][$i];
} else {
$traumato = "\t";
}
$titreTraumato = "\tTraumato";
} else {
$traumato = '';
$titreTraumato = '';
}
// Génération de la ligne correspondant à l'enregistrement.
// $fic .= "$ilp\t$nsej\t$nom\t$prenom\t$dtn\t$sexe\t$adresse_cp\t$medecin_traitant\t$dta\t$hma\t$adresseur\t$mode_admission\t$dte\t$hme\t$medecin_urgences\t$salle_examen\t$recours_categorie\t$motif_recours\t$recours_code\t$code_gravite\t$dest_souhaitee\t$dest_attendue\t$dts\t$hms\t$ide\t$moyen_transport\t$motif_transfert\t$type_destination\t$diagnostic_categorie\t$diagnostic_libelle\t$diagnostic_code\n" ;
if ($options->getOption('CCAMExterne')) {
$fic .= "{$ilp}\t{$nsej}\t{$uf}\t{$dtn}\t{$sexe}\t{$adresse_cp}\t{$medecin_traitant}\t{$dta}\t{$hma}\t{$mode_admission}\t{$dte}\t{$hme}\t{$medecin_urgences}\t{$salle_examen}\t{$recours_categorie}\t{$motif_recours}\t{$recours_code}\t{$code_gravite}\t{$dtUHCD}" . $gemsa . $ccmu . $traumato . "\t{$dest_souhaitee}\t{$dest_attendue}\t{$dts}\t{$hms}\t{$ide}\t{$moyen_transport}\t{$motif_transfert}\t{$type_destination}\t{$diagnostic_categorie}\t{$diagnostic_libelle}\t{$diagnostic_code}\n";
} else {
$fic .= "{$ilp}\t{$nsej}\t{$uf}\t{$dtn}\t{$sexe}\t{$adresse_cp}\t{$medecin_traitant}\t{$dta}\t{$hma}\t{$mode_admission}\t{$dte}\t{$hme}\t{$medecin_urgences}\t{$salle_examen}\t{$recours_categorie}\t{$motif_recours}\t{$recours_code}\t{$code_gravite}\t{$dtUHCD}" . $gemsa . $ccmu . $traumato . "\t{$dest_souhaitee}\t{$dest_attendue}\t{$dts}\t{$hms}\t{$ide}\t{$moyen_transport}\t{$motif_transfert}\t{$type_destination}\t{$diagnostic_categorie}\t{$diagnostic_libelle}\t{$diagnostic_code}\t" . $jj->getActesDiagsPatient($i);
}
}
// Calcul du lien vers ce fichier.
}
return $fic;
}
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 gestionListes()
{
/*****************************************************************************/
global $session;
$action = "ccam";
$nomForm = "CCAM_GestionAnesthesiste.mxt";
// Appel du template
$mod = new ModeliXe($nomForm);
$mod->SetModeliXe();
$mod->MxText("titreFormulaire", "Gestion de la liste des médecins autorisés à pratiquer une anesthésie");
if ($action == "ccam") {
//Suppression d'un médecin de la liste des anesthésistes
if ($_POST['aGauche_x']) {
$this->infos = $this->delMedecins();
} elseif ($_POST['aDroite_x']) {
$this->infos = $this->addMedecins();
}
//Récupération des valeurs pour Selection1 (correspond liste des specialités)
!$_POST['idListeSelection1'] ? $idListeSelection1 = "aucun#" : ($idListeSelection1 = $_POST['idListeSelection1']);
unset($param);
$param[idDomaine] = "1";
$tabListeSelection1 = $this->tableauValeurs("CCAM_getListeSpe", $param, "Choisir une spécialité");
//Récupération des médecins pour la liste de gauche en ignorant les valeurs de la liste de droite
//en fonction de la famille sélectionnéee dans Selection1
unset($paramRelation);
unset($paramA);
$paramRelation[idDomaine] = CCAM_IDDOMAINE;
//$paramRelation[base] = CCAM_BDD;
if ($idListeSelection1 and $idListeSelection1 != "aucun#") {
$paramA[idListeSelection1] = $idListeSelection1;
$paramA[base] = CCAM_BDD;
//eko($idListeSelection1);
//eko($listeIdRelation);
$paramRelation[idListeSelection1] = $idListeSelection1;
//eko ($paramRelation);
// Si specialiste
//if ( );
if ($_POST["idListeSelection1"] == "Urgentiste") {
$elephant = "CCAM_getMedecinAListeGauche2";
} else {
if ($_POST["idListeSelection1"] == "Toutes") {
$elephant = "CCAM_getMedecinAListeGauche3";
} else {
$elephant = "CCAM_getMedecinAListeGauche";
}
}
if ($_POST["idListeSelection1"] == "Toutes") {
$tabListeGauche = $this->valeursListeGauche($elephant, "CCAM_getMedecinADomaine2", $paramA, $paramRelation, "Choisir un médecin");
} else {
$tabListeGauche = $this->valeursListeGauche($elephant, "CCAM_getMedecinADomaine", $paramA, $paramRelation, "Choisir un médecin");
}
} else {
$tabListeGauche[0] = "Choisir un médecin";
}
//Récupération des médecins pour la liste des actes déjà affectés (droite)
unset($param);
$param[idDomaine] = CCAM_IDDOMAINE;
$param[idListeSelection1] = $idListeSelection1;
if ($idListeSelection1 == "Toutes") {
$requete = "CCAM_getMedecinADomaine2";
} else {
$requete = "CCAM_getMedecinADomaine";
}
$tabListeDroite = $this->valeursListeDroite($requete, $param, "Choisir un médecin");
$js = "onDblClick=reload(this.form)";
//Gestion du template
$mod->MxText("titreSelection1", "Famille de spécialités : ");
$mod->MxSelect("idListeSelection1", "idListeSelection1", $idListeSelection1, $tabListeSelection1, '', '', "onChange=reload(this.form)");
$mod->MxText("titreDispo", "Listes des médecins disponibles");
$mod->MxText("titreAffecte", "Listes des médecins autorisés à pratiquer une anesthésie");
$mod->MxText("commentaireGauche", "");
$mod->MxText("commentaireDroite", "");
//Afficher les boutons suivants si droits autorisés
if (!$session->getDroit("CCAM_Listes", "w")) {
$mod->MxBloc("flDroite", "modify", " ");
$mod->MxBloc("flGauche", "modify", " ");
}
}
// 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.errs", $this->erreurs);
} else {
$mod->MxBloc("erreurs", "modify", " ");
}
$mod->MxSelect("listeGauche", "listeGauche[]", '', $tabListeGauche, '', '', "size=\"15\" multiple=\"yes\" class=\"selectngap\"");
$mod->MxSelect("listeDroite", "listeDroite[]", '', $tabListeDroite, '', '', "size=\"15\" multiple=\"yes\" class=\"selectngap\" ");
$mod->MxHidden("hidden", "navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1)));
$this->af .= $mod->MxWrite("1");
}
function copierPacks()
{
global $session;
/*(!$_POST['action'])?$action="ccam":$action=$_POST['action'];
($action=="affectation_ngap")?$nomForm="CCAM_AffectationNGAP.mxt":
$nomForm="CCAM_ListeRestreinte.mxt";*/
// Appel du template
$mod = new ModeliXe("CCAM_CopierPack.mxt");
$mod->SetModeliXe();
$mod->MxText("titreFormulaire", "Dupliquer les actes affectés à d'autres diagnostics");
//Initialisation des valeurs
!$_POST['idListeSelection0'] ? $idListeSelection0 = "aucun#" : ($idListeSelection0 = $_POST['idListeSelection0']);
!$_POST['idListeSelection1'] ? $idListeSelection1 = "aucun#" : ($idListeSelection1 = $_POST['idListeSelection1']);
!$_POST['idListeSelection2'] ? $idListeSelection2 = "tous" : ($idListeSelection2 = $_POST['idListeSelection2']);
//Duplication des actes pour les diagnostics sélectionnés
if ($_POST['OK_x']) {
$this->infos = $this->copierActes();
}
//Récupération des valeurs pour Selection0
unset($param);
$param[idDomaine] = CCAM_IDDOMAINE;
$tabListeSelection0 = $this->tableauValeurs("CCAM_getListeCatDiag", $param, "Choisir une catégorie de diagnostics");
//Récupération des valeurs pour Selection1
unset($param);
$param[idDomaine] = CCAM_IDDOMAINE;
$param[idListeSelection0] = addslashes(stripslashes($idListeSelection0));
$param[order] = "libelle";
$tabListeSelection1 = $this->tableauValeurs("CCAM_getListeDiags", $param, "Choisir un diagnostic");
//Récupération des valeurs pour Selection2
unset($param);
$param[cw] = "";
$tabListeSelection2 = $this->tableauValeurs("CCAM_getFamilles", $param, "Choisir une famille d'actes");
$tabListeSelection2[NGAP] = "Actes NGAP";
$tabListeSelection2[PACK] = "Packs d'actes";
//Récupération des actes pour la liste de gauche en ignorant les valeurs de la liste de droite
//en fonction de la famille sélectionnéee dans Selection1
if ($idListeSelection1 and $idListeSelection1 != "aucun#") {
//Récupération des actes affectés au diagnostic sélectionné
unset($param);
$param[idDomaine] = CCAM_IDDOMAINE;
$param[idListeSelection1] = $idListeSelection1;
$param[cw] = "";
$param[order] = "identifiant";
$req = new clResultQuery();
$res = $req->Execute("Fichier", "CCAM_getActesDiags", $param, "ResultQuery");
//eko($res[INDIC_SVC]);
$listeGauche = "";
for ($i = 0; isset($res[identifiant][$i]); $i++) {
$listeGauche .= $res[identifiant][$i] . "-" . $res[libelle][$i] . "<br>";
}
$mod->MxText("listeGauche", $listeGauche);
//Récupération des diagnostics de la liste de droite
unset($param);
$param[cw] = "and nomliste='{$idListeSelection0}' and idDomaine=" . CCAM_IDDOMAINE . " and code<>'{$idListeSelection1}'";
$tabListeDroite = $this->tableauValeurs("CCAM_getListeAutresDiags", $param, "Choisir un diagnostic");
} else {
$tabListeDroite[0] = "Choisir un diagnostic";
}
//Gestion du template
$mod->MxText("titreSelection0", "Catégories de diagnostics :");
$mod->MxSelect("idListeSelection0", "idListeSelection0", stripslashes($idListeSelection0), $tabListeSelection0, '', '', "onChange=reload(this.form)");
$mod->MxText("titreSelection1", "Diagnostics :");
$mod->MxSelect("idListeSelection1", "idListeSelection1", $idListeSelection1, $tabListeSelection1, '', '', "onChange=reload(this.form)");
$mod->MxText("titreDispo", "Actes affectés au diagnostic sélectionné");
$mod->MxText("titreAffecte", "Diagnostics vers lequels les actes seront copiés");
//Afficher les boutons suivants si droits autorisés
if (!$session->getDroit("CCAM_Decoupage", "w")) {
$mod->MxBloc("validerCopier", "delete");
}
// 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->MxSelect("listeDroite", "listeDroite[]", '', $tabListeDroite, '', '', "size=\"15\" multiple=\"yes\" class=\"selectngap\"");
$mod->MxHidden("hidden", "navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1)));
$this->af .= $mod->MxWrite("1");
}
function getStatsPages()
{
global $session;
// Date de lancement des statistiques.
$datestats = new clDate(DATESTATS);
// On récupère la liste des utilisateurs s'étant déjà connectés.
$param['cw'] = "WHERE idapplication=" . IDAPPLICATION;
$req = new clResultQuery();
$res = $req->Execute("Fichier", "getSessionsPersonnes", $param, "ResultQuery");
// Fabrication du tableau attendu par ModeliXe.
$tab['%'] = "globales";
for ($i = 0; isset($res['uid'][$i]); $i++) {
$tab[$res['uid'][$i]] = "de " . $res['uid'][$i] . " (" . $res['somme'][$i] . ")";
}
// Initialisation de l'utilisateur sélectionné et du filtre MySQL correspondant.
if (!isset($_POST['choix'])) {
if (isset($_GET['choix'])) {
$_POST['choix'] = $_GET['choix'];
} else {
$_POST['choix'] = "%";
}
}
// Application du filtre MySQL pour aller récupérer les statistiques de l'utilisateur.
$param['cw'] = "WHERE uid LIKE '" . $_POST['choix'] . "' AND idapplication=" . IDAPPLICATION;
$param['cs'] = "";
$req = new clResultQuery();
$res = $req->Execute("Fichier", "getSessionsStatistiques", $param, "ResultQuery");
// Pour chaque statistique récupérées, on incrémente une case d'un tableau avec son nombre de clic. Il y a une case
// par partie du Terminal.
$stats["Total de clics"] = 0;
for ($i = 0; isset($res['idstats'][$i]); $i++) {
if ($res['loc2'][$i]) {
if ($res['loc1'][$i]) {
if (isset($stats[$res['loc1'][$i] . "->" . $res['loc2'][$i]])) {
$stats[$res['loc1'][$i] . "->" . $res['loc2'][$i]] += $res['nombre'][$i];
} else {
$stats[$res['loc1'][$i] . "->" . $res['loc2'][$i]] = $res['nombre'][$i];
}
}
} else {
if ($res['loc1'][$i]) {
if (isset($stats[$res['loc1'][$i]])) {
$stats[$res['loc1'][$i]] += $res['nombre'][$i];
} else {
$stats[$res['loc1'][$i]] = $res['nombre'][$i];
}
}
}
// Calcul du nombre total de clic pour cet utilisateur.
$stats["Total de clics"] += $res['nombre'][$i];
}
// Chargement du template ModeliXe.
$mod = new ModeliXe("SessionsStatistiques.mxt");
$mod->SetModeliXe();
// Chargement du template ListMaker pour faire le tableau.
$list = new ListMaker("template/SessionsStatistiques.html");
// Passage des variables à transmettre et de leurs valeurs.
$list->addUserVar('navi', $session->genNavi($session->getNavi(0), $session->getNavi(1)));
$list->addUrlVar('navi', $session->genNavi($session->getNavi(0), $session->getNavi(1)));
$list->addUserVar('choix', $_POST['choix']);
$list->addUrlVar('choix', $_POST['choix']);
// Nom des colonnes du tableau.
$list->setSortColumn('col1', 'Page', 'page');
$list->setSortColumn('col2', 'Clics', 'clics');
// On alterne les couleurs en fonction de la parité de la ligne.
$list->setAlternateColor("pair", "impair");
// On parcourt le tableau précédemment calculé contenant les statistiques,
// et on les ajoute au template ListMaker.
if (is_array($stats)) {
for ($i = 0; list($key, $val) = each($stats); $i++) {
$item['page'] = $key;
$item['clics'] = $val;
$list->addItem($item);
}
}
// Affichage d'informations complémentaires si nous ne sommes pas dans le cas
// de statistiques globales.
if ($_POST['choix'] != "%") {
// Si l'utilisateur est connecté, on affiche un message le signalant.
$param['cw'] = "WHERE uid LIKE '" . $_POST['choix'] . "' AND idapplication=" . IDAPPLICATION;
$req = new clResultQuery();
$res = $req->Execute("Fichier", "getSessionsActuelles", $param, "ResultQuery");
if ($res['INDIC_SVC'][2]) {
$infos = "Cet utilisateur est actuellement connecté.<br />";
}
// Sinon, on affiche les informations de sa dernière connexion.
if (!isset($infos) or !$infos) {
// Récupération des informations.
$param['cw'] = "WHERE uid LIKE '" . $_POST['choix'] . "' AND idapplication=" . IDAPPLICATION . " ORDER BY dateslast DESC";
$req = new clResultQuery();
$res = $req->Execute("Fichier", "getSessionsHistorique", $param, "ResultQuery");
// Calcul de la durée de connexion et affichage des différentes dates.
$last = new clDate(isset($res['dateslast'][0]) ? $res['dateslast'][0] : '');
$date = new clDate(isset($res['dateshisto'][0]) ? $res['dateshisto'][0] : '');
$duree = new clDuree($last->getDifference($date));
if ((isset($res['nombre'][0]) ? $res['nombre'][0] : '0') > 1) {
$sc = "s";
} else {
$sc = '';
}
if ($duree->getMinutes() > 1) {
$sm = "s";
} else {
$sm = '';
}
if ($duree->getSeconds() > 1) {
$ss = "s";
} else {
$ss = '';
}
if ($duree->getMinutes() > 0) {
$temps = $duree->getMinutes() . " minute{$sm}";
} else {
$temps = $duree->getSeconds() . " seconde{$ss}";
}
$infos = "Dernière connexion le " . $date->getDateTextFull("à") . " (" . (isset($res['nombre'][0]) ? $res['nombre'][0] : '0') . " clic{$sc}, durée de {$temps})<br />";
$infos .= "Déconnexion enregistrée le " . $last->getDateTextFull("à") . "<br />";
}
$mod->MxText("informations", $infos);
} else {
$mod->MxText("informations", '--');
}
// On affiche la date à laquelle les stats ont commencé être enregistrées.
$mod->MxText("datestats", $datestats->getDateText());
// Affichage du tableau de stats.
$mod->MxText("table", $list->getList(isset($pagination) ? $pagination : ''));
// Affichage de la liste des personnes à sélectionner.
$mod->MxSelect("choix", "choix", $_POST['choix'], $tab, '', '', "onChange=reload(this.form)");
// Variable de navigation.
$mod->MxHidden("hidden", "navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1)));
//$this->genGraphs ( $mod ) ;
$mod->MxCheckerField("graph", "checkbox", 'graph', 1, isset($_POST['graph']) ? $_POST['graph'] ? true : false : false, "title='Graphiques' onChange=reload(this.form)");
if (isset($_POST['graph']) and $_POST['graph']) {
$this->genGraphs($mod);
$mod->MxText("graphs.clicsHeure", "<img src=\"cache/image1.png\" alt=\"Clics par heure\"></img>");
$mod->MxText("graphs.tempsHeure", "<img src=\"cache/image2.png\" alt=\"Temps par clics moyen par heure\"></img>");
$mod->MxText("graphs.clicsJour", "<img src=\"cache/image3.png\" alt=\"Clics par jour\"></img>");
} else {
$mod->MxBloc("graphs", "delete");
}
//$mod -> MxText ( "tempsJour", "<img src=cache/image4.png></img>" ) ;
// Récupération du code HTML généré.
return $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;
}
