* @package Mediboard
* @subpackage dPstats
* @author SARL OpenXtrem <*****@*****.**>
* @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html
* @version $Revision$
*/
CAppUI::requireLibraryFile("jpgraph/src/mbjpgraph");
CAppUI::requireLibraryFile("jpgraph/src/jpgraph_bar");
$debut = CValue::get("debut", CMbDT::date("-1 YEAR"));
$fin = CValue::get("fin", CMbDT::date());
$prat_id = CValue::get("prat_id", 0);
$service_id = CValue::get("service_id", 0);
$pratSel = new CMediusers();
$pratSel->load($prat_id);
$service = new CSalle();
$service->load($service_id);
$datax = array();
for ($i = $debut; $i <= $fin; $i = CMbDT::date("+1 MONTH", $i)) {
$datax[] = CMbDT::transform("+0 DAY", $i, "%m/%Y");
}
$sql = "SELECT * FROM service WHERE";
if ($service_id) {
$sql .= "\nAND id = '{$service_id}'";
}
$ds = CSQLDataSource::get("std");
$services = $ds->loadlist($sql);
$opbysalle = array();
foreach ($services as $service) {
$id = $service["service_id"];
$opbysalle[$id]["nom"] = $salle["nom"];
$sql = "SELECT COUNT(sejour.sejour_id) AS total," . "\nDATE_FORMAT(sejour.entree_prevue, '%m/%Y') AS mois," . "\nDATE_FORMAT(sejour.entre_prevue, '%Y%m') AS orderitem," . "\nservice.nom AS nom" . "\nFROM sejour, affectation, services, chambre, lit" . "\nWHERE sejour.annule = '0'" . "\nAND sejour.entree_prevue BETWEEN '{$debut}' AND '{$fin}'";
*
* @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::read();
$listBlocs = CGroups::loadCurrent()->loadBlocs();
$listSalles = array();
foreach ($listBlocs as $_bloc) {
$listSalles = $listSalles + $_bloc->loadRefsSalles();
}
$salle = new CSalle();
$salle->load(CValue::get("salle_id"), reset($listSalles)->_id);
$salle->loadRefBloc();
$date = CValue::get("date", CMbDT::date());
// Liste des jours
$listDays = array();
for ($i = 0; $i < 19 * 7; $i += 7) {
$dateArr = CMbDT::date("+{$i} day", $date);
$listDays[$dateArr] = $dateArr;
}
// Création du tableau de visualisation
$affichages = array();
foreach ($listDays as $keyDate => $valDate) {
foreach (CPlageOp::$hours as $keyHours => $valHours) {
foreach (CPlageOp::$minutes as $keyMins => $valMins) {
// Initialisation du tableau
$affichages["{$keyDate}-{$valHours}:{$valMins}:00"] = "empty";
* @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html
* @version $Revision$
*/
// Récupération des paramètres
$date = CValue::getOrSession("date", CMbDT::date());
$salle_id = CValue::getOrSession("salle_id");
$bloc_id = CValue::getOrSession("bloc_id");
$type = CValue::getOrSession("type", "ouverture_salle");
// Récupération de l'utilisateur courant
$user = CUser::get();
$currUser = new CMediusers();
$currUser->load($user->_id);
$currUser->isAnesth();
$currUser->isPraticien();
$salle = new CSalle();
$salle->load($salle_id);
$bloc = new CBlocOperatoire();
$bloc->load($bloc_id);
// Vérification de la check list journalière
$daily_check_lists = array();
$daily_check_list_types = array();
$require_check_list = CAppUI::conf("dPsalleOp CDailyCheckList active", CGroups::loadCurrent()) && $date >= CMbDT::date() && !$currUser->_is_praticien;
if ($require_check_list) {
if ($bloc->_id) {
list($check_list_not_validated, $daily_check_list_types, $daily_check_lists) = CDailyCheckList::getCheckLists($bloc, $date, $type);
} else {
list($check_list_not_validated, $daily_check_list_types, $daily_check_lists) = CDailyCheckList::getCheckLists($salle, $date, $type);
}
if ($check_list_not_validated == 0) {
$require_check_list = false;
}
* @package Mediboard
* @subpackage bloodSalvage
* @author SARL OpenXtrem <*****@*****.**>
* @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html
* @version $Revision:$
*/
CCanDo::checkRead();
$date = CValue::getOrSession("date", CMbDT::date());
$operation_id = CValue::getOrSession("operation_id");
$salle_id = CValue::getOrSession("salle");
// Chargement des praticiens
$listAnesths = new CMediusers();
$listAnesths = $listAnesths->loadAnesthesistes(PERM_READ);
// Liste des blocs
$listBlocs = new CBlocOperatoire();
$listBlocs = $listBlocs->loadGroupList();
// Selection des plages opératoires de la journée
$salle = new CSalle();
if ($salle->load($salle_id)) {
$salle->loadRefsForDay($date);
}
// Création du template
$smarty = new CSmartyDP();
$smarty->assign("vueReduite", false);
$smarty->assign("salle", $salle);
$smarty->assign("praticien_id", null);
$smarty->assign("listBlocs", $listBlocs);
$smarty->assign("listAnesths", $listAnesths);
$smarty->assign("date", $date);
$smarty->assign("operation_id", $operation_id);
$smarty->display("inc_liste_plages.tpl");
/**
* Récupération des statistiques du nombre d'interventions par jour
* selon plusieurs filtres
*
* @param string $date Date de début
* @param int $prat_id Identifiant du praticien
* @param int $salle_id Identifiant de la sall
* @param int $bloc_id Identifiant du bloc
* @param int $discipline_id Identifiant de la discipline
* @param string $codes_ccam Code CCAM
* @param string $type_hospi Type d'hospitalisation
* @param bool $hors_plage Prise en compte des hors plage
*
* @return array
*/
function graphActiviteZoom($date, $prat_id = 0, $salle_id = 0, $bloc_id = 0, $func_id = 0, $discipline_id = 0, $codes_ccam = '', $type_hospi = "", $hors_plage = true)
{
if (!$date) {
$date = CMbDT::transform("+0 DAY", CMbDT::date(), "%m/%Y");
}
$prat = new CMediusers();
$prat->load($prat_id);
$salle = new CSalle();
$salle->load($salle_id);
$discipline = new CDiscipline();
$discipline->load($discipline_id);
// Gestion de la date
$debut = substr($date, 3, 7) . "-" . substr($date, 0, 2) . "-01";
$fin = CMbDT::date("+1 MONTH", $debut);
$fin = CMbDT::date("-1 DAY", $fin);
$step = "+1 DAY";
// Tableaux des jours
$ticks = array();
$ticks2 = array();
$serie_total = array('label' => 'Total', 'data' => array(), 'markers' => array('show' => true), 'bars' => array('show' => false));
for ($i = $debut; $i <= $fin; $i = CMbDT::date($step, $i)) {
$ticks[] = array(count($ticks), CMbDT::format($i, "%a %d"));
$ticks2[] = array(count($ticks), CMbDT::format($i, "%d"));
$serie_total['data'][] = array(count($serie_total['data']), 0);
}
$salles = CSalle::getSallesStats($salle_id, $bloc_id);
$series = array();
$total = 0;
foreach ($salles as $salle) {
$serie = array('data' => array(), 'label' => utf8_encode($salle->nom));
$query = "SELECT COUNT(operations.operation_id) AS total,\r\n DATE_FORMAT(operations.date, '%d') AS jour,\r\n sallesbloc.nom AS nom\r\n FROM operations\r\n INNER JOIN sejour ON operations.sejour_id = sejour.sejour_id\r\n INNER JOIN sallesbloc ON operations.salle_id = sallesbloc.salle_id\r\n INNER JOIN plagesop ON operations.plageop_id = plagesop.plageop_id\r\n INNER JOIN users_mediboard ON operations.chir_id = users_mediboard.user_id\r\n WHERE operations.date BETWEEN '{$debut}' AND '{$fin}'\r\n AND operations.plageop_id IS NOT NULL\r\n AND operations.annulee = '0'\r\n AND sallesbloc.salle_id = '{$salle->_id}'";
if ($prat_id && !$prat->isFromType(array("Anesthésiste"))) {
$query .= "\nAND operations.chir_id = '{$prat_id}'";
}
if ($prat_id && $prat->isFromType(array("Anesthésiste"))) {
$query .= "\nAND (operations.anesth_id = '{$prat_id}' OR \r\n (plagesop.anesth_id = '{$prat_id}' AND (operations.anesth_id = '0' OR operations.anesth_id IS NULL)))";
}
if ($discipline_id) {
$query .= "\nAND users_mediboard.discipline_id = '{$discipline_id}'";
}
if ($codes_ccam) {
$query .= "\nAND operations.codes_ccam LIKE '%{$codes_ccam}%'";
}
if ($type_hospi) {
$query .= "\nAND sejour.type = '{$type_hospi}'";
}
$query .= "\nGROUP BY jour ORDER BY jour";
$result = $salle->_spec->ds->loadlist($query);
$result_hors_plage = array();
if ($hors_plage) {
$query_hors_plage = "SELECT COUNT(operations.operation_id) AS total,\r\n DATE_FORMAT(operations.date, '%d') AS jour,\r\n sallesbloc.nom AS nom\r\n FROM operations\r\n INNER JOIN sejour ON operations.sejour_id = sejour.sejour_id\r\n INNER JOIN sallesbloc ON operations.salle_id = sallesbloc.salle_id\r\n INNER JOIN users_mediboard ON operations.chir_id = users_mediboard.user_id\r\n WHERE operations.date BETWEEN '{$debut}' AND '{$fin}'\r\n AND operations.plageop_id IS NULL\r\n AND operations.annulee = '0'\r\n AND sallesbloc.salle_id = '{$salle->_id}'";
if ($prat_id && !$prat->isFromType(array("Anesthésiste"))) {
$query_hors_plage .= "\nAND operations.chir_id = '{$prat_id}'";
}
if ($prat_id && $prat->isFromType(array("Anesthésiste"))) {
$query_hors_plage .= "\nAND operations.anesth_id = '{$prat_id}'";
}
if ($discipline_id) {
$query_hors_plage .= "\nAND users_mediboard.discipline_id = '{$discipline_id}'";
}
if ($codes_ccam) {
$query_hors_plage .= "\nAND operations.codes_ccam LIKE '%{$codes_ccam}%'";
}
if ($type_hospi) {
$query_hors_plage .= "\nAND sejour.type = '{$type_hospi}'";
}
$query_hors_plage .= "\nGROUP BY jour ORDER BY jour";
$result_hors_plage = $salle->_spec->ds->loadlist($query_hors_plage);
}
foreach ($ticks2 as $i => $tick) {
$f = true;
foreach ($result as $r) {
if ($tick[1] == $r["jour"]) {
if ($hors_plage) {
foreach ($result_hors_plage as &$_r_h) {
if ($tick[1] == $_r_h["jour"]) {
$r["total"] += $_r_h["total"];
unset($_r_h);
break;
}
}
}
$serie["data"][] = array($i, $r["total"]);
$serie_total["data"][$i][1] += $r["total"];
$total += $r["total"];
$f = false;
}
}
if ($f) {
$serie["data"][] = array(count($serie["data"]), 0);
}
}
$series[] = $serie;
}
$series[] = $serie_total;
// Set up the title for the graph
if ($prat_id && $prat->isFromType(array("Anesthésiste"))) {
$title = "Nombre d'anesthésie par salle - " . CMbDT::format($debut, "%m/%Y");
$subtitle = "{$total} anesthésies";
} else {
$title = "Nombre d'interventions par salle - " . CMbDT::format($debut, "%m/%Y");
$subtitle = "{$total} interventions";
}
if ($prat_id) {
$subtitle .= " - Dr {$prat->_view}";
}
if ($discipline_id) {
$subtitle .= " - {$discipline->_view}";
}
if ($codes_ccam) {
$subtitle .= " - CCAM : {$codes_ccam}";
}
if ($type_hospi) {
$subtitle .= " - " . CAppUI::tr("CSejour.type.{$type_hospi}");
}
$options = CFlotrGraph::merge("bars", array('title' => utf8_encode($title), 'subtitle' => utf8_encode($subtitle), 'xaxis' => array('ticks' => $ticks), 'bars' => array('stacked' => true, 'barWidth' => 0.8)));
return array('series' => $series, 'options' => $options);
}
/**
* Récupération du graphique du nombre de patient par jour et par salle
* au bloc opératoire
*
* @param string $debut Date de début
* @param string $fin Date de fin
* @param int $prat_id Identifiant du praticien
* @param int $salle_id Identifiant de la salle
* @param int $bloc_id Identifiant du bloc
* @param int $discipline_id Identifiant de la discipline
* @param string $codeCCAM Code CCAM
* @param bool $hors_plage Prise en compte des hors plage
*
* @return array
*/
function graphPatJourSalle($debut = null, $fin = null, $prat_id = 0, $salle_id = 0, $bloc_id = 0, $func_id = 0, $discipline_id = null, $codeCCAM = '', $hors_plage = true)
{
if (!$debut) {
$debut = CMbDT::date("-1 YEAR");
}
if (!$fin) {
$fin = CMbDT::date();
}
$prat = new CMediusers();
$prat->load($prat_id);
$salle = new CSalle();
$salle->load($salle_id);
$discipline = new CDiscipline();
$discipline->load($discipline_id);
$ticks = array();
for ($i = $debut; $i <= $fin; $i = CMbDT::date("+1 MONTH", $i)) {
$ticks[] = array(count($ticks), CMbDT::transform("+0 DAY", $i, "%m/%Y"));
}
// Gestion du hors plage
$where_hors_plage = !$hors_plage ? "AND operations.plageop_id IS NOT NULL" : "";
//$salles = CSalle::getSallesStats($salle_id, $bloc_id);
$series = array();
$serie = array('data' => array());
$query = "SELECT COUNT(operations.operation_id) AS total,\r\n COUNT(DISTINCT(operations.date)) AS nb_days,\r\n COUNT(DISTINCT(sallesbloc.salle_id)) AS nb_salles,\r\n DATE_FORMAT(operations.date, '%m/%Y') AS mois,\r\n DATE_FORMAT(operations.date, '%Y-%m-01') AS orderitem\r\n FROM operations\r\n LEFT JOIN sejour ON operations.sejour_id = sejour.sejour_id\r\n LEFT JOIN sallesbloc ON operations.salle_id = sallesbloc.salle_id\r\n LEFT JOIN plagesop ON operations.plageop_id = plagesop.plageop_id\r\n LEFT JOIN users_mediboard ON operations.chir_id = users_mediboard.user_id\r\n WHERE operations.annulee = '0'\r\n AND operations.date BETWEEN '{$debut}' AND '{$fin}'\r\n {$where_hors_plage}\r\n AND sejour.group_id = '" . CGroups::loadCurrent()->_id . "'\r\n AND sallesbloc.stats = '1'";
if ($prat_id) {
$query .= "\nAND operations.chir_id = '{$prat_id}'";
}
if ($discipline_id) {
$query .= "\nAND users_mediboard.discipline_id = '{$discipline_id}'";
}
if ($codeCCAM) {
$query .= "\nAND operations.codes_ccam LIKE '%{$codeCCAM}%'";
}
if ($salle_id) {
$query .= "\nAND sallesbloc.salle_id = '{$salle_id}'";
} elseif ($bloc_id) {
$query .= "\nAND sallesbloc.bloc_id = '{$bloc_id}'";
}
$query .= "\nGROUP BY mois ORDER BY orderitem";
$result = $prat->_spec->ds->loadlist($query);
foreach ($ticks as $i => $tick) {
$f = true;
foreach ($result as $r) {
if ($tick[1] == $r["mois"]) {
$res = $r["total"] / ($r["nb_days"] * $r["nb_salles"]);
//$nbjours = CMbDT::workDaysInMonth($r["orderitem"]);
//$serie['data'][] = array($i, $r["total"]/($nbjours*count($salles)));
$serie['data'][] = array($i, $res);
//$serie['data'][] = array($i, $r["total"]/($r["nb_days"]*count($salles)));
$f = false;
}
}
if ($f) {
$serie["data"][] = array(count($serie["data"]), 0);
}
}
$series[] = $serie;
// Set up the title for the graph
$title = "Patients / jour / salle active dans le mois";
$subtitle = "Uniquement les jours d'activité";
if ($prat_id) {
$subtitle .= " - Dr {$prat->_view}";
}
if ($discipline_id) {
$subtitle .= " - {$discipline->_view}";
}
if ($salle_id) {
$subtitle .= " - {$salle->nom}";
}
if ($codeCCAM) {
$subtitle .= " - CCAM : {$codeCCAM}";
}
$options = array('title' => utf8_encode($title), 'subtitle' => utf8_encode($subtitle), 'xaxis' => array('labelsAngle' => 45, 'ticks' => $ticks), 'yaxis' => array('autoscaleMargin' => 1, 'min' => 0), 'lines' => array('show' => true, 'filled' => true, 'fillColor' => '#999'), 'markers' => array('show' => true), 'points' => array('show' => true), 'HtmlText' => false, 'legend' => array('show' => true, 'position' => 'nw'), 'mouse' => array('track' => true, 'relative' => true, 'position' => 'ne'), 'spreadsheet' => array('show' => true, 'csvFileSeparator' => ';', 'decimalSeparator' => ',', 'tabGraphLabel' => utf8_encode('Graphique'), 'tabDataLabel' => utf8_encode('Données'), 'toolbarDownload' => utf8_encode('Fichier CSV'), 'toolbarSelectAll' => utf8_encode('Sélectionner tout le tableau')));
return array('series' => $series, 'options' => $options);
}
/**
* Récupération des statistiques du nombre d'interventions par mois
* selon plusieurs filtres
*
* @param string $debut Date de début
* @param string $fin Date de fin
* @param int $prat_id Identifiant du praticien
* @param int $salle_id Identifiant de la sall
* @param int $bloc_id Identifiant du bloc
* @param int $discipline_id Identifiant de la discipline
* @param string $codes_ccam Code CCAM
* @param string $type_hospi Type d'hospitalisation
* @param bool $hors_plage Prise en compte des hors plage
*
* @return array
*/
function graphActivite($debut = null, $fin = null, $prat_id = 0, $salle_id = 0, $bloc_id = 0, $func_id = 0, $discipline_id = 0, $codes_ccam = "", $type_hospi = "", $hors_plage = true)
{
if (!$debut) {
$debut = CMbDT::date("-1 YEAR");
}
if (!$fin) {
$fin = CMbDT::date();
}
$prat = new CMediusers();
$prat->load($prat_id);
$discipline = new CDiscipline();
$discipline->load($discipline_id);
$salle = new CSalle();
$salle->load($salle_id);
$ticks = array();
$serie_total = array('label' => 'Total', 'data' => array(), 'markers' => array('show' => true), 'bars' => array('show' => false));
for ($i = $debut; $i <= $fin; $i = CMbDT::date("+1 MONTH", $i)) {
$ticks[] = array(count($ticks), CMbDT::transform("+0 DAY", $i, "%m/%Y"));
$serie_total['data'][] = array(count($serie_total['data']), 0);
}
$salles = CSalle::getSallesStats($salle_id, $bloc_id);
$ds = $salle->_spec->ds;
// Gestion du hors plage
$where_hors_plage = !$hors_plage ? "AND operations.plageop_id IS NOT NULL" : "";
$total = 0;
$series = array();
foreach ($salles as $salle) {
$serie = array('label' => utf8_encode($bloc_id ? $salle->nom : $salle->_view), 'data' => array());
$query = "SELECT COUNT(operations.operation_id) AS total,\r\n DATE_FORMAT(operations.date, '%m/%Y') AS mois,\r\n DATE_FORMAT(operations.date, '%Y%m') AS orderitem,\r\n sallesbloc.nom AS nom\r\n FROM operations\r\n LEFT JOIN sejour ON operations.sejour_id = sejour.sejour_id\r\n LEFT JOIN sallesbloc ON operations.salle_id = sallesbloc.salle_id\r\n LEFT JOIN plagesop ON operations.plageop_id = plagesop.plageop_id\r\n LEFT JOIN users_mediboard ON operations.chir_id = users_mediboard.user_id\r\n WHERE operations.annulee = '0'\r\n AND operations.date BETWEEN '{$debut}' AND '{$fin}'\r\n {$where_hors_plage}\r\n AND sejour.group_id = '" . CGroups::loadCurrent()->_id . "'";
if ($type_hospi) {
$query .= "\nAND sejour.type = '{$type_hospi}'";
}
if ($prat_id && !$prat->isFromType(array("Anesthésiste"))) {
$query .= "\nAND operations.chir_id = '{$prat_id}'";
}
if ($prat_id && $prat->isFromType(array("Anesthésiste"))) {
$query .= "\nAND (operations.anesth_id = '{$prat_id}' OR\r\n (plagesop.anesth_id = '{$prat_id}' AND (operations.anesth_id = '0' OR operations.anesth_id IS NULL)))";
}
if ($discipline_id) {
$query .= "\nAND users_mediboard.discipline_id = '{$discipline_id}'";
}
if ($codes_ccam) {
$query .= "\nAND operations.codes_ccam LIKE '%{$codes_ccam}%'";
}
$query .= "\nAND sallesbloc.salle_id = '{$salle->_id}'";
$query .= "\nGROUP BY mois ORDER BY orderitem";
$result = $ds->loadlist($query);
foreach ($ticks as $i => $tick) {
$f = true;
foreach ($result as $r) {
if ($tick[1] == $r["mois"]) {
$serie["data"][] = array($i, $r["total"]);
$serie_total["data"][$i][1] += $r["total"];
$total += $r["total"];
$f = false;
break;
}
}
if ($f) {
$serie["data"][] = array(count($serie["data"]), 0);
}
}
$series[] = $serie;
}
$series[] = $serie_total;
// Set up the title for the graph
if ($prat_id && $prat->isFromType(array("Anesthésiste"))) {
$title = "Nombre d'anesthésie par salle";
$subtitle = "{$total} anesthésies";
} else {
$title = "Nombre d'interventions par salle";
$subtitle = "{$total} interventions";
}
if ($prat_id) {
$subtitle .= " - Dr {$prat->_view}";
}
if ($discipline_id) {
$subtitle .= " - {$discipline->_view}";
}
if ($codes_ccam) {
$subtitle .= " - CCAM : {$codes_ccam}";
}
if ($type_hospi) {
$subtitle .= " - " . CAppUI::tr("CSejour.type.{$type_hospi}");
}
$options = array('title' => utf8_encode($title), 'subtitle' => utf8_encode($subtitle), 'xaxis' => array('labelsAngle' => 45, 'ticks' => $ticks), 'yaxis' => array('autoscaleMargin' => 1), 'bars' => array('show' => true, 'stacked' => true, 'barWidth' => 0.8), 'HtmlText' => false, 'legend' => array('show' => true, 'position' => 'nw'), 'grid' => array('verticalLines' => false), 'spreadsheet' => array('show' => true, 'csvFileSeparator' => ';', 'decimalSeparator' => ',', 'tabGraphLabel' => utf8_encode('Graphique'), 'tabDataLabel' => utf8_encode('Données'), 'toolbarDownload' => utf8_encode('Fichier CSV'), 'toolbarSelectAll' => utf8_encode('Sélectionner tout le tableau')));
return array('series' => $series, 'options' => $options);
}
}
//gathering
$operation_1 = new COperation();
$operation_1->salle_id = $salle_1;
$operation_1->date = $date;
/** @var COperation[] $operations_1 */
$operations_1 = $operation_1->loadMatchingList();
$operation_2 = new COperation();
$operation_2->salle_id = $salle_2;
$operation_2->date = $date;
/** @var COperation[] $operations_2 */
$operations_2 = $operation_2->loadMatchingList();
// switching
foreach ($operations_1 as $_op_1) {
$_op_1->salle_id = $salle_2;
if ($msg = $_op_1->store()) {
CAppUI::stepAjax($msg, UI_MSG_ERROR);
}
}
foreach ($operations_2 as $_op_2) {
$_op_2->salle_id = $salle_1;
if ($msg = $_op_2->store()) {
CAppUI::stepAjax($msg, UI_MSG_ERROR);
}
}
//succeed
$salle_n1 = new CSalle();
$salle_n1->load($salle_1);
$salle_n2 = new CSalle();
$salle_n2->load($salle_2);
CAppUI::stepAjax("dPplanningOp-msg-succeed_switchin_salle1%s_salle2%s", UI_MSG_OK, $salle_n1->nom, $salle_n2->nom);
/**
* Récupération du graphique de l'occupation de salle de bloc
*
* @param string $debut Date de début
* @param string $fin Date de fin
* @param int $prat_id Identifiant du praticien
* @param int $salle_id Identifiant de la salle
* @param int $bloc_id Identifiant du bloc
* @param int $discipline_id Identifiant de la discipline
* @param string $codeCCAM Code CCAM
* @param string $type_hospi Type d'hospitalisation
* @param bool $hors_plage Pris en compte du hors plage
* @param string $type_duree Type de durée (jours / mois)
*
* @return array
*/
function graphOccupationSalle($debut = null, $fin = null, $prat_id = 0, $salle_id = 0, $bloc_id = 0, $func_id = 0, $discipline_id = null, $codeCCAM = "", $type_hospi = "", $hors_plage = true, $type_duree = "MONTH")
{
$ds = CSQLDataSource::get("std");
if ($type_duree == "MONTH") {
$type_duree_fr = "mois";
$date_format = "%m/%Y";
$order_key = "%Y%m";
} else {
$type_duree_fr = "jour";
$date_format = "%d/%m/%Y";
$order_key = "%Y%m%d";
}
if (!$debut) {
$debut = CMbDT::date("-1 YEAR");
}
if (!$fin) {
$fin = CMbDT::date();
}
$prat = new CMediusers();
$prat->load($prat_id);
$salle = new CSalle();
$salle->load($salle_id);
$bloc = new CBlocOperatoire();
$bloc->load($bloc_id);
$discipline = new CDiscipline();
$discipline->load($discipline_id);
$ticks = array();
for ($i = $debut; $i <= $fin; $i = CMbDT::date("+1 {$type_duree}", $i)) {
$ticks[] = array(count($ticks), CMbDT::transform("+0 DAY", $i, $date_format));
}
$salles = CSalle::getSallesStats($salle_id, $bloc_id);
$user = new CMediusers();
// Chargement des praticiens
$where = array();
$where["users_mediboard.actif"] = "= '1'";
if ($discipline->_id) {
$where["users_mediboard.discipline_id"] = "= '{$discipline->_id}'";
}
// Filter on user type
$utypes_flip = array_flip(CUser::$types);
$user_types = array("Chirurgien", "Anesthésiste", "Médecin", "Dentiste");
foreach ($user_types as &$_type) {
$_type = $utypes_flip[$_type];
}
$where["users.user_type"] = CSQLDataSource::prepareIn($user_types);
$ljoin = array("users" => "users.user_id = users_mediboard.user_id");
$order = "users_mediboard.function_id, users_mediboard.discipline_id, users.user_last_name, users.user_first_name";
$listPrats = $user->loadList($where, $order, null, null, $ljoin);
$seriesMoy = array();
$seriesTot = array();
$totalMoy = 0;
$totalTot = 0;
// Gestion du hors plage
$where_hors_plage = !$hors_plage ? "AND operations.plageop_id IS NOT NULL" : "";
// First serie : Interv
$serieMoy = $serieTot = array('data' => array(), 'label' => utf8_encode("Intervention"));
$query = "SELECT COUNT(*) AS nbInterv,\r\n SUM(TIME_TO_SEC(operations.fin_op)-TIME_TO_SEC(operations.debut_op)) AS duree_total,\r\n DATE_FORMAT(operations.date, '{$date_format}') AS {$type_duree_fr},\r\n DATE_FORMAT(operations.date, '{$order_key}') AS orderitem\r\n FROM operations\r\n LEFT JOIN sejour ON operations.sejour_id = sejour.sejour_id\r\n LEFT JOIN plagesop ON operations.plageop_id = plagesop.plageop_id\r\n LEFT JOIN users_mediboard ON operations.chir_id = users_mediboard.user_id\r\n LEFT JOIN users ON operations.chir_id = users.user_id\r\n WHERE operations.annulee = '0'\r\n AND operations.date BETWEEN '{$debut}' AND '{$fin}'\r\n {$where_hors_plage}\r\n AND operations.debut_op IS NOT NULL\r\n AND operations.fin_op IS NOT NULL\r\n AND operations.debut_op < operations.fin_op\r\n AND sejour.group_id = '" . CGroups::loadCurrent()->_id . "'\r\n AND operations.salle_id " . CSQLDataSource::prepareIn(array_keys($salles)) . "\r\n AND users.user_id " . CSQLDataSource::prepareIn(array_keys($listPrats), $prat_id);
if ($type_hospi) {
$query .= "\nAND sejour.type = '{$type_hospi}'";
}
if ($discipline_id) {
$query .= "\nAND users_mediboard.discipline_id = '{$discipline_id}'";
}
if ($codeCCAM) {
$query .= "\nAND operations.codes_ccam LIKE '%{$codeCCAM}%'";
}
$query .= "\nGROUP BY {$type_duree_fr} ORDER BY orderitem";
$result = $ds->loadList($query);
foreach ($ticks as $i => $tick) {
$f = true;
foreach ($result as $j => $r) {
if ($tick[1] == $r["{$type_duree_fr}"]) {
$nb_interv = $r["nbInterv"];
$serieMoy['data'][] = array($i, $r["duree_total"] / (60 * $nb_interv));
$totalMoy += $r["duree_total"] / (60 * $nb_interv);
$serieTot['data'][] = array($i, $r["duree_total"] / (60 * 60));
$totalTot += $r["duree_total"] / (60 * 60);
$f = false;
}
}
if ($f) {
$serieMoy["data"][] = array(count($serieMoy["data"]), 0);
$serieTot["data"][] = array(count($serieTot["data"]), 0);
}
}
$seriesMoy[] = $serieMoy;
$seriesTot[] = $serieTot;
// Second serie : Occupation
$serieMoy = $serieTot = array('data' => array(), 'label' => utf8_encode("Occupation de salle"));
$query = "SELECT COUNT(*) AS nbInterv,\r\n SUM(TIME_TO_SEC(operations.sortie_salle)-TIME_TO_SEC(operations.entree_salle)) AS duree_total,\r\n DATE_FORMAT(operations.date, '{$date_format}') AS {$type_duree_fr},\r\n DATE_FORMAT(operations.date, '{$order_key}') AS orderitem\r\n FROM operations\r\n LEFT JOIN sejour ON operations.sejour_id = sejour.sejour_id\r\n LEFT JOIN plagesop ON operations.plageop_id = plagesop.plageop_id\r\n LEFT JOIN users_mediboard ON operations.chir_id = users_mediboard.user_id\r\n LEFT JOIN users ON operations.chir_id = users.user_id\r\n WHERE operations.annulee = '0'\r\n AND operations.date BETWEEN '{$debut}' AND '{$fin}'\r\n {$where_hors_plage}\r\n AND operations.entree_salle IS NOT NULL\r\n AND operations.sortie_salle IS NOT NULL\r\n AND operations.entree_salle < operations.sortie_salle\r\n AND sejour.group_id = '" . CGroups::loadCurrent()->_id . "'\r\n AND operations.salle_id " . CSQLDataSource::prepareIn(array_keys($salles)) . "\r\n AND users.user_id " . CSQLDataSource::prepareIn(array_keys($listPrats), $prat_id);
if ($type_hospi) {
$query .= "\nAND sejour.type = '{$type_hospi}'";
}
if ($discipline_id) {
$query .= "\nAND users_mediboard.discipline_id = '{$discipline_id}'";
}
if ($codeCCAM) {
$query .= "\nAND operations.codes_ccam LIKE '%{$codeCCAM}%'";
}
$query .= "\nGROUP BY {$type_duree_fr} ORDER BY orderitem";
$result = $ds->loadList($query);
foreach ($ticks as $i => $tick) {
$f = true;
foreach ($result as $j => $r) {
if ($tick[1] == $r["{$type_duree_fr}"]) {
$nb_interv = $r["nbInterv"];
$serieMoy['data'][] = array($i, $r["duree_total"] / (60 * $nb_interv));
$totalMoy += $r["duree_total"] / (60 * $nb_interv);
$serieTot['data'][] = array($i, $r["duree_total"] / (60 * 60));
$totalTot += $r["duree_total"] / (60 * 60);
$f = false;
}
}
if ($f) {
$serieMoy["data"][] = array(count($serieMoy["data"]), 0);
$serieTot["data"][] = array(count($serieTot["data"]), 0);
}
}
$seriesMoy[] = $serieMoy;
$seriesTot[] = $serieTot;
// Third serie : SSPI
$serieMoy = $serieTot = array('data' => array(), 'label' => utf8_encode("Salle de reveil"));
$query = "SELECT COUNT(*) AS nbInterv,\r\n SUM(TIME_TO_SEC(operations.sortie_reveil_possible)-TIME_TO_SEC(operations.entree_reveil)) AS duree_total,\r\n DATE_FORMAT(operations.date, '{$date_format}') AS {$type_duree_fr},\r\n DATE_FORMAT(operations.date, '{$order_key}') AS orderitem\r\n FROM operations\r\n LEFT JOIN sejour ON operations.sejour_id = sejour.sejour_id\r\n LEFT JOIN plagesop ON operations.plageop_id = plagesop.plageop_id\r\n LEFT JOIN users_mediboard ON operations.chir_id = users_mediboard.user_id\r\n LEFT JOIN users ON operations.chir_id = users.user_id\r\n WHERE operations.annulee = '0'\r\n AND operations.date BETWEEN '{$debut}' AND '{$fin}'\r\n {$where_hors_plage}\r\n AND operations.entree_reveil IS NOT NULL\r\n AND operations.sortie_reveil_possible IS NOT NULL\r\n AND operations.entree_reveil < operations.sortie_reveil_possible\r\n AND sejour.group_id = '" . CGroups::loadCurrent()->_id . "'\r\n AND operations.salle_id " . CSQLDataSource::prepareIn(array_keys($salles)) . "\r\n AND users.user_id " . CSQLDataSource::prepareIn(array_keys($listPrats), $prat_id);
if ($type_hospi) {
$query .= "\nAND sejour.type = '{$type_hospi}'";
}
if ($discipline_id) {
$query .= "\nAND users_mediboard.discipline_id = '{$discipline_id}'";
}
if ($codeCCAM) {
$query .= "\nAND operations.codes_ccam LIKE '%{$codeCCAM}%'";
}
$query .= "\nGROUP BY {$type_duree_fr} ORDER BY orderitem";
$result = $ds->loadList($query);
foreach ($ticks as $i => $tick) {
$f = true;
foreach ($result as $j => $r) {
if ($tick[1] == $r[$type_duree_fr]) {
$nb_interv = $r["nbInterv"];
$serieMoy['data'][] = array($i, $r["duree_total"] / (60 * $nb_interv));
$totalMoy += $r["duree_total"] / (60 * $nb_interv);
$serieTot['data'][] = array($i, $r["duree_total"] / (60 * 60));
$totalTot += $r["duree_total"] / (60 * 60);
$f = false;
}
}
if ($f) {
$serieMoy["data"][] = array(count($serieMoy["data"]), 0);
$serieTot["data"][] = array(count($serieTot["data"]), 0);
}
}
$seriesMoy[] = $serieMoy;
$seriesTot[] = $serieTot;
// Set up the title for the graph
$subtitle = "";
if ($prat_id) {
$subtitle .= " - Dr {$prat->_view}";
}
if ($discipline_id) {
$subtitle .= " - {$discipline->_view}";
}
if ($salle_id) {
$subtitle .= " - {$salle->nom}";
}
if ($bloc_id) {
$subtitle .= " - {$bloc->nom}";
}
if ($codeCCAM) {
$subtitle .= " - CCAM : {$codeCCAM}";
}
if ($type_hospi) {
$subtitle .= " - " . CAppUI::tr("CSejour.type.{$type_hospi}");
}
$optionsMoy = CFlotrGraph::merge("lines", array('title' => utf8_encode("Durées moyennes d'occupation du bloc (en minutes)"), 'subtitle' => utf8_encode("par intervention {$subtitle}"), 'xaxis' => array('ticks' => $ticks), 'grid' => array('verticalLines' => true)));
if ($totalMoy == 0) {
$optionsMoy['yaxis']['max'] = 1;
}
$optionsTot = CFlotrGraph::merge("lines", array('title' => utf8_encode("Durées totales d'occupation du bloc (en heures)"), 'subtitle' => utf8_encode("total estimé {$subtitle}"), 'xaxis' => array('ticks' => $ticks), 'grid' => array('verticalLines' => true)));
if ($totalTot == 0) {
$optionsTot['yaxis']['max'] = 1;
}
if ($type_duree == "MONTH") {
return array("moyenne" => array('series' => $seriesMoy, 'options' => $optionsMoy), "total" => array('series' => $seriesTot, 'options' => $optionsTot));
} else {
return array('series' => $seriesTot, 'options' => $optionsTot);
}
}
/**
* Récupération du graphique d'occupation des ressources au bloc opératoire
* (personnel, vacations attribuées, ouverture de salle)
*
* @param string $debut Date de début
* @param string $fin Date de fin
* @param int $prat_id Identifiant du praticien
* @param int $salle_id Identifiant de la salle
* @param int $bloc_id Identifiant du bloc
* @param null $discipline_id Identifiant de la discipline
* @param string $codeCCAM Code CCAM
* @param string $type_hospi Type d'hospitalisation
* @param bool $hors_plage Pris en compte des hors plage
* @param string $type_duree Type de durée analysée (jours / mois)
*
* @return array
*/
function graphTempsSalle($debut = null, $fin = null, $prat_id = 0, $salle_id = 0, $bloc_id = 0, $func_id = 0, $discipline_id = null, $codeCCAM = "", $type_hospi = "", $hors_plage = true, $type_duree = "MONTH")
{
$ds = CSQLDataSource::get("std");
if ($type_duree == "MONTH") {
$type_duree_fr = "mois";
$date_format = "%m/%Y";
$order_key = "%Y%m";
} else {
$type_duree_fr = "jour";
$date_format = "%d/%m/%Y";
$order_key = "%Y%m%d";
}
if (!$debut) {
$debut = CMbDT::date("-1 YEAR");
}
if (!$fin) {
$fin = CMbDT::date();
}
$prat = new CMediusers();
$prat->load($prat_id);
$salle = new CSalle();
$salle->load($salle_id);
$bloc = new CBlocOperatoire();
$bloc->load($bloc_id);
$discipline = new CDiscipline();
$discipline->load($discipline_id);
$ticks = array();
for ($i = $debut; $i <= $fin; $i = CMbDT::date("+1 {$type_duree}", $i)) {
$ticks[] = array(count($ticks), CMbDT::transform("+0 DAY", $i, $date_format));
}
$salles = CSalle::getSallesStats($salle_id, $bloc_id);
$seriesTot = array();
$totalTot = 0;
// First serie : occupation du personnel
$serieTot = array('data' => array(), 'label' => utf8_encode("Occupation du personnel"));
$query = "SELECT SUM(TIME_TO_SEC(affectation_personnel.fin) - TIME_TO_SEC(affectation_personnel.debut)) as total,\n DATE_FORMAT(plagesop.date, '{$date_format}') AS {$type_duree_fr},\n DATE_FORMAT(plagesop.date, '{$order_key}') AS orderitem\n FROM plagesop\n LEFT JOIN operations ON plagesop.plageop_id = operations.plageop_id\n LEFT JOIN users_mediboard ON plagesop.chir_id = users_mediboard.user_id\n LEFT JOIN affectation_personnel ON operations.operation_id = affectation_personnel.object_id ";
if ($type_hospi) {
$query .= "LEFT JOIN sejour ON sejour.sejour_id = operations.sejour_id ";
}
$query .= "WHERE affectation_personnel.debut < affectation_personnel.fin\n AND affectation_personnel.debut IS NOT NULL\n AND affectation_personnel.fin IS NOT NULL\n AND affectation_personnel.object_class = 'COperation'\n AND plagesop.salle_id " . CSQLDataSource::prepareIn(array_keys($salles));
if ($codeCCAM) {
$query .= "\nAND operations.codes_ccam LIKE '%{$codeCCAM}%'";
}
if ($type_hospi) {
$query .= "\nAND sejour.type = '{$type_hospi}'";
}
if ($prat_id) {
$query .= "\nAND plagesop.chir_id = '{$prat_id}'";
}
if ($discipline_id) {
$query .= "\nAND users_mediboard.discipline_id = '{$discipline_id}'";
}
$query .= "\nAND plagesop.date BETWEEN '{$debut}' AND '{$fin}'\n GROUP BY operations.plageop_id HAVING total > 0 ORDER BY orderitem";
$result = $ds->loadlist($query);
$result_hors_plage = array();
if ($hors_plage) {
$query_hors_plage = "SELECT SUM(TIME_TO_SEC(affectation_personnel.fin) - TIME_TO_SEC(affectation_personnel.debut)) as total,\n DATE_FORMAT(operations.date, '{$date_format}') AS {$type_duree_fr},\n DATE_FORMAT(operations.date, '{$order_key}') AS orderitem\n FROM operations\n LEFT JOIN users_mediboard ON operations.chir_id = users_mediboard.user_id\n LEFT JOIN affectation_personnel ON operations.operation_id = affectation_personnel.object_id ";
if ($type_hospi) {
$query_hors_plage .= "LEFT JOIN sejour ON sejour.sejour_id = operations.sejour_id ";
}
$query_hors_plage .= "WHERE affectation_personnel.debut < affectation_personnel.fin\n AND operations.date IS NOT NULL\n AND operations.plageop_id IS NULL\n AND affectation_personnel.debut IS NOT NULL\n AND affectation_personnel.fin IS NOT NULL\n AND affectation_personnel.object_class = 'COperation'\n AND operations.salle_id " . CSQLDataSource::prepareIn(array_keys($salles));
if ($type_hospi) {
$query_hors_plage .= "\nAND sejour.type = '{$type_hospi}'";
}
if ($prat_id) {
$query_hors_plage .= "\nAND operations.chir_id = '{$prat_id}'";
}
if ($discipline_id) {
$query_hors_plage .= "\nAND users_mediboard.discipline_id = '{$discipline_id}'";
}
if ($codeCCAM) {
$query_hors_plage .= "\nAND operations.codes_ccam LIKE '%{$codeCCAM}%'";
}
$query_hors_plage .= "\nAND operations.date BETWEEN '{$debut}' AND '{$fin}'\n GROUP BY {$type_duree_fr} HAVING total > 0 ORDER BY orderitem";
$result_hors_plage = $ds->loadlist($query_hors_plage);
}
$calcul_temp = array();
foreach ($result as $r) {
if (!isset($calcul_temp[$r[$type_duree_fr]])) {
$calcul_temp[$r[$type_duree_fr]] = 0;
}
$calcul_temp[$r[$type_duree_fr]] += $r['total'];
}
foreach ($ticks as $i => $tick) {
$f = true;
foreach ($calcul_temp as $key => $r) {
if ($tick[1] == $key) {
if ($hors_plage) {
foreach ($result_hors_plage as &$_r_h) {
if ($tick[1] == $_r_h[$type_duree_fr]) {
$r += $_r_h["total"];
unset($_r_h);
break;
}
}
}
$serieTot['data'][] = array($i, $r / (60 * 60));
$totalTot += $r / (60 * 60);
$f = false;
}
}
if ($f) {
$serieTot["data"][] = array(count($serieTot["data"]), 0);
}
}
$seriesTot[] = $serieTot;
// Second serie : Ouverture de salle
$serieTot = array('data' => array(), 'label' => utf8_encode("Ouverture de salle"));
$query = "SELECT MAX(TIME_TO_SEC(operations.sortie_salle)) - MIN(TIME_TO_SEC(operations.entree_salle)) as total,\n DATE_FORMAT(plagesop.date, '{$date_format}') AS {$type_duree_fr},\n DATE_FORMAT(plagesop.date, '{$order_key}') AS orderitem\n FROM plagesop\n LEFT JOIN operations ON plagesop.plageop_id = operations.plageop_id\n LEFT JOIN users_mediboard ON plagesop.chir_id = users_mediboard.user_id ";
if ($type_hospi) {
$query .= "LEFT JOIN sejour ON sejour.sejour_id = operations.sejour_id ";
}
$query .= "WHERE operations.entree_salle < operations.sortie_salle\n AND plagesop.salle_id " . CSQLDataSource::prepareIn(array_keys($salles));
if ($codeCCAM) {
$query .= "\nAND operations.codes_ccam LIKE '%{$codeCCAM}%'";
}
if ($type_hospi) {
$query .= "\nAND sejour.type = '{$type_hospi}'";
}
if ($prat_id) {
$query .= "\nAND plagesop.chir_id = '{$prat_id}'";
}
if ($discipline_id) {
$query .= "\nAND users_mediboard.discipline_id = '{$discipline_id}'";
}
$query .= "\nAND plagesop.date BETWEEN '{$debut}' AND '{$fin}'\n GROUP BY operations.plageop_id ORDER BY orderitem";
$result = $ds->loadlist($query);
$calcul_temp = array();
foreach ($result as $r) {
if (!isset($calcul_temp[$r[$type_duree_fr]])) {
$calcul_temp[$r[$type_duree_fr]] = 0;
}
$calcul_temp[$r[$type_duree_fr]] += $r['total'];
}
foreach ($ticks as $i => $tick) {
$f = true;
foreach ($calcul_temp as $key => $r) {
if ($tick[1] == $key) {
$serieTot['data'][] = array($i, $r / (60 * 60));
$totalTot += $r / (60 * 60);
$f = false;
}
}
if ($f) {
$serieTot["data"][] = array(count($serieTot["data"]), 0);
}
}
$seriesTot[] = $serieTot;
// Third serie : reservé
$serieTot = array('data' => array(), 'label' => utf8_encode("Vacations attribuées"));
$query = "SELECT SUM(TIME_TO_SEC(plagesop.fin) - TIME_TO_SEC(plagesop.debut)) AS total,\n DATE_FORMAT(plagesop.date, '{$date_format}') AS {$type_duree_fr},\n DATE_FORMAT(plagesop.date, '{$order_key}') AS orderitem\n FROM plagesop\n LEFT JOIN users_mediboard ON plagesop.chir_id = users_mediboard.user_id ";
if ($type_hospi || $codeCCAM) {
$query .= "LEFT JOIN operations ON operations.plageop_id = plagesop.plageop_id\n LEFT JOIN sejour ON sejour.sejour_id = operations.sejour_id ";
}
$query .= "WHERE plagesop.salle_id " . CSQLDataSource::prepareIn(array_keys($salles));
if ($codeCCAM) {
$query .= "\nAND operations.codes_ccam LIKE '%{$codeCCAM}%'";
}
if ($type_hospi) {
$query .= "\nAND sejour.type = '{$type_hospi}'";
}
if ($prat_id) {
$query .= "\nAND plagesop.chir_id = '{$prat_id}'";
}
if ($discipline_id) {
$query .= "\nAND users_mediboard.discipline_id = '{$discipline_id}'";
}
$query .= "\nAND plagesop.date BETWEEN '{$debut}' AND '{$fin}'\n GROUP BY {$type_duree_fr} ORDER BY orderitem";
$result = $ds->loadList($query);
foreach ($ticks as $i => $tick) {
$f = true;
foreach ($result as $r) {
if ($tick[1] == $r[$type_duree_fr]) {
$serieTot['data'][] = array($i, $r["total"] / (60 * 60));
$totalTot += $r["total"] / (60 * 60);
$f = false;
}
}
if ($f) {
$serieTot["data"][] = array(count($serieTot["data"]), 0);
}
}
$seriesTot[] = $serieTot;
// Set up the title for the graph
$subtitle = "";
if ($prat_id) {
$subtitle .= " - Dr {$prat->_view}";
}
if ($discipline_id) {
$subtitle .= " - {$discipline->_view}";
}
if ($salle_id) {
$subtitle .= " - {$salle->nom}";
}
if ($bloc_id) {
$subtitle .= " - {$bloc->nom}";
}
if ($codeCCAM) {
$subtitle .= " - CCAM : {$codeCCAM}";
}
if ($type_hospi) {
$subtitle .= " - " . CAppUI::tr("CSejour.type.{$type_hospi}");
}
$optionsTot = CFlotrGraph::merge("lines", array('title' => utf8_encode("Utilisation des ressources"), 'subtitle' => utf8_encode("total estimé {$subtitle}"), 'xaxis' => array('ticks' => $ticks), 'grid' => array('verticalLines' => true)));
if ($totalTot == 0) {
$optionsTot['yaxis']['max'] = 1;
}
return array('series' => $seriesTot, 'options' => $optionsTot);
}