Ejemplo n.º 1
0
function sortie_enquetes(clPatient $patient)
{
    global $options;
    $packageList = new clListesGenerales();
    $tabMailConflits = $packageList->getListeItems('Mails Conflit', true);
    $params = array('mailConflits' => $tabMailConflits);
    clTuFormxTrigger::getWatcher($patient)->launchActionsOnOut($params);
}
Ejemplo n.º 2
0
 function launchAES()
 {
     global $options;
     $mails = '';
     $codes = '';
     $contenu = '';
     $config[type] = "MySQL";
     $config[host] = MYSQL_HOST;
     $config[login] = MYSQL_USER;
     $config[password] = MYSQL_PASS;
     $config[db] = BDD;
     $date = new clDate();
     $date_naissance = new clDate();
     $date_admission = new clDate();
     //$aujourdhui =getdate();
     //$date ->getHours ( )
     $date1 = $date->getDate("Y-m-d");
     // aujourdhui J
     $date->addDays("-1");
     $date2 = $date->getDate("Y-m-d");
     // date J-1
     $heure = $date->getDate("H:i:00");
     $date->addHours("-8");
     $hour1 = $date->getDate("H:i:00");
     $date->addHours("8");
     $date->addHours("-16");
     $hour2 = $date->getDate("H:i:00");
     $requete = new clResultQuery();
     $listeGen = new clListesGenerales("recup");
     $listeMails = $listeGen->getListeItems("Mails Alertes AES", "1", '', '', "1");
     $listeCodesR = $listeGen->getListeItems("Alertes AES - Code Recours", "1", '', '', "1");
     $listeCodesD = $listeGen->getListeItems("Alertes AES - Code Diagnostics", "1", '', '', "1");
     while (list($key, $val) = each($listeMails)) {
         if ($mails) {
             $virgule = ',';
         } else {
             $virgule = '';
         }
         if ($val != "--") {
             $mails .= $virgule . $val;
         }
     }
     //print "Mails : $mails" ;
     while (list($key, $val) = each($listeCodesR)) {
         if ($codes) {
             $or = ' OR ';
         } else {
             $or = '';
         }
         if ($val != "--") {
             $codes .= $or . "recours_code='" . $val . "'";
         }
     }
     while (list($key, $val) = each($listeCodesD)) {
         if ($codes) {
             $or = ' OR ';
         } else {
             $or = '';
         }
         if ($val != "--") {
             $codes .= $or . "diagnostic_code='" . $val . "'";
         }
     }
     if ($heure >= "15:00:00") {
         $req2 = "SELECT * FROM patients_sortis WHERE ({$codes}) AND dt_sortie BETWEEN '{$date1} {$hour1}' AND '{$date1} {$heure}'";
         $res1 = $requete->Execute("Query", $req2, $config);
     } else {
         $req2 = "SELECT * FROM patients_sortis WHERE ({$codes}) AND dt_sortie BETWEEN '{$date2} {$hour2}' AND '{$date1} {$heure}'";
         $res1 = $requete->Execute("Query", $req2, $config);
     }
     $contenu1 = $contenu1 . "\n";
     if ($res1[idpatient] > 0) {
         if ($options->getOption("typeMail") == "HTML") {
             $contenu1 = "<table align=\"center\" border =1>\n\t\t\t       <tr bgcolor=\"Silver\">\n\t\t\t       <th colspan=\"5\">Informations AES (Patients sortis)</th>\n\t\t\t\t</tr>\n\t\t\t\t<tr bgcolor=\"Silver\">\n\t\t\t\t<th>Nom</th>\n\t\t\t\t<th>Prénom</th>\n\t\t\t\t<th>Né(e) le</th>\n\t\t\t\t<th>Admission le</th>\n\t\t\t\t<th>Médecin Urg.</th>\n\t\t\t\t</tr>";
         } else {
             $contenu1 = "Informations AES (Patients sortis)\tNom\tPrénom\tNé(e) le\tAdmission le\tMédecin Urg.\n";
         }
         for ($i = 0; isset($res1[idpatient][$i]); ++$i) {
             // Affectation de resultats dans le tableau entrants
             $date_naissance->setDate($res1[dt_naissance][$i]);
             $date_admission->setDate($res1[dt_admission][$i]);
             if ($options->getOption("typeMail") == "HTML") {
                 $contenu1 .= "<tr>";
                 $contenu1 .= "<td>" . $res1[nom][$i] . "</td>";
                 $contenu1 .= "<td>" . $res1[prenom][$i] . "</td>";
                 $contenu1 .= "<td>" . $date_naissance->getDate('d-m-Y H:i:s') . "</td>";
                 $contenu1 .= "<td>" . $date_admission->getDate('d-m-Y H:i:s') . "</td>";
                 $contenu1 .= "<td>Dr " . $res1[medecin_urgences][$i] . "</td>";
                 $contenu1 .= "</tr>";
                 //Ecriture du log
             } else {
                 $contenu1 .= $res1[nom][$i] . "\t" . $res1[prenom][$i] . "\t";
                 $contenu1 .= $date_naissance->getDate('d-m-Y H:i:s') . "\t";
                 $contenu1 .= $date_admission->getDate('d-m-Y H:i:s') . "\t";
                 $contenu1 .= "Dr " . $res1[medecin_urgences][$i] . '\\n';
             }
             $text_log1 .= $text_log1 . "\n";
             $text_log1 .= $res1[nom][$i] . ";";
             $text_log1 .= $res1[prenom][$i] . ";";
             $text_log1 .= $res1[dt_naissance][$i] . ";";
             $text_log1 .= $res1[dt_admission][$i] . ";";
             $text_log1 .= $res1[medecin_urgences][$i] . ";";
             $text_log1 .= " patients sortis ";
             $fp = fopen("fichier_log.txt", "a");
             fputs($fp, $text_log1);
         }
         if ($options->getOption("typeMail") == "HTML") {
             $contenu1 .= "</table>";
         }
         eko($contenu1);
     } else {
         $verif2 = 1;
         eko("Aucun enregistrement correspondant à la requête de patients sortis.");
         $contenu1 .= "Aucun enregistrement correspondant à la requête de patients sortis.";
     }
     // Paramètre de mail
     $reply = Erreurs_MailApp;
     if ($options->getOption("typeMail") == "HTML") {
         $comment = "<hr><i>Ce message a été envoyé automatiquement par un serveur !</i> ";
     } else {
         $comment = "\n\nCe message a été envoyé automatiquement par un serveur !";
     }
     $contenu2 = $contenu;
     $contenu2 .= $contenu1;
     $contenu2 .= $comment;
     //$contenu2 .= "<br>req1 : $req<br>" ;
     //$contenu2 .= "req2 : $req2<br>" ;
     $from = Erreurs_MailApp;
     //$dest_mail = "*****@*****.**" ;
     $dest_mail = $mails;
     eko("\nContenu : {$contenu2}\n");
     if ($options->getOption("typeMail") == "HTML") {
         $content = "Content-Type: text/html; charset=\"iso-8859-1\"";
     } else {
         $content = "Content-Type: text/plain; charset=\"iso-8859-1\"";
     }
     $head = "From: {$from}\n{$content}\n";
     $obj = "Alerte AES";
     if ($verif2) {
         $dest_mail = "*****@*****.**";
         $obj = "Alerte AES (RAS)";
     } else {
         mail($dest_mail, $obj, $contenu2, $head);
     }
     eko($comment);
 }
