/**
* $Id$
*
* @package Mediboard
* @subpackage bloodSalvage
* @author SARL OpenXtrem <*****@*****.**>
* @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html
* @version $Revision$
*/
$type_ei_id = CValue::getOrSession("type_ei_id");
$type_ei = new CTypeEi();
$type_ei_list = $type_ei->loadlist();
$type_ei->loadRefs();
if ($type_ei_id) {
$type_ei->load($type_ei_id);
}
// Liste des Catégories
$firstdiv = null;
if (!$type_ei->_ref_evenement) {
$type_ei->_ref_evenement = array();
}
$listCategories = new CEiCategorie();
$listCategories = $listCategories->loadList(null, "nom");
foreach ($listCategories as $key => $categorie) {
if ($firstdiv === null) {
$firstdiv = $key;
}
$categorie->loadRefsBack();
$categorie->checked = null;
foreach ($categorie->_ref_items as $keyItem => $item) {
$listFct = CMediusers::loadFonctions(PERM_READ);
foreach ($listFct as $fct) {
$fct->loadRefsUsers();
}
}
$fiche->loadRefsFwd();
if (!$fiche->_ref_evenement) {
$fiche->_ref_evenement = array();
}
/*
* Si l'on est dans le cas où nous souhaitons préremplir automatiquement
* quelques champs à l'aide du modèle de fiche d'incident (module cell saver).
*/
if ($type_ei_id) {
$type_fiche = new CTypeEi();
$type_fiche->load($type_ei_id);
$fiche->elem_concerne = $type_fiche->concerne;
$fiche->descr_faits = $type_fiche->desc;
$fiche->evenements = $type_fiche->evenements;
$fiche->type_incident = $type_fiche->type_signalement;
$fiche->_ref_evenement = $type_fiche->_ref_evenement;
if ($blood_salvage_id) {
$blood_salvage = new CBloodSalvage();
$blood_salvage->load($blood_salvage_id);
$blood_salvage->loadRefsFwd();
if ($fiche->elem_concerne == "pat") {
$fiche->elem_concerne_detail = $blood_salvage->_ref_patient->_view;
}
if ($fiche->elem_concerne == "mat") {
$fiche->elem_concerne_detail = $blood_salvage->_ref_cell_saver->_view;
}
