Ejemplo n.º 1
0
<?php

/* $Id: ajax_old_dhe.php 8419 2010-03-29 14:51:55Z MyttO $ */
/**
 * @package Mediboard
 * @subpackage ecap
 * @version $Revision: 8419 $
 * @author SARL OpenXtrem
 * @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html 
 */
CCanDo::checkAdmin();
$max_rows = CView::request("max_rows", "num default|1000");
$max_lines = CView::request("max_lines", "num default|1000000");
$phase = CView::request("phase", "enum list|connection|query|multiple_load_execute");
$min_duration = CView::request("min_duration", "num default|1");
CView::checkin();
$phase = strtr($phase, "_", " ");
$path = CAppUI::getTmpPath("mb-log.html");
if (false == ($resource = fopen($path, "r"))) {
    CAppUI::stepMessage("no log available");
}
$lines_count = 0;
$entries = array();
while (($line = fgets($resource)) !== false) {
    if ($max_lines && $lines_count >= $max_lines) {
        break;
    }
    $lines_count++;
    $matches = array();
    if (preg_match("/\\[(.*)\\] CRecordSante400: slow '(.*)' in '(.*)' seconds/", $line, $matches)) {
        $entry = array("datetime" => $matches[1], "phase" => $matches[2], "duration" => $matches[3]);
Ejemplo n.º 2
0
<?php

/**
 * $Id$
 *  
 * @category Modèles
 * @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();
$owner_guid = CView::request("owner_guid", "str");
CView::checkin();
$smarty = new CSmartyDP();
$smarty->assign("owner", CMbObject::loadFromGuid($owner_guid));
$smarty->display("inc_vw_import_modele.tpl");
Ejemplo n.º 3
0
<?php

/**
 * $Id$
 *  
 * @category Maternité
 * @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();
$date = CView::request("date", "date default|" . CMbDT::date());
CView::checkin();
$date_max = CMbDT::date("+2 month", $date);
$group = CGroups::loadCurrent();
$grossesse = new CGrossesse();
$where = array();
$where["terme_prevu"] = "BETWEEN '{$date}' AND '{$date_max}'";
$where["group_id"] = "= '{$group->_id}'";
$grossesses = $grossesse->loadList($where);
$sejours = CStoredObject::massLoadBackRefs($grossesses, "sejours", "entree_prevue DESC");
CStoredObject::massLoadBackRefs($sejours, "operations", "date ASC");
$fiches_anesth = array();
$params = array("dossier_anesth_id" => "", "operation_id" => "", "offline" => 1, "print" => 1, "pdf" => 0);
/** @var CGrossesse $_grossesse */
foreach ($grossesses as $_grossesse) {
    foreach ($_grossesse->loadRefsConsultations() as $_consult) {
        foreach ($_consult->loadRefsDossiersAnesth() as $_dossier_anesth) {
            $params["dossier_anesth_id"] = $_dossier_anesth->_id;
Ejemplo n.º 4
0
<?php

/**
 * $Id$
 *
 * @category Admin
 * @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
 */
$forceChange = CView::request("forceChange", "bool");
$lifeDuration = CView::request("lifeDuration", "bool");
CView::checkin();
$user = new CUser();
$user->load(CAppUI::$user->_id);
$user->updateSpecs();
$user->isLDAPLinked();
$password_info = CAppUI::$user->_specs['_user_password']->minLength > 4 ? "Le mot de passe doit être composé d'au moins 6 caractères, comprenant des lettres et au moins un chiffre." : "Le mot de passe doit être composé d'au moins 4 caractères.";
// Création du template
$smarty = new CSmartyDP();
$smarty->assign("user", $user);
$smarty->assign("forceChange", $forceChange);
$smarty->assign("lifeDuration", $lifeDuration);
$smarty->assign("lifetime", CAppUI::conf("admin CUser password_life_duration"));
$smarty->assign("pwd_info", $password_info);
$smarty->display("change_password.tpl");
Ejemplo n.º 5
0
<?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();
$patient_id = CView::request("patient_id", "num");
CView::checkin();
$patient = new CPatient();
$patient->load($patient_id);
$dossier_medical = $patient->loadRefDossierMedical();
$dossier_medical->loadRefsAntecedents();
$smarty = new CSmartyDP();
$smarty->assign("dossier_medical", $dossier_medical);
$smarty->display("inc_atcd_majeur.tpl");