Exemplo n.º 1
0
 * @subpackage dPccam
 * @author     SARL OpenXtrem <*****@*****.**>
 * @license    GNU General Public License, see http://www.gnu.org/licenses/gpl.html
 * @version    $Revision$
 * @link       http://www.mediboard.org
 */
$codage_id = CValue::get('codage_id', 0);
$acte_id = CValue::get('acte_id', 0);
$codage = new CCodageCCAM();
$codage->load($codage_id);
if ($codage->_id) {
    $codage->canDo();
    if (!$codage->_can->edit) {
        CAppUI::redirect("m=system&a=access_denied");
    }
    $codage->loadCodable();
    $codage->loadPraticien()->loadRefFunction();
    $codage->_ref_praticien->isAnesth();
    $codage->loadActesCCAM();
    $codage->checkRules();
    // Chargement du codable et des actes possibles
    $codage->loadCodable();
    foreach ($codage->_ref_actes_ccam as $_acte) {
        $_acte->getTarif();
        $_activite = $_acte->_ref_code_ccam->activites[$_acte->code_activite];
        $_phase = $_activite->phases[$_acte->code_phase];
        /* Verification des modificateurs codés */
        foreach ($_phase->_modificateurs as $modificateur) {
            $position = strpos($_acte->modificateurs, $modificateur->code);
            if ($position !== false) {
                if ($modificateur->_double == "1") {