if (empty($_COOKIE[$local_user . $sid])) {
$edit = 0;
include $root_path . "language/" . $lang . "/lang_" . $lang . "_" . LANG_FILE;
}
$fileappend = "&dept_nr={$dept_nr}&edit={$edit}&mode=&pday={$pday}&pmonth={$pmonth}&pyear={$pyear}&station={$station}";
$breakfile = "location:amb_clinic_patients.php" . URL_APPEND . $fileappend;
$forwardfile = "location:amb_clinic_patients.php" . URL_REDIRECT_APPEND . $fileappend;
# Create ward object
require_once $root_path . 'include/care_api_classes/class_encounter.php';
$enc_obj = new Encounter();
if (isset($mode) && $mode == 'transferdept') {
$date = date('Y-m-d');
$time = date('H:i:s');
# first discharge from current dept
//echo "discharing patient $pn<br>";
if ($enc_obj->DischargeFromDept($pn, 8, $date, $time)) {
# discharge type nr 8 = change of department
# Now we set new dept
//echo "Patient dischared!<br> Now $pn going to $tgt_nr ";
if ($enc_obj->setCurrentDept($pn, $tgt_nr)) {
header($forwardfile);
exit;
}
//echo "setCurrentDept person failed<br>";exit();
}
} else {
header($forwardfile);
exit;
}
?>
<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML 3.0//EN" "html.dtd">
//if($backpath) $breakfile=urldecode($backpath).URL_APPEND;
$thisfile = basename($_SERVER['PHP_SELF']);
# Load date formatter
require_once $root_path . 'include/inc_date_format_functions.php';
require_once $root_path . 'include/care_api_classes/class_encounter.php';
require_once $root_path . 'include/care_api_classes/class_tz_diagnostics.php';
$enc_obj = new Encounter();
if ($enc_obj->loadEncounterData($pn)) {
//$db->debug=1;
if ($mode == 'release' && !(isset($lock) || $lock)) {
$date = empty($x_date) ? date('Y-m-d') : formatDate2STD($x_date, $date_format);
$time = empty($x_time) ? date('H:i:s') : convertTimeToStandard($x_time);
# Check the discharge type
switch ($relart) {
case 8:
if ($released = $enc_obj->DischargeFromDept($pn, $relart, $date, $time)) {
# Reset current department
//$enc_obj->ResetAllCurrentPlaces($pn,0);
}
break;
default:
$released = $enc_obj->Discharge($pn, $relart, $date, $time);
}
if ($released) {
# If discharge note present
if (!empty($info)) {
$data_array['notes'] = $info;
$data_array['encounter_nr'] = $pn;
$data_array['date'] = $date;
$data_array['time'] = $time;
$data_array['personell_name'] = $encoder;
