$ccam=new clCCAMCotationActesDiags($paramCCAM); $cw="and type='ACTE' and codeActe not like 'NGAP%' and codeActe not like 'CONS%' and idEvent<=19493"; $ccam->writeBALSorti($cw); echo "Fin de traitement pour discr=".$res[DISCR][$i]."<br>"; }*/ //Reprise des données pour les consultations spécialisées $res = $req->Execute("Fichier", "CCAM_repriseBALpatientCons", $paramRq, "ResultQuery"); //print affTab($res[INDIC_SVC]); unset($tabIdEvent); for ($i = 0; isset($res[DISCR][$i]); $i++) { $idEvent = $res[DISCR][$i]; $id = $res[ID][$i]; unset($paramCCAM); $paramCCAM[idEvent] = $idEvent; $ccam = new clCCAMCotationActesDiags($paramCCAM); $tabSpecialite = $ccam->tabSpecialite(); //Mise à jour de l'UF de consult spécialisée dans ccam_cotation_actes unset($contenuMBTV2); $contenuMBTV2 = explode("|", $res[CONTENU][$i]); $codeActe = $contenuMBTV2[11]; $codeAdeli = $contenuMBTV2[18]; unset($paramRq); $paramRq[cw] = "categorie='ListeMédecins' and code='{$codeAdeli}' and idDomaine=" . CCAM_IDDOMAINE; $res3 = $req->Execute("Fichier", "CCAM_getSpeMedecin", $paramRq, "ResultQuery"); $libelleSpe = $res3[nomliste][0]; //echo "rq:".$res3[INDIC_SVC][15]."<br>idEvent:$idEvent-codeActe:$codeActe-libSpe:$libelleSpe<br>"; unset($param); if ($libelleSpe) { if ($tabSpecialite["{$libelleSpe}"]) { $param[numUFexec] = $tabSpecialite["{$libelleSpe}"]; } else {