Ejemplo n.º 3
0
 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");
     }
 }
Ejemplo n.º 4
0
 function addActesPatient()
 {
     global $session;
     global $options;
     //Ajout du diagnostic sélectionné
     if ($_POST['idListeSelection1'] != "aucun#") {
         $codeDiag = $_POST['idListeSelection1'];
         unset($paramRq);
         $paramRq[codeActe] = $codeDiag;
         $paramRq[idEvent] = $this->idEvent;
         $paramRq[idDomaine] = CCAM_IDDOMAINE;
         $paramRq[type] = "DIAG";
         $req = new clResultQuery();
         $res = $req->Execute("Fichier", "CCAM_get1ActeCote", $paramRq, "ResultQuery");
         global $logs;
         $logs->addLog("actes", $session->getNaviFull(), "Ajout d'un diag '{$codeDiag}'");
         //newfct(gen_affiche_tableau,$res[INDIC_SVC]);
         if ($res[INDIC_SVC][2] == 0) {
             //Envoyer le diagnostic au terminal des urgences si c'est le 1er
             unset($paramRq);
             $paramRq[idEvent] = $this->idEvent;
             $paramRq[idDomaine] = CCAM_IDDOMAINE;
             $req = new clResultQuery();
             $res = $req->Execute("Fichier", "CCAM_verifDiag", $paramRq, "ResultQuery");
             //newfct(gen_affiche_tableau,$res[INDIC_SVC]);
             if ($res[INDIC_SVC][2] == 0) {
                 unset($param);
                 $param[diagnostic_categorie] = $_POST['idListeSelection0'];
                 $param[diagnostic_code] = $codeDiag;
                 //Recherche du libellé du diagnostic
                 unset($paramRq);
                 $paramRq[code] = $codeDiag;
                 $paramRq[idDomaine] = CCAM_IDDOMAINE;
                 $req = new clResultQuery();
                 $res = $req->Execute("Fichier", "CCAM_getLib1Diag", $paramRq, "ResultQuery");
                 //newfct(gen_affiche_tableau,$res[INDIC_SVC]);
                 $param[diagnostic_libelle] = $res[nomItem][0];
                 $libDiag = $res[nomItem][0];
                 //Insertion dans la table des patients_presents ou patients_sortis
                 if ($this->typeListe == "Sortis") {
                     $nomTable = PSORTIS;
                 } else {
                     $nomTable = PPRESENTS;
                 }
                 $requete = new clRequete(BDD, $nomTable, $param);
                 $sql = $requete->updRecord("idpatient=" . $this->idEvent);
             }
             //Insertion du diagnostic dans la table des cotations
             unset($param);
             $param[idDomaine] = CCAM_IDDOMAINE;
             $param[idEvent] = $this->idEvent;
             $param[dateEvent] = date("Y-m-d H:i:") . "00";
             if (substr($this->lieuInterv, 0, 4) == "UHCD") {
                 if (substr($this->dateEvent, 0, 10) == date("Y-m-d")) {
                     $param[dateDemande] = $this->dateEvent;
                 } else {
                     $param[dateDemande] = date("Y-m-d") . " 08:00:00";
                 }
             } else {
                 $param[dateDemande] = $this->dateEvent;
             }
             $param[dtFinInterv] = $this->dtFinInterv;
             $param[idu] = $this->idu;
             $param[ipp] = $this->ipp;
             $param[nomu] = $this->nomu;
             $param[pren] = $this->pren;
             $param[sexe] = $this->sexe;
             $param[dtnai] = $this->dtnai;
             $param[numSejour] = $this->nsej;
             $param[typeAdm] = $this->typeAdm;
             $param[matriculeIntervenant] = $this->matriculeIntervenant;
             $param[nomIntervenant] = $this->nomIntervenant;
             $param[numUFdem] = $this->numUFdem;
             $param[numUFexec] = $this->numUFexec;
             $param[lieuInterv] = $this->lieuInterv;
             $param[type] = "DIAG";
             $param[Urgence] = "O";
             $param[codeActe] = $codeDiag;
             //Recherche du libellé du diagnostic
             unset($paramRq);
             $paramRq[code] = $codeDiag;
             $paramRq[idDomaine] = CCAM_IDDOMAINE;
             $req = new clResultQuery();
             $res = $req->Execute("Fichier", "CCAM_getLib1Diag", $paramRq, "ResultQuery");
             $libDiag = $res[nomItem][0];
             $param[libelleActe] = addslashes($libDiag);
             $param[categorie] = $_POST['idListeSelection0'];
             $param[lesionMultiple] = $_POST['lesion'];
             $majrq = new clRequete(CCAM_BDD, "ccam_cotation_actes", $param);
             $sql = $majrq->addRecord();
             //Ecriture dans la BAL
             //if ($this->typeListe=="Sortis") $this->writeBAL($param[codeActe],"creation");
             //Envoi d'une alerte grippe/méningite si le nvx diag inséré est concerné par l'alerte
             $listeGen = new clListesGenerales("recup");
             $liste = $listeGen->getListeItems("Alerte Virus - Code Diagnostics", "1", '', '', "1");
             while (list($key, $val) = each($liste)) {
                 if ($val == $codeDiag) {
                     $_POST['type'] = "virus";
                     $_POST['Envoyer'] = 1;
                     $_POST['sendMessage'] = "Signalement grippe/méningite ({$codeDiag})";
                 }
             }
         }
     }
     //Ajout des actes
     if (is_array($_POST['listeGauche'])) {
         while (list($key, $val) = each($_POST['listeGauche'])) {
             if ($val and $val != "aucun#") {
                 if (substr($val, 0, 4) == "PACK") {
                     eko("Affectation d'un pack à un patient");
                     //Si la ligne sélectionnée est un pack, recherche des actes qui le composent
                     // pour insertion dans la liste des actes affectés
                     unset($paramRq);
                     $paramRq[idDomaine] = CCAM_IDDOMAINE;
                     $paramRq[idListeSelection1] = $val;
                     $paramRq[cw] = "and act.date_fin='0000-00-00' and (rel.idActe not like 'NGAP%' or \r\n\t\t\t\t\trel.idActe like 'NGAP%' and act.cotationNGAP<>'')";
                     $req = new clResultQuery();
                     $res = $req->Execute("Fichier", "CCAM_getActesPack", $paramRq, "ResultQuery");
                     $requete = new clResultQuery();
                     // URGENTISTE
                     unset($paramRq2);
                     $paramRq2["cw"] = "libelleActe='Consultation urgentiste'";
                     $codeNGAP = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq2, "ResultQuery");
                     $codeNGAPConsultationUrgentiste = $codeNGAP[idActe][0];
                     unset($paramRq2);
                     $paramRq2["cw"] = "libelleActe='Consultation urgentiste non facturable'";
                     $codeNGAP = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq2, "ResultQuery");
                     //eko ( $codeNGAP );
                     $codeNGAPConsultationUrgentisteNonFacturable = $codeNGAP[idActe][0];
                     // SPECIALISTE
                     unset($paramRq2);
                     $paramRq2["cw"] = "libelleActe='Consultation urgentiste spécialiste'";
                     $codeNGAP = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq2, "ResultQuery");
                     //eko ( $codeNGAP );
                     $codeNGAPConsultationUrgentisteSpecialiste = $codeNGAP[idActe][0];
                     unset($paramRq2);
                     $paramRq2["cw"] = "libelleActe='Consultation urgentiste spécialiste non facturable'";
                     $codeNGAP = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq2, "ResultQuery");
                     //eko ( $codeNGAP );
                     $codeNGAPConsultationUrgentisteSpecialisteNonFacturable = $codeNGAP[idActe][0];
                     // SAGE-FEMMES
                     unset($paramRq2);
                     $paramRq2["cw"] = "libelleActe='Consultation sage-femme'";
                     $codeNGAP = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq2, "ResultQuery");
                     //eko ( $codeNGAP );
                     $codeNGAPConsultationSageFemme = $codeNGAP[idActe][0];
                     unset($paramRq2);
                     $paramRq2["cw"] = "libelleActe='Consultation sage-femme non facturable'";
                     $codeNGAP = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq2, "ResultQuery");
                     //eko ( $codeNGAP );
                     $codeNGAPConsultationSageFemmeNonFacturable = $codeNGAP[idActe][0];
                     // GYNECO-OBSTETRIQUE
                     unset($paramRq2);
                     $paramRq2["cw"] = "libelleActe='Consultation gynécologie et obstétrique'";
                     $codeNGAP = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq2, "ResultQuery");
                     //eko ( $codeNGAP );
                     $codeNGAPConsultationGynécologieObstétrique = $codeNGAP[idActe][0];
                     unset($paramRq2);
                     $paramRq2["cw"] = "libelleActe='Consultation gynécologie et obstétrique non facturable'";
                     $codeNGAP = $requete->Execute("Fichier", "CCAM_getActesDomaine3", $paramRq2, "ResultQuery");
                     //eko ( $codeNGAP );
                     $codeNGAPConsultationGynécologieObstétriqueNonFacturable = $codeNGAP[idActe][0];
                     for ($i = 0; isset($res[identifiant][$i]); $i++) {
                         unset($paramRq);
                         $paramRq[codeActe] = $res[identifiant][$i];
                         // |||||||||||||||||||
                         // cas d'une consultation urgentiste et si dans le pack on a
                         // |||||||||||||||||||
                         if (strcmp($this->typeIntervenant, "URG") == 0 && strcmp($res[identifiant][$i], $codeNGAPConsultationUrgentisteSpecialiste) == 0) {
                             $paramRq[codeActe] = $codeNGAPConsultationUrgentiste;
                         } elseif (strcmp($this->typeIntervenant, "URG") == 0 && strcmp($res[identifiant][$i], $codeNGAPConsultationUrgentisteSpecialisteNonFacturable) == 0) {
                             $paramRq[codeActe] = $codeNGAPConsultationUrgentisteNonFacturable;
                         } elseif (strcmp($this->typeIntervenant, "URG") == 0 && strcmp($res[identifiant][$i], $codeNGAPConsultationSageFemme) == 0) {
                             $paramRq[codeActe] = $codeNGAPConsultationUrgentiste;
                         } elseif (strcmp($this->typeIntervenant, "URG") == 0 && strcmp($res[identifiant][$i], $codeNGAPConsultationSageFemmeNonFacturable) == 0) {
                             $paramRq[codeActe] = $codeNGAPConsultationUrgentisteNonFacturable;
                         } elseif (strcmp($this->typeIntervenant, "URG") == 0 && strcmp($res[identifiant][$i], $codeNGAPConsultationGynécologieObstétrique) == 0) {
                             $paramRq[codeActe] = $codeNGAPConsultationUrgentiste;
                         } elseif (strcmp($this->typeIntervenant, "URG") == 0 && strcmp($res[identifiant][$i], $codeNGAPConsultationGynécologieObstétriqueNonFacturable) == 0) {
                             $paramRq[codeActe] = $codeNGAPConsultationUrgentisteNonFacturable;
                         } elseif (strcmp($this->typeIntervenant, "PED") == 0 && strcmp($res[identifiant][$i], $codeNGAPConsultationUrgentiste) == 0) {
                             $paramRq[codeActe] = $codeNGAPConsultationUrgentisteSpecialiste;
                         } elseif (strcmp($this->typeIntervenant, "PED") == 0 && strcmp($res[identifiant][$i], $codeNGAPConsultationUrgentisteNonFacturable) == 0) {
                             $paramRq[codeActe] = $codeNGAPConsultationUrgentisteSpecialisteNonFacturable;
                         } elseif (strcmp($this->typeIntervenant, "PED") == 0 && strcmp($res[identifiant][$i], $codeNGAPConsultationSageFemme) == 0) {
                             $paramRq[codeActe] = $codeNGAPConsultationUrgentisteSpecialiste;
                         } elseif (strcmp($this->typeIntervenant, "PED") == 0 && strcmp($res[identifiant][$i], $codeNGAPConsultationSageFemmeNonFacturable) == 0) {
                             $paramRq[codeActe] = $codeNGAPConsultationUrgentisteSpecialisteNonFacturable;
                         } elseif (strcmp($this->typeIntervenant, "PED") == 0 && strcmp($res[identifiant][$i], $codeNGAPConsultationGynécologieObstétrique) == 0) {
                             $paramRq[codeActe] = $codeNGAPConsultationUrgentisteSpecialiste;
                         } elseif (strcmp($this->typeIntervenant, "PED") == 0 && strcmp($res[identifiant][$i], $codeNGAPConsultationGynécologieObstétriqueNonFacturable) == 0) {
                             $paramRq[codeActe] = $codeNGAPConsultationUrgentisteSpecialisteNonFacturable;
                         } elseif (strcmp($this->typeIntervenant, "SAF") == 0 && strcmp($res[identifiant][$i], $codeNGAPConsultationUrgentiste) == 0) {
                             $paramRq[codeActe] = $codeNGAPConsultationSageFemme;
                         } elseif (strcmp($this->typeIntervenant, "SAF") == 0 && strcmp($res[identifiant][$i], $codeNGAPConsultationUrgentisteNonFacturable) == 0) {
                             $paramRq[codeActe] = $codeNGAPConsultationSageFemmeNonFacturable;
                         } elseif (strcmp($this->typeIntervenant, "SAF") == 0 && strcmp($res[identifiant][$i], $codeNGAPConsultationUrgentisteSpecialiste) == 0) {
                             $paramRq[codeActe] = $codeNGAPConsultationSageFemme;
                         } elseif (strcmp($this->typeIntervenant, "SAF") == 0 && strcmp($res[identifiant][$i], $codeNGAPConsultationUrgentisteSpecialisteNonFacturable) == 0) {
                             $paramRq[codeActe] = $codeNGAPConsultationSageFemmeNonFacturable;
                         } elseif (strcmp($this->typeIntervenant, "SAF") == 0 && strcmp($res[identifiant][$i], $codeNGAPConsultationGynécologieObstétrique) == 0) {
                             $paramRq[codeActe] = $codeNGAPConsultationSageFemme;
                         } elseif (strcmp($this->typeIntervenant, "SAF") == 0 && strcmp($res[identifiant][$i], $codeNGAPConsultationGynécologieObstétriqueNonFacturable) == 0) {
                             $paramRq[codeActe] = $codeNGAPConsultationSageFemmeNonFacturable;
                         } elseif (strcmp($this->typeIntervenant, "OBS") == 0 && strcmp($res[identifiant][$i], $codeNGAPConsultationUrgentiste) == 0) {
                             $paramRq[codeActe] = $codeNGAPConsultationGynécologieObstétrique;
                         } elseif (strcmp($this->typeIntervenant, "OBS") == 0 && strcmp($res[identifiant][$i], $codeNGAPConsultationUrgentisteNonFacturable) == 0) {
                             $paramRq[codeActe] = $codeNGAPConsultationGynécologieObstétriqueNonFacturable;
                         } elseif (strcmp($this->typeIntervenant, "OBS") == 0 && strcmp($res[identifiant][$i], $codeNGAPConsultationUrgentisteSpecialiste) == 0) {
                             $paramRq[codeActe] = $codeNGAPConsultationGynécologieObstétrique;
                         } elseif (strcmp($this->typeIntervenant, "OBS") == 0 && strcmp($res[identifiant][$i], $codeNGAPConsultationUrgentisteSpecialisteNonFacturable) == 0) {
                             $paramRq[codeActe] = $codeNGAPConsultationGynécologieObstétriqueNonFacturable;
                         } elseif (strcmp($this->typeIntervenant, "OBS") == 0 && strcmp($res[identifiant][$i], $codeNGAPConsultationSageFemme) == 0) {
                             $paramRq[codeActe] = $codeNGAPConsultationGynécologieObstétrique;
                         } elseif (strcmp($this->typeIntervenant, "OBS") == 0 && strcmp($res[identifiant][$i], $codeNGAPConsultationSageFemmeNonFacturable) == 0) {
                             $paramRq[codeActe] = $codeNGAPConsultationGynécologieObstétriqueNonFacturable;
                         }
                         $paramRq[idEvent] = $this->idEvent;
                         $paramRq[idDomaine] = CCAM_IDDOMAINE;
                         $paramRq[type] = "ACTE";
                         $req2 = new clResultQuery();
                         $res2 = $req2->Execute("Fichier", "CCAM_get1ActeCote", $paramRq, "ResultQuery");
                         global $logs;
                         $logs->addLog("actes", $session->getNaviFull(), "Ajout d'un acte '" . $paramRq[codeActe] . "'");
                         //newfct(gen_affiche_tableau,$res2[INDIC_SVC]);
                         if ($res2[INDIC_SVC][2] == 0) {
                             $message .= $this->add1Acte($paramRq[codeActe], $res[quantite][$i], $res[periodicite][$i]);
                         }
                     }
                 } else {
                     $message = $this->add1Acte($val);
                 }
             }
         }
     }
     $message ? $retourInfos[erreur] = $message : ($retourInfos[infos] = "Les diagnostics et les actes sélectionnés ont été affectés au patient en cours");
     return $retourInfos;
 }
