function genListePatient($etape)
{
global $session;
global $options;
$uhcd = $options->getOption("FiltreSalleUHCD");
$pedi = $options->getOption("FiltreSalleSup");
// Préparation de la requête.
$req = new clResultQuery();
$param['table'] = $this->table;
if ($this->equipe) {
$eq = " AND traumato LIKE '{$this->equipe}%' ";
} else {
$eq = '';
}
// Cas des patients normaux.
if ($etape == 1) {
$list = new ListMaker("template/ListePatients.html");
// Changement de la requête des couleurs de la liste en fonction de la liste affichée (présents, UHCD, attendus ou sortis).
// Liste des patients présents.
if ($this->type == "Presents") {
//$param['cw'] = " p, ".BASEXHAM.".listes l WHERE ((p.dt_examen!='0000-00-00 00:00:00' AND l.nomliste='Salles d\'examens' AND p.salle_examen NOT LIKE 'UHCD%' AND (p.salle_examen=l.nomitem)) OR ( p.dt_examen!='0000-00-00 00:00:00' AND p.salle_examen=l.nomitem AND p.salle_examen NOT LIKE 'UHCD%' ) ) AND l.idapplication=".IDAPPLICATION." ORDER BY l.rang" ;
// Ancienne version avec classement des salles en fonction de leur rang : problème de salle invisible
//if ( $pedi )
// $param['cw'] = " p, ".BASEXHAM.".listes l WHERE ((p.dt_examen!='0000-00-00 00:00:00' AND l.nomliste='Salles d\'examens' " .
// "AND p.salle_examen NOT LIKE '$uhcd%' AND p.salle_examen NOT LIKE '$pedi%' AND (p.salle_examen=l.nomitem)) OR ( p.dt_examen!='0000-00-00 00:00:00' " .
// "AND p.salle_examen=l.nomitem AND p.salle_examen NOT LIKE '$uhcd%' AND p.salle_examen NOT LIKE '$pedi%' ) ) " .
// "AND l.idapplication=".IDAPPLICATION." ORDER BY l.rang" ;
//else
// $param['cw'] = " p, ".BASEXHAM.".listes l WHERE ((p.dt_examen!='0000-00-00 00:00:00' AND l.nomliste='Salles d\'examens' AND p.salle_examen NOT LIKE '$uhcd%' AND (p.salle_examen=l.nomitem)) OR ( p.dt_examen!='0000-00-00 00:00:00' AND p.salle_examen=l.nomitem AND p.salle_examen NOT LIKE '$uhcd%' ) ) AND l.idapplication=".IDAPPLICATION." ORDER BY l.rang" ;
if ($eq) {
$param['cw'] = " WHERE dt_examen!='0000-00-00 00:00:00' AND traumato LIKE '{$this->equipe}%' AND salle_examen NOT LIKE '{$uhcd}%'";
} elseif ($pedi) {
$param['cw'] = " p WHERE ((p.dt_examen!='0000-00-00 00:00:00' AND p.salle_examen NOT LIKE '{$uhcd}%' AND p.salle_examen NOT LIKE '{$pedi}%') OR ( p.dt_examen!='0000-00-00 00:00:00' " . "AND p.salle_examen NOT LIKE '{$uhcd}%' AND p.salle_examen NOT LIKE '{$pedi}%' ) )" . $eq;
} else {
$param['cw'] = " p WHERE ((p.dt_examen!='0000-00-00 00:00:00' AND p.salle_examen NOT LIKE '{$uhcd}%') OR ( p.dt_examen!='0000-00-00 00:00:00' AND p.salle_examen NOT LIKE '{$uhcd}%'))" . $eq;
}
$navi = $session->genNavi($session->getNavi(0));
$list->addUserVar('navi', $navi);
$list->addUrlVar('navi', $navi);
$list->setAlternateColor("vuspaire", "vusimpaire");
$list->setSortColumn('col1', 'Patient', 'nomD');
$list->setSortColumn('col2', 'Age', 'ageD');
$list->setSortColumn('col3', 'Mode adm.', 'modeAdm');
$list->setSortColumn('col4', 'Arrivée', 'arriveeD');
$list->setSortColumn('col5', 'Soignants', 'soignants');
$list->setSortColumn('col6', 'Salle', 'salle');
$list->setSortColumn('col7', 'Motif', 'motif');
$list->setSortColumn('col8', 'Code', 'code');
$list->setSortColumn('col9', 'Dest. Souhait.', 'destSouhaitee');
$list->setSortColumn('col0', 'Dest. Confirmée', 'destAttendue');
switch ($options->getOption("ClassementPatients")) {
case 'Salle':
$list->setdefaultSort('col6');
break;
case 'Arrivée':
$list->setdefaultSort('col4');
break;
case 'Nom':
$list->setdefaultSort('col1');
break;
}
/********/
/* Pour gérer un problème de style. */
$list->addUserVar('{fin_table}', "</table>");
/********/
// Liste des patients sortis.
} elseif ($this->type == "Sortis") {
$list = new ListMaker("template/ListePatientsSortis.html");
$navi = $session->genNavi($session->getNavi(0));
$list->addUserVar('navi', $navi);
$list->addUrlVar('navi', $navi);
$list->setSortColumn('col1', 'Patient', 'nomD');
$list->setSortColumn('col2', 'Arrivée', 'arriveeD');
$list->setSortColumn('col3', 'Examen', 'examenD');
$list->setSortColumn('col4', 'Sortie', 'sortieD');
$list->setSortColumn('col5', 'Dest. souhaitée', 'destSouhaitee');
$list->setSortColumn('col6', 'Dest. confirmée', 'destAttendue');
$list->setSortColumn('col7', 'Médecin', 'medecin');
$list->setSortColumn('col8', 'IDE', 'ide');
$list->setSortColumn('col9', 'UF', 'uf');
$list->setdefaultSort('');
$param['cw'] = $this->filtre . " ORDER BY nom ASC";
$list->setAlternateColor("sortispaire", "sortisimpaire");
// Liste des patients attendus.
//if ( $this->filtre2 != "" )
} elseif ($this->type == "Attendus") {
$list = new ListMaker("template/ListePatientsAttendus.html");
$param['cw'] = "ORDER BY date";
$list->setAlternateColor("attenduspaire", "attendusimpaire");
// Liste des patients UHCD.
} elseif ($this->type == "UHCD") {
//$param['cw'] = " p, ".BASEXHAM.".listes l WHERE p.salle_examen LIKE '$uhcd%' AND p.salle_examen=l.nomitem AND l.idapplication=".IDAPPLICATION." AND l.nomliste='Salles d\'examens' ORDER BY l.rang" ;
$param['cw'] = " p WHERE p.salle_examen LIKE '{$uhcd}%'";
$list->setAlternateColor("uhcdpaire", "uhcdimpaire");
$navi = $session->genNavi($session->getNavi(0));
$list->addUserVar('navi', $navi);
$list->addUrlVar('navi', $navi);
$list->setSortColumn('col1', 'Patient', 'nomD');
$list->setSortColumn('col2', 'Age', 'ageD');
$list->setSortColumn('col3', 'Mode adm.', 'modeAdm');
$list->setSortColumn('col4', 'Arrivée', 'arriveeD');
$list->setSortColumn('col5', 'Soignants', 'soignants');
$list->setSortColumn('col6', 'Salle', 'salle');
$list->setSortColumn('col7', 'Motif', 'motif');
$list->setSortColumn('col8', 'Code', 'code');
$list->setSortColumn('col9', 'Dest. Souhait.', 'destSouhaitee');
$list->setSortColumn('col0', 'Dest. Confirmée', 'destAttendue');
switch ($options->getOption("ClassementPatients")) {
case 'Salle':
$list->setdefaultSort('col6');
break;
case 'Arrivée':
$list->setdefaultSort('col4');
break;
case 'Nom':
$list->setdefaultSort('col1');
break;
}
$list->addUserVar('fin_table', "</table>");
} else {
//if ( $pedi )
// $param['cw'] = " p, ".BASEXHAM.".listes l WHERE p.salle_examen LIKE '$pedi%' AND p.salle_examen=l.nomitem AND l.idapplication=".IDAPPLICATION." AND l.nomliste='Salles d\'examens' ORDER BY l.rang" ;
//else
// $param['cw'] = " p, ".BASEXHAM.".listes l WHERE p.salle_examen LIKE 'AUCUNESALLE%' AND p.salle_examen=l.nomitem AND l.idapplication=".IDAPPLICATION." AND l.nomliste='Salles d\'examens' ORDER BY l.rang" ;
if ($this->equipe) {
$param['cw'] = "p WHERE p.traumato LIKE '{$this->equipe}%'";
} else {
if ($pedi) {
$param['cw'] = " p WHERE p.salle_examen LIKE '{$pedi}%'";
} else {
$param['cw'] = " p WHERE p.salle_examen LIKE 'AUCUNESALLE%'";
}
}
$list->setAlternateColor("uhcdpaire", "uhcdimpaire");
$navi = $session->genNavi($session->getNavi(0));
$list->addUserVar('navi', $navi);
$list->addUrlVar('navi', $navi);
$list->setSortColumn('col1', 'Patient', 'nomD');
$list->setSortColumn('col2', 'Age', 'ageD');
$list->setSortColumn('col3', 'Mode adm.', 'modeAdm');
$list->setSortColumn('col4', 'Arrivée', 'arriveeD');
$list->setSortColumn('col5', 'Soignants', 'soignants');
$list->setSortColumn('col6', 'Salle', 'salle');
$list->setSortColumn('col7', 'Motif', 'motif');
$list->setSortColumn('col8', 'Code', 'code');
$list->setSortColumn('col9', 'Dest. Souhait.', 'destSouhaitee');
$list->setSortColumn('col0', 'Dest. Confirmée', 'destAttendue');
switch ($options->getOption("ClassementPatients")) {
case 'Salle':
$list->setdefaultSort('col6');
break;
case 'Arrivée':
$list->setdefaultSort('col4');
break;
case 'Nom':
$list->setdefaultSort('col1');
break;
}
$list->addUserVar('fin_table', "</table>");
}
// Exécution de la requête.
if ($this->type == "Sortis") {
if (eregi("idformx", $this->filtre)) {
$tab["table"] = BDD . "." . PSORTIS . "," . FX_BDD . "." . TABLEFORMX;
$tab["cw"] = $param["cw"];
$res = $req->Execute("Fichier", "getPatients", $tab, "ResultQuery");
//eko($res);
} else {
$res = $req->Execute("Fichier", "getPatients", $param, "ResultQuery");
}
//eko ( $res['INDIC_SVC'] ) ;
} else {
$res = $req->Execute("Fichier", "getPatients", $param, "ResultQuery");
}
//eko ( $res['INDIC_SVC'] ) ;
//eko($res);
//eko ( $res['INDIC_SVC'] ) ;
if (DEBUGLISTESPATIENTS and $session->getDroit("Liste_" . $this->type, "a")) {
newfct(gen_affiche_tableau, $res[INDIC_SVC]);
}
// Cas des patients non-vus.
} else {
$list = new ListMaker("template/ListePatientsBis.html");
if ($eq) {
$param['cw'] = "WHERE dt_examen='0000-00-00 00:00:00' AND traumato LIKE '{$this->equipe}%' ";
} elseif ($pedi) {
$param['cw'] = "WHERE dt_examen='0000-00-00 00:00:00' AND salle_examen NOT LIKE '{$uhcd}%' AND salle_examen NOT LIKE '{$pedi}%'" . $eq . ' ORDER BY dt_admission';
} else {
$param['cw'] = "WHERE dt_examen='0000-00-00 00:00:00' AND salle_examen NOT LIKE '{$uhcd}%'" . $eq . ' ORDER BY dt_admission';
}
$res = $req->Execute("Fichier", "getPatients", $param, "ResultQuery");
}
// eko ( $res['INDIC_SVC'] ) ;
global $tabID;
if (!is_array($tabID)) {
$tabID = array();
}
// Parcours de la liste des patients récupérés par la requête.
for ($i = 0; isset($res['idpatient'][$i]); $i++) {
if (!in_array($res['idpatient'][$i], $tabID)) {
// 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['sexe'] = "<img src=\"{$img}\" alt=\"" . $res['sexe'][$i] . "\" />";
// Calcul de l'âge.
$date = new clDate($res['dt_naissance'][$i]);
$age = new clDuree($date->getTimestamp());
$str = $age->getAgePrecis($date->getTimestamp());
if ($res['dt_naissance'][$i] != "0000-00-00 00:00:00") {
$item['age'] = $str;
$item['ageD'] = $date->getTimestamp();
} else {
$item['age'] = VIDEDEFAUT;
$item['ageD'] = VIDEDEFAUT;
}
// Destination souhaitée.
if ($res['dest_souhaitee'][$i]) {
$item['destSouhaitee'] = $res['dest_souhaitee'][$i];
} else {
$item['destSouhaitee'] = VIDEDEFAUT;
}
// Destination attendue.
if ($res['dest_attendue'][$i]) {
$item['destAttendue'] = $res['dest_attendue'][$i];
} else {
$item['destAttendue'] = VIDEDEFAUT;
}
//////////////////////////////////// Patients Attendus ////////////////////////////////////////
if ($this->type == "Attendus") {
$item['urlpatient'] = URLNAVI . $session->genNavi($session->getNavi(0), "modPatientAttendu", $res['idpatient'][$i]);
// Concaténation du nom et du prénom.
$item['patient'] = strtoupper($res['nom'][$i]) . " " . ucfirst(strtolower($res['prenom'][$i]));
// Heure de création.
if ($res['date'][$i]) {
$dateCreation = new clDate($res['date'][$i]);
$item['date'] = $dateCreation->getDate("d-m-Y H:i");
} else {
$item['date'] = VIDEDEFAUT;
}
// Gestion de l'âge.
if ($res['dt_naissance'][$i]) {
$item['age'] = $res['dt_naissance'][$i];
} else {
$item['age'] = VIDEDEFAUT;
}
// Récupération du mode d'admission.
if ($res['adresseur'][$i]) {
$item['adresseur'] = $res['adresseur'][$i];
} else {
$item['adresseur'] = VIDEDEFAUT;
}
// Médecin et IDE.
if ($res['medecin_urgences'][$i]) {
$med = "Dr " . $res['medecin_urgences'][$i];
} else {
$med = VIDEDEFAUT;
}
$item['medecin'] = $med;
// Observations.
if ($res['observations'][$i]) {
$item['observations'] = nl2br($res['observations'][$i]);
} else {
$item['observations'] = VIDEDEFAUT;
}
// Génération du lien de bascule.
$imgBasculer = "<img src=\"images/basculer.gif\" name=\"Ajouter\" alt=\"Basculer le patient dans les présents\" /></a>";
$imgSupprimer = "<img src=\"images/Supprimer.gif\" name=\"Supprimer\" alt=\"Supprimer le patient attendu\" /></a>";
$imgModifier = "<img src=\"images/modifier2.gif\" name=\"Modifier\" alt=\"Modifier le patient attendu\" /></a>";
// En fonction des droits et des options, nous affichons les boutons d'actions.
if ($session->getDroit("Liste_" . $this->type, "a") and $options->getOption("AjoutManuel")) {
$item['lienBasculer'] = "<a href=\"" . URLNAVI . $session->genNavi("Liste_Presents", "basculerPatient", $res['idpatient'][$i]) . "\">" . $imgBasculer;
}
if ($session->getDroit("Liste_" . $this->type, "d")) {
$item['lienSupprimer'] = "<a href=\"" . URLNAVI . $session->genNavi($session->getNavi(0), "delPatient", $res['idpatient'][$i]) . "\">" . $imgSupprimer;
}
if ($session->getDroit("Liste_" . $this->type, "d")) {
$item['lienModifier'] = "<a href=\"" . URLNAVI . $session->genNavi($session->getNavi(0), "modPatientAttendu", $res['idpatient'][$i]) . "\">" . $imgModifier;
}
//////////////////////////////////// Patients Sortis ////////////////////////////////////////
} elseif ($this->type == "Sortis") {
$item['urlpatient'] = URLNAVI . $session->genNavi($session->getNavi(0), "FichePatient", $res['idpatient'][$i]);
// Concaténation du nom et du prénom.
if ($session->getDroit("Liste_" . $this->type, "m")) {
$item['patient'] = "<a href=\"" . URLNAVI . $session->genNavi($session->getNavi(0), "FichePatient", $res['idpatient'][$i]) . "\" " . clPatient::genInfoBulle($res, $i) . ">" . strtoupper($res['nom'][$i]) . "</a> " . ucfirst(strtolower($res['prenom'][$i]));
} else {
$item['patient'] = strtoupper($res['nom'][$i]) . " " . ucfirst(strtolower($res['prenom'][$i]));
}
$item['nomD'] = strtoupper($res['nom'][$i]);
// Heure d'arrivée.
if ($res['dt_admission'][$i] != "0000-00-00 00:00:00") {
$dateTemp = new clDate($res['dt_admission'][$i]);
$item['arrivee'] = $dateTemp->getDate("d-m-Y H:i");
$item['arriveeD'] = $dateTemp->getTimestamp();
} else {
$item['arrivee'] = VIDEDEFAUT;
$item['arriveeD'] = VIDEDEFAUT;
}
// Heure d'examen.
if ($res['dt_examen'][$i] != "0000-00-00 00:00:00") {
$dateTemp = new clDate($res['dt_examen'][$i]);
$item['examen'] = $dateTemp->getDate("d-m-Y H:i");
$item['examenD'] = $dateTemp->getTimestamp();
} else {
$item['examen'] = VIDEDEFAUT;
$item['examenD'] = 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");
$item['sortieD'] = $dateTemp->getTimestamp();
} else {
$item['sortie'] = VIDEDEFAUT;
$item['sortieD'] = VIDEDEFAUT;
}
// Médecin.
if ($res['medecin_urgences'][$i]) {
$med = "Dr " . $res['medecin_urgences'][$i];
} else {
$med = VIDEDEFAUT;
}
$item['medecin'] = $med;
// IDE.
if ($res['ide'][$i]) {
$ide = $res['ide'][$i];
} else {
$ide = VIDEDEFAUT;
}
$item['ide'] = $ide;
// Affichage des informations sur l'UF
$ufExec = $options->getOption('numUFexec');
$ufUHCD = $options->getOption('numUFUHCD');
$ufSC = $options->getOption('numUFSC');
$dtUHCD = new clDate($res['dt_UHCD'][$i]);
if ($res['uf'][$i] == $ufUHCD) {
$sup = $res['uf'][$i] . ' - UHCD<br/>' . ($res['dt_UHCD'][$i] != '0000-00-00 00:00:00' ? $dtUHCD->getDate('d/m/Y à H:i') : '') . '';
} elseif ($res['uf'][$i] == $ufSC) {
$sup = $res['uf'][$i] . ' - Soins Continus';
} else {
$sup = $res['uf'][$i] . ' - Urgences';
}
$item['uf'] = $sup;
if ($options->getOption("Sortis Pagination") != "Tous") {
$pagination = $options->getOption("Sortis Pagination");
}
//////////////////////////////////// Patients Présents ////////////////////////////////////////
} else {
$item['urlpatient'] = URLNAVI . $session->genNavi($session->getNavi(0), "FichePatient", $res['idpatient'][$i]);
// Concaténation du nom et du prénom.
if ($session->getDroit("Liste_" . $this->type, "m")) {
$item['patient'] = "<a href=\"" . URLNAVI . $session->genNavi($session->getNavi(0), "FichePatient", $res['idpatient'][$i]) . "\" " . clPatient::genInfoBulle($res, $i) . ">" . strtoupper($res['nom'][$i]) . "</a><br />" . ucfirst(strtolower($res['prenom'][$i]));
} else {
$item['patient'] = strtoupper($res['nom'][$i]) . "<br />" . ucfirst(strtolower($res['prenom'][$i]));
}
$item['nomD'] = strtoupper($res['nom'][$i]);
// Récupération du mode d'admission.
if ($res['mode_admission'][$i]) {
$item['modeAdm'] = $res['mode_admission'][$i];
} else {
$item['modeAdm'] = VIDEDEFAUT;
}
if ($res['uf'][$i] == $options->getOption('numUFSC')) {
$item['colorSpe'] = 'style="background-color:#E73E01;"';
} else {
$item['colorSpe'] = '';
}
// Heure d'admission.
if ($res['dt_admission'][$i] != "0000-00-00 00:00:00") {
$datead = new clDate($res['dt_admission'][$i]);
$dateSimple = $datead->getDate("d-m-Y");
$dureead = new clDuree();
$duree = $dureead->getDureeCourte($datead->getDatetime());
$item['arrivee'] = $duree . "<br />" . $dateSimple;
$item['arriveeD'] = $datead->getTimestamp();
} else {
$item['arrivee'] = VIDEDEFAUT;
$item['arriveeD'] = VIDEDEFAUT;
}
// Observations.
$item['obs'] = "?";
// Médecin et IDE.
if ($res['medecin_urgences'][$i]) {
$med = "Dr " . $res['medecin_urgences'][$i];
} else {
$med = VIDEDEFAUT;
}
if ($res['ide'][$i]) {
$ide = "Ide " . $res['ide'][$i];
} else {
$ide = VIDEDEFAUT;
}
$item['soignants'] = $med . "<br />" . $ide;
// Salle actuelle.
$radio = clListeRadios::getEtatSalle($res['idpatient'][$i], IDAPPLICATION);
if ($res['salle_examen'][$i]) {
$item['salle'] = $res['salle_examen'][$i] . "{$radio}<br/>" . ($res['traumato'][$i] ? $res['traumato'][$i] : '');
} else {
$item['salle'] = VIDEDEFAUT . "{$radio}<br/>" . ($res['traumato'][$i] ? $res['traumato'][$i] : '');
}
// Motif de recours.
if ($res['motif_recours'][$i]) {
$item['motif'] = $res['motif_recours'][$i];
} else {
$item['motif'] = VIDEDEFAUT;
}
// Code gravité.
if ($res['code_gravite'][$i]) {
$item['code'] = $res['code_gravite'][$i];
} else {
$item['code'] = VIDEDEFAUT;
}
// Infos visuelles (colonne Observations).
$dureeMaxSansUHCD = 3600 * $options->getOption("Présents UHCD");
$item['obs'] = "";
$uhcd = $options->getOption("FiltreSalleUHCD");
if ($res['dt_admission'][$i] != "0000-00-00 00:00:00") {
//if ( $options -> getOption ( "ContrainteHuitUF2702" ) AND $dureead -> getSeconds ( ) > $dureeMaxSansUHCD AND $res['uf'][$i] != "2702" AND ! $res['manuel'][$i] )
/*
if ( $options -> getOption ( "GestionUHCD" ) AND $res['uf'][$i] != $options->getOption ( "numUFUHCD" ) ) {
$ufExec = $options->getOption ( 'numUFexec' ) ;
$ufUHCD = $options->getOption ( 'numUFUHCD' ) ;
$uf = $options->getOption ( 'numUFexec' ) ;
$etat = $res['etatUHCD'][$i] ;
$oldUF = $res['uf'][$i] ;
// Calcul du critère CCMU4 ou CCMU5
if ( $res['code_gravite'][$i] == 4 OR $res['code_gravite'][$i] == 5 )
$CCMU45 = 1 ; else $CCMU45 = 0 ;
// Calcul du critère sur la durée
$datead = new clDate ( $res['dt_admission'][$i] ) ;
$dureead = new clDuree ( ) ;
$duree = $dureead -> getDureeCourte ( $datead -> getDatetime ( ) ) ;
$dureeMaxSansUHCD = 3600 * $options -> getOption ( "Présents UHCD" ) ;
$dureeHeure = $options -> getOption ( "Présents UHCD" ) ;
if ( $dureead -> getSeconds ( ) > $dureeMaxSansUHCD ) $duree = 1 ;
else $duree = 0 ;
// Calcul du critère sur le CCMU3
if ( $res['code_gravite'][$i] == 3 ) $CCMU3 = 1 ; else $CCMU3 = 0 ;
// Vérification des critères directs.
if ( $CCMU45 ) {
$rep = 'okCCMU45' ;
$uf = $ufUHCD ;
} else {
if ( $duree ) {
$rep = 'okDuree' ;
} else {
if ( $CCMU3 ) {
$rep = 'okCCMU3' ;
} else {
$rep = 'noCCMU3' ;
$uf = $ufExec ;
}
}
}
// Vérification de la réponse à la question sur les critères UHCD.
if ( $rep == 'okDuree' ) {
if ( $etat != 'okCriteres' AND $etat != 'noCriteres' ) $item['obs'] .= IMGALERTE ;
}
// Vérification de la réponse à la question sur les actes lourds.
if ( $rep == 'okCCMU3' ) {
if ( $etat != 'okActes' AND $etat != 'noActes' ) $item['obs'] .= IMGALERTE ;
}
}*/
if ($options->getOption("ModuleBMR")) {
// On vérifie si le patient est lié à une alerte BMR.
$param['cw'] = "WHERE IDU='" . $res['idu'][$i] . "'";
$ras = $req->Execute("Fichier", "getBMR", $param, "ResultQuery");
// Si au moins une alerte est liée au patient, on affiche une icone d'alerte.
if ($ras['INDIC_SVC'][2]) {
$item['obs'] .= "<img src=\"" . URLIMGRAD . "\" alt=\"BMR\" />";
}
//$item['obs'] .= IMGDOCS ;
}
}
// On vérifie si le patient a une note.
$param['cw'] = "WHERE ids='" . $res['idpatient'][$i] . "'";
$param['table'] = TABLENOTES;
$ras = $req->Execute("Fichier", "getGenXHAM", $param, "ResultQuery");
if ($ras['INDIC_SVC'][2] and $ras['note'][0] and $session->getDroit("Presents_Informations")) {
global $pi;
$item['obs'] .= "<img src=\"" . URLIMGOBS . "\" " . $pi->genInfoBulle($ras['note'][0]) . " alt=\"Comm.\" />";
}
$item['obs'] .= clListeRadios::getEtat($res['idpatient'][$i], IDAPPLICATION);
if ($_POST['showHisto']) {
// Récupération des passages précédents.
$param['IDU'] = $res['idu'][$i];
$res2 = $req->Execute("Fichier", "getHistorique", $param, "ResultQuery");
if ($res2['INDIC_SVC'][2]) {
$item['obs'] .= IMGHISTO;
}
// Récupération des passages précédents.
$param['ILP'] = $res['ilp'][$i];
$res2 = $req->Execute("Fichier", "getHistoriqueDocs", $param, "ResultQuery");
if ($res2['INDIC_SVC'][2]) {
$item['obs'] .= IMGHISTODOCS;
}
}
}
//$this->getInfoBulle ( $res, $i ) ;
$list->addItem($item);
}
$tabID[] = $res['idpatient'][$i];
}
// Récupération du code HTML généré.
$this->af .= $list->getList($pagination);
}
function getListeModelixe($nomListe, $cle = 'nomitem', $opt = '1')
{
$this->xham->options->checkOptionListe($nomListe);
// Préparation du type de classement pour la requête.
switch ($this->xham->getOption($nomListe)) {
case 'Manuel':
$order = "ORDER BY rang";
break;
case 'Alphabétique':
$order = "ORDER BY nomitem";
break;
case 'Alphabétique inversé':
$order = "ORDER BY nomitem DESC";
break;
default:
$order = "ORDER BY nomitem";
break;
}
$param['cw'] = "WHERE nomliste='" . addslashes($nomListe) . "' {$order}";
$res = $this->xham->Execute("Fichier", "getListesItems", $param, "ResultQuery");
// Affichage en cas de débugage.
if (DEBUGLISTES) {
newfct('gen_affiche_tableau', $res['INDIC_SVC']);
}
if ($opt) {
$tab[] = SELECTLISTE;
}
for ($i = 0; isset($res['iditem'][$i]); $i++) {
$tab[$res[$cle][$i]] = $res['nomitem'][$i];
}
return is_array($tab) ? $tab : array();
}
function getListeListes($nomListe, $modelixe = '', $placement = '', $nomItem = '', $indexNom = '')
{
global $options;
// Préparation du type de classement pour la requête.
switch ($options->getOption($this->type)) {
case 'Manuel':
$order = "ORDER BY rang";
break;
case 'Alphabétique':
$order = "ORDER BY nomliste";
break;
case 'Alphabétique inversé':
$order = "ORDER BY nomliste DESC";
break;
default:
$order = "";
break;
}
$param[cw] = "WHERE idDomaine='" . CCAM_IDDOMAINE . "' AND categorie=\"" . $this->type . "\" and nomitem=\"LISTE\" {$order}";
$req = new clResultQuery();
$res = $req->Execute("Fichier", "CCAM_getListesItemsComplexes", $param, "ResultQuery");
// Affichage en cas de débugage.
if (DEBUGLISTES) {
newfct(gen_affiche_tableau, $res[INDIC_SVC]);
}
// Préparation du tableau à retourner pour un select de modelixe.
if ($modelixe) {
// Placement ou affichage simple.
if ($placement) {
$placer = "Après ";
$tab[0] = "En début de liste";
$type = "iditem";
$val = 0;
} else {
$type = "iditem";
}
// Fabrication du tableau.
for ($i = 0; isset($res[iditem][$i]); $i++) {
if ($res[code][$i]) {
$code = " (" . $res[code][$i] . ")";
} else {
$code = "";
}
if (stripslashes($nomItem) == stripslashes($res[nomliste][$i])) {
if ($res[nomliste][$i]) {
$rang = $res[$type][$i];
$tab[$rang] = "Position actuelle";
}
} else {
if ($indexNom) {
$tab[$res[nomliste][$i] . $code] = $placer . $res[nomliste][$i] . $code;
} else {
if (DEBUGPOSITIONS) {
$tab[$res[$type][$i] + $val] = $placer . $res[rang][$i] . " - " . $res[nomliste][$i] . $code;
} else {
$tab[$res[$type][$i] + $val] = $placer . $res[nomliste][$i] . $code;
}
}
}
}
// Retourne le tableau au format attendu par modelixe.
return $tab;
} else {
// Retourne le tableau au format normal de ResultQuery.
return $res;
}
}
function getListeItems($nomListe, $modelixe = '', $placement = '', $nomItem = '')
{
global $options;
// Préparation du type de classement pour la requête.
switch ($options->getOption($nomListe)) {
case 'Manuel':
$order = "ORDER BY rang";
break;
case 'Alphabétique':
$order = "ORDER BY nomitem";
break;
case 'Alphabétique inversé':
$order = "ORDER BY nomitem DESC";
break;
default:
$order = "";
break;
}
$param[cw] = "WHERE nomliste='" . addslashes($nomListe) . "'";
$param[order] = $order;
$param[idDomaine] = CCAM_IDDOMAINE;
$req = new clResultQuery();
$res = $req->Execute("Fichier", "CCAM_getListesItems", $param, "ResultQuery");
//newfct(gen_affiche_tableau,$res[INDIC_SVC]);
// Affichage en cas de débugage.
if (DEBUGLISTES) {
newfct(gen_affiche_tableau, $res[INDIC_SVC]);
}
// Préparation du tableau à retourner pour un select de modelixe.
if ($modelixe) {
// Placement ou affichage simple.
if ($placement) {
$placer = "Après ";
$tab[0] = "En début de liste";
$type = "iditem";
$val = 0;
} else {
$type = "iditem";
}
// Fabrication du tableau.
for ($i = 0; isset($res[iditem][$i]); $i++) {
if ($nomItem == $res[nomitem][$i]) {
$rang = $res[$type][$i];
$tab[$rang] = "Position actuelle";
} else {
$tab[$res[$type][$i] + $val] = $placer . $res[nomitem][$i];
}
}
// Retourne le tableau au format attendu par modelixe.
return $tab;
} else {
// Retourne le tableau au format normal de ResultQuery.
return $res;
}
}
