$nda = $lines[$fl + 8];
$date = CMbDT::dateTime(CMbDT::dateFromLocale($lines[$fl + 9]));
$codeCores = $lines[$fl + 10];
$codePresc = $lines[$fl + 11];
//IPP
if ($lines[$fl] != '') {
$patient->_IPP = $ipp;
$patient->loadFromIPP();
}
//search
if (!$patient->_id && $nom != '' && $prenom != "") {
$where = array();
$where[] = "`nom` LIKE '{$nom}%' OR `nom_jeune_fille` LIKE '{$nom}%'";
$where["prenom"] = "LIKE '{$prenom}%' ";
$where["naissance"] = "LIKE '{$naissance}' ";
$patient->loadObject($where);
}
//NDA
if ($patient->_id && $nda) {
$dossier->loadFromNDA($nda);
}
// patient + date (et pas de nda)
if ($patient->_id && !$dossier->_id && $date) {
$where = array();
$where[] = " '{$date}' BETWEEN entree AND sortie ";
$where["patient_id"] = " = '{$patient->_id}'";
$dossier->loadObject($where);
}
}
$smarty = new CSmartyDP();
$smarty->assign("mail_id", $mail_id);
/**
* Load patient PES
*
* @param CCnStep $step Step
* @param int $step_number Step number
*
* @throws CMbException
*
* @return CPatient $patient
*/
static function loadPatientPES(CCnStep $step, $step_number)
{
// PES-PAM_Encounter_Management_Basic
$test = $step->_ref_test;
$partner = $test->_ref_partner;
$name = null;
switch ($step_number) {
case 10:
$name = "ONE";
break;
case 20:
$name = "TWO";
break;
case 30:
$name = "THREE";
break;
case 40:
$name = "FOUR";
break;
case 50:
if ($step->number == 80) {
$name = "UPDATE";
} else {
$name = "FIVE";
}
break;
}
$name = "PAM{$name}";
$patient = new CPatient();
$where = array();
$where["nom"] = " = '{$name}_{$partner->name}_{$test->_id}'";
$patient->loadObject($where);
if (!$patient->_id) {
$patient->random();
$patient->nom = "{$name}_{$partner->name}_{$test->_id}";
if ($msg = $patient->store()) {
throw new CMbException($msg);
}
}
return $patient;
}
