Exemple #1
0
        $func_categ = reset($line->_ref_element_prescription->_ref_category_prescription->loadBackRefs("functions_category", null, "1"));
        $plageconsult = new CPlageconsult();
        $where = $ljoin = array();
        $where["pour_tiers"] = "= '1'";
        $where["date"] = "BETWEEN '" . CMbDT::date() . "' AND '" . CMbDT::date("+3 month") . "'";
        if ($func_categ) {
            $_function_id = $func_categ->function_id;
            $where["users_mediboard.function_id"] = "= '{$_function_id}'";
            $ljoin["users_mediboard"] = "users_mediboard.user_id = plageconsult.chir_id";
        }
        $nb_plages = $plageconsult->countList($where, null, $ljoin);
    }
} else {
    // Consultation existante
    $consult->load($consultation_id);
    $canConsult = $consult->canDo();
    $canConsult->needsRead("consultation_id");
    $consult->loadRefConsultAnesth();
    $consult->loadRefsNotes();
    $consult->loadRefSejour();
    $consult->loadRefPlageConsult()->loadRefs();
    $chir = $consult->loadRefPraticien();
    $pat = $consult->loadRefPatient();
    $pat->loadIdVitale();
    // Correspondants médicaux
    $correspondants = $pat->loadRefsCorrespondants();
    foreach ($correspondants as $_correspondant) {
        $correspondantsMedicaux["correspondants"][] = $_correspondant->_ref_medecin;
    }
    if ($pat->_ref_medecin_traitant->_id) {
        $correspondantsMedicaux["traitant"] = $pat->_ref_medecin_traitant;
 * @category Cabinet
 * @package  Mediboard
 * @author   SARL OpenXtrem <*****@*****.**>
 * @license  GNU General Public License, see http://www.gnu.org/licenses/gpl.html
 * @version  $Revision$
 * @link     http://www.mediboard.org
 */
CCanDo::checkRead();
$consult_id = CValue::get("consult_id");
$consult = new CConsultation();
$consult->load($consult_id);
$consult->countActes();
$consult->loadExtCodesCCAM();
$consult->getAssociationCodesActes();
$consult->loadPossibleActes();
$consult->canDo();
// Chargement des actes NGAP
$consult->loadRefsActesNGAP();
// Initialisation d'un acte NGAP
$acte_ngap = CActeNGAP::createEmptyFor($consult);
if (CAppUI::conf('dPccam CCodeCCAM use_new_association_rules')) {
    // Chargement des règles de codage
    $consult->loadRefsCodagesCCAM();
    foreach ($consult->_ref_codages_ccam as $_codages_by_prat) {
        foreach ($_codages_by_prat as $_codage) {
            $_codage->loadPraticien()->loadRefFunction();
            $_codage->loadActesCCAM();
            $_codage->getTarifTotal();
            foreach ($_codage->_ref_actes_ccam as $_acte) {
                $_acte->getTarif();
            }
$userSel->load($consult->_ref_plageconsult->chir_id);
$userSel->loadRefs();
$canUserSel = $userSel->canDo();
// assign to session the current consultation praticien
$chirSession = CValue::session("chirSel");
if ($chirSession != $userSel->_id && $canUserSel) {
    CValue::setSession("chirSel", $userSel->_id);
}
$anesth = new CTypeAnesth();
$anesth = $anesth->loadGroupList();
$consultAnesth =& $consult->_ref_consult_anesth;
// Consultation courante
$consult->_ref_chir =& $userSel;
// Chargement de la consultation
if ($consult->_id) {
    $consult->canDo()->needsEdit(array("consult_id" => null));
    $consult->loadRefs();
    // Chargement de la consultation d'anesthésie
    // Chargement de la vue de chacun des dossiers
    foreach ($consult->_refs_dossiers_anesth as $_dossier) {
        $_dossier->loadRefConsultation();
        $_dossier->loadRefOperation()->loadRefPlageOp();
    }
    // Si on a passé un id de dossier d'anesth
    if ($dossier_anesth_id && isset($consult->_refs_dossiers_anesth[$dossier_anesth_id])) {
        $consultAnesth = $consult->_refs_dossiers_anesth[$dossier_anesth_id];
    }
    if (!is_array($consultAnesth) && $consultAnesth->_id) {
        $consultAnesth->loadRefs();
        if ($consultAnesth->_ref_operation->_id || $consultAnesth->_ref_sejour->_id) {
            if ($consultAnesth->_ref_operation->passage_uscpo === null) {