// 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 $can = $module->canDo(); $a = CAppUI::checkFileName(CValue::get("a", $index)); $u = CAppUI::checkFileName(CValue::get("u", "")); $dosql = CAppUI::checkFileName(CValue::post("dosql", "")); $class = CAppUI::checkFileName(CValue::post("@class", "")); $tab = $a == "index" ? CValue::getOrSession("tab", $tab) : CValue::get("tab"); // set the group in use, put the user group if not allowed $g = CValue::getOrSessionAbs("g", CAppUI::$instance->user_group); $indexGroup = new CGroups(); if ($indexGroup->load($g) && !$indexGroup->canRead()) { $g = CAppUI::$instance->user_group; CValue::setSessionAbs("g", $g); } $user = CAppUI::$user; // Check whether the password is strong enough // If account is not a robot if ($user->_id && !$user->isRobot() && (!($m == "admin" && $tab == "chpwd") && !($m == "admin" && $dosql == "do_chpwd_aed"))) { if (CAppUI::$instance->weak_password && (!CAppUI::$instance->user_remote || CAppUI::conf("admin CUser apply_all_users"))) { CAppUI::redirect("m=admin&tab=chpwd&forceChange=1"); } // If we want to force user to periodically change password if (CAppUI::conf("admin CUser force_changing_password") || $user->_ref_user->force_change_password) { // Need to change
<?php /** * $Id$ * * @category HL7 * @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::checkAdmin(); $object_class = trim(CValue::getOrSession("object_class")); $object_id = trim(CValue::getOrSession("object_id")); $cn_receiver_guid = trim(CValue::getOrSessionAbs("cn_receiver_guid")); $object = null; if ($object_class && $object_id) { $object = CMbObject::loadFromGuid("{$object_class}-{$object_id}"); } $receiver = new CReceiverHL7v2(); $receiver->group_id = CGroups::loadCurrent()->_id; $receiver->actif = "1"; $receivers = $receiver->loadMatchingList(); $object_classes = array("COperation", "CSejour"); $smarty = new CSmartyDP(); $smarty->assign("object_class", $object_class); $smarty->assign("object_classes", $object_classes); $smarty->assign("object_id", $object_id); $smarty->assign("object", $object); $smarty->assign("receivers", $receivers);