* @subpackage Cabinet * @author SARL OpenXtrem <*****@*****.**> * @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html * @version $Revision: 26656 $ */ CCanDo::checkRead(); $group = CGroups::loadCurrent(); // L'utilisateur est-il praticien ? $chir = null; $mediuser = CMediusers::get(); if ($mediuser->isPraticien()) { $chir = $mediuser->createUser(); } // Droit en écriture sur les plages $plage = new CPlageconsult(); $canEditPlage = $plage->getPerm(PERM_EDIT); // Praticien selectionné $chirSel = CValue::getOrSession("chirSel", $chir ? $chir->user_id : null); // function selected $function_id = CValue::getOrSession("function_id"); $listFnc = array(); if ($function_id) { $listChir = CConsultation::loadPraticiens(PERM_EDIT, $function_id, null, true); foreach ($listChir as $_chir) { $_chir->loadRefFunction(); } } else { $listChir = CConsultation::loadPraticiens(PERM_EDIT); } // Liste des consultations a avancer si desistement $ds = $plage->getDS();