function sortie_carpentras(clPatient $patient) { //suppression des instances de formulaires $res = clFoRmXtOoLs::ListFromIds($patient->getIDU()); if (is_array($res) && $res['INDIC_SVC'][2] > 0) { for ($i = 0; $i < $res['INDIC_SVC'][2]; $i++) { //formulaires à effacer if (in_array($res['idformx'][$i], array('CHC_Fiche_Administrative', 'CHC_Fiche_Examen_Medical', 'CHC_Fiche_IAO-IDE', 'CHC_Fiche_Suivi'))) { //mettre ici les id de formulaires à effacer $idInstance = $res['id_instance'][$i]; formxTools::simpleRemoveInstance($idInstance); } //formulaires à cloturer if (in_array($res['idformx'][$i], array('CHC_Synthese'))) { //mettre ici les id de formulaires à effacer $idInstance = $res['id_instance'][$i]; $formx = new clFoRmX_manip($patient->getIDU(), 'NO_POST_THREAT'); $formx->loadInstance($idInstance); $formx->close(); } } } //suppression des variables globales $tabVariables = array('Fiche_Administrative_Rep_Legal', 'ALD', 'Fiche_Administrative_Pansement', 'Fiche_Administrative_Non_Venu', 'Fiche_Administrative_Orientation', 'Fiche_Administrative_Etablissement', 'Fiche_Administrative_Documents', 'Fiche_Administrative_AT', 'Fiche_Administrative_date_AT', 'Fiche_Administrative_heure_AT', 'Fiche_Administrative_minute_AT', 'IDE_CTE_ARRIVEE', 'DATE_CTE_ARRIVEE', 'HEURE_CTE_ARRIVEE', 'PA_BG_CTE_ARRIVEE', 'PA_BD_CTE_ARRIVEE', 'FC_CTE_ARRIVEE', 'TEMP_CTE_ARRIVEE', 'HB_CTE_ARRIVEE', 'SAO2_CTE_ARRIVEE', 'DEXTRO_CTE_ARRIVEE', 'EVA_CTE_ARRIVEE', 'FR_CTE_ARRIVEE', 'ACTES_CTE_ARRIVEE', 'Fiche_IAO_Nom_IDE', 'Fiche_IAO_Jour_Consultation', 'Fiche_IAO_Heure_Consultation', 'Fiche_IAO_Accompagnant', 'Fiche_IAO_qui', 'Fiche_IAO_lettre_medecin', 'Fiche_IAO_ordonnance', 'Fiche_IAO_Traitement', 'Fiche_IAO_VAT', 'Fiche_IAO_Tetanos', 'Fiche_IAO_Bandelette_Urinaire', 'IAO_Glucose', 'IAO_Acetone', 'IAO_Sang', 'IAO_PH', 'IAO_Proteine', 'IAO_Nitrite', 'IAO_Leuco', 'Fiche_IAO_Actes', 'DATE_EXAM', 'HEURE_EXAM', 'ACTES_CTE_ARRIVEE', 'ATCD', 'ALLERGIES', 'TRAITEMENTS', 'OBSERVATIONS_MEDICALES'); $obGlobals = formxTools::globalsLoad($patient->getIDU()); foreach ($tabVariables as $variable) { $obGlobals->del($variable); } $obGlobals->save(); }
function __construct() { global $options; if (isset($_POST['idTrigger'])) { $trigger = new clTuFormxTrigger($_POST['idTrigger']); if (isset($_POST['activate'])) { $trigger->start(); } else { if (isset($_POST['desactivate'])) { $trigger->close(); } } } else { if (isset($_POST['export'])) { $tabEnquete = clTuFormxTrigger::getTabEnquete($_POST['export']); $trigger = new clTuFormxTrigger($tabEnquete['id_trigger']); $dateD = new clDate($tabEnquete['date_debut']); $dateF = new clDate($tabEnquete['date_fin']); $data = array(); $nomFic = ''; clTuFormxTrigger::getDataExport($trigger, $dateD, $dateF, $data, $nomFic); $location = clFoRmXtOoLs::exportsGetCsvFromData($data, $nomFic); header('Location: ' . $location); } } }
function getAffichage() { //Recuperation seulement de la donn�e du nom prescipteur dans tous les formulaires radio $tab = clFoRmXtOoLs::getinstances('Formulaire_Radio', 'Val_F_RADIO_Nom_P', ''); $nbResultats = $tab['INDIC_SVC'][2]; $res = array(); for ($i = 0; $i < $nbResultats; $i++) { $precripteur = $tab['Val_F_RADIO_Nom_P'][$i]; $res[$precripteur]++; } return affTab($res); //AUTRES EXEMPLES //Recuperation de toutes les donn�es radio de la date $date1 � la date $date2 //clFoRmXtOoLs::getinstances('Formulaire_Radio','','',$date1="",$date2="") //Recuperation de toutes les donn�es de tous les formulares demandes radio //$tabAllDonnesRadio = clFoRmXtOoLs::getinstances('Formulaire_Radio'); }
function sortie_carpentras(clPatient $patient) { //suppression des instances de formulaires $res = clFoRmXtOoLs::ListFromIds($patient->getIDU()); if (is_array($res) && $res['INDIC_SVC'][2] > 0) { for ($i = 0; $i < $res['INDIC_SVC'][2]; $i++) { if (in_array($res['idformx'][$i], array('tutorial', 'bachibouzouk', 'arrosoir'))) { //mettre ici les id de formulaires à effacer $idInstance = $res['id_instance'][$i]; formxTools::simpleRemoveInstance($idInstance); } } } //suppression des variables globales $pGlobals = formxTools::globalsLoad($patient->getIDU()); formxTools::globalsDelVar($pGlobals, 'pipou'); formxTools::globalsDelVar($pGlobals, 'pipoux'); formxTools::globalsDelVar($pGlobals, 'papux'); formxTools::globalsDelVar($pGlobals, 'gnafouix'); formxTools::globalsSave($pGlobals); }
function genAffichageCS() { global $session; // Mise en page, arg ! $af = "<div style=\"padding: 20px;\"><h4>Liste des consultations spécialisées par spécialiste :</h4><br/>"; // Récupération de l'ensemble des formulaires des CS $tab = clFoRmXtOoLs::getinstances('formulaire_consultation_specialisee', '', '', '2009-01-01', '2009-12-31'); $nbResultats = $tab['INDIC_SVC'][2]; //eko ( $tab['INDIC_SVC'] ) ; //return ; $res = array(); // Récupération de la liste des médecins ayant fait des CS for ($i = 0; $i < $nbResultats; $i++) { $med = $tab['Val_F_CS_Spe'][$i]; // Compteur de CS par médecin $res[med]++; } // Tri par ordre décroissant sur le nombre de CS réalisées array_multisort($res, SORT_DESC); // Pour chaque médecin, on affiche un lien pour afficher ses CS while (list($key, $val) = each($res)) { if ($key and $key != '#') { $af .= '<a href="?navi=' . $session->genNaviFull() . '&NOMMED=' . $key . '">' . $key . ' (<font color="red">' . $val . '</font>)' . '</a><br/>'; // Si le lien a été cliqué, on affiche les CS du médecin. if ($_GET['NOMMED'] == $key) { // Encore de la mise en page bien sale. $af .= '<div style="padding-left: 20px;">'; // Affichage des CS du médecin. for ($i = 0; $i < $nbResultats; $i++) { if ($_GET['NOMMED'] == $tab['Val_F_CS_Spe'][$i]) { $af .= ' - ' . $tab['Val_F_CS_Date'][$i] . ' : ' . $tab['Val_IDENT_NomPatient'][$i] . ' ' . $tab['Val_IDENT_PrenomPatient'][$i] . ' (' . $tab['Val_IDENT_IDUPatient'][$i] . ', Séjour : ' . $tab['Val_IDENT_NsejPatient'][$i] . ') demandée par ' . $tab['Val_F_CS_Nom_P'][$i] . '<br/>'; } } $af .= '</div>'; } } } $af .= "</div>"; $this->af = $af; }
function genCase($infobulle) { return clFoRmXtOoLs::genCase($infobulle); }
public static function getDataExport($trigger, $dateD, $dateF, &$data, &$nomFic) { global $options; $idFormx = $trigger->getIdFormx(); set_time_limit(0); ini_set('memory_limit', '512M'); $strDate1 = str_replace(array(' ', ':'), array('_', '-'), $dateD->getDatetime()); $strDate2 = str_replace(array(' ', ':'), array('_', '-'), $dateF->getDatetime()); $nomFic = 'etab_' . $options->getOption('RPU_IdActeur') . '_enquete_' . formxTools::strGetIdAtomiqueFx($idFormx) . '_du_' . $strDate1 . '_au_' . $strDate2 . '.csv'; if ($trigger->isPassageLinked()) { $tabOptions = array('firstColsFunc' => 'clGestFormxTriggers::genTabinfoIdPassage', 'firstColsFuncArgField' => 'id_passage', 'crossWithTable' => array('base' => BDD, 'table' => 'patients_sortis', 'indexIds' => 'idu')); } else { $tabOptions = array(); } $data = clFoRmXtOoLs::exportsGetTabIdform($idFormx, $tabOptions + array('basic' => true, 'cw' => " dt_creation <= '" . $dateF->getDatetime() . "' AND status IN ('F','H') AND dt_creation >= '" . $dateD->getDatetime() . "' ")); }
static function getinstances($idformx, $values = '', $filtre = "FX_getInstances", $date1 = "", $date2 = "") { formxSession::getInstance()->addErreur("getinstances est une fonction obsolette"); if ($date1) { $date1 = clFoRmXtOoLs::anydate2datetime($date1); } if ($date2) { $date2 = clFoRmXtOoLs::anydate2datetime($date2); } if (!$filtre) { $filtre = "FX_getInstances"; } $param = array(); if ($date1 && $date2) { $param['cwdate'] = " AND dt_modif >= '{$date1}' and dt_creation <= '{$date2}' "; } elseif ($date1) { $param['cwdate'] = " AND dt_modif >= '{$date1}' "; } elseif ($date2) { $param['cwdate'] = " AND dt_modif <= '{$date2}' "; } else { $param['cwdate'] = " AND 1=1 "; } if ($values) { if (!is_array($values)) { $values = array($values); } } if (is_array($idformx)) { $param['listeidformx'] = "'" . implode("','", $idformx) . "' AND"; // $param['cwdate'] = " AND " . $para['cwdate']; } else { $param['listeidformx'] = "'" . $idformx . "' AND"; // $param['cwdate'] = " AND " . $para['cwdate']; } //print affTab ( $param ) ; return ; $req = new clResultQuery(); if (defined('FX_INSTANCES')) { $param['table'] = FX_INSTANCES; } else { $param['table'] = TABLEFORMX; } $res = $req->Execute("Fichier", $filtre, $param, "ResultQuery"); $nb = $res['INDIC_SVC'][2]; //print affTab ( $res['INDIC_SVC'] ) ; if ($nb == 0) { return array(); } $ret = array(); $ret['ids'] = array(); $ret['id_instance'] = array(); $ret['dt_creation'] = array(); $ret['dt_modif'] = array(); $ret['idformx'] = array(); $ret['libelle'] = array(); $ret['status'] = array(); $ret['author'] = array(); for ($i = 0; $i < $nb; $i++) { $ret['ids'][$i] = $res['ids'][$i]; $ret['id_instance'][$i] = $res['id_instance'][$i]; $ret['dt_creation'][$i] = $res['dt_creation'][$i]; $ret['dt_modif'][$i] = $res['dt_modif'][$i]; $ret['idformx'][$i] = $res['idformx'][$i]; $ret['libelle'][$i] = $res['libelle'][$i]; $ret['status'][$i] = $res['status'][$i]; $ret['author'][$i] = $res['author'][$i]; $newInstance = new clFoRmX($res['ids'][$i], 'NO_POST_THREAT'); $newInstance->loadInstance($res['id_instance'][$i]); if (!$values) { $values = $newInstance->getAllItems(); } foreach ($values as $val) { if (!isset($ret[$val])) { $ret[$val] = array(); } $ret[$val][$i] = utf8_decode($newInstance->getFormVar($val)); } unset($newInstance); } $ret['INDIC_SVC'][2] = $nb; return $ret; }
static function rangerDossMedAEV($patientArg) { global $patient; $patient = $patientArg; $res = clFoRmXtOoLs::ListFromIds($patient->getIDU(), array('F', 'E', 'I')); //eko($res); $formAnt = ""; if (is_array($res)) { for ($i = 0; $i < $res['INDIC_SVC'][2]; $i++) { if ($res['idformx'][$i] == 'Dossier_AEV_Synthese') { $formAnt = $res['id_instance'][$i]; break; } } } if (!$formAnt) { return false; } $form = new clFoRmX_manip($patient->getIDU()); $form->loadInstance($formAnt); $form->close('H'); $form->passDocopi(); }