<?php

/**
 * Refresh incrementer/actor EAI
 *  
 * @category EAI
 * @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();
$domain_id = CValue::get("domain_id");
// Liste des domaines
$domain = new CDomain();
$domain->load($domain_id);
$domain->loadRefsGroupDomains();
$domain->loadRefActor();
$domain->loadRefIncrementer()->loadView();
$domain->isMaster();
// Liste des acteurs
$actor = new CInteropActor();
$actors = $actor->getObjects();
$groups = CGroups::loadGroups();
// Création du template
$smarty = new CSmartyDP();
$smarty->assign("domain", $domain);
$smarty->assign("actors", $actors);
$smarty->assign("groups", $groups);
$smarty->display("inc_vw_incrementer_actor.tpl");
 * @link     http://www.mediboard.org
 */
CCanDo::checkAdmin();
CApp::setMemoryLimit("712M");
$domains_id = CValue::get("domains_id");
if (!is_array($domains_id)) {
    $domains_id = explode("-", $domains_id);
}
CMbArray::removeValue("", $domains_id);
$d1_id = $domains_id[0];
$d2_id = $domains_id[1];
$d1 = new CDomain();
$d1->load($d1_id);
$d1->isMaster();
$d2 = new CDomain();
$d2->load($d2_id);
$d2->isMaster();
$ds = $d1->_spec->ds;
$and = null;
if ($d1->_is_master_ipp || $d2->_is_master_ipp) {
    $and .= "AND id1.object_class = 'CPatient' \n AND id2.object_class = 'CPatient'";
}
if ($d1->_is_master_nda || $d2->_is_master_nda) {
    $and .= "AND id1.object_class = 'CSejour' \n AND id2.object_class = 'CSejour'";
}
$intersect_id400s = $ds->loadList("SELECT id1.id400\n                                   FROM id_sante400 AS id1 \n                                   LEFT JOIN id_sante400 AS id2 ON id2.id400 = id1.id400 \n                                   AND id2.object_class = id1.object_class\n                                   WHERE id1.tag = '{$d1->tag}'\n                                   AND id2.tag = '{$d2->tag}'\n                                   {$and}");
$intersect_id400s = CMbArray::pluck($intersect_id400s, "id400");
if (!$intersect_id400s) {
    $intersect_id400s = array();
}
$intersect = array();
Example #3
0
 */
CCanDo::checkAdmin();
$domains_id = CValue::get("domains_id");
if (!is_array($domains_id)) {
    $domains_id = explode("-", $domains_id);
}
CMbArray::removeValue("", $domains_id);
$domains = array();
$checkMerge = array();
if (count($domains_id) != 2) {
    $checkMerge[] = CAppUI::tr("mergeTooFewObjects");
}
foreach ($domains_id as $domain_id) {
    $domain = new CDomain();
    // the CMbObject is loaded
    if (!$domain->load($domain_id)) {
        CAppUI::setMsg("Chargement impossible de l'objet [{$domain_id}]", UI_MSG_ERROR);
        continue;
    }
    $domain->loadRefIncrementer();
    $domain->loadRefActor();
    $domains[] = $domain;
}
$domain1 = $domains[0];
$domain2 = $domains[1];
if ($domain1->incrementer_id && $domain2->actor_id || $domain2->incrementer_id && $domain1->actor_id) {
    $checkMerge[] = CAppUI::tr("CDomain-merge_incompatible-incrementer_actor");
}
/*if (($domain1->derived_from_idex && !$domain2->derived_from_idex) || ($domain2->derived_from_idex && !$domain1->derived_from_idex)) {
  $checkMerge[] = CAppUI::tr("CDomain-merge_incompatible-derived_from_idex");
}*/
Example #4
0
 /**
  * Get master domain tag
  *
  * @param string $domain_type Object class
  * @param string $group_id    Group
  *
  * @return CDomain
  */
 static function getMasterDomain($domain_type, $group_id = null)
 {
     $group = CGroups::loadCurrent();
     if (!$group_id) {
         $group_id = $group->_id;
     }
     $group_domain = new CGroupDomain();
     $group_domain->object_class = $domain_type;
     $group_domain->group_id = $group_id;
     $group_domain->master = true;
     $group_domain->loadMatchingObject();
     $domain = new CDomain();
     $domain->load($group_domain->domain_id);
     return $domain;
 }