function Valide($valid = '')
{
global $errs;
if ($valid) {
$param['cw'] = "WHERE idutilisateur=" . $_POST['iduser'];
$req = new clResultQuery();
$res = $req->Execute("Fichier", "getUtilisateurs", $param, "ResultQuery");
} else {
$param['password'] = $_POST['password'];
$param['uid'] = $_POST['login'];
$req = new clResultQuery();
$res = $req->Execute("Fichier", "authUtilisateur", $param, "ResultQuery");
}
if ($res['uid'][0] == $_POST['login'] or $res['idutilisateur'][0] == $_POST['iduser'] and $_POST['iduser']) {
$this->informations['password'] = XhamTools::chiffre($_POST['password']);
$this->informations['type'] = "MySQLInt";
$this->informations['nom'] = $res['nom'][0];
$this->informations['prenom'] = $res['prenom'][0];
$this->informations['pseudo'] = $res['uid'][0];
$this->informations['mail'] = $res['mail'][0];
$this->informations['iduser'] = $res['uid'][0];
$param[cw] = "WHERE idutilisateur='" . $res['idutilisateur'][0] . "'";
$req = new clResultQuery();
$res = $req->Execute("Fichier", "getGroupesUtilisateur", $param, "ResultQuery");
$groupes = $res['idgroupe'][0];
for ($i = 1; isset($res['idutilisateur'][$i]); $i++) {
$groupes .= "," . $res['idgroupe'][$i];
}
$this->informations['idgroupe'] = $groupes;
return 1;
}
}
function addLog($type, $description, $idcible = '')
{
if ($description != "Configuration|cron" and $description != "Importation") {
$date = new clDate();
$data['idapplication'] = IDAPPLICATION;
if (isset($session)) {
$data['iduser'] = $this->xham->user->getLogin();
} elseif (is_object($this->xham) && is_object($this->xham->user)) {
$data['iduser'] = $this->xham->user->getLogin();
} else {
$data['iduser'] = $_SESSION['informations']['iduser'] ? $_SESSION['informations']['iduser'] : "******";
}
$data['idcible'] = $idcible;
// print $this->logSup ;
$data['type'] = $type;
$data['ip'] = $_SERVER['REMOTE_ADDR'];
$data['date'] = $date->getDatetime();
$data['description'] = $description;
$finTemps = XhamTools::temps();
$tpPage = $finTemps - $this->xham->debTemps;
$data['tempsPage'] = $tpPage;
$data['tempsSQL'] = $this->xham->tpRequetes;
$data['nombreSQL'] = $this->xham->nbRequetes + 1;
// Appel de la classe Requete.
$req = new XhamRequete(BASEXHAM, TABLELOGS, $data);
// Exécution de la requete.
$res = $req->addRecord();
// print affTab ( $res ) ;
// Limitation du nombre de lignes dans la table logs... Désactivé, mais fonctionne parfaitement.
//$mini = $res['cur_id'] - 150 ;
//$res = $requete->delRecord ( "idlog<=$mini" ) ;
}
}
function initCounts()
{
if (!defined("DEFAULT_TIMEZONE")) {
define("DEFAULT_TIMEZONE", "CET");
}
if (function_exists("date_default_timezone_set")) {
date_default_timezone_set(DEFAULT_TIMEZONE);
}
$this->debTemps = XhamTools::temps();
$this->nbRequetes = 0;
$this->tpRequetes = 0;
}
function Valide($noBind = '')
{
global $errs;
$this->conn = ldap_connect(LDAP_HOST, LDAP_PORT);
ldap_set_option($this->conn, LDAP_OPT_PROTOCOL_VERSION, 3);
if (!$this->conn) {
$errs->addErreur("clAuthLdap : Connexion impossible à l'annuaire LDAP.", 1);
}
$result = ldap_search($this->conn, LDAP_BASE, "(uid=" . $_POST['login'] . ")");
$info = ldap_get_entries($this->conn, $result);
if ($noBind) {
$this->bindLDAP = 1;
} else {
$this->bindLDAP = @ldap_bind($this->conn, $info[0]['dn'], $_POST['password']);
}
if ($this->bindLDAP) {
$result = ldap_search($this->conn, LDAP_BASE, "(uid=" . $_POST['login'] . ")");
$info = ldap_get_entries($this->conn, $result);
//$this->informations['ldapdata'] = $info ;
$this->informations['password'] = XhamTools::chiffre($_POST['password']);
$this->informations['type'] = "LDAP";
$this->informations['nom'] = $info[0]["sn"][0];
$this->informations['prenom'] = $info[0]["givenname"][0];
$this->informations['iduser'] = $info[0]["uid"][0];
$this->informations['pseudo'] = $info[0]["cn"][0];
$this->informations['mail'] = $info[0]["mail"][0];
$this->informations['tel'] = $info[0]["telephonenumber"];
$this->informations['mob'] = $info[0]["mobile"];
$this->informations['org'] = $this->getOrganisations($info[0]["chhatorganisation"]);
$this->informations['equipes'] = $this->getEquipes($info[0]["chhatequipe"]);
$results = ldap_search($this->conn, LDAP_BASE, "(&(memberUid=" . $_POST['login'] . ")(objectclass=mailgroup))");
$infoGroupe = ldap_get_entries($this->conn, $results);
//tableau des groupes (definis par ldap) pour l'user
$this->informations['groupes'] = $this->getLdapGroupList($infoGroupe);
$this->informations['idgroupe'] = $this->getGroupes($info[0]["uid"][0], $info[0]["chhatequipe"], $info[0]["chhatfonction"], $info[0]["chhatorganisation"], $infoGroupe);
for ($i = 0; isset($info[0]["chhatfonction"][$i]); $i++) {
$fonctions[$i] = $this->getCN($info[0]["chhatfonction"][$i]);
}
$this->informations['fonctions'] = $fonctions;
for ($i = 0; isset($info[0]["chhatequipe"][$i]); $i++) {
$services[$i] = $this->getCN($info[0]["chhatequipe"][$i]);
}
$this->informations['service'] = $services;
// print affTab ( $info[0] ) ;
// print affTab ( $info[0]["uid"] ) ;
ldap_close($this->conn);
return 1;
} else {
}
}
function connect($valid = '')
{
global $errs;
if ($valid || $this->xham->getMode() == 'manuel') {
$param['cw'] = "WHERE idutilisateur=" . $_POST['iduser'];
$res = $this->xham->Execute("Fichier", "getUtilisateurs", $param, "ResultQuery");
} else {
$param['password'] = $_POST['password'];
$param['uid'] = $_POST['login'];
$req = new clResultQuery();
$res = $this->xham->Execute("Fichier", "authUtilisateur", $param, "ResultQuery");
}
if ($res['uid'][0] == $_POST['login'] or $res['idutilisateur'][0] == $_POST['iduser'] and $_POST['iduser']) {
$this->informations['password'] = XhamTools::chiffre($_POST['password']);
$this->informations['type'] = "MySQLInt";
$this->informations['nom'] = $res['nom'][0];
$this->informations['prenom'] = $res['prenom'][0];
$this->informations['pseudo'] = $res['uid'][0];
$this->informations['mail'] = $res['mail'][0];
$this->informations['iduser'] = $res['uid'][0];
$this->informations['fonctions'] = array();
$this->informations['tel'] = '';
$this->informations['mob'] = '';
$this->informations['org'] = '';
$this->informations['equipes'] = array();
$this->informations['service'] = array();
$this->informations['ip'] = $_SERVER['REMOTE_ADDR'];
$this->informations['navigateur'] = substr($_SERVER["HTTP_USER_AGENT"], 0, 255);
$this->informations['id'] = $res['idutilisateur'][0];
$param['cw'] = "WHERE idutilisateur='" . $res['idutilisateur'][0] . "'";
$res = $this->xham->Execute("Fichier", "getGroupesUtilisateur", $param, "ResultQuery");
$groupes = $res['idgroupe'][0];
for ($i = 1; isset($res['idutilisateur'][$i]); $i++) {
$groupes .= "," . $res['idgroupe'][$i];
}
$this->informations['idgroupe'] = $groupes;
return 1;
}
}
static function genFormBarre($nom, $val = 0, $max = 100)
{
/*return '
<div class="slider" id="'.$nom.'-div" tabIndex="1">
<input class="slider-input" id="'.$nom.'" name="'.$nom.'" value="'.$valeur.'"/>
</div>
<script type="text/javascript">
'.XhamTools::genFormBarreJS ( $nom ).'
</script>
' ;*/
return '
<table style="width: 200px; " summary="Mise en forme"><tbody><tr>
<td><div class="horizontal dynamic-slider-control slider" id="' . $nom . 'Slider" style="height: 13px; width: 200px;">
<input class="slider-input" id="' . $nom . '" name="' . $nom . '">
</div>
</div></td>
<td style="vertical-align: middle;"><input id="valeur' . $nom . '" style="width: 20px;"></td>
</tr></tbody></table>
<script type="text/javascript">
' . XhamTools::genFormBarreJS($nom, $val, $max) . '
</script>';
}
function genFichePassage($res, $i)
{
global $session;
global $options;
// Chargement du template ModeliXe.
if ($options->getOption('ModuleExport') == 'V2Allegee') {
$mod = new ModeliXe("ExportV2FicheAllegee.html");
} else {
$mod = new ModeliXe("ExportV2Fiche.html");
}
$mod->SetModeliXe();
$req = new clRequete(BDD, '', '');
$sql = "select * from export where idpatient='" . $res['idpatient'][$i] . "'";
$exp = $req->exec_requete($sql, 'resultquery');
if (isset($exp['etat1'][0]) and $exp['etat1'][0]) {
$mod->MxText('color1', 'green');
$date = new clDate($exp['date1'][0]);
$aja = XhamTools::genAjax('', 'setTraitement', 'navi=' . $session->genNaviFull() . '&idpatient=' . $res['idpatient'][$i] . '&setTraitement=invalide&type=1');
$ajax = 'onclick="' . $aja . 'inverserTraitement(' . $res['idpatient'][$i] . ',1,\'CCAM\');"';
$img = '<img src="images/gg.gif" id="img1' . $res['idpatient'][$i] . '" alt="annuler" ' . $ajax . ' style="cursor: pointer; pointer: hand;" />';
$mod->MxText('traitement1', '<div id="text1' . $res['idpatient'][$i] . '" style="display:inline;">La partie CCAM de cet export a été traitée par ' . $exp['iduser1'][0] . ' le ' . $date->getDateTextFull('à') . '</div> ' . $img);
} else {
$mod->MxText('color1', 'red');
$aja = XhamTools::genAjax('', 'setTraitement', 'navi=' . $session->genNaviFull() . '&idpatient=' . $res['idpatient'][$i] . '&setTraitement=valide&type=1');
$ajax = 'onclick="' . $aja . 'inverserTraitement(' . $res['idpatient'][$i] . ',1,\'CCAM\');"';
$img = '<img src="images/dd.gif" id="img1' . $res['idpatient'][$i] . '" alt="valider" ' . $ajax . ' style="cursor: pointer; pointer: hand;" />';
$mod->MxText('traitement1', '<div id="text1' . $res['idpatient'][$i] . '" style="display:inline;">La partie CCAM de cet export n\'est pas traitée.</div> ' . $img);
}
if (isset($exp['etat2'][0]) and $exp['etat2'][0]) {
$mod->MxText('color2', 'green');
$date = new clDate($exp['date2'][0]);
$aja = XhamTools::genAjax('', 'setTraitement', 'navi=' . $session->genNaviFull() . '&idpatient=' . $res['idpatient'][$i] . '&setTraitement=invalide&type=2');
$ajax = 'onclick="' . $aja . 'inverserTraitement(' . $res['idpatient'][$i] . ',2,\'NGAP\');"';
$img = '<img src="images/gg.gif" id="img2' . $res['idpatient'][$i] . '" alt="annuler" ' . $ajax . ' style="cursor: pointer; pointer: hand;" />';
$mod->MxText('traitement2', '<div id="text2' . $res['idpatient'][$i] . '" style="display:inline;">La partie NGAP de cet export a été traitée par ' . $exp['iduser2'][0] . ' le ' . $date->getDateTextFull('à') . '</div> ' . $img);
} else {
$mod->MxText('color2', 'red');
$aja = XhamTools::genAjax('', 'setTraitement', 'navi=' . $session->genNaviFull() . '&idpatient=' . $res['idpatient'][$i] . '&setTraitement=valide&type=2');
$ajax = 'onclick="' . $aja . 'inverserTraitement(' . $res['idpatient'][$i] . ',2,\'NGAP\');"';
$img = '<img src="images/dd.gif" id="img2' . $res['idpatient'][$i] . '" alt="valider" ' . $ajax . ' style="cursor: pointer; pointer: hand;" />';
$mod->MxText('traitement2', '<div id="text2' . $res['idpatient'][$i] . '" style="display:inline;">La partie NGAP de cet export n\'est pas traitée.</div> ' . $img);
}
if (isset($exp['etat3'][0]) and $exp['etat3'][0]) {
$mod->MxText('color3', 'green');
$date = new clDate($exp['date3'][0]);
$aja = XhamTools::genAjax('', 'setTraitement', 'navi=' . $session->genNaviFull() . '&idpatient=' . $res['idpatient'][$i] . '&setTraitement=invalide&type=3');
$ajax = 'onclick="' . $aja . 'inverserTraitement(' . $res['idpatient'][$i] . ',3,\'diagnostics\');"';
$img = '<img src="images/gg.gif" id="img3' . $res['idpatient'][$i] . '" alt="annuler" ' . $ajax . ' style="cursor: pointer; pointer: hand;" />';
$mod->MxText('traitement3', '<div id="text3' . $res['idpatient'][$i] . '" style="display:inline;">La partie diagnostics de cet export a été traitée par ' . $exp['iduser3'][0] . ' le ' . $date->getDateTextFull('à') . '</div> ' . $img);
} else {
$mod->MxText('color3', 'red');
$aja = XhamTools::genAjax('', 'setTraitement', 'navi=' . $session->genNaviFull() . '&idpatient=' . $res['idpatient'][$i] . '&setTraitement=valide&type=3');
$ajax = 'onclick="' . $aja . 'inverserTraitement(' . $res['idpatient'][$i] . ',3,\'diagnostics\');"';
$img = '<img src="images/dd.gif" id="img3' . $res['idpatient'][$i] . '" alt="valider" ' . $ajax . ' style="cursor: pointer; pointer: hand;" />';
$mod->MxText('traitement3', '<div id="text3' . $res['idpatient'][$i] . '" style="display:inline;">La partie diagnostics de cet export n\'est pas traitée.</div> ' . $img);
}
// Etat Civil
$mod->MxText('idpatient', XhamTools::getAV($res['idpatient'][$i]));
$mod->MxText('idu', XhamTools::getAV($res['idu'][$i]));
$mod->MxText('ilp', XhamTools::getAV($res['ilp'][$i]));
$mod->MxText('nsej', XhamTools::getAV($res['nsej'][$i]));
$mod->MxText('uf', XhamTools::getAV($res['uf'][$i]));
$mod->MxText('manuel', $res['manuel'][$i] ? 'Oui' : 'Non');
$mod->MxText('sexe', XhamTools::getAV($res['sexe'][$i]));
$mod->MxText('nom', XhamTools::getAV(strtoupper($res['nom'][$i])));
$mod->MxText('prenom', XhamTools::getAV(ucfirst(strtolower($res['prenom'][$i]))));
$mod->MxText('naissance', XhamTools::getAV($res['dt_naissance'][$i], 'd/m/Y'));
$mod->MxText('adresse', nl2br(XhamTools::getAV($res['adresse_libre'][$i])));
$mod->MxText('cp', XhamTools::getAV($res['adresse_cp'][$i]));
$mod->MxText('ville', XhamTools::getAV($res['adresse_ville'][$i]));
$mod->MxText('tel', XhamTools::getAV($res['telephone'][$i]));
$mod->MxText('medecintraitant', nl2br(XhamTools::getAV($res['medecin_traitant'][$i])));
$mod->MxText('aPrevenir', nl2br(XhamTools::getAV($res['prevenir'][$i])));
$mod->MxText('dt_admission', XhamTools::getAV($res['dt_admission'][$i], 'd/m/Y H:i:s'));
$mod->MxText('dt_examen', XhamTools::getAV($res['dt_examen'][$i], 'd/m/Y H:i:s'));
$mod->MxText('dt_sortie', XhamTools::getAV($res['dt_sortie'][$i], 'd/m/Y H:i:s'));
// Informations de passage
$mod->MxText('medecin', XhamTools::getAV($res['medecin_urgences'][$i]));
$mod->MxText('ide', XhamTools::getAV($res['ide'][$i]));
$mod->MxText('mode_admission', XhamTools::getAV($res['mode_admission'][$i]));
$mod->MxText('adresseur', XhamTools::getAV($res['adresseur'][$i]));
$mod->MxText('provenance', XhamTools::getAV($res['provenance'][$i]));
$mod->MxText('recours_categorie', XhamTools::getAV($res['recours_categorie'][$i]));
$mod->MxText('recours', XhamTools::getAV($res['motif_recours'][$i]));
$mod->MxText('recours_code', XhamTools::getAV($res['recours_code'][$i]));
$mod->MxText('gravite', XhamTools::getAV($res['code_gravite'][$i]));
$mod->MxText('ccmu', XhamTools::getAV($res['ccmu'][$i]));
$mod->MxText('gemsa', XhamTools::getAV($res['gemsa'][$i]));
$mod->MxText('souhaitee', XhamTools::getAV($res['dest_souhaitee'][$i]));
$mod->MxText('confirmee', XhamTools::getAV($res['dest_attendue'][$i]));
$mod->MxText('salle', XhamTools::getAV($res['salle_examen'][$i]));
$mod->MxText('traumato', XhamTools::getAV($res['traumato'][$i]));
$mod->MxText('motifTransfert', XhamTools::getAV($res['motif_transfert'][$i]));
$mod->MxText('moyenTransport', XhamTools::getAV($res['motif_transport'][$i]));
$mod->MxText('destPMSI', XhamTools::getAV($res['dest_pmsi'][$i]));
$mod->MxText('orientation', XhamTools::getAV($res['orientation'][$i]));
$mod->MxText('', XhamTools::getAV($res[''][$i]));
// CCAM
$req = new clResultQuery();
$param['cw'] = "WHERE DISCR=" . $res['idpatient'][$i] . ' order by ID';
$ras = $req->Execute("Fichier", "CCAM_getActesBAL", $param, "ResultQuery");
//$mod -> MxText ( 'ccam', affTab ( $res['INDIC_SVC'] ) ) ;
//eko ( $ras['INDIC_SVC'] ) ;
if ($ras['INDIC_SVC'][2]) {
$toDelete = array();
// Epuration des actes et diagnostics supprimés
for ($k = 0; isset($ras['ID'][$k]); $k++) {
$tabActe = explode('|', $ras['CONTENU'][$k]);
if ($tabActe[9] == "suppression") {
$toDelete[$tabActe[10] . $tabActe[22]] = $tabActe[10] . $tabActe[22];
}
}
//eko ( $toDelete ) ;
for ($i = 0; isset($ras['ID'][$i]); $i++) {
$tabActe = explode('|', $ras['CONTENU'][$i]);
$type = $ras['TYPE'][$i];
$idpass = $tabActe[0];
$idu = $tabActe[1];
$nomu = $tabActe[2];
$pren = $tabActe[3];
$sexe = $tabActe[4];
$dtnai = $tabActe[5];
$dtdem = $tabActe[6];
$hhdem = $tabActe[7];
$ufd = $tabActe[8];
$action = $tabActe[9];
$idact = $tabActe[10];
$cdccam = $tabActe[11];
$cddiags = $tabActe[12];
$cdacti = $tabActe[13];
$cdphase = $tabActe[14];
$dtr = $tabActe[15];
$hhr = $tabActe[16];
$nomumed = $tabActe[17];
$prenmed = $tabActe[18];
$adeli = $tabActe[19];
$ufr = $tabActe[20];
$modif = $tabActe[21];
$ngapl = $tabActe[22];
$ngapc = $tabActe[23];
$factu = $tabActe[24];
$cdasso = $tabActe[25];
$nuitjf = $tabActe[26];
if (!in_array($idact . $ngapl, $toDelete) and $action != 'suppression') {
//if ( ! in_array( $idact, $toDelete ) ) {
$lib = $this->getActeLibelle($tabActe[11], $ras['TYPE'][$i]);
$libSansHTML = $this->getActeLibelle($tabActe[11], $ras['TYPE'][$i], "1");
$mod->MxText('acte.ligne', $action);
//$mod -> MxText ( 'acte.action', $action ) ;
$mod->MxText('acte.type', $type);
$mod->MxText('acte.date', $dtr);
$mod->MxText('acte.heure', $hhr);
$mod->MxText('acte.uf', $ufr);
$mod->MxText('acte.code', $cdccam);
$mod->MxText('acte.autreDiags', XhamTools::getAV($cddiags));
$mod->MxText('acte.asso', XhamTools::getAV($cdasso));
$mod->MxText('acte.facture', XhamTools::getAV($factu));
$mod->MxText('acte.nuitjf', XhamTools::getAV($nuitjf));
$mod->MxText('acte.modificateurs', XhamTools::getAV($modif));
$mod->MxText('acte.codeActivite', XhamTools::getAV($cdacti));
$mod->MxText('acte.codePhase', XhamTools::getAV($cdphase));
$mod->MxText('acte.lettreCle', XhamTools::getAV($ngapl . '-' . $ngapc));
$mod->MxText('acte.medecin', XhamTools::getAV($nomumed));
$mod->MxText('acte.adeli', XhamTools::getAV($adeli));
$mod->MxText('acte.description', XhamTools::getAV($libSansHTML));
$mod->MxBloc('acte', 'loop');
} else {
unset($toDelete[$idact . $ngapl]);
}
}
} else {
$mod->MxBloc('acte', 'replace', '<tr><td colspan=16>Aucun acte.</td></tr>');
}
// On retourne le code HTML généré par le template.
return $mod->MxWrite("1");
}
function genAffichageTotal()
{
$mod = new ModeliXe("TodoTotal.html");
$mod->SetModeliXe();
//$note = new XhamNotes ( $this->xham, '' ) ;
//$mod -> MxText ( 'texteLibre', $note->afficherNote ( 'Todo', 'Todo' ) ) ;
// Utilisateurs
$tabU1['#'] = 'vous appartenant';
$tabU1['all'] = 'de tous les utilisateurs';
$tabU2 = $this->getUsers();
$tabU = array_merge($tabU1, $tabU2);
// Catégories
$tabC0[''] = VIDEDEFAUT;
$tabC1['all'] = 'de toutes les catégories';
$tabC1['#'] = 'sans catégorie';
$tabC2 = $this->xham->getListeItems("Catégories Todo");
$tabC = array_merge($tabC1, $tabC2);
// Modes d'affichage
$tabM['%'] = 'Afficher tous les todo';
$tabM['afaire'] = 'Afficher les todo à faire';
$tabM['encours'] = 'Afficher les todo en cours';
$tabM['termines'] = 'Afficher les todo terminés';
// Importances
for ($i = 0; $i < 300; $i++) {
$tabI[$i] = $i;
}
//$tabI = array ( 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 15, 20, 25, 30, 35, 40, 45, 50, 75, 100, 150, 200, 300 ) ;
// Public
$tabP['0'] = 'Non';
$tabP['1'] = 'Oui';
if (!$this->xham->getr('Categorie')) {
$this->xham->setr('Categorie', 'all');
}
if (!$this->xham->getr('idUser')) {
$this->xham->setr('idUser', '#');
}
if (!$this->xham->getr('Mode')) {
$this->xham->setr('Mode', '%');
}
$js = XhamTools::genAjax('onChange', 'refreshTodo', 'ajax=refresh&navi=' . $this->xham->genNaviFull());
$mod->MxSelect('listeModes', 'listeModes', $this->xham->getr('Mode'), $tabM, '', '', 'id="listeModes" ' . $js);
$mod->MxSelect('listeUsers', 'listeUsers', $this->xham->getr('idUser'), $tabU, '', '', 'id="listeUsers" ' . $js);
$mod->MxSelect('listeCates', 'listeCates', $this->xham->getr('Categorie'), $tabC, '', '', 'id="listeCates" ' . $js);
$mod->MxFormField('nom', 'text', 'nom', '', 'class="inputTodo" id="Nom" maxlength=64');
$mod->MxFormField('dateLimite', 'text', 'dateLimite', '', 'class="dateTodo" id="dateLimite"');
$mod->MxSelect('listeCates2', 'listeCates2', '0', $tabC0 + $tabC2, '', '', 'id="Categorie" class="selectTodo"');
$mod->MxSelect('listeImportances', 'listeImportances', '0', $tabI, '', '', 'id="Importance" class="selectTodo"');
$mod->MxSelect('listePublic', 'listePublic', '1', $tabP, '', '', 'id="Public" class="selectTodo"');
$js = XhamTools::genAjax('onClick', 'addTodo', 'ajax=addTodo&navi=' . $this->xham->genNaviFull());
$mod->MxText('valider', '<img src="images/valider.gif" alt="valider" class="validerTodo" ' . $js . '/>');
$mod->MxText('listeTodo', $this->genListeTodo());
$af = $mod->MxWrite("1");
$this->af = $af;
}
function genListe()
{
global $session;
global $options;
$res = $this->getPatientsManuels();
$list = new ListMaker("template/ListePatientsManuels.html");
$navi = $session->genNavi($session->getNavi(0), $session->getNavi(1), $session->getNavi(2));
$list->addUserVar('navi', $navi);
$list->addUrlVar('navi', $navi);
$list->setAlternateColor("manuelspaire", "manuelsimpaire");
// Parcours de la liste des patients récupérés par la requête.
for ($i = 0; isset($res['idpatient'][$i]); $i++) {
$item['fusion'] = XhamTools::genAjax('onClick', 'mod', 'ajax=1&navi=' . $session->genNavi('Administration', 'FusionsV2', 'showFusions', $res['idpatient'][$i]) . "");
// Calcul du sexe de la personne... (?!).
switch ($res['sexe'][$i]) {
case 'M':
$img = URLIMG . "homme.png";
break;
case 'F':
$img = URLIMG . "femme.png";
break;
default:
$img = URLIMG . "Indefini.png";
break;
}
$item['nsej'] = $res['nsej'][$i];
$item['sexe'] = "<img src=\"{$img}\" alt=\"" . $res['sexe'][$i] . "\" />";
if ($res['dt_naissance'][$i] != "0000-00-00 00:00:00") {
$item['naissance'] = substr($res['dt_naissance'][$i], 0, 10);
} else {
$item['naissance'] = VIDEDEFAUT;
}
// Concaténation du nom et du prénom.
$item['details'] = clPatient::genInfoBulle($res, $i);
$item['patient'] = strtoupper($res['nom'][$i]) . " " . ucfirst(strtolower($res['prenom'][$i]));
// Heure d'arrivée.
if ($res['dt_admission'][$i] != "0000-00-00 00:00:00") {
$dateTemp = new clDate($res['dt_admission'][$i]);
$item['admission'] = $dateTemp->getDate("d-m-Y H:i");
} else {
$item['arrivee'] = VIDEDEFAUT;
$item['arriveeD'] = VIDEDEFAUT;
}
// Heure de sortie.
if ($res['dt_sortie'][$i] != "0000-00-00 00:00:00") {
$dateTemp = new clDate($res['dt_sortie'][$i]);
$item['sortie'] = $dateTemp->getDate("d-m-Y H:i");
} else {
$item['sortie'] = VIDEDEFAUT;
$item['sortieD'] = VIDEDEFAUT;
}
$list->addItem($item);
}
// Récupération du code HTML généré.
return $list->getList();
}
static function downloadFile_wget($url, $fileAbsoluteLocalUrl, &$message)
{
$proxyOpts = '';
$optionsEnv = null;
if (defined('PROXY') && PROXY) {
$proxy_port = $proxy_host = $proxy_login = $proxy_pass = '';
self::getProxyParams($proxy_host, $proxy_port, $proxy_login, $proxy_pass);
$proxyOpts = " ";
if ($proxy_login) {
$proxyOpts .= " --proxy-user={$proxy_login} --proxy-password={$proxy_pass} ";
}
$optionsEnv = array('http_proxy' => "http://{$proxy_host}:{$proxy_port}");
}
return XhamTools::_fork_process("wget {$url} {$proxyOpts} -O {$fileAbsoluteLocalUrl}", $message, $message, false, null, $optionsEnv);
}
function getPassword()
{
return XhamTools::dechiffre($this->user['password']);
}
function gestionDiagsActes($tabPeriodicite, $diag0)
{
global $session;
global $options;
// Appel du template permettant la saisie des diagnostics et des actes
if ($options->getOption("ActiverCORAModuleActes")) {
$mod = new ModeliXe("CCAM_CotationActesCORA.mxt");
} else {
$mod = new ModeliXe("CCAM_CotationActes.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['idListeSelection0']) {
if ($diag0 != "") {
unset($param);
$param[idDomaine] = CCAM_IDDOMAINE;
$param[code] = $diag0;
$req = new clResultQuery();
$res = $req->Execute("Fichier", "CCAM_getCat1Diag", $param, "ResultQuery");
$idListeSelection0 = $res[categorie][0];
} else {
$idListeSelection0 = "aucun#";
}
} else {
if ($_POST['actualiserListe_x']) {
unset($param);
$param[idDomaine] = CCAM_IDDOMAINE;
$param[code] = $_POST['actualiserListe'];
$req = new clResultQuery();
$res = $req->Execute("Fichier", "CCAM_getCat1Diag", $param, "ResultQuery");
$idListeSelection0 = $res[categorie][0];
} else {
$idListeSelection0 = $_POST['idListeSelection0'];
}
}
if (!$_POST['idListeSelection1']) {
$diag0 != "" ? $idListeSelection1 = $diag0 : ($idListeSelection1 = "aucun#");
} else {
if ($_POST['actualiserListe_x']) {
$idListeSelection1 = $_POST['actualiserListe'];
} else {
$idListeSelection1 = $_POST['idListeSelection1'];
}
}
!$_POST['idListeSelection2'] ? $idListeSelection2 = "diag" : ($idListeSelection2 = $_POST['idListeSelection2']);
($_POST['aDroite_x'] or $_POST['aDroite']) ? $aDroite = 1 : "";
($_POST['sortir_x'] or $_POST['sortir']) ? $sortir = 1 : "";
//Ajout des actes sélectionnés dans la liste des actes affectés à la liste des actes
//rattachés au patient en cours
if ($aDroite or $sortir) {
$retourInfos = $this->addActesPatient();
if ($retourInfos[infos]) {
$this->infos = $retourInfos[infos];
} elseif ($retourInfos[erreur]) {
$this->erreurs = $retourInfos[erreur];
}
}
if ($_POST['lesion'] and $_POST['lesion'] != $_POST['lesion_old']) {
unset($param);
$param[lesionMultiple] = $_POST['lesion'];
$majrq = new clRequete(CCAM_BDD, "ccam_cotation_actes", $param);
$sql = $majrq->updRecord("idEvent=" . $this->idEvent . " and idDomaine=" . CCAM_IDDOMAINE);
}
if (!$sortir) {
//Si on a choisi de modifier un acte
//if ($_POST['imgOK_x'] or $_POST['imgOK']) $retourInfos=$this->modifyActe();
//Si on a choisi de supprimer un acte ou un diagnostic
if ($_POST['supprimerActe_x'] or $_POST['supprimerActe']) {
//eko ( htmlentities($_POST['supprimerActe']) ) ;
$idActeSuppr = $_POST['supprimerActe'];
$this->infos = $this->delActesPatient($idActeSuppr);
}
if ($retourInfos[infos]) {
$this->infos = $retourInfos[infos];
}
if ($retourInfos[erreur]) {
$this->erreurs = $retourInfos[erreur];
}
//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));
$optionTri = $options->getOption("CCAM_TriDiagnostics");
if ($optionTri == "Manuel") {
$tri = "rang";
} elseif ($optionTri == "Alphabétique") {
$tri = "libelle";
} elseif ($optionTri == "Alphabétique inversé") {
$tri = "libelle desc";
} else {
$tri = "libelle";
}
$param[order] = $tri;
$tabListeSelection1 = $this->tableauValeurs("CCAM_getListeDiags", $param, "Choisir un diagnostic");
if ($options->getOption("ActiverModuleActes") and $session->getDroit("CCAM_ACTES_ACTES", "r")) {
$tabListeSelection2[diag] = "Actes associés au diagnostic sélectionné";
$tabListeSelection2[tous] = "Tous les actes de la liste restreinte";
$tabListeSelection2[NGAP] = "Actes NGAP";
$tabListeSelection2[PACK] = "Packs d'actes";
$optionTri = $options->getOption("CCAM_TriListeActes");
if (strcmp($optionTri, "Code de l'acte") == 0) {
$tri = "code";
} elseif (strcmp($optionTri, "Libellé de l'acte") == 0) {
$tri = "libelle";
} elseif (strcmp($optionTri, "Fréquence d'utilisation") == 0) {
$tri = "frequence";
} else {
$tri = "code";
}
//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 ($idListeSelection2 and $idListeSelection1) {
$paramA[idListeSelection1] = $idListeSelection2;
$paramRelation[idEvent] = $this->idEvent;
if (strcmp($tri, "code") == 0) {
$paramA["order"] = "rel.idActe";
} elseif (strcmp($tri, "libelle") == 0) {
$paramA["order"] = "rel.libelleActe";
} elseif (strcmp($tri, "frequence") == 0) {
$paramA["order"] = "rel.frequence desc,rel.idActe";
}
// Nous sommes dans la fenetre de Cotation des diagnostics et des actes
eko("fenetre de Cotation des diagnostics et des actes");
eko($this->typeIntervenant);
if ($idListeSelection2 == "tous") {
$requete = new clResultQuery();
unset($paramRq);
if (strcmp($this->typeIntervenant, "URG") == 0) {
// On prend en compte l'acte NGAP des urgentistes
// Consultation urgentiste
$paramRq["cw"] = "libelleActe='Consultation urgentiste spécialiste'";
$codeNGAPf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation urgentiste spécialiste non facturable'";
$codeNGAPnf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation sage-femme'";
$codeNGAP2f = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation sage-femme non facturable'";
$codeNGAP2nf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation gynécologie et obstétrique'";
$codeNGAP3f = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation gynécologie et obstétrique non facturable'";
$codeNGAP3nf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
} elseif (strcmp($this->typeIntervenant, "PED") == 0) {
// On prend en compte l'acte NGAP des urgentistes spécialistes
// Consultation urgentiste spécialiste
$paramRq["cw"] = "libelleActe='Consultation urgentiste'";
$codeNGAPf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation urgentiste non facturable'";
$codeNGAPnf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation sage-femme'";
$codeNGAP2f = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation sage-femme non facturable'";
$codeNGAP2nf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation gynécologie et obstétrique'";
$codeNGAP3f = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation gynécologie et obstétrique non facturable'";
$codeNGAP3nf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
} elseif (strcmp($this->typeIntervenant, "SAF") == 0) {
// On prend en compte l'acte NGAP des sage-femmes
// Consultation sage-femme spécialiste
$paramRq["cw"] = "libelleActe='Consultation urgentiste spécialiste'";
$codeNGAPf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation urgentiste spécialiste non facturable'";
$codeNGAPnf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation urgentiste'";
$codeNGAP2f = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation urgentiste non facturable'";
$codeNGAP2nf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation gynécologie et obstétrique'";
$codeNGAP3f = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation gynécologie et obstétrique non facturable'";
$codeNGAP3nf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
} elseif (strcmp($this->typeIntervenant, "OBS") == 0) {
// On prend en compte l'acte NGAP des obstétrique et gynécologique
// Consultation obstétrique et gynécologique spécialiste
$paramRq["cw"] = "libelleActe='Consultation urgentiste spécialiste'";
$codeNGAPf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation urgentiste spécialiste non facturable'";
$codeNGAPnf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation urgentiste'";
$codeNGAP2f = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation urgentiste non facturable'";
$codeNGAP2nf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation sage-femme'";
$codeNGAP3f = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation sage-femme non facturable'";
$codeNGAP3nf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
}
eko($codeNGAPf);
eko($codeNGAPnf);
eko($codeNGAP2f);
eko($codeNGAP2nf);
eko($codeNGAP3f);
eko($codeNGAP3nf);
$paramA[cw] = " and rel.idActe not like 'NGAP%') or (rel.idActe like 'NGAP%' and rel.idActe<>'" . $codeNGAP3f[idActe][0] . "' and rel.idActe<>'" . $codeNGAP3nf[idActe][0] . "' and rel.idActe<>'" . $codeNGAPf[idActe][0] . "' and rel.idActe<>'" . $codeNGAPnf[idActe][0] . "' and rel.idActe<>'" . $codeNGAP2f[idActe][0] . "' and rel.idActe<>'" . $codeNGAP2nf[idActe][0] . "' and rel.cotationNGAP <>''";
//eko($paramA);
$requete = "CCAM_getActesNonListe";
} elseif ($idListeSelection2 == "NGAP") {
// Pour lister l'ensemble des actes NGAP on doit soit afficher
// l'acte de consultation urgentiste soit l'acte de consultation
// urgentiste spécialiste soit lacte de consultation de sage-femmes
// soit l'acte de consultation de gynecologie obstetrique
// (pareil pour non facturable)
$paramA[type] = "NGAP";
$requete = new clResultQuery();
unset($paramRq);
if (strcmp($this->typeIntervenant, "URG") == 0) {
// On prend en compte l'acte NGAP des urgentistes
// Consultation urgentiste
$paramRq["cw"] = "libelleActe='Consultation urgentiste spécialiste'";
$codeNGAPf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation urgentiste spécialiste non facturable'";
$codeNGAPnf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation sage-femme'";
$codeNGAP2f = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation sage-femme non facturable'";
$codeNGAP2nf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation gynécologie et obstétrique'";
$codeNGAP3f = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation gynécologie et obstétrique non facturable'";
$codeNGAP3nf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramA[cw] = "and rel.idActe<>'" . $codeNGAP3f[idActe][0] . "' and rel.idActe<>'" . $codeNGAP3nf[idActe][0] . "' and rel.idActe<>'" . $codeNGAPf[idActe][0] . "' and rel.idActe<>'" . $codeNGAPnf[idActe][0] . "' and rel.idActe<>'" . $codeNGAP2f[idActe][0] . "' and rel.idActe<>'" . $codeNGAP2nf[idActe][0] . "' and rel.cotationNGAP<>''";
} elseif (strcmp($this->typeIntervenant, "PED") == 0) {
// On prend en compte l'acte NGAP des urgentistes spécialistes
// Consultation urgentiste spécialiste
$paramRq["cw"] = "libelleActe='Consultation urgentiste'";
$codeNGAPf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation urgentiste non facturable'";
$codeNGAPnf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation sage-femme'";
$codeNGAP2f = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation sage-femme non facturable'";
$codeNGAP2nf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation gynécologie et obstétrique'";
$codeNGAP3f = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation gynécologie et obstétrique non facturable'";
$codeNGAP3nf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramA[cw] = "and rel.idActe<>'" . $codeNGAP3f[idActe][0] . "' and rel.idActe<>'" . $codeNGAP3nf[idActe][0] . "' and rel.idActe<>'" . $codeNGAPf[idActe][0] . "' and rel.idActe<>'" . $codeNGAPnf[idActe][0] . "' and rel.idActe<>'" . $codeNGAP2f[idActe][0] . "' and rel.idActe<>'" . $codeNGAP2nf[idActe][0] . "' and rel.cotationNGAP<>''";
} elseif (strcmp($this->typeIntervenant, "SAF") == 0) {
// On prend en compte l'acte NGAP des sage-femmes
// Consultation sage-femmes
$paramRq["cw"] = "libelleActe='Consultation urgentiste spécialiste'";
$codeNGAPf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation urgentiste spécialiste non facturable'";
$codeNGAPnf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation urgentiste'";
$codeNGAP2f = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation urgentiste non facturable'";
$codeNGAP2nf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation gynécologie et obstétrique'";
$codeNGAP3f = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation gynécologie et obstétrique non facturable'";
$codeNGAP3nf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramA[cw] = "and rel.idActe<>'" . $codeNGAP3f[idActe][0] . "' and rel.idActe<>'" . $codeNGAP3nf[idActe][0] . "' and rel.idActe<>'" . $codeNGAPf[idActe][0] . "' and rel.idActe<>'" . $codeNGAPnf[idActe][0] . "' and rel.idActe<>'" . $codeNGAP2f[idActe][0] . "' and rel.idActe<>'" . $codeNGAP2nf[idActe][0] . "' and rel.cotationNGAP<>''";
} elseif (strcmp($this->typeIntervenant, "OBS") == 0) {
// On prend en compte l'acte NGAP gynécologie et obstétrique
// Consultation gynécologie et obstétrique
$paramRq["cw"] = "libelleActe='Consultation urgentiste spécialiste'";
$codeNGAPf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation urgentiste spécialiste non facturable'";
$codeNGAPnf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation urgentiste'";
$codeNGAP2f = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation urgentiste non facturable'";
$codeNGAP2nf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation sage-femme'";
$codeNGAP3f = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation sage-femme non facturable'";
$codeNGAP3nf = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq, "ResultQuery");
$paramA[cw] = "and rel.idActe<>'" . $codeNGAP3f[idActe][0] . "' and rel.idActe<>'" . $codeNGAP3nf[idActe][0] . "' and rel.idActe<>'" . $codeNGAPf[idActe][0] . "' and rel.idActe<>'" . $codeNGAPnf[idActe][0] . "' and rel.idActe<>'" . $codeNGAP2f[idActe][0] . "' and rel.idActe<>'" . $codeNGAP2nf[idActe][0] . "' and rel.cotationNGAP<>''";
}
$requete = "CCAM_getAutresActesNonListe";
} elseif ($idListeSelection2 == "PACK") {
$paramA[type] = "PACK";
$paramA[cw] = "";
$requete = "CCAM_getAutresActesNonListe";
} else {
/*if ( strcmp ($this->typeIntervenant,"URG") == 0 ) {
// On prend en compte l'acte NGAP des urgentistes
// Consultation urgentiste
// on récupere le code NGAP des urgentistes spécialistes
$requete = new clResultQuery;
unset($paramRq);
$paramRq["cw"] = "libelleActe='Consultation urgentiste spécialiste'";
$codeNGAPf = $requete->Execute("Fichier","CCAM_getActesDomaine3",$paramRq,"ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation urgentiste spécialiste non facturable'";
$codeNGAPnf = $requete->Execute("Fichier","CCAM_getActesDomaine3",$paramRq,"ResultQuery");
$paramA[cw]="and act.date_fin='0000-00-00' and (rel.idActe not like 'NGAP%' or
rel.idActe like 'NGAP%' and rel.idActe<>'".$codeNGAPf[idActe][0]."' and rel.idActe<>'".$codeNGAPnf[idActe][0]."' and act.cotationNGAP<>'')";
}
else {
// On prend en compte l'acte NGAP des urgentistes spécialistes
// Consultation urgentiste spécialiste
// on récupere le code NGAP des urgentistes
$requete = new clResultQuery;
unset($paramRq);
$paramRq["cw"] = "libelleActe='Consultation urgentiste'";
$codeNGAPf = $requete->Execute("Fichier","CCAM_getActesDomaine3",$paramRq,"ResultQuery");
$paramRq["cw"] = "libelleActe='Consultation urgentiste non facturable'";
$codeNGAPnf = $requete->Execute("Fichier","CCAM_getActesDomaine3",$paramRq,"ResultQuery");
$paramA[cw]="and act.date_fin='0000-00-00' and (rel.idActe not like 'NGAP%' or
rel.idActe like 'NGAP%' and rel.idActe<>'".$codeNGAPf[idActe][0]."' and rel.idActe<>'".$codeNGAPnf[idActe][0]."' and act.cotationNGAP<>'')";
} */
$paramA[idListeSelection1] = $idListeSelection1;
$paramA[cw] = "and act.date_fin='0000-00-00' and (rel.idActe not like 'NGAP%' or \r\n\t\t\t\t\t\trel.idActe like 'NGAP%' and act.cotationNGAP<>'')";
if (strcmp($tri, "code") == 0) {
$paramA["order"] = "act.idActe";
} elseif (strcmp($tri, "libelle") == 0) {
$paramA["order"] = "act.libelleActe";
} elseif (strcmp($tri, "frequence") == 0) {
$paramA["order"] = "act.frequence desc,act.idActe";
}
$requete = "CCAM_getActesDiags";
}
$tabListeGauche = $this->valeursListeGauche($requete, "CCAM_getActesCotes", $paramA, $paramRelation, "Choisir un acte");
// On affiche d'abord les actes CCAM puis NGAP puis PACK
$ccamtableau = array();
$ngaptableau = array();
$packtableau = array();
foreach ($tabListeGauche as $cle => $valeur) {
if (substr($cle, 0, 4) == "NGAP") {
$ngaptableau[$cle] = $valeur;
} elseif (substr($cle, 0, 4) == "PACK") {
$packtableau[$cle] = $valeur;
} else {
$ccamtableau[$cle] = $valeur;
}
}
foreach ($ccamtableau as $cle => $valeur) {
$alltableau[$cle] = $valeur;
}
foreach ($ngaptableau as $cle => $valeur) {
$alltableau[$cle] = $valeur;
}
foreach ($packtableau as $cle => $valeur) {
$alltableau[$cle] = $valeur;
}
$tabListeGauche = $alltableau;
} else {
$tabListeGauche[0] = "Choisir un acte";
}
$mod->MxText("actesBlocGauche.titreSelection2", "Actes");
$mod->MxSelect("actesBlocGauche.idListeSelection2", "idListeSelection2", $idListeSelection2, $tabListeSelection2, '', '', "onChange=reload(this.form) size=\"4\"");
$mod->MxSelect("actesBlocGauche.listeGauche", "listeGauche[]", '', $tabListeGauche, '', '', "size=\"13\" multiple=\"yes\"");
//Liste des anesthésistes
// DBDEB1 : masquage de l'anesthésiste.
unset($param);
//$param[idDomaine]=CCAM_IDDOMAINE;
//$param[idListeSelection0]="Anesthésie";
//$param[order]="libelle";
//$tabAnesth=$this->tableauValeurs("CCAM_getListeDiags",$param,"Choisir un anesthésiste");
$nomUrgentiste = $this->nomIntervenant;
$matriculeUrgentiste = $this->matriculeIntervenant;
//$tabAnesth[$matriculeUrgentiste]=$nomUrgentiste;
!isset($_POST['anesthesiste']) ? $anesthesiste = $matriculeUrgentiste : ($anesthesiste = $_POST['anesthesiste']);
$mod->MxHidden("actesBlocGauche.anesthesiste", "anesthesiste={$matriculeUrgentiste}");
//$mod->MxSelect("actesBlocGauche.anesthesiste","anesthesiste",$anesthesiste,$tabAnesth);
// DBFIN1
//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 (!$session->getDroit("CCAM_".$this->typeListe,"m")){
$mod->MxBloc("actesBlocDroite.actesCotes.actionModif","delete");
}*/
if (!$session->getDroit("CCAM_ACTES_" . $this->typeListe, "d")) {
$mod->MxBloc("actesBlocDroite.actesCotes.actionSuppr", "delete");
}
if ($res[INDIC_SVC][2] == 0) {
$mod->MxBloc("actesBlocDroite.actesCotes", "delete");
} else {
$mod->MxBloc("actesBlocDroite.aucunActe", "delete");
$idListeActes = "";
for ($i = 0; isset($res[identifiant][$i]); $i++) {
$idListeActes .= "'" . $res[identifiant][$i] . "',";
$lesion = $res[lesionMultiple][$i];
list($annee, $mois, $jour) = explode("-", substr($res[dateDemande][$i], 0, 10));
$dateActe = $jour . "/" . $mois . "/" . $annee;
$mod->MxText("actesBlocDroite.actesCotes.dateActe", $dateActe);
if ($options->getOption("AffichageTarifsCCAM")) {
unset($paramRq);
$paramRq["cw"] = "and a.code='" . $res[identifiant][$i] . "' order by t.aadt_modif desc";
$fat = $req->Execute("Fichier", "CCAM_get1TarifCCAM", $paramRq, "ResultQuery");
//eko($fat);
if ($fat[INDIC_SVC][2] == 1) {
$prix = $fat["pu_base"][0] . "€.";
$mod->MxText("actesBlocDroite.actesCotes.codeActe", $res[identifiant][$i] . "<br>" . $prix);
} else {
$mod->MxText("actesBlocDroite.actesCotes.codeActe", $res[identifiant][$i]);
}
} else {
$mod->MxText("actesBlocDroite.actesCotes.codeActe", $res[identifiant][$i]);
}
$mod->MxText("actesBlocDroite.actesCotes.libActe", $res[libelle][$i]);
$mod->MxText("actesBlocDroite.actesCotes.medecin", $res[medecin][$i]);
/*$mod->MxText("actesBlocDroite.actesCotes.actionModif.codeActe",
$res[identifiant][$i]);*/
$mod->MxText("actesBlocDroite.actesCotes.actionSuppr.codeActe", $res[identifiant][$i]);
$periodicite = $res[periodicite][$i];
if ($_POST['modifierActe_x'] and $res[identifiant][$i] == $_POST['modifierActe']) {
//$this->saisieComplementActe($res,$periodicite,$tabPeriodicite,$i);
} elseif ($res[quantite][$i] == 1) {
$mod->MxText("actesBlocDroite.actesCotes.complementActeLibQte", " ");
$mod->MxText("actesBlocDroite.actesCotes.complementActeQte", "");
} elseif ($periodicite == "aucune") {
$mod->MxText("actesBlocDroite.actesCotes.complementActeLibPeriod", "");
$mod->MxText("actesBlocDroite.actesCotes.complementActePeriod", "");
/*if ($res[quantite][$i]>1){
$mod->MxText("actesBlocDroite.actesCotes.complementActeLibQte",
"Quantité :");
$mod->MxText("actesBlocDroite.actesCotes.complementActeQte",
$res[quantite][$i]);
}*/
} else {
/*$mod->MxText("actesBlocDroite.actesCotes.complementActeLibQte","Quantité :");
$mod->MxText("actesBlocDroite.actesCotes.complementActeQte",$res[quantite][$i]);
if ($periodicite!="aucune"){
$mod->MxText("actesBlocDroite.actesCotes.complementActeLibPeriod",
"<br>Temps latence :");
$mod->MxText("actesBlocDroite.actesCotes.complementActePeriod",
$tabPeriodicite[$periodicite]);
}*/
}
$mod->MxBloc("actesBlocDroite.actesCotes", "loop");
/*//Mise à jour des modificateurs
$codeActe=$res[identifiant][$i];
unset($param);
$param[modificateurs]="";
$requete=new clRequete(CCAM_BDD,"ccam_cotation_actes",$param);
$sql=$requete->updRecord("codeActe='$codeActe' and idDomaine=".CCAM_IDDOMAINE.
" and idEvent=".$this->idEvent);
unset($param);
$param[cw]="and substring(rel.aa_code,1,7)='$codeActe' and
rel.modifi_cod in ('7')";
$req=new clResultQuery;
$res2=$req->Execute("Fichier","CCAM_getModificateursActe",$param,"ResultQuery");
//eko($res2[INDIC_SVC]);
$listeModificateurs="";
for ($j=0;isset($res2[modifi_cod][$j]);$j++){
$CCModificateur="Modificateur_".$res2[modifi_cod][$j];
//eko("CCmodificateur:$CCModificateur:".$_POST[$CCModificateur]);
if ($_POST[$CCModificateur]){
$listeModificateurs.=$res2[modifi_cod][$j]."~";
}
}
//eko("listemodif:$listeModificateurs");
if ($listeModificateurs){
$listeModificateurs=substr($listeModificateurs,0,-1);
unset($param);
$param[modificateurs]=$listeModificateurs;
$requete=new clRequete(CCAM_BDD,"ccam_cotation_actes",$param);
$sql=$requete->updRecord("codeActe='$codeActe' and idDomaine=".CCAM_IDDOMAINE.
" and idEvent=".$this->idEvent);
//eko($sql);
}*/
}
$idListeActes = substr($idListeActes, 0, -1);
/*//Récupération des modificateurs cotés pour les actes et le patient en cours
unset($param);
$param[cw]="codeActe in ($idListeActes) and idDomaine=".CCAM_IDDOMAINE.
" and idEvent=".$this->idEvent;
$req=new clResultQuery;
$res=$req->Execute("Fichier","CCAM_getModificateursCotes",$param,"ResultQuery");
//eko($res[INDIC_SVC]);
unset($tabModificateurs);
for ($i=0;isset($res[modificateurs][$i]);$i++){
unset($listeModificateurs);
$listeModificateurs=explode("~",$res[modificateurs][$i]);
while (list($key,$val)=each($listeModificateurs)){
$tabModificateurs[$val]=$val;
}
}
//eko($tabModificateurs);*/
//Gestion des modificateurs
/*unset($param);
$param[cw]="and substring(rel.aa_code,1,7) in ($idListeActes) and
rel.modifi_cod in ('7')";
$req=new clResultQuery;
$res=$req->Execute("Fichier","CCAM_getModificateursActe",$param,"ResultQuery");
//eko($res[INDIC_SVC]);
for ($i=0;isset($res[modifi_cod][$i]);$i++){
$CCModificateur="Modificateur_".$res[modifi_cod][$i];
$modificateur=$res[modifi_cod][$i];
//eko("CCmodificateur:$CCModificateur:".$_POST[$CCModificateur]);
$mod->MxCheckerField("anesthesie.ligneModificateur.CCModificateur",
"checkbox",$CCModificateur,1,
(($tabModificateurs[$modificateur]==$modificateur)?true:false));
$mod->MxText("anesthesie.ligneModificateur.libModificateur",
$res[libelle][$i]);
$mod->MxBloc("anesthesie.ligneModificateur","loop");
}
$mod->MxFormField("anesthesie.imgOK","image","imgOK","",
"value=\"".$res[identifiant][$i]."\" src=\"".URLIMG."Ok.gif\"");
$mod->MxFormField("anesthesie.imgAnnul","image","imgAnnul","",
"src=\"".URLIMG."annuler2.gif\"");*/
}
$mod->MxText("titreFormulaire", "Cotation des diagnostics et des actes");
$mod->MxText("titreDispo", "Diagnostics, actes et packs disponibles");
$mod->MxText("titreAffecte", "Diagnostics et actes affectés au patient");
} else {
$mod->MxText("titreFormulaire", "Cotation des diagnostics");
$mod->MxBloc("actesBlocGauche", "delete");
$mod->MxBloc("actesBlocDroite", "delete");
$mod->MxText("titreDispo", "Diagnostics disponibles");
$mod->MxText("titreAffecte", "Diagnostics affectés au patient");
// Nous faisons appel à la DLL de CORA ici pour l'affectation des actes CCAM
// aux patients. Seul les diagnostics seront saisies.
if ($options->getOption("ActiverCORAModuleActes")) {
$mod->MxText("titreFormulaire", "Cotation des diagnostics et appel de CORA Recueil pour les actes");
$mod->MxText("fenetreFermerCora", "");
if ($_POST['cora_x'] or $session->getNavi(3) == "AppelCora") {
$html = XhamTools::genFenetreBloquante("fenetreFermerCora.html");
$mod->MxText("fenetreFermerCora", $html);
}
}
}
/*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("nomPatient", $this->nomu . " " . ucfirst(strtolower($this->pren)));
$mod->MxText("sallePatient", $this->lieuInterv);
if (!$_POST['lesion']) {
if (!$lesion) {
$lesion = "Non";
}
} else {
$lesion = $_POST['lesion'];
}
$tabLesion[Oui] = "Oui";
$tabLesion[Non] = "Non";
while (list($key, $val) = each($tabLesion)) {
$mod->MxCheckerField("lesionMultiple.btn", "radio", "lesion", $key, $lesion == $key ? true : false, "onChange=\"reload(this.form)\"");
$mod->MxText("lesionMultiple.libelle", $val);
$mod->MxBloc("lesionMultiple", "loop");
}
//Récupération des diagnostics 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_getDiagCotes", $param, "ResultQuery");
if (!$session->getDroit("CCAM_ACTES_" . $this->typeListe, "d")) {
$mod->MxBloc("diagnostics.diagCotes.action", "delete");
}
if ($res[INDIC_SVC][2] == 0) {
$mod->MxBloc("diagnostics.diagCotes", "delete");
} else {
$mod->MxBloc("diagnostics.aucunDiag", "delete");
for ($i = 0; isset($res[identifiant][$i]); $i++) {
list($annee, $mois, $jour) = explode("-", substr($res[dateDemande][$i], 0, 10));
$dateActe = $jour . "/" . $mois . "/" . $annee;
$mod->MxText("diagnostics.diagCotes.dateActe", $dateActe);
$mod->MxText("diagnostics.diagCotes.codeActe", $res[identifiant][$i]);
$mod->MxText("diagnostics.diagCotes.libActe", ucfirst($res[libelle][$i]));
$mod->MxText("diagnostics.diagCotes.action.codeActe", $res[identifiant][$i]);
$mod->MxBloc("diagnostics.diagCotes", "loop");
}
}
//Gestion du template
$mod->MxText("titreSelection0", "Catégories");
$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)");
//Afficher les boutons suivants si droits autorisés
if (!$session->getDroit("CCAM_ACTES_" . $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", "lesion_old={$lesion}&navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1), $session->getNavi(2)));
} elseif ($cora) {
$mod->MxHidden("hidden", "lesion_old={$lesion}&navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1), $session->getNavi(2), "AppelCora"));
} else {
$mod->MxHidden("hidden", "lesion_old={$lesion}&navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1), $session->getNavi(2), "DetailDiagsActes"));
}
return $this->af .= $mod->MxWrite("1");
}
}
function getPassword()
{
return XhamTools::dechiffre($this->informations['password']);
}
function genListe()
{
global $session;
$res = $this->genRequete();
//eko ( $res ) ;
//print affTab ( $res ) ;
$list = new ListMaker("template/RadioListe.html");
$navi = $session->genNavi("Radio");
$list->addUserVar('navi', $navi);
$list->addUrlVar('navi', $navi);
$list->addUserVar('typeListe', $_SESSION['typeListe']);
$list->addUrlVar('typeListe', $_SESSION['typeListe']);
$list->setSortColumn('col0', 'UF', 'uf');
$list->setSortColumn('col1', 'Patient', 'nomD');
$list->setSortColumn('col2', 'Age', 'ageD');
$list->setSortColumn('col3', 'Arrivée', 'arriveeD');
$list->setSortColumn('col4', 'Soignants', 'soignants');
$list->setSortColumn('col5', 'Motif', 'motif');
$list->setSortColumn('col6', 'Date demande', 'demande');
$list->setSortColumn('col7', 'Description', 'description');
$list->setSortColumn('col8', 'Etat', 'etatD');
$list->setSortColumn('col9', 'Détail', 'detail');
$list->setdefaultSort('col8');
$item = array();
$dureead = new clDuree();
$date = new clDate();
// Parcours de la liste des patients récupérés par la requête.
for ($i = 0; isset($res['idradio'][$i]); $i++) {
$ras = $this->getInfosPatient($res['idpatient'][$i], $res['idapplication'][$i]);
if ($session->getDroit("Liste_Radio", "m")) {
$j = XhamTools::genAjax('onClick', 'mod', 'navi=' . $session->genNavi('Ajax', 'modRadios', $res['idradio'][$i]));
} else {
$j = '';
}
$item['js'] = $j;
$item['ItemColor'] = 'rad' . $res['etat'][$i];
$item['etatD'] = $res['etat'][$i];
switch ($res['etat'][$i]) {
case 'a':
$date->setDate($res['dt_creation'][$i]);
$duree = $dureead->getAge($date->getDatetime());
if (!$dureead->invertNegatif()) {
$item['etat'] = 'Non pris en charge<br/>Depuis ' . $duree;
} else {
$temp = explode(" ", $res['dt_creation'][$i]);
list($annee, $mois, $jour) = explode("-", $temp[0]);
$item['etat'] = 'A prendre en charge<br/>Dans ' . $dureead->getAge() . "<br>le " . $jour . "/" . $mois . "/" . $annee . " à " . $temp[1];
$item['ItemColor'] = 'rad' . 'elephant';
}
break;
case 'b':
$date->setDate($res['dt_pec'][$i]);
$duree = $dureead->getAge($date->getDatetime());
$item['etat'] = 'Pris en charge<br/>Depuis ' . $duree;
break;
case 'c':
$date->setDate($res['dt_encours'][$i]);
$duree = $dureead->getAge($date->getDatetime());
$item['etat'] = 'En cours<br/>Depuis ' . $duree;
break;
case 'd':
$date->setDate($res['dt_fin'][$i]);
$duree = $dureead->getAge($date->getDatetime());
$item['etat'] = 'Terminé<br/>Depuis ' . $duree;
break;
}
// Calcul du sexe de la personne... (?!).
switch ($ras['sexe'][0]) {
case 'M':
$img = URLIMG . "homme.png";
break;
case 'F':
$img = URLIMG . "femme.png";
break;
default:
$img = URLIMG . "Indefini.png";
break;
}
$item['sexe'] = "<img src=\"{$img}\" alt=\"" . $ras['sexe'][0] . "\" />";
// Calcul de l'âge.
$date = new clDate($ras['dt_naissance'][0]);
$age = new clDuree($date->getTimestamp());
$str = $age->getAgePrecis($date->getTimestamp());
if ($ras['dt_naissance'][0] != "0000-00-00 00:00:00") {
$item['age'] = $str;
$item['ageD'] = $date->getTimestamp();
} else {
$item['age'] = VIDEDEFAUT;
$item['ageD'] = VIDEDEFAUT;
}
global $ufs;
$item['uf'] = isset($ufs[$ras['uf'][0]]) ? $ufs[$ras['uf'][0]] : $ras['uf'][0];
if ($ras['dt_admission'][0] != "0000-00-00 00:00:00") {
$datead = new clDate($ras['dt_admission'][0]);
$dateSimple = $datead->getDate("d-m-Y");
$dateHeure = $datead->getDate("H\\hi");
$item['arrivee'] = $dateSimple . "<br />" . $dateHeure;
$item['arriveeD'] = $datead->getTimestamp();
} else {
$item['arrivee'] = VIDEDEFAUT;
$item['arriveeD'] = VIDEDEFAUT;
}
// Médecin et IDE.
switch ($res['idapplication'][$i]) {
case '1':
if ($ras['medecin_urgences'][0]) {
$med = "Dr " . $ras['medecin_urgences'][0];
} else {
$med = VIDEDEFAUT;
}
if ($ras['ide'][0]) {
$ide = "Ide " . $ras['ide'][0];
} else {
$ide = VIDEDEFAUT;
}
$item['soignants'] = $med . "<br />" . $ide;
if ($ras['salle_examen'][0]) {
$sal = $ras['salle_examen'][0];
} else {
$sal = VIDEDEFAUT;
}
$item['salle'] = $sal;
break;
case '24':
if ($ras['medecin'][0]) {
$med = "Dr " . $ras['medecin'][0];
} else {
$med = VIDEDEFAUT;
}
if ($ras['chirurgien'][0]) {
$ide = "Chir " . $ras['chirurgie'][0];
} else {
$ide = VIDEDEFAUT;
}
$item['soignants'] = $med . "<br />" . $ide;
if ($ras['chambre'][0]) {
$sal = $ras['chambre'][0];
} else {
$sal = VIDEDEFAUT;
}
$item['salle'] = $sal;
break;
default:
if ($ras['medecin_urgences'][0]) {
$med = "Dr " . $ras['medecin_urgences'][0];
} else {
$med = VIDEDEFAUT;
}
if ($ras['ide'][0]) {
$ide = "Ide " . $ras['ide'][0];
} else {
$ide = VIDEDEFAUT;
}
$item['soignants'] = $med . "<br />" . $ide;
if ($ras['salle_examen'][0]) {
$sal = $ras['salle_examen'][0];
} else {
$sal = VIDEDEFAUT;
}
$item['salle'] = $sal;
break;
}
// Motif de recours.
if ($ras['motif_recours'][0]) {
$item['motif'] = $ras['motif_recours'][0];
} else {
$item['motif'] = VIDEDEFAUT;
}
// Patient
$item['urlpatient'] = URLNAVI . $session->genNavi($session->getNavi(0), "FichePatient", $res['idpatient'][$i]);
// Concaténation du nom et du prénom.
$item['patient'] = "<span " . clPatient::genInfoBulle($ras, 0, $res['idapplication'][$i]) . ">" . strtoupper($ras['nom'][0]) . "</span><br />" . ucfirst(strtolower($ras['prenom'][0]) . "<br/>" . $ras['nsej'][0]);
if ($res['dt_creation'][$i] != "0000-00-00 00:00:00") {
$datead = new clDate($res['dt_creation'][$i]);
$dateSimple = $datead->getDate("d-m-Y");
$dateHeure = $datead->getDate("H\\hi");
$item['demande'] = $dateSimple . "<br />" . $dateHeure;
$item['demandeD'] = $datead->getTimestamp();
} else {
$item['arrivee'] = VIDEDEFAUT;
$item['arriveeD'] = VIDEDEFAUT;
}
$parp = '&etape=' . $res['etat'][$i] . '&idradio=' . $res['idradio'][$i];
//$item['detail'] = "<a onmouseout=\"request('".URLNAVI."QWpheHxnZXRSYWRpb3M=',null,'getRadios') ;\" href=\"".URLNAVI.$session->genNavi("Radio","",$res['idpatient'][$i],$ras['idu'][0],$ras['nsej'][0])."$parp&Formulaire2print=radio&FormX_ext_goto_=".$res['id_instance'][$i]."&act_print=1\" target=\"_blank\">" ;
$jo = 'onClick="setWait(\'navigation\');location.reload();"';
//$jo = 'onClick=""' ;
$item['detail'] = "<a {$jo} href=\"" . URLNAVI . $session->genNavi("Radio", "", $res['idpatient'][$i], $ras['idu'][0], $ras['nsej'][0]) . "{$parp}&Formulaire2print=radio&FormX_ext_goto_=" . $res['id_instance'][$i] . "&act_print=1\" target=\"_blank\">";
$item['detail'] .= "<img src=\"images/pdf.png\" alt=\"Afficher le PDF\"/></a>";
$rel = new clRequete(BDD, '', '', MYSQL_HOST, MYSQL_USER, MYSQL_PASS);
$rese = $rel->exec_requete("select * from radios_enquetes where idradio=" . $res['idradio'][$i], 'resultquery');
global $pi;
if ($rese['INDIC_SVC'][2]) {
if ($rese['date'][0] == '0000-00-00 00:00:00') {
$img = 'formko.gif';
} else {
$img = 'formok.gif';
}
if ($session->getDroit("Liste_Radio", "m")) {
$j = XhamTools::genAjax('onClick', 'mod', 'navi=' . $session->genNavi('Ajax', 'modRadiosEnquetes', $res['idradio'][$i]));
} else {
$j = '';
}
$item['detail'] .= ' <img ' . $j . ' src="images/' . $img . '" ' . $pi->genInfoBulle("Ouvrir le formulaire d'enquête.") . ' style="cursor: pointer; pointer: hand;" />';
}
if ($res['retour'][$i]) {
$dateR = new clDate($res['dt_retour'][$i]);
$retour = '<b>Formulaire de retour saisi par les urgences :</b>';
$retour .= '<br/><u>Auteur :</u> ' . $res['retourid'][$i];
$retour .= '<br/><u>Date :</u> ' . $dateR->getDate('d/m/Y H:i:s');
switch ($res['retour'][$i]) {
case 'Oui':
$resultat = 'Anomalie détectée avec cette radio.';
break;
case 'Non':
$resultat = 'Aucune anomalie détectée avec cette radio.';
break;
case 'NR':
$resultat = "L'utilisateur signale que cette radio n'a pas été réalisée.";
break;
case 'NI':
$resultat = "L'utilisateur n'a pas interprété cette radio.";
break;
default:
$resultat = "L'utilisateur n'a pas rempli le formulaire.";
break;
}
$retour .= '<br/><u>Résultat :</u> ' . $resultat;
$retour .= '<br/><u>Commentaire :</u>' . ($res['commentaire'][$i] ? $res['commentaire'][$i] : 'Aucun commentaire.');
$item['detail'] .= " <img src=\"" . URLIMGOBS . "\" " . $pi->genInfoBulle($retour) . " alt=\"Comm.\" />";
}
$html = $this->getDetailRadio($res, $i);
$item['description'] = $html;
$ok = 0;
switch ($_SESSION['typeListe']) {
case 'all':
$ok = 1;
break;
case 'alm':
$ok = 1;
break;
case 'd':
$ok = 1;
break;
case 'rall':
if (eregi('RADIO', $html)) {
$ok = 1;
}
break;
case 'ralm':
if (eregi('RADIO', $html)) {
$ok = 1;
}
break;
case 'rd':
if (eregi('RADIO', $html)) {
$ok = 1;
}
break;
case 'eall':
if (eregi('ECHO', $html)) {
$ok = 1;
}
break;
case 'ealm':
if (eregi('ECHO', $html)) {
$ok = 1;
}
break;
case 'ed':
if (eregi('ECHO', $html)) {
$ok = 1;
}
break;
case 'sall':
if (eregi('SCAN', $html)) {
$ok = 1;
}
break;
case 'salm':
if (eregi('SCAN', $html)) {
$ok = 1;
}
break;
case 'sd':
if (eregi('SCAN', $html)) {
$ok = 1;
}
break;
case 'ec':
$nb = 200;
$ok = 1;
break;
case 'et':
$nb = 200;
$ok = 1;
break;
default:
$nb = 50;
$ok = 1;
break;
}
if ($ok) {
$list->addItem($item);
}
}
// Récupération du code HTML généré.
return $list->getList($nb);
}
function getGroupes($uid, $equipes, $fonctions, $orgs, $groupes)
{
// Recuperation des groupes forcés par xham (methode definie dans abstractuser)
$this->getGroupe($uid);
// Recuperation des données diverses ldap
for ($i = 0; isset($equipes[$i]); $i++) {
$tabE[XhamUserLdap::calcCN($equipes[$i])] = $equipes[$i];
$result = ldap_search($this->conne, LDAP_BASE, "(cn=" . XhamUserLdap::calcCN($equipes[$i]) . ")");
$info = ldap_get_entries($this->conne, $result);
for ($j = 0; isset($info[$j]); $j++) {
for ($k = 0; isset($info[$j]["chhatcodeuf"][$k]); $k++) {
$this->informations['uf'][] = $info[$j]["chhatcodeuf"][$k];
}
}
}
for ($i = 0; isset($groupes[$i]); $i++) {
$tabG[XhamUserLdap::calcCN($groupes[$i]['dn'])] = $groupes[$i]['dn'];
}
for ($i = 0; isset($orgs[$i]); $i++) {
$tabO[XhamUserLdap::calcCN($orgs[$i])] = $orgs[$i];
}
for ($i = 0; isset($fonctions[$i]); $i++) {
$tabF[XhamUserLdap::calcCN($fonctions[$i])] = $fonctions[$i];
}
// Recuperation de l'ensemble des groupes appartenant à xham pour cette appli
$res = XhamTools::getListeGroupes();
for ($i = 0; isset($res['nomgroupe'][$i]); $i++) {
// print $res['nomgroupe'][$i]."<br>" ;
$tab = explode('&', $res['nomgroupe'][$i]);
$bool = 1;
while (list($key, $val) = each($tab)) {
if (!isset($tabO[$val]) and !isset($tabF[$val]) and !isset($tabE[$val]) and $val != $uid and !isset($tabG[$val])) {
$bool = 0;
}
}
if ($bool) {
if ($this->lg) {
$this->lg .= "," . $res['idgroupe'][$i];
} else {
$this->lg = $res['idgroupe'][$i];
}
}
}
// eko ( $this->lg ) ;
// print "<br><br>".$this->lg ;
//GROUPEEVERYBODY
$gd = getDefine('GROUPEEVERYBODY', 'everybody');
//eko($gd);
for ($i = 0; isset($res['nomgroupe'][$i]); $i++) {
if ($res['nomgroupe'][$i] == $gd) {
if ($this->lg) {
$this->lg .= "," . $res['idgroupe'][$i];
} else {
$this->lg = $res['idgroupe'][$i];
}
}
}
return $this->lg;
}
function hxmlCreate($res, $i)
{
global $options;
global $stopAffichage;
//$stopAffichage = 1 ;
$tabActe = array();
$tabActe = explode('|', $res['CONTENU'][$i]);
$type = $res['TYPE'][$i];
$idpass = $tabActe[0];
$idu = $tabActe[1];
$nomu = XhamTools::sansAccent($tabActe[2]);
$pren = XhamTools::sansAccent($tabActe[3]);
$sexe = $tabActe[4];
$dtnai = $tabActe[5];
$dtdem = $tabActe[6];
$hhdem = $tabActe[7];
$ufd = $tabActe[8];
$action = $tabActe[9];
$idact = $tabActe[10];
$cdccam = $tabActe[11];
$cddiags = $tabActe[12];
$cdacti = $tabActe[13];
$cdphase = $tabActe[14];
$dtr = $tabActe[15];
$hhr = $tabActe[16];
$nomumed = XhamTools::sansAccent($tabActe[17]);
$prenmed = XhamTools::sansAccent($tabActe[18]);
$adeli = $tabActe[19];
$ufr = $tabActe[20];
$modif = $tabActe[21];
$ngapl = $tabActe[22];
$ngapc = $tabActe[23];
$factu = $tabActe[24];
$cdasso = $tabActe[25];
$nuitjf = $tabActe[26];
// eko ( $tabActe ) ;
if ($action == 'creation') {
$action = utf8_encode('création');
}
if ($nuitjf == 'F') {
$isFerie = "oui";
} else {
$isFerie = "non";
}
if ($nuitjf == 'N') {
$isNuit = '1t';
} elseif ($nuitjf == 'NM') {
$isNuit = '2t';
} else {
$isNuit = 'non';
}
//eko ( $tabActe ) ;
$date = new clDate();
$nomFic = 'ficTV2_' . $res['ID'][$i] . '';
$num = $res['ID'][$i];
if ($type != 'DIAG') {
$dom = new DOMDocument('1.0', 'ISO-8859-1');
$evtsSA = $dom->createElement('evenementsServeurActes', '');
$enteteM = $dom->createElement('enteteMessage', '');
$idMe = $dom->createElement('identifiantMessage', $res['ID'][$i]);
if ($options->getOption('HprimXML_DateT')) {
$dHProd = $dom->createElement('dateHeureProduction', $date->getDate("Y-m-d\\TH:i:s"));
} else {
$dHProd = $dom->createElement('dateHeureProduction', $date->getDatetime());
}
$emett = $dom->createElement('emetteur', '');
$agentse = $dom->createElement('agents', '');
$agente = $dom->createElement('agent', '');
$agente->setAttribute('categorie', 'application');
$codee = $dom->createElement('code', $options->getOption('HprimXML_Emet') ? $options->getOption('HprimXML_Emet') : $res['DISCR'][$i]);
$desti = $dom->createElement('destinataire', '');
$agentsd = $dom->createElement('agents', '');
$agentd = $dom->createElement('agent', '');
$agentd->setAttribute('categorie', 'application');
$coded = $dom->createElement('code', $options->getOption('HprimXML_Dest'));
$evtSA = $dom->createElement('evenementServeurActe', '');
$patient = $dom->createElement('patient', '');
$identp = $dom->createElement('identifiant', '');
$emettp = $dom->createElement('emetteur', '');
$valpe = $dom->createElement('valeur', $idu);
$recepp = $dom->createElement('recepteur', '');
$valpp = $dom->createElement('valeur', $idu);
$persP = $dom->createElement('personnePhysique', '');
$persP->setAttribute('sexe', $sexe);
$nomUs = $dom->createElement('nomUsuel', $nomu);
$prenoms = $dom->createElement('prenoms', '');
$prenom = $dom->createElement('prenom', $pren);
$dateNa = $dom->createElement('dateNaissance', '');
$dateN = $dom->createElement('date', $dtnai);
$venue = $dom->createElement('venue', '');
$identv = $dom->createElement('identifiant', '');
$emettv = $dom->createElement('emetteur', '');
$valve = $dom->createElement('valeur', $idpass);
$recepv = $dom->createElement('recepteur', '');
$valvp = $dom->createElement('valeur', $idpass);
$interv = $dom->createElement('intervention', '');
$identi = $dom->createElement('identifiant', '');
if ($options->getOption('HprimXML_EmetInterv') == 'ID') {
$emetti = $dom->createElement('emetteur', $res['ID'][$i]);
} elseif ($options->getOption('HprimXML_EmetInterv')) {
$emetti = $dom->createElement('emetteur', $options->getOption('HprimXML_EmetInterv'));
} else {
$emetti = $dom->createElement('emetteur', $res['DISCR'][$i]);
}
//$emetti = $dom->createElement ( 'emetteur', ) ;
$demande = $dom->createElement('demande', '');
$datePr = $dom->createElement('datePrescription', '');
$dateP = $dom->createElement('date', $dtdem);
$heureP = $dom->createElement('heure', $hhdem);
$uniteF = $dom->createElement('uniteFonctionnelle', '');
$code = $dom->createElement('code', $ufd);
$debut = $dom->createElement('debut', '');
$dateID = $dom->createElement('date', $dtdem);
$heureID = $dom->createElement('heure', $hhdem);
switch ($type) {
case 'CCAM':
$actesCCAM = $dom->createElement('actesCCAM', '');
$acteCCAM = $dom->createElement('acteCCAM', '');
$acteCCAM->setAttribute('action', $action);
$identa = $dom->createElement('identifiant', '');
$emettia = $dom->createElement('emetteur', $idact);
$recepia = $dom->createElement('recepteur', '');
$codeActe = $dom->createElement('codeActe', $cdccam);
$codeActi = $dom->createElement('codeActivite', $cdacti);
$codePhas = $dom->createElement('codePhase', $cdphase);
$execute = $dom->createElement('execute', '');
$datee = $dom->createElement('date', $dtdem);
$heuree = $dom->createElement('heure', $hhdem);
$executant = $dom->createElement('executant', '');
$medecins = $dom->createElement('medecins', '');
$medExec = $dom->createElement('medecinExecutant', '');
if ($options->getOption("HprimXML_ExecPrinc")) {
$medExec->setAttribute('principal', "oui");
}
$medE = $dom->createElement('medecin', '');
$numADELI = $dom->createElement('numeroAdeli', $adeli);
$identm = $dom->createElement('identification', '');
if ($options->getOption("HprimXML_CodeMedecin") == 'ADELI') {
$codeade = $adeli;
} else {
$codeade = 'x';
}
$codeia = $dom->createElement('code', $codeade);
$persom = $dom->createElement('personne', '');
$nomUm = $dom->createElement('nomUsuel', $nomumed);
$prenomsm = $dom->createElement('prenoms', '');
$prenomm = $dom->createElement('prenom', $prenmed);
$uniteFo = $dom->createElement('uniteFonctionnelle', '');
$codeuf = $dom->createElement('code', $ufr);
$modifs = $dom->createElement('modificateurs', '');
$tabd = explode('~', $modif);
for ($i = 0; isset($tabd[$i]); $i++) {
if ($tabd[$i]) {
eval('$modifc' . $i . ' = $dom->createElement ( "modificateur", "' . $tabd[$i] . '" ) ;');
if ($options->getOption('HprimXML_StatutFT')) {
eval('$modifc' . $i . ' -> setAttribute ( "statut", "ft" ) ;');
}
}
}
//$modifs = $dom->createElement ( 'modificateurs', '' ) ;
// $modifc = $dom->createElement ( 'modificateur', $modif ) ;
$codeANP = $dom->createElement('codeAssociationNonPrevue', $cdasso);
$identa->appendChild($emettia);
$identa->appendChild($recepia);
$acteCCAM->appendChild($identa);
$acteCCAM->appendChild($codeActe);
$acteCCAM->appendChild($codeActi);
$acteCCAM->appendChild($codePhas);
$execute->appendChild($datee);
$execute->appendChild($heuree);
$acteCCAM->appendChild($execute);
$medE->appendChild($numADELI);
$identm->appendChild($codeia);
$medE->appendChild($identm);
$persom->appendChild($nomUm);
$prenomsm->appendChild($prenomm);
$persom->appendChild($prenomsm);
$medE->appendChild($persom);
$medExec->appendChild($medE);
$medecins->appendChild($medExec);
$executant->appendChild($medecins);
$uniteFo->appendChild($codeuf);
$executant->appendChild($uniteFo);
$acteCCAM->appendChild($executant);
for ($i = 0; isset($tabd[$i]); $i++) {
if ($tabd[$i]) {
eval('$modifs -> appendChild ( $modifc' . $i . ' ) ;');
}
}
$acteCCAM->appendChild($modifs);
$acteCCAM->appendChild($codeANP);
$actesCCAM->appendChild($acteCCAM);
$raes = $actesCCAM;
break;
case 'NGAP':
$actesNGAP = $dom->createElement('actesNGAP', '');
$acteNGAP = $dom->createElement('acteNGAP', '');
$acteNGAP->setAttribute('action', $action);
$acteNGAP->setAttribute('facturable', $factu);
$acteNGAP->setAttribute('executionNuit', $isNuit);
$acteNGAP->setAttribute('executionDimancheJourFerie', $isFerie);
$identn = $dom->createElement('identifiant', '');
$emettn = $dom->createElement('emetteur', $idact);
$lettreC = $dom->createElement('lettreCle', $ngapl);
$coeff = $dom->createElement('coefficient', $ngapc);
$exec = $dom->createElement('execute', '');
$dateen = $dom->createElement('date', $dtdem);
$heureen = $dom->createElement('heure', $hhdem);
$presta = $dom->createElement('prestataire', '');
$medecins = $dom->createElement('medecins', '');
$medE = $dom->createElement('medecin', '');
$numADELI = $dom->createElement('numeroAdeli', $adeli);
$identm = $dom->createElement('identification', '');
if ($options->getOption("HprimXML_CodeMedecin") == 'ADELI') {
$codeade = $adeli;
} else {
$codeade = 'x';
}
$codeia = $dom->createElement('code', $codeade);
$persom = $dom->createElement('personne', '');
$nomUm = $dom->createElement('nomUsuel', $nomumed);
$prenomsm = $dom->createElement('prenoms', '');
$prenomm = $dom->createElement('prenom', $prenmed);
$uniteFo = $dom->createElement('uniteFonctionnelle', '');
$codeuf = $dom->createElement('code', $ufr);
$identn->appendChild($emettn);
$acteNGAP->appendChild($identn);
$acteNGAP->appendChild($lettreC);
$acteNGAP->appendChild($coeff);
$exec->appendChild($dateen);
$exec->appendChild($heureen);
$acteNGAP->appendChild($exec);
$medE->appendChild($numADELI);
$identm->appendChild($codeia);
$medE->appendChild($identm);
$persom->appendChild($nomUm);
$prenomsm->appendChild($prenomm);
$persom->appendChild($prenomsm);
$medE->appendChild($persom);
$medecins->appendChild($medE);
$presta->appendChild($medecins);
$uniteFo->appendChild($codeuf);
$presta->appendChild($uniteFo);
$acteNGAP->appendChild($presta);
$actesNGAP->appendChild($acteNGAP);
$raes = $actesNGAP;
break;
}
$enteteM->appendChild($idMe);
$enteteM->appendChild($dHProd);
$agente->appendChild($codee);
$agentse->appendChild($agente);
$emett->appendChild($agentse);
$enteteM->appendChild($emett);
$agentd->appendChild($coded);
$agentsd->appendChild($agentd);
$desti->appendChild($agentsd);
$enteteM->appendChild($desti);
$evtsSA->appendChild($enteteM);
$emettp->appendChild($valpe);
$identp->appendChild($emettp);
$recepp->appendChild($valpp);
$identp->appendChild($recepp);
$patient->appendChild($identp);
$persP->appendChild($nomUs);
$prenoms->appendChild($prenom);
$persP->appendChild($prenoms);
$dateNa->appendChild($dateN);
$persP->appendChild($dateNa);
$patient->appendChild($persP);
$evtSA->appendChild($patient);
$emettv->appendChild($valve);
$identv->appendChild($emettv);
$recepv->appendChild($valvp);
$identv->appendChild($recepv);
$venue->appendChild($identv);
$evtSA->appendChild($venue);
$debut->appendChild($dateID);
$debut->appendChild($heureID);
$interv->appendChild($debut);
$identi->appendChild($emetti);
$interv->appendChild($identi);
$datePr->appendChild($dateP);
$datePr->appendChild($heureP);
$demande->appendChild($datePr);
$uniteF->appendChild($code);
$demande->appendChild($uniteF);
$interv->appendChild($demande);
$evtSA->appendChild($interv);
$evtSA->appendChild($raes);
$evtsSA->appendChild($evtSA);
$dom->appendChild($evtsSA);
} else {
$dom = new DOMDocument('1.0', 'ISO-8859-1');
$evtsPMSI = $dom->createElement('evenementsPMSI', '');
$enteteM = $dom->createElement('enteteMessage', '');
$idMe = $dom->createElement('identifiantMessage', $res['ID'][$i]);
$dHProd = $dom->createElement('dateHeureProduction', $date->getDatetime());
$emett = $dom->createElement('emetteur', '');
$agentse = $dom->createElement('agents', '');
$agente = $dom->createElement('agent', '');
$agente->setAttribute('categorie', 'application');
$codee = $dom->createElement('code', $options->getOption('HprimXML_Emet'));
$desti = $dom->createElement('destinataire', '');
$agentsd = $dom->createElement('agents', '');
$agentd = $dom->createElement('agent', '');
$agentd->setAttribute('categorie', 'application');
$coded = $dom->createElement('code', $options->getOption('HprimXML_Dest'));
$evtPMSI = $dom->createElement('evenementPMSI', '');
$patient = $dom->createElement('patient', '');
$identp = $dom->createElement('identifiant', '');
$emettp = $dom->createElement('emetteur', '');
$valpe = $dom->createElement('valeur', $idu);
$recepp = $dom->createElement('recepteur', '');
$valpp = $dom->createElement('valeur', $idu);
$persP = $dom->createElement('personnePhysique', '');
$persP->setAttribute('sexe', $sexe);
$nomUs = $dom->createElement('nomUsuel', $nomu);
$prenoms = $dom->createElement('prenoms', '');
$prenom = $dom->createElement('prenom', $pren);
$dateNa = $dom->createElement('dateNaissance', '');
$dateN = $dom->createElement('date', $dtnai);
$venue = $dom->createElement('venue', '');
$identv = $dom->createElement('identifiant', '');
$recepv = $dom->createElement('recepteur', '');
$valeur = $dom->createElement('valeur', $idpass);
$entreev = $dom->createElement('entree', '');
$entreev->setAttribute('typeEntree', '');
$dateHO = $dom->createElement('dateHeureOptionnelle', '');
$dateho = $dom->createElement('date', $dtdem);
$heureho = $dom->createElement('heure', $hhdem);
$rss = $dom->createElement('rss', '');
$rum = $dom->createElement('rum', '');
$rum->setAttribute('action', $action);
$identr = $dom->createElement('identifiant', '');
$emettr = $dom->createElement('emetteur', $idpass);
$dateAc = $dom->createElement('dateAction', $dtr);
$actAc = $dom->createElement('acteurAction', '');
$numAA = $dom->createElement('numeroAdeli', $adeli);
$uniteMed = $dom->createElement('uniteMedicale', '');
$codeU = $dom->createElement('code', $ufr);
$entreeU = $dom->createElement('entree', '');
$entreeU->setAttribute('mode', '');
$entreeU->setAttribute('complementMode', '');
$dateHOe = $dom->createElement('dateHeureOptionnelle', '');
$datHoe = $dom->createElement('date', $dtr);
$heurHoe = $dom->createElement('heure', $hhr);
$diags = $dom->createElement('diagnostics', '');
$diagPri = $dom->createElement('diagnosticPrincipal', '');
$codeCim = $dom->createElement('codeCim10', $cdccam);
$diagsSi = $dom->createElement('diagnosticsSignificatifs', '');
$tabd = explode('~', $cddiags);
for ($i = 0; isset($tabd[$i]); $i++) {
eval('$diagSi' . $i . ' = $dom->createElement ( "diagnosticSignificatif", "" ) ;');
eval('$codeCimS' . $i . ' = $dom->createElement ( "codeCim10", "' . $tabd[$i] . '" ) ;');
}
$enteteM->appendChild($idMe);
$enteteM->appendChild($dHProd);
$agente->appendChild($codee);
$agentse->appendChild($agente);
$emett->appendChild($agentse);
$enteteM->appendChild($emett);
$agentd->appendChild($coded);
$agentsd->appendChild($agentd);
$desti->appendChild($agentsd);
$enteteM->appendChild($desti);
$evtsPMSI->appendChild($enteteM);
$emettp->appendChild($valpe);
$identp->appendChild($emettp);
//$valpp = $dom->createElement ( 'valeur', $idu ) ;
$recepp->appendChild($valpp);
$identp->appendChild($recepp);
$patient->appendChild($identp);
$persP->appendChild($nomUs);
$prenoms->appendChild($prenom);
$persP->appendChild($prenoms);
$dateNa->appendChild($dateN);
$persP->appendChild($dateNa);
$patient->appendChild($persP);
$evtPMSI->appendChild($patient);
$recepv->appendChild($valeur);
$identv->appendChild($recepv);
$venue->appendChild($identv);
$dateHO->appendChild($dateho);
$dateHO->appendChild($heureho);
$entreev->appendChild($dateHO);
$venue->appendChild($entreev);
$evtPMSI->appendChild($venue);
$identr->appendChild($emettr);
$rum->appendChild($identr);
$rum->appendChild($dateAc);
$actAc->appendChild($numAA);
$rum->appendChild($actAc);
$uniteMed->appendChild($codeU);
$dateHOe->appendChild($datHoe);
$dateHOe->appendChild($heurHoe);
$entreeU->appendChild($dateHOe);
$uniteMed->appendChild($entreeU);
$rum->appendChild($uniteMed);
$diagPri->appendChild($codeCim);
$diags->appendChild($diagPri);
for ($i = 0; isset($tabd[$i]); $i++) {
eval('$diagSi' . $i . ' -> appendChild ( $codeCimS' . $i . ' ) ;');
eval('$diagsSi -> appendChild ( $diagSi' . $i . ' ) ;');
}
$diags->appendChild($diagsSi);
//$uniteMed -> appendChild ( $diags ) ;
$rum->appendChild($diags);
$rss->appendChild($rum);
$evtPMSI->appendChild($rss);
$evtsPMSI->appendChild($evtPMSI);
$dom->appendChild($evtsPMSI);
}
if ($type == 'DIAG' and $options->getOption("HprimXML_noDIAG")) {
// Création, écriture et fermeture du fichier.
$this->af .= "- Génération du fichier '" . 'hprim/xml/' . $nomFic . '.xml' . ' -> ';
$this->mbtv2Traited($num);
$this->af .= '<font color="orange">Pas d\'envoi des DIAG</font><br/>';
} else {
// Création, écriture et fermeture du fichier.
$this->af .= "- Génération du fichier '" . 'hprim/xml/' . $nomFic . '.xml' . ' -> ';
$FIC = fopen('hprim/xml/' . $nomFic . '.xml', "w");
$creation = fwrite($FIC, $dom->saveXML());
fclose($FIC);
if ($creation) {
$FIC = fopen('hprim/xml/' . $nomFic . '.ok', "w");
$creation2 = fwrite($FIC, '');
fclose($FIC);
}
//eko ( $nomFic." -> ".$res['ID'][$i]." ($num)" ) ;
if ($creation) {
$this->mbtv2Traited($num);
$this->af .= '<font color="green">OK</font><br/>';
} else {
global $errs;
$errs->addErreur('Problème création pour ID=' . $num);
$this->af .= '<font color="red">KO</font><br/>';
}
}
}
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 createDiag($res, $i)
{
global $options;
global $stopAffichage;
$mod = new ModeliXe("HprimXMLDiag.html");
$mod->SetModeliXe();
$tabActe = array();
$tabActe = explode('|', XhamTools::sansAccent($res['CONTENU'][$i]));
$type = $res['TYPE'][$i];
$idpass = $tabActe[0];
$idu = $tabActe[1];
$nomu = $tabActe[2];
$pren = $tabActe[3];
$sexe = $tabActe[4];
$dtnai = $tabActe[5];
$dtdem = $tabActe[6];
$hhdem = $tabActe[7];
$action = $tabActe[9];
$idact = $tabActe[10];
$cdccam = $tabActe[11];
$cddiags = $tabActe[12];
$dtr = $tabActe[15];
$hhr = $tabActe[16];
$nomumed = $tabActe[17];
$prenmed = $tabActe[18];
$adeli = $tabActe[19];
$ufr = $tabActe[20];
if ($options->getOption("HprimXML_CodeMedecinInterv") == 'ADELI9') {
$this->adeliMedecin = sprintf('%09d', $adeli);
} elseif ($options->getOption("HprimXML_CodeMedecinInterv") == 'NOMMED') {
$this->adeliMedecin = $nomumed . ' ' . $prenmed;
} elseif ($options->getOption("HprimXML_CodeMedecinInterv") == 'NOMMED10') {
$this->adeliMedecin = substr($nomumed . ' ' . $prenmed, 0, 10);
} elseif ($options->getOption("HprimXML_CodeMedecinInterv") == 'ADELI') {
$this->adeliMedecin = $adeli;
} else {
$this->adeliMedecin = '';
}
if ($action == 'creation') {
$action = utf8_encode('création');
}
$date = new clDate();
if ($options->getOption('HprimXML_NomFic')) {
$nomFic = $options->getOption('HprimXML_NomFic') . '_' . $res['ID'][$i] . '';
} else {
$nomFic = 'fic' . $options->getOption('HprimXML_ChaineFic') . 'TV2_' . $res['ID'][$i] . '';
}
$num = $res['ID'][$i];
$pati = new clPatient($res['DISCR'][$i], '');
if (!$pati->getID()) {
$pati = new clPatient($res['DISCR'][$i], 'Sortis');
}
$datadmi = new clDate($pati->getDateAdmission());
$datexam = new clDate($pati->getDateExamen());
$datsort = new clDate($pati->getDateSortie());
$this->codeMedecinUrgentiste = $pati->getMatriculeMedecin();
if ($options->getOption("ChoixHeureAffectationActes") == "Heure d'admission") {
$datdema = $datadmi;
} elseif ($options->getOption("ChoixHeureAffectationActes") == "Heure d'examen") {
$datdema = $datexam;
} elseif ($options->getOption("ChoixHeureAffectationActes") == "Heure de sorti") {
$datdema = $datsort;
} else {
if ($datadmi->getDatetime() != '1999-12-31 00:00:00' and $datsort->getDatetime() != '1999-12-31 00:00:00') {
$time = (int) ($datadmi->getTimestamp() / 2) + $datsort->getTimestamp() / 2;
} elseif ($datadmi->getDatetime() != '1999-12-31 00:00:00') {
$time = $datadmi->getTimestamp();
} else {
$time = $datsort->getTimestamp();
}
$datdema = new clDate($time);
$datmed = new clDate($time);
//eko ( $datadmi->getTimestamp ( ).' + '.$datsort->getTimestamp ( ).' = '.$time.' = '.$datdema -> getTimestamp ( ) ) ;
//eko ( $datadmi->getDatetime ( ).' + '.$datsort->getDatetime ( ).' = '.$time.' = '.$datdema -> getDatetime ( ) ) ;
}
$dtdem = $datdema->getDate('Y-m-d');
$hhdem = $datdema->getDate('H:i:s');
if ($options->getOption('HprimXML_DateProduction') == 'Heure médiane') {
$date = $datmed;
} elseif ($options->getOption('HprimXML_DateProduction') == 'Heure admission') {
$date = $datadmi;
} elseif ($options->getOption('HprimXML_DateProduction') == 'Heure examen') {
$date = $datadmi;
} elseif ($options->getOption('HprimXML_DateProduction') == 'Heure sortie') {
$date = $datsort;
}
if ($options->getOption('HprimXML_DateT')) {
$mod->MxText('dateHeureProduction', $date->getDate("Y-m-d\\TH:i:s"));
} else {
$mod->MxText('dateHeureProduction', $date->getDatetime());
}
if ($options->getOption('HprimXML_DateVenue') == 'Heure médiane') {
$dateve = $datmed;
} elseif ($options->getOption('HprimXML_DateVenue') == 'Heure admission') {
$dateve = $datadmi;
} elseif ($options->getOption('HprimXML_DateVenue') == 'Heure examen') {
$dateve = $datadmi;
} elseif ($options->getOption('HprimXML_DateVenue') == 'Heure sortie') {
$dateve = $datsort;
} else {
$dateve = $datdema;
}
$dtven = $dateve->getDate('Y-m-d');
$hhven = $dateve->getDate('H:i:s');
$mod->MxText('identifiantMessage', $res['ID'][$i]);
if ($options->getOption('HprimXML_DateT')) {
$mod->MxText('dateHeureProduction', $date->getDate("Y-m-d\\TH:i:s"));
} else {
$mod->MxText('dateHeureProduction', $date->getDatetime());
}
$mod->MxText('codeEmetteur', $options->getOption('HprimXML_Emet') ? $options->getOption('HprimXML_Emet') : $res['DISCR'][$i]);
$mod->MxText('codeDestinataire', $options->getOption('HprimXML_Dest'));
$mod->MxText('patientEmetteur', $idu);
$mod->MxText('patientRecepteur', $idu);
$mod->MxText('sexe', $sexe);
$mod->MxText('patientNom', $nomu);
$mod->MxText('patientPrenom', $pren);
if ($dtnai != "00/00/0000") {
$mod->MxText('patientNaissance', $dtnai);
} else {
$mod->MxText('patientNaissance', "");
}
$mod->MxText('venueRecepteur', $idpass);
$mod->MxText('venueDate', $dtven);
$mod->MxText('venueHeure', $hhven);
$mod->MxText('action', $action);
$mod->MxText('rumEmetteur', $idpass);
$mod->MxText('rumDate', $dtr);
$mod->MxText('ADELI', $this->adeliMedecin);
//$mod -> MxText ( 'rumUF', $ufr ) ;
$mod->MxText('rumUF', $pati->getUF() ? $pati->getUF() : $ufr);
$mod->MxText('rumUFDate', $dtdem);
$mod->MxText('rumUFHeure', $hhdem);
switch ($options->getOption('HprimXML_CIM10_encodage')) {
case 'alphanum':
$cdccam = ereg_replace("[^A-Za-z0-9]", "", $cdccam);
break;
case 'alphanumcross':
$cdccam = ereg_replace("[^A-Za-z0-9+]", "", $cdccam);
break;
default:
$cdccam = $cdccam;
break;
}
$mod->MxText('cim10princ', $cdccam);
$tabd = explode('~', $cddiags);
//eko ( count ( $tabd ).' : '.$cddiags );
if (count($tabd) < 1 or $cddiags == '~' or $cddiags == '') {
//$mod -> MxBloc ( 'diagsign', 'replace', '<diagnosticSignificatif><codeCim10/></diagnosticSignificatif>' ) ;
//eko ( "ici" ) ;
$mod->MxBloc('diagssign', 'replace', ' ');
} else {
for ($i = 0; isset($tabd[$i]); $i++) {
switch ($options->getOption('HprimXML_CIM10_encodage')) {
case 'alphanum':
$codeCim10sign = ereg_replace("[^A-Za-z0-9]", "", $tabd[$i]);
break;
case 'alphanumcross':
$codeCim10sign = ereg_replace("[^A-Za-z0-9+]", "", $tabd[$i]);
break;
default:
$codeCim10sign = $tabd[$i];
break;
}
$mod->MxText('diagssign.diagsign.codeCim10sign', $codeCim10sign);
$mod->MxBloc('diagssign.diagsign', 'loop');
}
}
if ($options->getOption('HprimXML_NomFic') and $options->getOption('HprimXML_NomModulo')) {
$nomFic = $options->getOption('HprimXML_NomFic') . sprintf('%03d', $res['ID'][$deb] % 1000);
}
$this->genFile($mod->MxWrite("1"), $num, $nomFic, array(), "diagxml/");
}
static function sendJNLP()
{
$mod = new ModeliXe("exec.jnlp");
$mod->SetModeliXe();
// Récupération du nombre d'arguments de la fonction.
$n = func_num_args();
// Pour chaque argument, on le concatène au précédent avec le séparateur |.
for ($i = 1; $i < $n; $i++) {
$argi = func_get_arg($i);
$mod->MxText('arg.arg', $argi);
$mod->MxBloc('arg', 'loop');
}
$nom = 'open' . XhamTools::getAlea(16) . '.jnlp';
$url = URLCACHEWEB;
$mod->MxText('nom', $nom);
$mod->MxText('url', $url);
$mod->MxText('urls', URL);
$arg0 = func_get_arg(0);
$mod->MxText('editeur', $arg0);
$arg1 = func_get_arg(1);
$mod->MxText('titre', $arg1);
$f = fopen(URLCACHE . $nom, 'w');
fwrite($f, $mod->MxWrite("1"));
fclose($f);
header('Location:' . $url . $nom);
}
