/** * Store * * @return void */ function doStore() { // keep track of former values for fieldModified below $obj = $this->_obj; $old = $obj->loadOldObject(); if ($msg = $obj->store()) { CAppUI::setMsg($msg, UI_MSG_ERROR); if ($this->redirectError) { CAppUI::redirect($this->redirectError); } } else { // Keep trace for redirections CValue::setSession($this->objectKey, $obj->_id); // Insert new group and function permission if ($obj->fieldModified("function_id") || !$old->_id) { $obj->insFunctionPermission(); $obj->insGroupPermission(); } // Message CAppUI::setMsg($old->_id ? $this->modifyMsg : $this->createMsg, UI_MSG_OK); // Redirection if ($this->redirectStore) { CAppUI::redirect($this->redirectStore); } } }
/** * Redirection facility * * @param string $action Action view * @param string $params HTTP GET styled paramters * * @return void */ function redirect($action = "access_denied", $params = null) { global $actionType; // on passe a null soit "tab" soit "a" selon ou l'on se trouve CValue::setSession($actionType); if ($this->setValues) { if (is_scalar($this->setValues)) { CValue::setSession($this->setValues); } else { foreach ($this->setValues as $key => $value) { CValue::setSession($key, $value); } } } $action_params = ""; foreach (array("wsdl", "info", "ajax", "raw", "dialog") as $_action_type) { $_action_flag = CValue::get($_action_type); if ($_action_flag) { $action_params .= "&{$_action_type}={$_action_flag}"; } } $context_param = $this->context ? "&context={$this->context}" : ""; CAppUI::redirect("m=system&a={$action}" . $context_param . $action_params . $params); }
$praticien_id = CValue::getOrSession("planning_chir_id"); $scroll_top = CValue::get("scroll_top", null); $bloc_id = CValue::getOrSession("bloc_id"); $show_cancelled = CValue::getOrSession("show_cancelled", 0); $show_operations = CValue::getOrSession("show_operations", 1); $days_limit_future = abs(CAppUI::pref("planning_resa_days_limit")); $max_date_planning = CMbDT::date("+ {$days_limit_future} DAYS", $today); if ($date_planning > $today && $days_limit_future != 0 && $date_planning > $max_date_planning) { $date_planning = $max_date_planning; } $days_limit_past = abs(CAppUI::pref("planning_resa_past_days_limit")); $min_date_planning = CMbDT::date("- {$days_limit_past} DAYS", $today); if ($date_planning < $today && $days_limit_past != 0 && $date_planning < $min_date_planning) { $date_planning = $min_date_planning; } CValue::setSession("date_planning", $date_planning); //alerts $nbIntervHorsPlage = 0; $nbIntervNonPlacees = 0; $nbAlertesInterv = 0; $debut = $fin = $date_planning; $bloc = new CBlocOperatoire(); $where = array(); if ($bloc_id) { $where["bloc_operatoire_id"] = " = '{$bloc_id}'"; } $where["group_id"] = " = '{$group->_id}' "; /** @var CBlocOperatoire[] $blocs */ $blocs = $bloc->loadList($where); CStoredObject::filterByPerm($blocs, PERM_READ); if (count($blocs) == 1) {
$theme_id = CValue::getOrSession("theme_id"); $chapitre_id = CValue::getOrSession("chapitre_id"); $sort_by = CValue::getOrSession("sort_by", "date"); $sort_way = CValue::getOrSession("sort_way", "DESC"); $docGed = new CDocGed(); if (!$docGed->load($doc_ged_id)) { // Ce document n'est pas valide $doc_ged_id = null; CValue::setSession("doc_ged_id"); $docGed = new CDocGed(); } else { $docGed->loadLastActif(); if (!$docGed->_lastactif->doc_ged_suivi_id || $docGed->annule) { // Ce document n'est pas Terminé ou est suspendu $doc_ged_id = null; CValue::setSession("doc_ged_id"); $docGed = new CDocGed(); } else { $docGed->_lastactif->loadFile(); $docGed->loadRefs(); } } $group = CGroups::loadCurrent(); // Liste des Thèmes $theme = new CThemeDoc(); $where = array(); $where[] = "group_id = '{$group->_id}' OR group_id IS NULL"; /** @var CThemeDoc[] $listThemes */ $listThemes = $theme->loadlist($where, "nom"); // Liste des chapitres $chapitre = new CChapitreDoc();
CCanDo::checkRead(); //Initialisations des variables $date = CValue::getOrSession("date", CMbDT::date()); $today = CMbDT::date(); $hour = CMbDT::time(null); $board = CValue::get("board", 1); $boardItem = CValue::get("boardItem", 1); $consult = new CConsultation(); // Récupération des fonctions $cabinets = CMediusers::loadFonctions(); // Récupération de la liste des anesthésistes $mediuser = new CMediusers(); $anesthesistes = $mediuser->loadAnesthesistes(PERM_READ); if ($consult->consultation_id) { $date = $consult->_ref_plageconsult->date; CValue::setSession("date", $date); } // Récupération des plages de consultation du jour et chargement des références $listPlages = array(); foreach ($anesthesistes as $anesth) { $listPlages[$anesth->_id]["anesthesiste"] = $anesth; $plage = new CPlageconsult(); $where = array(); $where["chir_id"] = "= '{$anesth->_id}'"; $where["date"] = "= '{$date}'"; $order = "debut"; $listPlage = $plage->loadList($where, $order); if (count($listPlage)) { $listPlages[$anesth->_id]["plages"] = $listPlage; } else { unset($listPlages[$anesth->_id]);
* @version $Revision$ */ CCanDo::checkRead(); $user = CUser::get(); $type = CValue::get("type"); $first = CValue::get("first"); $selected_user_id = CValue::get("selected_user_id"); $selected_service_valid_user_id = CValue::get("selected_service_valid_user_id"); $elem_concerne = CValue::get("elem_concerne"); $evenements = CValue::get("evenements"); $filter_item = CValue::get("filter_item"); CValue::setSession("selected_user_id", $selected_user_id); CValue::setSession("selected_service_valid_user_id", $selected_service_valid_user_id); CValue::setSession("elem_concerne", $elem_concerne); CValue::setSession("evenements", $evenements); CValue::setSession("filter_item", $filter_item); $selected_fiche_id = CValue::getOrSession("selected_fiche_id"); $where = array(); if ($elem_concerne) { $where["fiches_ei.elem_concerne"] = "= '{$elem_concerne}'"; } if ($selected_user_id) { $where["fiches_ei.user_id"] = "= '{$selected_user_id}'"; } if ($selected_service_valid_user_id) { $where["fiches_ei.service_valid_user_id"] = "= '{$selected_service_valid_user_id}'"; } $user_id = null; if ($type == "AUTHOR" || CCanDo::edit() && !CCanDo::admin()) { $user_id = $user->_id; }
/** * Calcul l'aspect confidentiel du patient * * @return bool on a accès ou pas */ function checkVIP() { if ($this->_vip !== null) { return; } $this->_vip = false; $user = CMediusers::get(); if ($this->vip && !CModule::getCanDo("dPpatient")->admin()) { // Test si le praticien est présent dans son dossier $praticiens = $this->loadRefsPraticiens(); $user_in_list_prat = array_key_exists($user->_id, $praticiens); // Test si un l'utilisateur est présent dans les logs $user_in_logs = false; $this->loadLogs(); foreach ($this->_ref_logs as $_log) { if ($user->_id == $_log->user_id) { $user_in_logs = true; break; } } $this->_vip = !$user_in_list_prat && !$user_in_logs; } if ($this->_vip) { CValue::setSession("patient_id", 0); } }
global $m, $tab; CAppUI::setMsg("Ce RPU n'est pas ou plus disponible", UI_MSG_WARNING); CAppUI::redirect("m={$m}&tab={$tab}&rpu_id=0"); } // Création d'un RPU pour un séjour existant if ($sejour_id) { $rpu = new CRPU(); $rpu->sejour_id = $sejour_id; $rpu->loadMatchingObject(); $rpu->updateFormFields(); } if ($rpu->_id || $rpu->sejour_id) { // Mise en session de l'id de la consultation, si elle existe. $rpu->loadRefConsult(); if ($rpu->_ref_consult->_id) { CValue::setSession("selConsult", $rpu->_ref_consult->_id); } $sejour = $rpu->_ref_sejour; $sejour->loadNDA(); $sejour->loadRefPraticien(1); $sejour->loadRefsNotes(); } else { $rpu->_entree = CMbDT::dateTime(); $sejour = new CSejour(); } $rpu->loadRefMotif(); $rpu->orderCtes(); // Création du template $smarty = new CSmartyDP(); $smarty->assign("rpu", $rpu); $smarty->display("inc_form_complement.tpl");
$ex_class_id = CValue::get("ex_class_id"); $target_element = CValue::get("target_element"); $other_container = CValue::get("other_container"); $print = CValue::get("print"); $start = CValue::get("start", 0); $limit = CValue::get("limit"); $only_host = CValue::get("only_host"); $readonly = CValue::get("readonly"); // Search mode $search_mode = CValue::get("search_mode", 0); $date_min = CValue::get("date_min"); $date_max = CValue::get("date_max"); $group_id = CValue::get("group_id"); $concept_search = CValue::get("concept_search"); CValue::setSession('reference_class', $reference_class); CValue::setSession('reference_id', $reference_id); if ($reference_class) { /** @var CMbObject $reference */ $reference = new $reference_class(); if ($reference_id) { $reference->load($reference_id); } } else { $reference = null; } CExClassField::$_load_lite = true; CExObject::$_multiple_load = true; CExObject::$_load_lite = $detail < 2; $group_id = $group_id ? $group_id : CGroups::loadCurrent()->_id; $where = array("group_id = '{$group_id}' OR group_id IS NULL"); if ($ex_class_id) {
* @package Mediboard * @subpackage System * @author SARL OpenXtrem <*****@*****.**> * @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html * @version $Revision$ */ CCanDo::checkRead(); $echange_ftp_id = CValue::get("echange_ftp_id"); $page = CValue::get('page', 0); $now = CMbDT::date(); $_date_min = CValue::getOrSession('_date_min', CMbDT::dateTime("-7 day")); $_date_max = CValue::getOrSession('_date_max', CMbDT::dateTime("+1 day")); $function = CValue::getOrSession("function"); CValue::setSession("_date_min", $_date_min); CValue::setSession("_date_max", $_date_max); CValue::setSession("function", $function); // Chargement de l'échange FTP demandé $exchange_ftp = new CExchangeFTP(); $exchange_ftp->load($echange_ftp_id); if ($exchange_ftp->_id) { $exchange_ftp->loadRefs(); $exchange_ftp->input = unserialize($exchange_ftp->input); if ($exchange_ftp->ftp_fault != 1) { $exchange_ftp->output = unserialize($exchange_ftp->output); } } // Récupération de la liste des echanges SOAP $itemExchangeFTP = new CExchangeFTP(); $where = array(); if ($_date_min && $_date_max) { $exchange_ftp->_date_min = $_date_min;
* @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); } elseif ($level2) { $listLevel2 = $cim10->getSubCodes($level1, $lang); $master = $cim10->getSubCodes($level2, $lang); } elseif ($level1) { $listLevel2 = $cim10->getSubCodes($level1, $lang); $master = $listLevel2;
} $one_field = false || $one_field_presc; $one_field_traitement = false; $one_field_atcd = false; $sejour_filled = false; $consult_filled = false; $interv_filled = false; $from = null; $to = null; $data = array(); foreach ($fields as $_class => $_fields) { $data[$_class] = array_intersect_key($_GET, $_fields); $object = new $_class(); $prefix = $object->_spec->table; foreach ($data[$_class] as $_field => $_value) { CValue::setSession($_field, $_value); if ($_value !== "") { $one_field = true; } if ($_value === "" || !$_fields[$_field]) { continue; } switch ($_fields[$_field]) { case "=": $where["{$prefix}.{$_field}"] = $ds->prepare(" = % ", $_value); break; default: $where["{$prefix}.{$_field}"] = $ds->prepareLike("%{$_value}%"); } } }
$datetime_max = CValue::get("_datetime_max"); $order_by = CValue::get("order_by"); $group_similar = CValue::get("group_similar", "similar"); $user_id = CValue::get("user_id"); $human = CValue::get("human"); $robot = CValue::get("robot"); CValue::setSession("error_type", $error_type); CValue::setSession("text", $text); CValue::setSession("server_ip", $server_ip); CValue::setSession("_datetime_min", $datetime_min); CValue::setSession("_datetime_max", $datetime_max); CValue::setSession("order_by", $order_by); CValue::setSession("group_similar", $group_similar); CValue::setSession("user_id", $user_id); CValue::setSession("human", $human); CValue::setSession("robot", $robot); CView::enforceSlave(); $where = array(); $error_log = new CErrorLog(); $spec = $error_log->_spec; $ds = $spec->ds; if (($human || $robot) && !($human && $robot)) { $tag = CMediusers::getTagSoftware(); $robots = array(); if ($tag) { $query = "SELECT users.user_id\r\n FROM users\r\n LEFT JOIN id_sante400 ON users.user_id = id_sante400.object_id\r\n WHERE (id_sante400.object_class = 'CMediusers'\r\n AND id_sante400.tag = ?)\r\n OR users.dont_log_connection = '1'\r\n GROUP BY users.user_id"; $query = $ds->prepare($query, $tag); } else { $query = "SELECT users.user_id\r\n FROM users\r\n WHERE users.dont_log_connection = '1'"; } $robots = $ds->loadColumn($query);
* $Id$ * * @category Hprimsante * @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 */ CCanDo::checkRead(); $message_string = CValue::post("message"); if (!$message_string) { return; } $message_string = stripslashes($message_string); CValue::setSession("message", $message_string); try { $message = new CHPrimSanteMessage(); $message->parse($message_string); $message->_errors_msg = !$message->isOK(CHL7v2Error::E_ERROR); $message->_warnings_msg = !$message->isOK(CHL7v2Error::E_WARNING); $message->_xml = CMbString::highlightCode("xml", $message->toXML()->saveXML()); } catch (CHL7v2Exception $e) { CAppUI::stepMessage(UI_MSG_ERROR, $e->getMessage() . " (" . $e->extraData . ")"); return; } // Création du template $smarty = new CSmartyDP(); $smarty->assign("message", $message); $smarty->assign("key", "input"); $smarty->display("inc_display_hprim_message.tpl");
* @package Mediboard * @subpackage Stock * @author SARL OpenXtrem <*****@*****.**> * @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html * @version $Revision$ */ CCanDo::checkRead(); $category_id = CValue::getOrSession('category_id'); $societe_id = CValue::getOrSession('societe_id'); $product_id = CValue::getOrSession('product_id'); $start = CValue::getOrSession('start'); $keywords = CValue::getOrSession('keywords'); $letter = CValue::getOrSession('letter', "%"); $show_all = CValue::get('show_all'); // Don't user getOrSession as we don't want to get it from session CValue::setSession("show_all", $show_all); $where = array(); $where["name"] = $letter === "#" ? "RLIKE '^[^A-Z]'" : "LIKE '{$letter}%'"; if ($category_id) { $where['category_id'] = " = '{$category_id}'"; } if ($societe_id) { $where['societe_id'] = " = '{$societe_id}'"; } if ($keywords) { $where[] = "`code` LIKE '%{$keywords}%' OR \r\n `name` LIKE '%{$keywords}%' OR \r\n `classe_comptable` LIKE '%{$keywords}%' OR \r\n `description` LIKE '%{$keywords}%'"; } if (!$show_all) { $where[] = "cancelled = '0' OR cancelled IS NULL"; } $orderby = 'name, code';
if ($use_poste) { $ljoin["poste_sspi"] = "poste_sspi.poste_sspi_id = operations.poste_sspi_id"; $where[] = "(operations.poste_sspi_id IS NOT NULL AND poste_sspi.bloc_id = '{$bloc_id}')\r\n OR (operations.poste_sspi_id IS NULL AND operations.salle_id " . CSQLDataSource::prepareIn(array_keys($listSalles)) . ")"; } else { $where["operations.salle_id"] = CSQLDataSource::prepareIn(array_keys($listSalles)); } $where[] = "operations.plageop_id " . CSQLDataSource::prepareIn(array_keys($plages)) . " OR (operations.plageop_id IS NULL AND operations.date = '{$date}')"; // orders & filters $order_col = CValue::get("order_col"); if ($order_col && $type) { CValue::setSession("order_col_" . $type, $order_col); } //order way $order_way = CValue::get("order_way"); if ($order_way && $type) { CValue::setSession("order_way_" . $type, $order_way); } $order_way_final = CValue::getOrSession("order_way_" . $type, CValue::get("order_way")); switch ($type) { case 'preop': $where["operations.entree_salle"] = "IS NULL"; // $order = "operations.time_operation"; $order_col = CValue::getOrSession("order_col_{$type}", "time_operation"); break; case 'encours': $where["operations.entree_salle"] = "IS NOT NULL"; $where["operations.sortie_salle"] = "IS NULL"; // $order = "operations.entree_salle"; $order_col = CValue::getOrSession("order_col_{$type}", "entree_salle"); break; case 'ops':
*/ CAppUI::requireModuleFile("dPhospi", "inc_vw_affectations"); $services_ids = CValue::getOrSession("services_ids"); $triAdm = CValue::getOrSession("triAdm"); $_type_admission = CValue::getOrSession("_type_admission", "ambucomp"); $filter_function = CValue::getOrSession("filter_function"); $date = CValue::getOrSession("date"); $granularite = CValue::getOrSession("granularite"); $readonly = CValue::getOrSession("readonly", 0); $duree_uscpo = CValue::getOrSession("duree_uscpo", "0"); $isolement = CValue::getOrSession("isolement", "0"); $prestation_id = CValue::getOrSession("prestation_id", ""); $item_prestation_id = CValue::getOrSession("item_prestation_id"); $group_id = CGroups::loadCurrent()->_id; if (CAppUI::conf("dPhospi prestations systeme_prestations", $group_id) == "standard") { CValue::setSession("prestation_id", ""); $prestation_id = ""; } if (is_array($services_ids)) { CMbArray::removeValue("", $services_ids); } $where = array(); $where["annule"] = "= '0'"; $where["sejour.group_id"] = "= '{$group_id}'"; $where[] = "(sejour.type != 'seances' && affectation.affectation_id IS NULL) || sejour.type = 'seances'"; $where["sejour.service_id"] = "IS NULL " . (is_array($services_ids) && count($services_ids) ? "OR `sejour`.`service_id` " . CSQLDataSource::prepareIn($services_ids) : ""); $order = null; switch ($triAdm) { case "date_entree": $order = "entree ASC, sortie ASC"; break;
CValue::setSession("prenom", $patVitale->prenom); $cv->loadFromIdVitale($patVitale); } } // Recherhche par IPP if ($patient_ipp && !$useVitale && CModule::getInstalled("dPsante400")) { // Initialisation dans le cas d'une recherche par IPP $patients = array(); $patientsSoundex = array(); $patientsCount = 0; $patientsSoundexCount = 0; $patient = new CPatient(); $patient->_IPP = $patient_ipp; $patient->loadFromIPP(); if ($patient->_id) { CValue::setSession("patient_id", $patient->_id); $patients[$patient->_id] = $patient; } } else { $where = array(); $whereSoundex = array(); $ljoin = array(); $soundexObj = new soundex2(); // Limitation du nombre de caractères $patient_nom_search = trim($patient_nom); $patient_prenom_search = trim($patient_prenom); if ($limit_char_search = CAppUI::conf("dPpatients CPatient limit_char_search")) { $patient_nom_search = substr($patient_nom_search, 0, $limit_char_search); $patient_prenom_search = substr($patient_prenom_search, 0, $limit_char_search); } if ($patient_nom_search) {
* @link http://www.mediboard.org */ CCanDo::checkRead(); $echange_soap_id = CValue::get("echange_soap_id"); $page = CValue::get('page', 0); $now = CMbDT::date(); $_date_min = CValue::getOrSession('_date_min', CMbDT::dateTime("-7 day")); $_date_max = CValue::getOrSession('_date_max', CMbDT::dateTime("+1 day")); $service = CValue::getOrSession("service"); $web_service = CValue::getOrSession("web_service"); $fonction = CValue::getOrSession("fonction"); CValue::setSession("web_service", $web_service); CValue::setSession("service", $service); CValue::setSession("_date_min", $_date_min); CValue::setSession("_date_max", $_date_max); CValue::setSession("fonction", $fonction); $doc_errors_msg = $doc_errors_ack = ""; // Chargement de l'échange SOAP demandé $echange_soap = new CEchangeSOAP(); $echange_soap->load($echange_soap_id); if ($echange_soap->_id) { $echange_soap->loadRefs(); $echange_soap->input = unserialize($echange_soap->input); if ($echange_soap->soapfault != 1) { $echange_soap->output = unserialize($echange_soap->output); } } // Récupération de la liste des echanges SOAP $itemEchangeSoap = new CEchangeSOAP(); $where = array(); if ($_date_min && $_date_max) {
$m = $m_get = CValue::get("m"); $post_request = $_SERVER['REQUEST_METHOD'] == 'POST'; if ($post_request) { $m = CValue::post("m") ?: $m; } $m = CAppUI::checkFileName($m); if (null == $m) { $m = CPermModule::getFirstVisibleModule(); $parts = explode("-", CAppUI::pref("DEFMODULE"), 2); $pref_module = $parts[0]; if ($pref_module && CPermModule::getViewModule(CModule::getInstalled($pref_module)->mod_id, PERM_READ)) { $m = $pref_module; } if (count($parts) == 2) { $tab = $parts[1]; CValue::setSession("tab", $tab); } } // Still no target module if (null == $m) { CAppUI::redirect("m=system&a=access_denied"); } if (null == ($module = CModule::getInstalled($m))) { // dP remover super hack if (null == ($module = CModule::getInstalled("dP{$m}"))) { CAppUI::redirect("m=system&a=module_missing&mod={$m}"); } $m = "dP{$m}"; } // Get current module permissions // these can be further modified by the included action files
$prat_id = CValue::getOrSession("chirSel", 0); $userSel = CMediusers::get($prat_id); $userSel->loadRefs(); $canUserSel = $userSel->canDo(); // Vérification des droits sur les praticiens $listChir = CConsultation::loadPraticiens(PERM_EDIT); if (!$userSel->isMedical()) { CAppUI::setMsg("Vous devez selectionner un professionnel de santé", UI_MSG_ALERT); CAppUI::redirect("m=dPcabinet&tab=0"); } $canUserSel->needsEdit(); $selConsult = CValue::getOrSession("selConsult", 0); $dossier_anesth_id = CValue::getOrSession("dossier_anesth_id", 0); if (isset($_GET["date"])) { $selConsult = null; CValue::setSession("selConsult", 0); } $anesth = new CTypeAnesth(); $anesth = $anesth->loadGroupList(); // Consultation courante $consult = new CConsultation(); $consult->_ref_chir = $userSel; if ($selConsult) { $consult->load($selConsult); CCanDo::checkObject($consult); $canConsult = $consult->canDo(); $canConsult->needsEdit(); $consult->loadRefConsultAnesth(); $consult->loadRefPlageConsult(); if (isset($consult->_refs_dossiers_anesth[$dossier_anesth_id])) { $consult->_ref_consult_anesth = $consult->_refs_dossiers_anesth[$dossier_anesth_id];
static function getServicesIdsPref($services_ids = array()) { // Détection du changement d'établissement $group_id = CValue::get("g"); if (!$services_ids || $group_id) { $group_id = $group_id ? $group_id : CGroups::loadCurrent()->_id; $pref_services_ids = json_decode(CAppUI::pref("services_ids_hospi")); // Si la préférence existe, alors on la charge if (isset($pref_services_ids->{"g{$group_id}"})) { $services_ids = $pref_services_ids->{"g{$group_id}"}; $services_ids = explode("|", $services_ids); CMbArray::removeValue("", $services_ids); } else { $service = new CService(); $where = array(); $where["group_id"] = "= '" . CGroups::loadCurrent()->_id . "'"; $where["cancelled"] = "= '0'"; $services_ids = array_keys($service->loadListWithPerms(PERM_READ, $where, "externe, nom")); } } if (is_array($services_ids)) { CMbArray::removeValue("", $services_ids); } global $m; $save_m = $m; foreach (array("dPhospi", "dPadmissions") as $_module) { $m = $_module; CValue::setSession("services_ids", $services_ids); } $m = $save_m; return $services_ids; }
* @package Mediboard * @subpackage Patients * @author SARL OpenXtrem <*****@*****.**> * @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html * @version $Revision: 26857 $ */ CCanDo::checkRead(); $mediuser = CMediusers::get(); // Chargement du patient sélectionné $patient_id = CValue::getOrSession("patient_id"); $patient = new CPatient(); if ($new = CValue::get("new")) { $patient->load(null); CValue::setSession("patient_id", null); CValue::setSession("selClass", null); CValue::setSession("selKey", null); } else { $patient->load($patient_id); } $patient_nom = trim(CValue::getOrSession("nom")); $patient_prenom = trim(CValue::getOrSession("prenom")); $patient_ville = CValue::get("ville"); $patient_cp = CValue::get("cp"); $patient_day = CValue::getOrSession("Date_Day"); $patient_month = CValue::getOrSession("Date_Month"); $patient_year = CValue::getOrSession("Date_Year"); $patient_naissance = "{$patient_year}-{$patient_month}-{$patient_day}"; $patient_ipp = CValue::get("patient_ipp"); $patient_nda = CValue::get("patient_nda"); $useVitale = CValue::get("useVitale", CModule::getActive("fse") && CAppUI::pref('LogicielLectureVitale') != 'none' ? 1 : 0); $prat_id = CValue::get("prat_id");
// Catégorie demandée $categorie = new CEiCategorie(); if (!$categorie->load($ei_categorie_id)) { // Cette catégorie n'est pas valide $ei_categorie_id = null; CValue::setSession("ei_categorie_id"); $categorie = new CEiCategorie(); } else { $categorie->loadRefsBack(); } // Item demandé $item = new CEiItem(); if (!$item->load($ei_item_id)) { // Cet item n'est pas valide $ei_item_id = null; CValue::setSession("ei_item_id"); $item = new CEiItem(); } else { $item->loadRefsFwd(); } // Liste des Catégories $listCategories = $categorie->loadList(null, "nom"); // Liste des Items $where = null; if ($vue_item) { $where = "ei_categorie_id = '{$vue_item}'"; } /** @var CEiItem[] $listItems */ $listItems = $item->loadList($where, "ei_categorie_id, nom"); foreach ($listItems as $_item) { $_item->loadRefsFwd();
$patient = $sejour->_ref_patient; } $grossesse = new CGrossesse(); if ($grossesse_id && !$sejour_id && !$operation_id) { $grossesse->load($grossesse_id); $sejour->grossesse_id = $grossesse->_id; $sejour->_ref_grossesse = $grossesse; $patient = $grossesse->loadRefParturiente(); } // On récupère l'opération $op = new COperation(); $op->load($operation_id); if ($op->_id) { $op->loadRefSejour(); if (CAppUI::conf("dPplanningOp COperation use_session_praticien")) { CValue::setSession("chir_id", $op->chir_id); } if (CBrisDeGlace::isBrisDeGlaceRequired()) { $canAccess = CAccessMedicalData::checkForSejour($op->_ref_sejour); if (!$canAccess) { if (!$op->canDo()->read) { global $m, $tab; CAppUI::setMsg("Vous n'avez pas accés à cette intervention hors plage", UI_MSG_WARNING); CAppUI::redirect("m={$m}&tab={$tab}&operation_id=0"); } } } else { if (!$op->canDo()->read) { global $m, $tab; CAppUI::setMsg("Vous n'avez pas accés à cette intervention hors plage", UI_MSG_WARNING); CAppUI::redirect("m={$m}&tab={$tab}&operation_id=0");
/** * Store object * * @return void */ function doStore() { if ($msg = $this->_obj->store()) { CAppUI::setMsg($msg, UI_MSG_ERROR); if ($this->redirectError) { $this->redirect =& $this->redirectError; } } else { $id = $this->objectKey; CValue::setSession($id, $this->_obj->_id); CAppUI::setMsg($this->_old->_id ? $this->modifyMsg : $this->createMsg, UI_MSG_OK); // Store additional object reference to the CExObject $ex_object_guid = CMbArray::get($this->request, "_ex_object_guid"); if ($ex_object_guid) { $obj = $this->_obj; /** @var CExObject $ex_object */ $ex_object = CStoredObject::loadFromGuid($ex_object_guid); if ($ex_object->_id) { $ex_object->additional_class = $obj->_class; $ex_object->additional_id = $obj->_id; $ex_object->store(); } } if ($this->redirectStore) { $this->redirect =& $this->redirectStore; } } }
<?php /** * $Id: do_consult_anesth_aed.php 19253 2013-05-24 07:18:23Z aurelie17 $ * * @package Mediboard * @subpackage dPcabinet * @author SARL OpenXtrem <*****@*****.**> * @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html * @version $Revision: 19253 $ */ if ($chir_id = CValue::post("chir_id")) { CValue::setSession("chir_id", $chir_id); } $do = new CDoObjectAddEdit("CConsultAnesth"); $do->doIt();
/** * @see parent::doStore() */ function doStore() { $upload = null; if (CValue::POST("_from_yoplet") == 1) { /** @var CFile $obj */ $obj = $this->_obj; $array_file_name = array(); $path = CAppUI::conf("dPfiles yoplet_upload_path"); if (!$path) { $path = "tmp"; } // On retire les backslashes d'escape $file_name = stripslashes($this->request['_file_path']); // Récupération du nom de l'image en partant de la fin de la chaîne // et en rencontrant le premier \ ou / preg_match('@[\\\\/]([^\\\\/]*)$@i', $file_name, $array_file_name); $file_name = $array_file_name[1]; $extension = strrchr($file_name, '.'); $_rename = $this->request['_rename'] ? $this->request['_rename'] : 'upload'; $file_path = "{$path}/" . $this->request['_checksum']; $obj->file_name = $_rename == 'upload' ? $file_name : $_rename . $extension; $obj->_old_file_path = $this->request['_file_path']; $obj->doc_size = filesize($file_path); $obj->author_id = CAppUI::$user->_id; if (CModule::getActive("cda")) { $obj->type_doc = $this->request["type_doc"]; } $obj->fillFields(); $obj->updateFormFields(); $obj->file_type = CMbPath::guessMimeType($file_name); if ($msg = $obj->store()) { CAppUI::setMsg($msg, UI_MSG_ERROR); } else { $obj->forceDir(); $obj->moveFile($file_path); } return parent::doStore(); } $_file_category_id = CValue::post("_file_category_id"); $language = CValue::post("language"); $type_doc = CValue::post("type_doc"); $named = CValue::post("named"); $rename = CValue::post("_rename"); CValue::setSession("_rename", $rename); if (isset($_FILES["formfile"])) { $aFiles = array(); $upload =& $_FILES["formfile"]; foreach ($upload["error"] as $fileNumber => $etatFile) { if (!$named) { $rename = $rename ? $rename . strrchr($upload["name"][$fileNumber], '.') : ""; } if ($upload["name"][$fileNumber]) { $aFiles[] = array("_mode" => "file", "name" => $upload["name"][$fileNumber], "type" => CMbPath::guessMimeType($upload["name"][$fileNumber]), "tmp_name" => $upload["tmp_name"][$fileNumber], "error" => $upload["error"][$fileNumber], "size" => $upload["size"][$fileNumber], "language" => $language, "type_doc" => $type_doc, "file_category_id" => $_file_category_id, "object_id" => CValue::post("object_id"), "object_class" => CValue::post("object_class"), "_rename" => $rename); } } // Pasted images, via Data uri if (!empty($_POST["formdatauri"])) { $data_uris = $_POST["formdatauri"]; $data_names = $_POST["formdatauri_name"]; foreach ($data_uris as $fileNumber => $fileContent) { $parsed = $this->parseDataUri($fileContent); $_name = $data_names[$fileNumber]; if (!$named) { $ext = strrchr($_name, '.'); if ($ext === false) { $ext = "." . substr(strrchr($parsed["mime"], '/'), 1); $_name .= $ext; } $rename = $rename ? $rename . $ext : ""; } $temp = tempnam(sys_get_temp_dir(), "up_"); file_put_contents($temp, $parsed["data"]); if ($data_names[$fileNumber]) { $aFiles[] = array("_mode" => "datauri", "name" => $_name, "type" => $parsed["mime"], "tmp_name" => $temp, "error" => 0, "size" => strlen($parsed["data"]), "language" => $language, "type_doc" => $type_doc, "file_category_id" => $_file_category_id, "object_id" => CValue::post("object_id"), "object_class" => CValue::post("object_class"), "_rename" => $rename); } } } $merge_files = CValue::post("_merge_files"); if ($merge_files) { $pdf = new CMbPDFMerger(); $this->_obj = new $this->_obj->_class(); /** @var CFile $obj */ $obj = $this->_obj; $file_name = ""; $nb_converted = 0; foreach ($aFiles as $key => $file) { $converted = 0; if ($file["error"] == UPLOAD_ERR_NO_FILE) { continue; } if ($file["error"] != 0) { CAppUI::setMsg(CAppUI::tr("CFile-msg-upload-error-" . $file["error"]), UI_MSG_ERROR); continue; } // Si c'est un pdf, on le rajoute sans aucun traitement if (substr(strrchr($file["name"], '.'), 1) == "pdf") { $file_name .= substr($file["name"], 0, strpos($file["name"], '.')); $pdf->addPDF($file["tmp_name"], 'all'); $nb_converted++; $converted = 1; } else { if ($obj->isPDFconvertible($file["name"]) && $obj->convertToPDF($file["tmp_name"], $file["tmp_name"] . "_converted")) { $pdf->addPDF($file["tmp_name"] . "_converted", 'all'); $file_name .= substr($file["name"], 0, strpos($file["name"], '.')); $nb_converted++; $converted = 1; } else { $other_file = new CFile(); $other_file->bind($file); $other_file->file_name = $file["name"]; $other_file->file_type = $file["type"]; $other_file->doc_size = $file["size"]; $other_file->fillFields(); $other_file->private = CValue::post("private"); if (false == ($res = $other_file->moveTemp($file))) { CAppUI::setMsg("Fichier non envoyé", UI_MSG_ERROR); continue; } $other_file->author_id = CAppUI::$user->_id; if ($msg = $other_file->store()) { CAppUI::setMsg("Fichier non enregistré: {$msg}", UI_MSG_ERROR); continue; } CAppUI::setMsg("Fichier enregistré", UI_MSG_OK); } } // Pour le nom du pdf de fusion, on concatène les noms des fichiers if ($key != count($aFiles) - 1 && $converted) { $file_name .= "-"; } } // Si des fichiers ont été convertis et ajoutés à PDFMerger, // création du cfile. if ($nb_converted) { $obj->file_name = $file_name . ".pdf"; $obj->file_type = "application/pdf"; $obj->author_id = CAppUI::$user->_id; $obj->private = CValue::post("private"); $obj->object_id = CValue::post("object_id"); $obj->object_class = CValue::post("object_class"); $obj->updateFormFields(); $obj->fillFields(); $obj->forceDir(); $tmpname = tempnam("/tmp", "pdf_"); $pdf->merge('file', $tmpname); $obj->doc_size = strlen(file_get_contents($tmpname)); $obj->moveFile($tmpname); //rename($tmpname, $obj->_file_path . "/" .$obj->file_real_filename); if ($msg = $obj->store()) { CAppUI::setMsg("Fichier non enregistré: {$msg}", UI_MSG_ERROR); } else { CAppUI::setMsg("Fichier enregistré", UI_MSG_OK); } } } else { foreach ($aFiles as $file) { if ($file["error"] == UPLOAD_ERR_NO_FILE) { continue; } if ($file["error"] != 0) { CAppUI::setMsg(CAppUI::tr("CFile-msg-upload-error-" . $file["error"]), UI_MSG_ERROR); continue; } // Reinstanciate $this->_obj = new $this->_obj->_class(); /** @var CFile $obj */ $obj = $this->_obj; $obj->bind($file); $obj->file_name = empty($file["_rename"]) ? $file["name"] : $file["_rename"]; $obj->file_type = $file["type"]; if ($obj->file_type == "application/x-download") { $obj->file_type = CMbPath::guessMimeType($obj->file_name); } $obj->doc_size = $file["size"]; $obj->fillFields(); $obj->private = CValue::post("private"); if ($file["_mode"] == "file") { $res = $obj->moveTemp($file); } else { $res = $obj->moveFile($file["tmp_name"]); } if (false == $res) { CAppUI::setMsg("Fichier non envoyé", UI_MSG_ERROR); continue; } // File owner on creation if (!$obj->file_id) { $obj->author_id = CAppUI::$user->_id; } if ($msg = $obj->store()) { CAppUI::setMsg("Fichier non enregistré: {$msg}", UI_MSG_ERROR); continue; } CAppUI::setMsg("Fichier enregistré", UI_MSG_OK); } } // Redaction du message et renvoi if (CAppUI::isMsgOK() && $this->redirectStore) { $this->redirect =& $this->redirectStore; } if (!CAppUI::isMsgOK() && $this->redirectError) { $this->redirect =& $this->redirectError; } } else { parent::doStore(); } }
$where["functions_mediboard.group_id"] = "= '{$group_id}'"; $users_all = $user->loadList($where, null, null, null, $ljoin); /** @var $users CUser[] */ $users = array_diff_key($users_all, $users_ldap); $users = array_slice($users, $start, $count); $count = $count_no_associate = $count_associate = 0; foreach ($users as $_user) { try { $source_ldap = CLDAP::bind($_user, $ldaprdn, $ldappass); $_user = CLDAP::searchAndMap($_user, $source_ldap, $source_ldap->_ldapconn, $_user->user_username, null); } catch (CMbException $e) { $e->stepAjax(); } if ($_user->_count_ldap != 0) { $count_associate++; } if ($_user->_count_ldap == 0) { CAppUI::stepAjax("'{$_user->_view}' / '{$_user->user_username}' non associé", UI_MSG_WARNING); $count_no_associate++; } $count++; } if ($count == 0) { echo "<script type='text/javascript'>stop=true;</script>"; } $next = $start + $count_no_associate; CAppUI::stepAjax("{$count_associate} comptes associés"); CAppUI::stepAjax("{$count_no_associate} comptes non associés", UI_MSG_WARNING); CValue::setSession("start", $next); CAppUI::stepAjax("On continuera au n° {$next} / " . count($users) . " restants"); }
$directory = CValue::post("directory"); $files_directory = CValue::post("files_directory"); if (!is_dir($directory)) { CAppUI::stepAjax("'%s' is not a directory", UI_MSG_WARNING, $directory); return; } if ($files_directory && !is_dir($files_directory)) { CAppUI::stepAjax("'%s' is not a directory", UI_MSG_WARNING, $files_directory); return; } $directory = str_replace("\\\\", "\\", $directory); $files_directory = str_replace("\\\\", "\\", $files_directory); CValue::setSession("step", $step); CValue::setSession("start", $start); CValue::setSession("directory", $directory); CValue::setSession("files_directory", $files_directory); $step = min($step, 1000); CStoredObject::$useObjectCache = false; // Import ... $iterator = new DirectoryIterator($directory); $count_dirs = 0; $i = 0; foreach ($iterator as $_fileinfo) { if ($_fileinfo->isDot()) { continue; } if ($_fileinfo->isDir() && strpos($_fileinfo->getFilename(), "CPatient-") === 0) { $i++; if ($i <= $start) { continue; }