* @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();
