Пример #1
0
 * @version  $Revision$
 * @link     http://www.mediboard.org
 */
CCanDo::checkEdit();
$sejour_id = CValue::get("sejour_id");
$sejour = new CSejour();
$sejour->load($sejour_id);
$sejour->loadExtDiagnostics();
$sejour->loadDiagnosticsAssocies();
$sejour->loadRelPatient();
$sejour->_ref_patient->loadRefDossierMedical();
$rss = null;
$cim_das = array();
$cim_das_patient = array();
if (CModule::getActive("atih") && CAppUI::conf("dPpmsi use_cim_pmsi")) {
    $rss = new CRSS();
    $rss->sejour_id = $sejour_id;
    $rss->loadMatchingObject();
    $rss->loadRefDiagnostics();
    $cim_dp = CCIM10::get($sejour->DP);
    $cim_dr = CCIM10::get($sejour->DR);
    $code = null;
    foreach ($sejour->_diagnostics_associes as $_da) {
        $code = CCIM10::get($_da);
        if ($code->type != 3) {
            $cim_das[preg_replace("/\\./", "", $_da)] = true;
        } else {
            $cim_das[preg_replace("/\\./", "", $_da)] = false;
        }
    }
    if ($sejour->_ref_patient->_ref_dossier_medical->_id) {
Пример #2
0
}
// On effectue la recherche automatique
if (isset($tab_favoris)) {
    try {
        $search = new CSearch();
        $results = $search->searchAuto($tab_favoris, $_ref_object);
    } catch (Exception $e) {
        CAppUI::displayAjaxMsg("search-not-connected", UI_MSG_ERROR);
        mbLog($e->getMessage());
    }
}
// Récupération des rss items pour le marquage pmsi (preuves de recherche PMSI)
$rss_items = array();
$items = array();
if ($contexte == "pmsi" && CModule::getActive("atih")) {
    $rss = new CRSS();
    $rss->sejour_id = $sejour_id;
    $rss->loadMatchingObject();
    $rss_items = $rss->loadRefsSearchItems();
    foreach ($rss_items as $_items) {
        $items[] = $_items->search_class . "-" . $_items->search_id;
    }
}
$smarty = new CSmartyDP();
$smarty->assign("sejour", $_ref_object);
$smarty->assign("sejour_id", $_ref_object->_id);
$smarty->assign("results", $results);
$smarty->assign("date", $date);
$smarty->assign("types", $types);
$smarty->assign("contexte", $contexte);
$smarty->assign("rss_items", $rss_items);
Пример #3
0
 * $Id$
 *
 * @category Pmsi
 * @package  Mediboard
 * @author   SARL OpenXtrem <*****@*****.**>
 * @license  OXOL, see http://www.mediboard.org/public/OXOL
 * @link     http://www.mediboard.org
 */
CCanDo::checkRead();
$search_item_id = CValue::get("search_item_id");
$object_id = CValue::get("object_id");
$class = CValue::get("object_type");
$rmq = CValue::get("rmq");
$rss_id = CValue::get("rss_id");
if ($rss_id) {
    $rss = new CRSS();
    $rss->sejour_id = $rss_id;
    $rss->loadMatchingObject();
}
$searchItem = new CSearchItem();
if ($search_item_id) {
    $searchItem->load($search_item_id);
    $searchItem->loadRefMediuser();
} else {
    $searchItem->rss_id = $rss->_id;
    $searchItem->search_id = $object_id;
    $searchItem->search_class = $class;
    $searchItem->rmq = $rmq;
    $searchItem->_ref_mediuser = CMediusers::get();
}
$smarty = new CSmartyDP();