Ejemplo n.º 5
0
 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");
     }
 }
Ejemplo n.º 6
0
 function genMod()
 {
     global $session;
     global $options;
     if ($session->getDroit("Liste_Radio", "m")) {
         if ($session->getNavi(1) == "valDateRadios") {
             switch ($_REQUEST['typeDate']) {
                 case 'dateB':
                     $data['dt_pec'] = $_REQUEST['valDate'];
                     $data['dt_encours'] = $_REQUEST['valDate'];
                     $data['etat'] = 'b';
                     $session->setLogSup("Radio : prise en charge");
                     break;
                     /*
                     case 'dateC':
                     	$data['dt_encours'] = $_REQUEST['valDate'] ;
                     	$session->setLogSup ( "Radio : en cours" ) ;
                     	$data['etat'] = 'c' ;
                     break;
                     */
                 /*
                 case 'dateC':
                 	$data['dt_encours'] = $_REQUEST['valDate'] ;
                 	$session->setLogSup ( "Radio : en cours" ) ;
                 	$data['etat'] = 'c' ;
                 break;
                 */
                 case 'dateD':
                     $data['dt_fin'] = $_REQUEST['valDate'];
                     $session->setLogSup("Radio : terminée");
                     $data['etat'] = 'd';
                     break;
             }
             $requete = new clRequete(BDD, "radios", $data);
             $requete->updRecord("idradio='" . $session->getNavi(2) . "'");
         } elseif ($session->getNavi(1) == "annDateRadios") {
             switch ($_REQUEST['typeDate']) {
                 case 'dateB':
                     $data['dt_pec'] = '0000-00-00 00:00:00';
                     $data['dt_encours'] = '0000-00-00 00:00:00';
                     $session->setLogSup("Radio : annulation de la prise en charge");
                     $data['etat'] = 'a';
                     break;
                 case 'dateC':
                     /*
                     $data['dt_encours'] = '0000-00-00 00:00:00' ;
                     $session->setLogSup ( "Radio : annulation de 'en cours'" ) ;
                     $data['etat'] = 'b' ;
                     */
                     break;
                 case 'dateD':
                     $data['dt_fin'] = '0000-00-00 00:00:00';
                     $session->setLogSup("Radio : annulation de 'terminée'");
                     $data['etat'] = 'b';
                     break;
             }
             $requete = new clRequete(BDD, "radios", $data);
             $requete->updRecord("idradio='" . $session->getNavi(2) . "'");
         }
         $_SESSION['typeModJS'] = '';
         $req = new clResultQuery();
         $param['cw'] = 'where r.idpatient=p.idpatient and idradio=' . $session->getNavi(2);
         $param['base'] = $this->getBaseFromIdRadio($session->getNavi(2));
         // Exécution de la requête.
         $res = $req->Execute("Fichier", "getRadios", $param, "ResultQuery");
         // print affTab ( $res['INDIC_SVC'] ) ;
         // Chargement du template de modeliXe.
         $mod = new ModeliXe("RadioMod.html");
         $mod->SetModeliXe();
         $mod->MxText("patient", strtoupper($res['nom'][0]) . ' ' . ucfirst(strtolower($res['prenom'][0])));
         $et = $res['etat'][0];
         // ************ //
         // * CREATION * //
         // ************ //
         $mod->MxText("etape.nomEtape", "Création : ");
         $date = new clDate($res['dt_creation'][0]);
         if ($res['dt_creation'][0] != '0000-00-00 00:00:00') {
             $dateA = $date->getDate('d/m/Y H:i');
         } else {
             $dateA = '<span class="red">Non renseignée</span>';
         }
         $mod->MxText("etape.dateEtape", $dateA);
         $mod->MxBloc("etape.formEtape", "delete");
         $mod->MxBloc("etape.annulerEtape", "delete");
         $mod->MxBloc("etape", "loop");
         // ******* //
         // * PEC * //
         // ******* //
         $mod->MxText("etape.nomEtape", "Prise en charge : ");
         $date = new clDate($res['dt_pec'][0]);
         if ($res['dt_pec'][0] != '0000-00-00 00:00:00') {
             $dateB = $date->getDate('d/m/Y H:i');
         } else {
             $dateB = '<span class="red">Non renseignée</span>';
         }
         $mod->MxText("etape.dateEtape", $dateB);
         if ($et == 'a') {
             $mod->MxText("etape.dateEtape", '');
             $datePec = new clDate();
             $dateMin = new clDate($res['dt_creation'][0]);
             $initB = $datePec->getDatetime();
             for ($i = 0; $datePec->getTimestamp() >= $dateMin->getTimestamp() and $i < 3600; $datePec->addMinutes(-1)) {
                 $listeB[$datePec->getDatetime()] = $datePec->getDate('d/m/Y H:i');
                 $i++;
             }
             if ($i == 0) {
                 $datePec = new clDate($res['dt_creation'][0]);
                 $dateMin = new clDate();
                 $initB = $datePec->getDatetime();
                 for ($i = 0; $datePec->getTimestamp() >= $dateMin->getTimestamp() and $i < 3600; $datePec->addMinutes(-1)) {
                     $listeB[$datePec->getDatetime()] = $datePec->getDate('d/m/Y H:i');
                     $i++;
                 }
             }
             $mod->MxSelect("etape.formEtape.valeurEtape", "date", $initB, $listeB);
             $mod->MxHidden("etape.formEtape.hidden", "typeDate=dateB");
             $_SESSION['typeModJS'] = 'dt_pec';
             $mod->MxText("etape.formEtape.ajaxVal", XhamTools::genAjax('onClick', 'valDateRadios', 'navi=' . $session->genNavi('Ajax', 'valDateRadios', $session->getNavi(2))));
         } else {
             $mod->MxBloc("etape.formEtape", "delete");
         }
         if ($et == 'b') {
             $mod->MxHidden("etape.annulerEtape.hidden", "typeDate=dateB");
             $mod->MxText("etape.annulerEtape.ajaxAnn", XhamTools::genAjax('onClick', 'annDateRadios', 'navi=' . $session->genNavi('Ajax', 'annDateRadios', $session->getNavi(2))));
         } else {
             $mod->MxBloc("etape.annulerEtape", "delete");
         }
         $mod->MxBloc("etape", "loop");
         /*
         // ************ //
         // * EN COURS * //
         // ************ //
         $mod -> MxText ( "etape.nomEtape", "En cours : " ) ;
         $date = new clDate ( $res['dt_encours'][0] ) ;
         if ( $res['dt_encours'][0] != '0000-00-00 00:00:00' ) {
         	$dateC = $date -> getDate ( 'd/m/Y H:i' ) ;
         } else $dateC = '<span class="red">Non renseignée</span>' ;
         $mod -> MxText ( "etape.dateEtape", $dateC ) ;
         if ( $et == 'b' ) {
         	$mod -> MxText ( "etape.dateEtape", '' ) ;
         	$datePec = new clDate ( ) ;
         	$dateMin = new clDate ( $res['dt_pec'][0] ) ;
         	$initC = $datePec -> getDatetime ( ) ;
         	for ( $i = 0 ; $datePec -> getTimestamp ( ) >= $dateMin -> getTimestamp ( ) AND $i < 3600 ; $datePec->addMinutes ( -1 ) ) {
         		$listeC[$datePec->getDatetime ( )] = $datePec -> getDate ( 'd/m/Y H:i' ) ;
         		$i++ ;
         	}
         	$mod -> MxSelect ( "etape.formEtape.valeurEtape", "date", $initC, $listeC ) ;
         	$mod -> MxHidden ( "etape.formEtape.hidden", "typeDate=dateC" ) ;
         	$_SESSION['typeModJS'] = 'dt_encours' ;
         	$mod -> MxText ( "etape.formEtape.ajaxVal", XhamTools::genAjax ( 'onClick', 'valDateRadios', 'navi='.$session->genNavi ( 'Ajax', 'valDateRadios', $session->getNavi(2) ) ) ) ;
         } else $mod -> MxBloc ( "etape.formEtape", "delete" ) ;
         if ( $et == 'c' ) {
         	$mod -> MxHidden ( "etape.annulerEtape.hidden", "typeDate=dateC" ) ;
         	$mod -> MxText ( "etape.annulerEtape.ajaxAnn", XhamTools::genAjax ( 'onClick', 'annDateRadios', 'navi='.$session->genNavi ( 'Ajax', 'annDateRadios', $session->getNavi(2) ) ) ) ;
         	     	} else $mod -> MxBloc ( "etape.annulerEtape", "delete" ) ;
         $mod -> MxBloc ( "etape", "loop" ) ;
         */
         // ******* //
         // * FIN * //
         // ******* //
         $mod->MxText("etape.nomEtape", "Terminé : ");
         $date = new clDate($res['dt_fin'][0]);
         if ($res['dt_fin'][0] != '0000-00-00 00:00:00') {
             $dateD = $date->getDate('d/m/Y H:i');
             $mod->MxHidden("etape.annulerEtape.hidden", "typeDate=dateD");
             $mod->MxText("etape.annulerEtape.ajaxAnn", XhamTools::genAjax('onClick', 'annDateRadios', 'navi=' . $session->genNavi('Ajax', 'annDateRadios', $session->getNavi(2))));
         } else {
             $dateD = '<span class="red">Non renseignée</span>';
             $mod->MxBloc("etape.annulerEtape", "delete");
         }
         if ($et != 'b') {
             $mod->MxBloc("etape.formEtape", "delete");
         } else {
             $param['cw'] = " idEvent=" . $res['idpatient'][0] . " and lieuInterv='" . $options->getOption('RadioSalle') . "'";
             $ris = $req->Execute("Fichier", "CCAM_getActesDiagsCotation", $param, "ResultQuery");
             //print affTab ( $ris['INDIC_SVC'] ) ;
             if ($options->getOption("RadioCCAM") and !$ris['INDIC_SVC'][2] and !$_REQUEST['addActe']) {
                 $dateD = '<div id="CotationCCAMRadio" class="red">Cotation CCAM à saisir</span>';
                 $mod->MxBloc("etape.formEtape", "delete");
             } else {
                 $dateD = '';
                 $mod->MxText("etape.dateEtape", '');
                 $datePec = new clDate();
                 $dateMin = new clDate($res['dt_encours'][0]);
                 $initD = $datePec->getDatetime();
                 for ($i = 0; $datePec->getTimestamp() >= $dateMin->getTimestamp() and $i < 3600; $datePec->addMinutes(-1)) {
                     $listeD[$datePec->getDatetime()] = $datePec->getDate('d/m/Y H:i');
                     $i++;
                 }
                 if ($i == 0) {
                     $datePec = new clDate($res['dt_creation'][0]);
                     $dateMin = new clDate();
                     $initB = $datePec->getDatetime();
                     for ($i = 0; $datePec->getTimestamp() >= $dateMin->getTimestamp() and $i < 3600; $datePec->addMinutes(-1)) {
                         $listeD[$datePec->getDatetime()] = $datePec->getDate('d/m/Y H:i');
                         $i++;
                     }
                 }
                 //1
                 $mod->MxSelect("etape.formEtape.valeurEtape", "date", $initD, $listeD);
                 $mod->MxHidden("etape.formEtape.hidden", "typeDate=dateD");
                 $_SESSION['typeModJS'] = 'dt_fin';
                 $mod->MxText("etape.formEtape.ajaxVal", 'onclick="' . XhamTools::genAjax('', 'valDateRadios', 'navi=' . $session->genNavi('Ajax', 'valDateRadios', $session->getNavi(2))) . ';cache(\'mod\');cache(\'arbo\');"');
             }
         }
         $mod->MxText("etape.dateEtape", $dateD);
         $mod->MxBloc("etape", "loop");
         $mod->MxText('idradio', $res['idradio'][0]);
         $mod->MxText('commentaire_radio', $res['commentaire_radio'][0]);
         if ($options->getOption("RadioCCAM")) {
             $listeGen = new clListesGenerales("recup");
             $listeRadiologues = $listeGen->getListeItemsV2("Radiologues", "1", '', '1');
             $aj = XhamTools::genAjax('onChange', 'setRadiologue', 'navi=' . $session->genNavi('Ajax', 'setRadiologue', $session->getNavi(2)));
             $mod->MxSelect("cotation.listeRadiologues", "radiologue", $res['adeli'][0], $listeRadiologues, '', '', 'id="radiologue" style="width: 240px;" ' . $aj);
             if ($res['adeli'][0]) {
                 $mod->MxText("cotation.moduleCCAM", $this->moduleCCAM('get'));
             }
         } else {
             $mod->MxBloc("cotation", "delete");
         }
         return $mod->MxWrite("1");
     }
 }