//echo 'transact erfolgreich';
echo '<script language="javascript">';
echo 'function closeWindow(){';
echo 'window.close();';
echo '}';
echo 'closeWindow();';
echo '</script>';
} else {
echo 'problem occured at aufnahme_start.php: ' . $encounter_obj->sql_ . ' and/or ' . $encounter_obj->sql_old;
}
}
// Show the admission data:
header("location: aufnahme_daten_zeigen.php" . URL_REDIRECT_APPEND . "&encounter_nr={$encounter_nr}&origin=admit&target=entry&newdata={$newdata}");
exit;
} else {
echo $LDDbNoSave . '<p>' . $encounter_obj->getLastQuery();
}
}
// end of if(update) else()
}
// end of if($error)
}
// end of if($mode)
} elseif ($encounter_nr != '') {
/* Load encounter data */
$encounter_obj->loadEncounterData();
if ($encounter_obj->is_loaded) {
$zeile =& $encounter_obj->encounter;
//load data
extract($zeile);
// Get insurance firm name
$diet =& $charts_obj->getChartDailyDietPlans($pn, $date_start, $date_end);
// get daily main notes (diag/therapy)
$main_notes = $charts_obj->getChartDailyMainNotes($pn, $date_start, $date_end);
// get daily etc notes (pt-atg-etc)
$daily_etc = $charts_obj->getChartDailyEtcNotes($pn, $date_start, $date_end);
// get daily anticoag notes (diag/therapy)
$daily_anticoag = $charts_obj->getChartDailyAnticoagNotes($pn, $date_start, $date_end);
// get daily iv notes (diag/therapy)
$daily_iv = $charts_obj->getChartDailyIVNotes($pn, $date_start, $date_end);
// get all current medicine prescriptions
$medis = $charts_obj->getAllCurrentPrescription($pn);
// get daily prescription notes
$daily_medis = $charts_obj->getChartDailyPrescriptionNotes($pn, $date_start, $date_end);
}
} else {
echo $enc_obj->getLastQuery() . "<p>{$LDDbNoRead}";
exit;
}
include_once $root_path . 'include/inc_date_format_functions.php';
function getlatestdata($info, $d, $m, $y)
{
if (is_object($info)) {
$ok = false;
$date = date('Y-m-d', mktime(0, 0, 0, $m, $d, $y));
while ($data = $info->FetchRow()) {
if ($data['date'] == $date) {
$ok = true;
break;
}
}
$info->MoveFirst();
