function newMessage($listeMails = '')
{
global $session;
global $options;
if (!$this->patient->getILP()) {
$this->patient = new clPatient($this->idpatient, "Sortis");
}
if ($options->getOption("typeMail") == "HTML") {
$retourLigne = "<br />";
$trait = "<hr />";
} else {
$retourLigne = "\n";
$trait = "\n----------------------------------------------\n\n";
}
// Préparation des textes et dates...
$dest2 = '';
$message .= "Médecins urgences : " . ($this->patient->getMedecin() ? $this->patient->getMedecin() : '--') . $retourLigne;
$age = new clDate($this->patient->getDateNaissance());
$duree = new clDuree();
$adm = new clDate($this->patient->getDateAdmission());
$exa = new clDate($this->patient->getDateExamen());
$message .= "Concerne le patient : " . $this->patient->getSexe() . " " . $this->patient->getPrenom() . " " . strtoupper($this->patient->getNom()) . " (" . $duree->getAge($age->getTimestamp()) . ")" . $retourLigne;
$message .= "Numéro de séjour : " . $this->patient->getNSEJ() . $retourLigne;
$message .= "ILP : " . $this->patient->getILP() . $retourLigne;
$message .= "Médecin traitant : " . $this->patient->getMedecinTraitant() . $retourLigne . $trait;
if ($this->patient->getDateAdmission() != '0000-00-00 00:00:00') {
$message .= "Admis aux urgences le : " . $adm->getDate("d-m-Y à H:i") . $retourLigne;
} else {
$message .= "Admis aux urgences le : --" . $retourLigne;
}
$message .= "Pour " . $this->patient->getRecours() . " (" . $this->patient->getCategorieRecours() . ")" . $retourLigne;
if ($this->patient->getDateExamen() != '0000-00-00 00:00:00') {
$message .= "Heure Examen : " . $exa->getDate("d-m-Y à H:i") . $retourLigne;
} else {
$message .= "Heure Examen : --" . $retourLigne;
}
$message .= "Dest. confirmée : " . ($this->patient->getDestinationAttendue() ? $this->patient->getDestinationAttendue() : '--') . $retourLigne;
$message .= "Message : " . stripslashes($_POST['observations']);
// Préparation des destinataires du message.
$listeGen = new clListesGenerales("recup");
// Type de message.
switch ($_POST['type']) {
case 'conflit':
$sujet = "[Terminurg] Signalement conflit";
if (!$listeMails) {
$listeMails = "Mails Conflit";
}
break;
case 'social':
$sujet = "[Terminurg] Signalement social";
if (!$listeMails) {
$listeMails = "Mails Gériatrie";
}
break;
case 'virus':
$sujet = "[Terminurg] " . $_POST['sendMessage'];
if (!$listeMails) {
$listeMails = "Mails Alerte Virus";
}
break;
case 'non uhcd':
$sujet = "[Terminurg] Etat UHCD à vérifier";
if (!$listeMails) {
$listeMails = "Mails Alerte UHCD";
}
break;
case 'sortie forcée':
$sujet = "[Terminurg] Sortie forcée détectée";
if (!$listeMails) {
$listeMails = "Mails Sortie forcée";
}
break;
default:
$sujet = "[Terminurg] Procédure dépistage maltraitance";
if (!$listeMails) {
$listeMails = "Mails Maltraitance";
}
break;
}
//eko ( "test" ) ;
$liste = $listeGen->getListeItems($listeMails, "1", '', '');
$to = '';
if (!is_array($liste)) {
$liste = array();
}
while (list($key, $val) = each($liste)) {
$dest .= $val . $retourLigne;
if ($dest2) {
$vir = ",";
} else {
$vir = "";
}
$dest2 .= $vir . $val;
if (!$to) {
$to = $val;
} else {
$dest3 .= "To: {$val}\r\n";
}
}
// print $dest2 ;
// Si une confirmation a été transmise, alors on ajoute et on envoie le nouveau message.
if ($_POST['Envoyer'] or $_POST['Envoyer_x']) {
$date = new clDate();
$data['idpatient'] = $this->patient->getID();
$data['dt_mail'] = $date->getDatetime();
$data['contenu'] = addslashes($message . $trait . nl2br(stripslashes($_POST['observations'])));
$data['nsej'] = $this->patient->getNSEJ();
if ($_POST['type']) {
$data['type_mail'] = $_POST['type'];
} else {
$data['type_mail'] = "Procédure dépistage maltraitance";
}
$requete = new clRequete(BDD, MAILSLOGS, $data);
$requete->addRecord();
// eko ( $sujet ) ;
// Préparation des informations du mail.
if ($options->getOption("typeMail") == "HTML") {
$entete = "<html><head><title>{$subject}</title><body>";
$fin = "</table></body></html>";
$message = $entete . $message . $fin;
$headers = "MIME-Version: 1.0\r\n";
$headers .= "Content-type: text/html; charset=iso-8859-1\r\n";
$headers .= "From: " . Erreurs_NomApp . " <" . Erreurs_MailApp . ">\r\n";
} else {
$message = $subject . "\n\n" . $message;
$headers = "MIME-Version: 1.0\r\n";
$headers .= "Content-type: text/plain; charset=iso-8859-1\r\n";
$headers .= "From: " . Erreurs_NomApp . " <" . Erreurs_MailApp . ">\r\n";
}
//$headers .= "Bcc: dborel@ch-hyeres.fr\r\n";
if ($options->getOption('SMTP_BCC')) {
$headers .= "Cc: <" . $options->getOption('SMTP_BCC') . ">\r\n";
$cc = $options->getOption('SMTP_BCC');
} else {
$cc = '';
}
// Envoi du mail.
// mail ( $dest2, $sujet, $message, $headers ) ;
if ($options->getOption('SMTP_Type') == 'localhost') {
mail($dest2, $sujet, $message, $headers);
} else {
//$headers .= 'To: '.$dest2."\r\n" ;
// print $headers ;
if ($options->getOption('SMTP_Type') == 'autreAvecAuth') {
$auth = 1;
} else {
$auth = 0;
}
sock_mail($auth, $dest2, $sujet, $message, $headers, Erreurs_MailApp, $cc);
}
//eko ( $dest2 ) ;
// Sinon, on affiche le formulaire d'envoi / création de message.
} else {
// Chargement du template ModeliXe.
$mod = new ModeliXe("Messages.mxt");
$mod->SetModeliXe();
// Affichage des différents champs.
$mod->MxBloc("view", "modify", " ");
$mod->MxBloc("list", "modify", " ");
$mod->MxText("new.nomApplication", NOMAPPLICATION);
$mod->MxText("new.mailApplication", Erreurs_MailApp);
$mod->MxText("new.nomsDestinataires", $dest);
$mod->MxCheckerField("new.type1", "radio", "type", "maltraitance", ($_POST['type'] == "maltraitance" or !$_POST['type']) ? 1 : 0);
$mod->MxCheckerField("new.type2", "radio", "type", "conflit", $_POST['type'] == "conflit" ? 1 : 0);
$mod->MxCheckerField("new.type3", "radio", "type", "social", $_POST['type'] == "social" ? 1 : 0);
$mod->MxText("new.sujet", $sujet);
$mod->MxText("new.message", $message);
$form = new clForm();
$mod->MxText("new.observations", $form->genTextArea("observations", stripslashes($_POST['observations']), 45, 4, "width: 420px; height: 80px;"));
// Variable de navigation dans le cas d'une action normale.
$mod->MxHidden("new.hidden1", "navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1), $session->getNavi(2), "newMessage"));
// Variable de navigation dans le cas d'une action d'annulation.
$mod->MxHidden("new.hidden2", "navi=" . $session->genNavi($session->getNavi(0), $session->getNavi(1), $session->getNavi(2)));
// Récupération du code HTML généré.
return $mod->MxWrite("1");
}
}
function genSalon()
{
global $options;
# paramètres
$mg = 5;
// Marge de gauche => initial 17
$mh = 4;
// Marge du haut => initial 9
$md = 15;
// Marge de droite
$mb = 9;
// Marge du bas
$largeur_etiquette = 42;
// largeur_etiquette => initial 60
$espace_etiquettes = 13;
// => initial 7
$nb_ligne_etiquettes = 4;
$nb_etiquette_ligne = 5;
// Préparation du document PDF.
$pdf = new FPDF('L', 'mm', 'A4');
$pdf->Open();
$pdf->SetLeftMargin($mg);
$pdf->SetTopMargin($mh);
$pdf->SetAutoPageBreak(1, 0);
$pdf->AddPage();
// Gestion des fonts
$pdf->AddFont('code39', '', 'IDAutomation_Code_39.php');
$pdf->SetFont('times', '', 12);
// Préparation des informations.
$nom = strtoupper($this->patient->getNom());
$prenom = strtoupper($this->patient->getPrenom());
$date = new clDate($this->patient->getDateNaissance());
$duree = new clDuree();
$dateN = $date->getDate("d/m/Y");
$dateN .= " (" . $duree->getAge($date->getTimestamp()) . ")";
if ($this->patient->getSexe() == "F") {
$sexe = "Féminin";
$e = "e";
} elseif ($this->patient->getSexe() == "M") {
$sexe = "Masculin";
$e = "";
} else {
$sexe = "Indéterminé";
$e = "";
}
$date->setDate($this->patient->getDateAdmission());
$le = $date->getDate("d/m/Y H:i");
$led = $date->getDate("d/m/Y");
$leh = $date->getDate("H:i");
$ipp = $this->patient->getILP();
$nsej = $this->patient->getNSej();
$uf = $this->patient->getUF();
$sexe = $this->patient->getSexe();
if ($uf == $options->getOption('numUFexec')) {
$loc = '(URGENCES)';
} else {
$loc = '(UHCD)';
}
$tel = $this->patient->getTel();
$adresse = $this->patient->getAdresse();
$cpv = $this->patient->getCodePostal() . " " . $this->patient->getVille();
$prev = $this->patient->getPrevenir();
$medt = $this->patient->getMedecinTraitant();
$modet = $this->patient->getMedecinTraitant();
$adresseur = $this->patient->getAdresseur();
$modeadm = $this->patient->getModeAdmission();
// Grosse étiquette
$pdf->Cell(20, 4, "", 0, 0, L);
// Ligne 1
$pdf->Cell(4 * $largeur_etiquette, 5, "CENTRE HOSPITALIER DE CARPENTRAS", 0, 1, L);
// Ligne 2
$pdf->Cell(11, 5, "Date : ", 0, 0, L);
$pdf->SetFont('times', 'B', 12);
$pdf->Cell(23, 5, "{$led}", 0, 0, L);
$pdf->SetFont('times', '', 12);
$pdf->Cell(13, 5, "Heure : ", 0, 0, L);
$pdf->SetFont('times', 'B', 12);
$pdf->Cell(27, 5, "{$leh}", 0, 0, L);
$pdf->SetFont('times', '', 12);
$pdf->Cell(21, 5, "N° Patient : ", 0, 0, L);
$pdf->SetFont('times', 'B', 12);
$pdf->Cell(22, 5, "{$ipp}", 0, 0, L);
$pdf->SetFont('times', '', 12);
$pdf->Cell(18, 5, "N° URG : ", 0, 0, L);
$pdf->SetFont('times', 'B', 12);
$pdf->Cell(22, 5, "{$nsej}", 0, 0, L);
$pdf->SetFont('times', '', 12);
$pdf->Cell(18, 5, "N° ARCHIVE : ", 0, 1, L);
// Ligne 3
$pdf->Cell(11, 5, "Nom : ", 0, 0, L);
$pdf->SetFont('times', 'B', 12);
$pdf->Cell(63, 5, strtoupper($nom), 0, 0, L);
$pdf->SetFont('times', '', 12);
$pdf->Cell(13, 5, "Nom naissance : ", 0, 1, L);
// Ligne 4
$pdf->Cell(16, 5, "Prénom : ", 0, 0, L);
$pdf->SetFont('times', 'B', 12);
$pdf->Cell(58, 5, ucfirst(strtolower($prenom)), 0, 0, L);
$pdf->SetFont('times', '', 12);
$pdf->Cell(12, 5, "Sexe : ", 0, 0, L);
$pdf->SetFont('times', 'B', 12);
$pdf->Cell(29, 5, "{$sexe}", 0, 0, L);
$pdf->SetFont('times', '', 12);
$pdf->Cell(12, 5, "N° S.S : ", 0, 1, L);
// Ligne 5
$pdf->Cell(17, 5, "Né(e) le : ", 0, 0, L);
$pdf->SetFont('times', 'B', 12);
$pdf->Cell(57, 5, $dateN, 0, 0, L);
$pdf->SetFont('times', '', 12);
$pdf->Cell(12, 5, "A : ", 0, 1, L);
// Ligne 6
$pdf->Cell(17, 4, "Adresse : ", 0, 0, L);
$pdf->SetFont('times', 'B', 12);
$pdf->Cell(57, 4, $adresse, 0, 1, L);
$pdf->SetFont('times', '', 12);
// Ligne 5
$pdf->Cell(115, 4, "", 0, 0, L);
$pdf->SetFont('times', '', 12);
$pdf->Cell(9, 4, "Tél : ", 0, 0, L);
$pdf->SetFont('times', 'B', 12);
$pdf->Cell(20, 4, $tel, 0, 1, L);
$pdf->SetFont('times', '', 12);
// Ligne 6
$pdf->Cell(17, 4, "", 0, 0, L);
$pdf->SetFont('times', 'B', 12);
$pdf->Cell(98, 4, $cpv, 0, 0, L);
$pdf->SetFont('times', '', 12);
$pdf->Cell(9, 4, "Pays : ", 0, 1, L);
// Ligne 7
$pdf->Cell(17, 5, "Nom du tuteur : ", 0, 1, L);
// Ligne 8
$pdf->Cell(37, 5, "Personne à prévenir : ", 0, 0, L);
$pdf->SetFont('times', 'B', 12);
$pdf->Cell(98, 5, $prev, 0, 1, L);
$pdf->SetFont('times', '', 12);
// Ligne 9
$pdf->Cell(23, 5, "Adressé par : ", 0, 0, L);
$pdf->SetFont('times', 'B', 12);
$pdf->Cell(51, 5, $adresseur, 0, 0, L);
$pdf->SetFont('times', '', 12);
$pdf->Cell(30, 5, "Médecin traitant : ", 0, 0, L);
$pdf->SetFont('times', 'B', 12);
$pdf->Cell(98, 5, $medt, 0, 1, L);
$pdf->SetFont('times', '', 12);
// Ligne 10
$pdf->Cell(34, 5, "Mode de transport : ", 0, 0, L);
$pdf->SetFont('times', 'B', 12);
$pdf->Cell(98, 5, $modeadm, 0, 1, L);
$pdf->SetFont('times', '', 12);
// Saut
$pdf->Cell(1, 5.8, "", 0, 1);
$pdf->SetFont('times', '', 9);
for ($i = 1; $i <= $nb_ligne_etiquettes; $i++) {
// Entrée
$pdf->Cell($largeur_etiquette, 4, "Entrée du : {$led} à {$leh}", 0, 0, L);
$pdf->Cell($espace_etiquettes, 4, "", 0, 0, L);
$pdf->Cell($largeur_etiquette, 4, "Entrée du : {$led} à {$leh}", 0, 0, L);
$pdf->Cell($espace_etiquettes, 4, "", 0, 0, L);
$pdf->Cell($largeur_etiquette, 4, "Entrée du : {$led} à {$leh}", 0, 0, L);
$pdf->Cell($espace_etiquettes, 4, "", 0, 0, L);
$pdf->Cell($largeur_etiquette, 4, "Entrée du : {$led} à {$leh}", 0, 0, L);
$pdf->Cell($espace_etiquettes, 4, "", 0, 0, L);
$pdf->Cell($largeur_etiquette, 4, "Entrée du : {$led} à {$leh}", 0, 1, L);
// D/Nais
$pdf->Cell($largeur_etiquette, 4, "D/nais : {$dateN}", 0, 0, L);
$pdf->Cell($espace_etiquettes, 4, "", 0, 0, L);
$pdf->Cell($largeur_etiquette, 4, "D/nais : {$dateN}", 0, 0, L);
$pdf->Cell($espace_etiquettes, 4, "", 0, 0, L);
$pdf->Cell($largeur_etiquette, 4, "D/nais : {$dateN}", 0, 0, L);
$pdf->Cell($espace_etiquettes, 4, "", 0, 0, L);
$pdf->Cell($largeur_etiquette, 4, "D/nais : {$dateN}", 0, 0, L);
$pdf->Cell($espace_etiquettes, 4, "", 0, 0, L);
$pdf->Cell($largeur_etiquette, 4, "D/nais : {$dateN}", 0, 1, L);
// Nom
$pdf->Cell($largeur_etiquette - 30, 4, "Nom : ", 0, 0, L);
$pdf->SetFont('times', 'B', 9);
$pdf->Cell(43, 4, strtoupper($nom), 0, 0, L);
$pdf->SetFont('times', '', 9);
$pdf->Cell($largeur_etiquette - 30, 4, "Nom : ", 0, 0, L);
$pdf->SetFont('times', 'B', 9);
$pdf->Cell(43, 4, strtoupper($nom), 0, 0, L);
$pdf->SetFont('times', '', 9);
$pdf->Cell($largeur_etiquette - 30, 4, "Nom : ", 0, 0, L);
$pdf->SetFont('times', 'B', 9);
$pdf->Cell(43, 4, strtoupper($nom), 0, 0, L);
$pdf->SetFont('times', '', 9);
$pdf->Cell($largeur_etiquette - 30, 4, "Nom : ", 0, 0, L);
$pdf->SetFont('times', 'B', 9);
$pdf->Cell(43, 4, strtoupper($nom), 0, 0, L);
$pdf->SetFont('times', '', 9);
$pdf->Cell($largeur_etiquette - 30, 4, "Nom : ", 0, 0, L);
$pdf->SetFont('times', 'B', 9);
$pdf->Cell(43, 4, strtoupper($nom), 0, 1, L);
$pdf->SetFont('times', '', 9);
// Prénom
$pdf->Cell($largeur_etiquette, 4, "Prénom : " . ucfirst(strtolower($prenom)), 0, 0, L);
$pdf->Cell($espace_etiquettes, 4, "", 0, 0, L);
$pdf->Cell($largeur_etiquette, 4, "Prénom : " . ucfirst(strtolower($prenom)), 0, 0, L);
$pdf->Cell($espace_etiquettes, 4, "", 0, 0, L);
$pdf->Cell($largeur_etiquette, 4, "Prénom : " . ucfirst(strtolower($prenom)), 0, 0, L);
$pdf->Cell($espace_etiquettes, 4, "", 0, 0, L);
$pdf->Cell($largeur_etiquette, 4, "Prénom : " . ucfirst(strtolower($prenom)), 0, 0, L);
$pdf->Cell($espace_etiquettes, 4, "", 0, 0, L);
$pdf->Cell($largeur_etiquette, 4, "Prénom : " . ucfirst(strtolower($prenom)), 0, 1, L);
// NJF
$pdf->Cell($largeur_etiquette, 4, "NJF : ", 0, 0, L);
$pdf->Cell($espace_etiquettes, 4, "", 0, 0, L);
$pdf->Cell($largeur_etiquette, 4, "NJF : ", 0, 0, L);
$pdf->Cell($espace_etiquettes, 4, "", 0, 0, L);
$pdf->Cell($largeur_etiquette, 4, "NJF : ", 0, 0, L);
$pdf->Cell($espace_etiquettes, 4, "", 0, 0, L);
$pdf->Cell($largeur_etiquette, 4, "NJF : ", 0, 0, L);
$pdf->Cell($espace_etiquettes, 4, "", 0, 0, L);
$pdf->Cell($largeur_etiquette, 4, "NJF : ", 0, 1, L);
// N° SS
$pdf->Cell(9, 4, "NSej : ", 0, 0, L);
$pdf->Cell(46, 4, "{$nsej}", 0, 0, L);
$pdf->Cell(9, 4, "NSej : ", 0, 0, L);
$pdf->Cell(46, 4, "{$nsej}", 0, 0, L);
$pdf->Cell(9, 4, "NSej : ", 0, 0, L);
$pdf->Cell(46, 4, "{$nsej}", 0, 0, L);
$pdf->Cell(9, 4, "NSej : ", 0, 0, L);
$pdf->Cell(46, 4, "{$nsej}", 0, 0, L);
$pdf->Cell(9, 4, "NSej : ", 0, 0, L);
$pdf->Cell(46, 4, "{$nsej}", 0, 1, L);
// inter _etiquettes
$pdf->Cell(1, 11, "", 0, 1);
}
$pdf->Output();
}
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);
}
