CAppUI::stepAjax("Export de {$max} sur {$count} objets de type 'CPatient' à partir de l'ID '{$idMin}'", UI_MSG_OK); // Time limit $seconds = max($max / 20, 120); CAppUI::stepAjax("Limite de temps du script positionné à '{$seconds}' secondes", UI_MSG_OK); CApp::setTimeLimit($seconds); // Export réel $errors = 0; $patients = $patient->loadList($where, $patient->_spec->key, "0, {$max}"); $echange = 0; foreach ($patients as $patient) { $patient->loadIPP(); $patient->loadRefsSejours(); $patient->_ref_last_log->type = "create"; $receiver = new CDestinataireHprim(); $receiver->load(CAppUI::conf("sip export_dest")); $receiver->loadConfigValues(); if (!$patient->_IPP) { $IPP = new CIdSante400(); //Paramétrage de l'id 400 $IPP->object_class = "CPatient"; $IPP->object_id = $patient->_id; $IPP->tag = $receiver->_tag_patient; $IPP->loadMatchingObject(); $patient->_IPP = $IPP->id400; } if (CAppUI::conf("sip pat_no_ipp") && $patient->_IPP && $patient->_IPP != "-" || !$receiver->_configs["send_all_patients"] && empty($patient->_ref_sejours)) { continue; } $dom = new CHPrimXMLEnregistrementPatient(); $dom->_ref_receiver = $receiver; $receiver->sendEvenementPatient($dom, $patient);
} $sejour->loadRefAdresseParPraticien(); $sejour->_ref_patient->loadRefsFwd(); $sejour->loadRefsActes(); foreach ($sejour->_ref_actes_ccam as $actes_ccam) { $actes_ccam->loadRefPraticien(); } $sejour->loadRefsAffectations(); $sejour->loadNDA(); $sejour->loadLogs(); $sejour->loadRefsConsultations(); $sejour->loadRefsConsultAnesth(); $sejour->_ref_last_log->type = "create"; $dest_hprim = new CDestinataireHprim(); $dest_hprim->load(CAppUI::conf("sip export_dest")); $dest_hprim->loadConfigValues(); if (!$sejour->_NDA) { $nda = new CIdSante400(); //Paramétrage de l'id 400 $nda->object_class = "CSejour"; $nda->object_id = $sejour->_id; $nda->tag = $dest_hprim->_tag_sejour; $nda->loadMatchingObject(); $sejour->_NDA = $nda->id400; } if (!$sejour->_ref_patient->_IPP) { $IPP = new CIdSante400(); $IPP->object_class = "CPatient"; $IPP->object_id = $sejour->_ref_patient->_id; $IPP->tag = $dest_hprim->_tag_patient; $IPP->loadMatchingObject();