<?php /** * $Id$ * * @package Mediboard * @subpackage Hospi * @author SARL OpenXtrem <*****@*****.**> * @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html * @version $Revision$ */ CCanDo::checkRead(); $printer_id = CView::get("printer_id", "num default|0", true); CView::checkin(); $printer = new CPrinter(); $ljoin = array("functions_mediboard" => "functions_mediboard.function_id = printer.function_id"); $where = array("functions_mediboard.group_id" => "= '" . CGroups::loadCurrent()->_id . "'"); $printers = $printer->loadList($where, "object_id, text", null, null, $ljoin); foreach ($printers as $_printer) { $_printer->loadTargetObject(); $_printer->loadRefFunction(); } $smarty = new CSmartyDP(); $smarty->assign("printers", $printers); $smarty->assign("printer_id", $printer_id); $smarty->display("inc_list_printers.tpl");
<?php /** * @category Bloc * @package Mediboard * @author SARL OpenXtrem <*****@*****.**> * @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html * @version SVN: $Id:$ * @link http://www.mediboard.org */ CCanDo::checkAdmin(); $merge = CView::get("merge", "bool default|0"); $auto = CView::get("auto", "bool default|0"); $max = CView::get("max", "num default|10"); CView::checkin(); $group = CGroups::loadCurrent(); $plage = new CPlageOp(); $query = new CRequest(); $query->addColumn("GROUP_CONCAT( plageop_id SEPARATOR '-')", "plage_ids"); $query->addColumn("COUNT( plageop_id )", "plage_count"); $query->addColumn("date"); $query->addGroup("date"); $query->addColumn("debut"); $query->addGroup("debut"); $query->addColumn("fin"); $query->addGroup("fin"); $query->addColumn("chir_id"); $query->addGroup("chir_id"); $query->addColumn("spec_id"); $query->addGroup("spec_id"); $query->addColumn("plagesop.salle_id");
<?php /** * $Id$ * * @package Mediboard * @subpackage PlanningOp * @author SARL OpenXtrem <*****@*****.**> * @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html * @version $Revision$ */ CCanDo::checkAdmin(); /** @var bool $automine */ $automine = CView::get("automine", "bool", true); /** @var int $limit */ $limit = CView::get("limit", "num default|1", true); CView::checkin(); $counts = COperationMiner::makeOperationCounts(); $miner_classes = CApp::getChildClasses("COperationMiner"); $miners = array(); foreach ($miner_classes as $_class) { /** @var COperationMiner $miner */ $miner = new $_class(); $miner->loadMatchingObject("date DESC"); $miner->makeMineCounts(); $miners[] = $miner; } // Création du template $smarty = new CSmartyDP(); $smarty->assign("counts", $counts); $smarty->assign("miners", $miners);
<?php /** * Impression d'une sélection de documents * * @category CompteRendu * @package Mediboard * @author SARL OpenXtrem <*****@*****.**> * @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html * @version SVN: $Id:\$ * @link http://www.mediboard.org */ $nbDoc = CView::get("nbDoc", "str"); CView::checkin(); $documents = array(); $pdf = new CMbPDFMerger(); CMbArray::removeValue("0", $nbDoc); if (!count($nbDoc)) { CAppUI::stepAjax("Aucun document à imprimer !"); CApp::rip(); } $compte_rendu = new CCompteRendu(); $where = array("compte_rendu_id" => CSQLDataSource::prepareIn(array_keys($nbDoc))); /** @var $_compte_rendu CCompteRendu */ foreach ($compte_rendu->loadList($where) as $_compte_rendu) { $_compte_rendu->date_print = CMbDT::dateTime(); $_compte_rendu->store(); $_compte_rendu->makePDFpreview(1); $nb_print = $nbDoc[$_compte_rendu->_id]; for ($i = 1; $i <= $nb_print; $i++) { $pdf->addPDF($_compte_rendu->_ref_file->_file_path);
/** * $Id: plage_selector.php 20893 2013-11-06 17:00:48Z nicolasld $ * * @package Mediboard * @subpackage PlanningOp * @author SARL OpenXtrem <*****@*****.**> * @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html * @version $Revision: 20893 $ */ CCanDo::checkAdmin(); /** @var int $limit */ $limit = CView::get("limit", "num default|1", true); /** @var bool $remine */ $phase = CView::get("phase", "enum list|mine|remine|postmine default|mine", true); /** @var string $miner_class */ $miner_class = CView::get("miner_class", "str", true); // Important for session board reloading CView::get("automine", "bool default|0", true); CView::checkin(); /** @var COperationMiner $miner */ $miner = new $miner_class(); if (!$miner instanceof COperationMiner) { trigger_error("Wrong miner class", E_USER_ERROR); return; } $report = $miner->mineSome($limit, $phase); CAppUI::stepAjax("Miner: %s. Success mining count is '%s'", UI_MSG_OK, $miner_class, $report["success"]); if ($report["failure"]) { CAppUI::stepAjax("Miner: %s. Failure mining counts is '%s'", UI_MSG_ERROR, $miner_class, $report["failure"]); }
* @category Admin * @package Mediboard * @author SARL OpenXtrem <*****@*****.**> * @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html * @version $Revision: 28865 $ * @link http://www.mediboard.org */ CCanDo::checkAdmin(); /** @var int $step */ $step = CView::get("step", "num default|100000"); /** @var int $offset */ $offset = CView::get("offset", "num default|1"); /** @var bool $execute */ $execute = CView::get("execute", "bool default|0", true); /** @var bool $auto */ $auto = CView::get("auto", "bool", true); CView::checkin(); $copies = array(array("CConstantesMedicales", "user_id", "user_id"), array("CConstantesMedicales", "date", "creation_date"), array("CAlert", "date", "creation_date"), array("CCompteRendu", "date", "creation_date"), array("CAntecedent", "user_id", "owner_id"), array("CAntecedent", "date", "creation_date"), array("CTraitement", "user_id", "owner_id"), array("CTraitement", "date", "creation_date"), array("CProductDelivery", "user_id", "preparateur_id"), array("CProductDeliveryTrace", "user_id", "preparateur_id"), array("CRefusDispensation", "user_id", "preparateur_id")); // Ajout des classes de formulaires if (CModule::getActive("forms")) { $ex_class = new CExClass(); $ex_class_ids = $ex_class->loadIds(); foreach ($ex_class_ids as $_id) { $copies[] = array("CExObject_{$_id}", "user_id", "owner_id"); $copies[] = array("CExObject_{$_id}", "date", "datetime_create"); $copies[] = array("CExObject_{$_id}", "date", function (CSQLDataSource $ds, $log) use($_id) { $query = "UPDATE `ex_link`\n SET `datetime_create` = ?1,\n `owner_id` = ?2\n WHERE\n `ex_object_id` = ?3 AND\n `ex_class_id` = ?4 AND\n `datetime_create` IS NULL;"; return $ds->prepare($query, $log["date"], $log["user_id"], $log["object_id"], $_id); }); } }
<?php /** * $Id$ * * @category Hospitalisation * @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(); $sejour_id = CView::get("sejour_id", "num"); CView::checkin(); $sejour = new CSejour(); $sejour->load($sejour_id); echo $sejour->countAlertsNotHandled("medium", "observation");
<?php /** * View Printing Sources * * @category PRINTING * @package Mediboard * @author SARL OpenXtrem <*****@*****.**> * @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html * @version SVN: $Id:$ * @link http://www.mediboard.org */ CCanDo::checkEdit(); $source_id = CView::get("source_id", "num default|0", true); $class = CView::get("class", "enum list|CSourceLPR|CSourceSMB default|CSourceLPR", true); CView::checkin(); // Création du template $smarty = new CSmartyDP(); $smarty->assign("source_id", $source_id); $smarty->assign("class", $class); $smarty->display("vw_idx_sources.tpl");
<?php /** * View Edit Source * * @category PRINTING * @package Mediboard * @author SARL OpenXtrem <*****@*****.**> * @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html * @version SVN: $Id:$ * @link http://www.mediboard.org */ CCanDo::checkEdit(); $source_id = CView::get("source_id", "num default|0", true); CValue::setSession("class", "CSourceSMB"); CView::checkin(); $source_smb = new CSourceSMB(); $source_smb->load($source_id); if (!$source_smb->_id) { $source_smb->valueDefaults(); } // Création du template $smarty = new CSmartyDP(); $smarty->assign("source_smb", $source_smb); $smarty->display("inc_edit_source_smb.tpl");
/** * $Id$ * * @category Dossier patient * @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(); $object_class = CView::get("object_class", "str"); $object_id = CView::get("object_id", "num pos"); $patient_id = CView::get("patient_id", "num pos"); $praticien_id = CView::get("praticien_id", "num pos"); CView::checkin(); $object = new $object_class(); $object->load($object_id); $object->countDocItems(); $user = CMediusers::get(); // Praticien concerné if (!$user->isPraticien() && $praticien_id) { $user = new CMediusers(); $user->load($praticien_id); } $user->loadRefFunction(); $user->_ref_function->loadRefGroup(); $user->canDo(); $compte_rendu = new CCompteRendu(); $smarty = new CSmartyDP();
* * @category CompteRendu * @package Mediboard * @author SARL OpenXtrem <*****@*****.**> * @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html * @version SVN: $Id:\$ * @link http://www.mediboard.org */ CCanDo::checkRead(); // Filtres $filtre = new CCompteRendu(); $filtre->user_id = CValue::getOrSession("user_id"); $filtre->function_id = CValue::getOrSession("function_id"); $filtre->object_class = CValue::getOrSession("object_class"); $filtre->type = CValue::getOrSession("type"); $order_col = CView::get("order_col", "enum list|nom|object_class|file_category_id|type|_count_utilisation default|object_class", true); $order_way = CView::get("order_way", "enum list|ASC|DESC default|DESC", true); CView::checkin(); // On ne met que les classes qui ont une methode fillTemplate $filtre->_specs['object_class']->_locales = CCompteRendu::$templated_classes; if (!$filtre->user_id && !$filtre->function_id) { $filtre->user_id = CMediusers::get()->_id; } $filtre->loadRefUser(); $filtre->loadRefFunction(); // Création du template $smarty = new CSmartyDP(); $smarty->assign("filtre", $filtre); $smarty->assign("order_col", $order_col); $smarty->assign("order_way", $order_way); $smarty->display("vw_modeles.tpl");
<?php /** * $Id: cache_tester_users.php 24615 2014-09-01 10:52:44Z phenxdesign $ * * @package Mediboard * @subpackage developpement * @author SARL OpenXtrem <*****@*****.**> * @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html * @version $Revision: 24615 $ */ CCanDo::checkRead(); $chrono = new Chronometer(); $chrono->start(); if (CView::get("purge", "bool default|0")) { SHM::rem("mediusers"); $chrono->step("purge"); } if (!SHM::exists("mediusers")) { $chrono->step("acquire (not yet)"); $mediuser = new CMediusers(); $mediusers = $mediuser->loadListFromType(); $chrono->step("load"); SHM::put("mediusers", $mediusers, true); $chrono->step("put"); } /** @var CMediusers[] $mediusers */ $mediusers = SHM::get("mediusers"); $chrono->step("get"); // Création du template $smarty = new CSmartyDP();
<?php /** * $Id$ * * @category Dossier patient * @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 */ $patient_id = CView::get("patient_id", "num pos"); $context_guid = CView::get("context_guid", "str"); CView::checkin(); $patient = new CPatient(); $patient->load($patient_id); $curr_user = CMediusers::get(); // Le contexte par défaut est le patient $context = $patient; $context->_praticien_id = $curr_user->_id; if ($context_guid) { $context = CMbObject::loadFromGuid($context_guid); } switch ($context->_class) { case "CConsultation": $context->loadRefPlageConsult(); $context->_ref_chir->loadRefFunction(); break; case "CSejour": $context->loadRefPraticien()->loadRefFunction();
<?php /** * Test print * * @category PRINTING * @package Mediboard * @author SARL OpenXtrem <*****@*****.**> * @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html * @version SVN: $Id:$ * @link http://www.mediboard.org */ CCanDo::checkEdit(); $id = CView::get("id", "num"); $class = CView::get("class", "enum list|CSourceLPR|CSourceSMB"); CView::checkin(); /** @var CSourcePrinter $source */ $source = new $class(); $source->load($id); $file = new CFile(); $file->_file_path = "modules/printing/samples/test_page.pdf"; $source->sendDocument($file);
<?php /** * $Id$ * * @category Consultations * @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(); $sejour_id = CView::get("sejour_id", "num"); $consult_id = CView::get("consult_id", "num"); $sejour = new CSejour(); $sejour->load($sejour_id); $sejour->loadRefsConsultations(); foreach ($sejour->_ref_consultations as $_consult) { if ($_consult->_id == $consult_id) { unset($sejour->_ref_consultations[$_consult->_id]); continue; } $_consult->loadRefPlageConsult(); } $smarty = new CSmartyDP(); $smarty->assign("sejour", $sejour); $smarty->assign("consult_id", $consult_id); $smarty->display("inc_conclusions_consults.tpl");
/** * $Id: cache_tester.php 24615 2014-09-01 10:52:44Z phenxdesign $ * * @package Mediboard * @subpackage developpement * @author SARL OpenXtrem <*****@*****.**> * @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html * @version $Revision: 24615 $ */ CCanDo::checkRead(); /** @var int $times */ $times = CView::get("times", "num notNull pos max|100 default|20"); /** @var int $duration */ $duration = CView::get("duration", "num notNull pos max|60 default|1"); /** @var bool $do */ $do = CView::get("do", "bool"); CView::checkin(); CView::enforceSlave(); $reports = array(); $error_reporting = error_reporting(0); if ($do) { $steps = $times; while ($steps--) { // dummy query $user = new CUser(); $user->countList(); $ds = $user->getDS(); $reports[] = array("time" => CMbDT::time(), "dsn" => $ds->dsn, "errno" => $ds->errno(), "error" => $ds->error()); sleep($duration); } }
<?php /** * $Id$ * * @category Dossier patient * @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(); $context_guid = CView::get("context_guid", "str"); $tri = CView::get("tri", "enum list|date|context|cat default|date"); $display = CView::get("display", "enum list|icon|list default|icon"); CView::checkin(); $context = CMbObject::loadFromGuid($context_guid); $context->loadAllDocs($tri); $smarty = new CSmartyDP(); $smarty->assign("context", $context); $smarty->assign("display", $display); $smarty->assign("tri", $tri); $smarty->display("inc_all_docs.tpl");
<?php /** * Interface des listes de choix * * @category CompteRendu * @package Mediboard * @author SARL OpenXtrem <*****@*****.**> * @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html * @version SVN: $Id:\$ * @link http://www.mediboard.org */ CCanDo::checkRead(); $filtre = new CListeChoix(); $filtre->user_id = CView::get("user_id", "num", true); $filtre->function_id = CView::get("function_id", "num", true); if (!$filtre->user_id && !$filtre->function_id) { $filtre->user_id = CMediusers::get()->_id; } $filtre->loadRefUser(); $filtre->loadRefFunction(); $module = CModule::getActive("dPcompteRendu"); $is_admin = $module && $module->canAdmin(); $access_function = $is_admin || CAppUI::conf("compteRendu CListeChoix access_function"); // Création du template $smarty = new CSmartyDP(); $smarty->assign("filtre", $filtre); $smarty->assign("access_function", $access_function); $smarty->display("vw_idx_listes.tpl");
<?php /** * $Id$ * * @category Hospitalisation * @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(); $obs_id = CView::get("obs_id", "num"); CView::checkin(); $obs = new CObservationMedicale(); $obs->load($obs_id); $obs->loadRefAlerte(); $obs->_ref_alerte->loadRefHandledUser(); $smarty = new CSmartyDP(); $smarty->assign("obs", $obs); $smarty->display("inc_vw_alerte_obs.tpl");
<?php /** * $Id$ * * @category Dossier patient * @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 */ $patient_id = CView::get("patient_id", "num pos"); CView::checkin(); $patient = new CPatient(); $patient->load($patient_id); $patient->_ref_operations = array(); foreach ($patient->loadRefsSejours() as $_sejour) { $_sejour->loadRefPraticien()->loadRefFunction(); $patient->_ref_operations = array_merge($patient->_ref_operations, $_sejour->loadRefsOperations()); } /** @var COperation $_operation */ foreach ($patient->_ref_operations as $_operation) { $_operation->loadRefPlageOp(); $_operation->loadRefChir()->loadRefFunction(); } foreach ($patient->loadRefsConsultations() as $_consult) { $_consult->loadRefPlageConsult(); $_consult->_ref_chir->loadRefFunction(); } $colspan = 3;