* dPcim10 * * @category Cim10 * @package Mediboard * @author SARL OpenXtrem <*****@*****.**> * @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html * @version SVN: $Id: vw_find_code.php 27313 2015-02-25 13:23:18Z flaviencrochard $ * @link http://www.mediboard.org */ CCanDo::checkRead(); $lang = CValue::getOrSession("lang", CCodeCIM10::LANG_FR); $code = CValue::getOrSession("code", ""); $keys = CValue::getOrSession("keys", ""); $level1 = CValue::getOrSession("level1", ""); $level2 = CValue::getOrSession("level2", ""); if (CValue::session("code") || CValue::session("keys")) { $level1 = ""; CValue::setSession("level1"); } if (!$level1) { $level2 = ""; CValue::setSession("level2"); } $cim10 = new CCodeCIM10(); $listLevel1 = $cim10->getSommaire($lang); $listLevel2 = array(); $master = array(); $keys = trim($keys); $code = trim($code); if ($code || $keys) { $master = $cim10->findCodes($code, $keys, $lang);
* $Id$ * * @category DPpatients * @package Mediboard * @author SARL OpenXtrem <*****@*****.**> * @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html * @version $Revision$ * @link http://www.mediboard.org */ if (!CAppUI::pref("allowed_modify_identity_status")) { CAppUI::redirect("m=system&a=access_denied"); } $state = CValue::get("state"); $page = (int) CValue::get("page", 0); $date_min = CValue::session("patient_state_date_min"); $date_max = CValue::session("patient_state_date_max"); $patients = array(); $patients_state = array(); $where = array(); $leftjoin = null; $patient = new CPatient(); if ($date_min) { $where["entree"] = ">= '{$date_min}'"; $leftjoin["sejour"] = "patients.patient_id = sejour.patient_id"; } if ($date_max) { $where["sortie"] = "<= '{$date_max}'"; $leftjoin["sejour"] = "patients.patient_id = sejour.patient_id"; } $patients_count = CPatientState::getAllNumberPatient($date_min, $date_max); if ($patients_count[$state] > 0) {
* @package Mediboard * @subpackage System * @author SARL OpenXtrem <*****@*****.**> * @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html * @version $Revision$ */ CCanDo::checkRead(); $object_class = CValue::get("object_class"); $object_guid = CValue::get("object_guid"); $hide_tree = CValue::get("hide_tree"); $tree_width = CValue::get("tree_width"); $group_id = CValue::get("group_id"); $columns = CValue::get("col"); if (!$object_class && $object_guid) { $parts = explode("-", $object_guid); $object_class = $parts[0]; } if (!$object_class || !is_subclass_of($object_class, "CMbObject")) { CAppUI::stepAjax("Nom de classe invalide <strong>{$object_class}</strong>", UI_MSG_ERROR); } if (!$object_guid) { $object_guid = CValue::session("object_guid", "{$object_class}-0"); } $smarty = new CSmartyDP("modules/system"); $smarty->assign("object_class", $object_class); $smarty->assign("object_guid", $object_guid); $smarty->assign("columns", $columns); $smarty->assign("hide_tree", $hide_tree); $smarty->assign("tree_width", $tree_width); $smarty->assign("group_id", $group_id); $smarty->display("vw_object_tree_explorer.tpl");
$patient->_id = ""; $patient->loadRefsFwd(); $consult = new CConsultation(); bindHashToObject($_GET + $_SESSION["dPpatients"], $consult); $consult->loadRefsFwd(); $consult->_rques_consult = CValue::get("_rques_consult", CValue::session("_rques_consult")); $consult->_examen_consult = CValue::get("_examen_consult", CValue::session("_examen_consult")); $sejour = new CSejour(); bindHashToObject($_GET + $_SESSION["dPpatients"], $sejour); $sejour->loadRefsFwd(); $sejour->_rques_sejour = CValue::get("_rques_sejour", CValue::session("_rques_sejour")); $interv = new COperation(); bindHashToObject($_GET + $_SESSION["dPpatients"], $interv); $interv->loadRefsFwd(); $interv->_libelle_interv = CValue::get("_libelle_interv", CValue::session("_libelle_interv")); $interv->_rques_interv = CValue::get("_rques_interv", CValue::session("_rques_interv")); $antecedent = new CAntecedent(); bindHashToObject($_GET + $_SESSION["dPpatients"], $antecedent); $antecedent->loadRefsFwd(); $traitement = new CTraitement(); bindHashToObject($_GET + $_SESSION["dPpatients"], $traitement); $traitement->loadRefsFwd(); $prescription = new CPrescription(); $prescription->type = CValue::getOrSession("type_prescription"); $line_med = new CPrescriptionLineMedicament(); $line_med->code_ucd = CValue::getOrSession("code_ucd"); $line_med->code_cis = CValue::getOrSession("code_cis"); $line_med->_ucd_view = CValue::getOrSession("produit"); $libelle_produit = CValue::getOrSession("libelle_produit"); $classes_atc = CValue::getOrSession("classes_atc"); $keywords_atc = CValue::getOrSession("keywords_atc");
} // Chargement des banques $orderBanque = "nom ASC"; $banque = new CBanque(); $banques = $banque->loadList(null, $orderBanque); // Test compliqué afin de savoir quelle consultation charger if ($consult->load($consult_id) && $consult->patient_id) { $consult->loadRefPlageConsult(); } // On charge le praticien $userSel = new CMediusers(); $userSel->load($consult->_ref_plageconsult->chir_id); $userSel->loadRefs(); $canUserSel = $userSel->canDo(); // assign to session the current consultation praticien $chirSession = CValue::session("chirSel"); if ($chirSession != $userSel->_id && $canUserSel) { CValue::setSession("chirSel", $userSel->_id); } $anesth = new CTypeAnesth(); $anesth = $anesth->loadGroupList(); $consultAnesth =& $consult->_ref_consult_anesth; // Consultation courante $consult->_ref_chir =& $userSel; // Chargement de la consultation if ($consult->_id) { $consult->canDo()->needsEdit(array("consult_id" => null)); $consult->loadRefs(); // Chargement de la consultation d'anesthésie // Chargement de la vue de chacun des dossiers foreach ($consult->_refs_dossiers_anesth as $_dossier) {
if ($chap1 && $chap1 == $chap1old) { $chap2old = CValue::session("chap2"); $chap2 = CValue::getOrSession("chap2"); } else { $chap2 = $chap2old = ""; CValue::setSession("chap2"); } if ($chap2 && $chap2 == $chap2old) { $chap3old = CValue::session("chap3"); $chap3 = CValue::getOrSession("chap3"); } else { $chap3 = $chap3old = ""; CValue::setSession("chap3"); } if ($chap3 && $chap3 == $chap3old) { $chap4old = CValue::session("chap4"); $chap4 = CValue::getOrSession("chap4"); } else { $chap4 = ""; CValue::setSession("chap4"); } // On récupère les voies d'accès $query = "SELECT * FROM acces1"; $result = $ds->exec($query); $i = 1; $acces = array(); while ($row = $ds->fetchArray($result)) { $acces[$i]["code"] = $row["CODE"]; $acces[$i]["texte"] = $row["ACCES"]; $i++; }
$endowment_item_id = CValue::get('endowment_item_id'); $service = new CService(); $service->load($service_id); $service->loadBackRefs("endowments"); if ($endowment_id === null && count($service->_back["endowments"])) { $first = reset($service->_back["endowments"]); $endowment_id = $first->_id; } // Calcul de date_max et date_min $date_min = CValue::get('_date_min'); $date_max = CValue::get('_date_max'); if (!$date_min) { $date_min = CValue::session('_date_delivrance_min', CMbDT::date("-1 DAY")); } if (!$date_max) { $date_max = CValue::session('_date_delivrance_max', CMbDT::date()); } CValue::setSession('_date_delivrance_min', $date_min); CValue::setSession('_date_delivrance_max', $date_max); CValue::setSession('endowment_id', $endowment_id); $delivrance = new CProductDelivery(); $delivrance->_date_min = $date_min; $delivrance->_date_max = $date_max; $group_id = CProductStockGroup::getHostGroup(); $single_line = false; $limit = "{$start},25"; $where = array("product.name " . ($letter === "#" ? "RLIKE '^[^A-Z]'" : "LIKE '{$letter}%'")); if ($endowment_id) { /** @var CProductEndowmentItem[] $endowment_items */ // Toute la liste if (!$endowment_item_id) {