/** * signalNewDiagnosticsReportEvent will set an event instance in the * care_nursing_station_patients_diagnostics_report table * signalling the availability of a report. * param $report_date = the date (in local format) of the creation of the report * param $script_name = the script string that will be used to run the display of the report * return */ function signalNewDiagnosticsReportEvent($report_date = '', $script_name) { global $db, $local_user, $sid, $batch_nr, $pn, $target, $dept_nr, $formtitle, $subtarget, $LDDbNoRead, $LDDbNoSave, $date_format, $entry_date, $root_path; // $_SESSION; # Check if the formatDate2Local function is loaded if (!function_exists('formatDate2Local')) { include_once $root_path . 'include/inc_date_format_functions.php'; } # Load the visual signalling defined constants if (!function_exists('setEventSignalColor')) { include_once $root_path . 'include/inc_visual_signalling_fx.php'; } # Create a core object include_once $root_path . 'include/care_api_classes/class_core.php'; $core =& new Core(); $entry_table = 'care_encounter_diagnostics_report'; $report_exits = 0; # assume that report does not exist yet if (empty($report_date)) { $report_date = date('Y-m-d'); } else { $report_date = formatDate2Std($report_date, $date_format); } # Check first if a copy is already existing. If yes = update entry, no = insert new entry $sql = "SELECT item_nr FROM {$entry_table} WHERE report_nr={$batch_nr}"; if ($ergebnis = $db->Execute($sql)) { if ($ergebnis->RecordCount()) { $report = $ergebnis->FetchRow(); $sql = "UPDATE {$entry_table} SET\n\t\t\t\t\t\treport_date='" . $report_date . "',\n\t\t\t\t\t\treport_time='" . date('H:i:s') . "',\n\t\t\t\t\t\tstatus='pending',\n\t\t\t\t\t\thistory=" . $core->ConcatHistory("Update: " . date('Y-m-d H:i:s') . " " . $_SESSION['sess_user_name'] . "\n") . ",\n\t\t\t\t\t\tmodify_id='" . $_SESSION['sess_user_name'] . "',\n\t\t\t\t\t\tmodify_time='" . date('YmdHis') . "'\n\t\t\t\t\t\tWHERE item_nr='" . $report['item_nr'] . "'"; } else { $sql = "INSERT INTO {$entry_table}\n\t\t\t\t\t(\n\t\t\t\t\t\treport_nr,\n\t\t\t\t\t\treport_date,\n\t\t\t\t\t\treport_time,\n\t\t\t\t\t\treporting_dept,\n\t\t\t\t\t\treporting_dept_nr,\n\t\t\t\t\t\tencounter_nr,\n\t\t\t\t\t\tscript_call,\n\t\t\t\t\t\tstatus,\n\t\t\t\t\t\thistory,\n\t\t\t\t\t\tcreate_id,\n\t\t\t\t\t\tcreate_time\n\t\t\t\t\t)\n\t\t\t\t\tVALUES\n\t\t\t\t\t(\n\t\t\t\t\t\t'{$batch_nr}',\n\t\t\t\t\t\t'" . $report_date . "',\n\t\t\t\t\t\t'" . date('H:i:s') . "',\n\t\t\t\t\t\t'{$formtitle}',\n\t\t\t\t\t\t'{$dept_nr}',\n\t\t\t\t\t\t'{$pn}',\n\t\t\t\t\t\t'" . $script_name . "?entry_date=" . $entry_date . "&target=" . $target . "&subtarget=" . $subtarget . "&dept_nr=" . $dept_nr . "&batch_nr=" . $batch_nr . "&pn=" . $pn . "',\n\t\t\t\t\t\t'pending',\n\t\t\t\t\t\t'Initial report: " . date('Y-m-d H:i:s') . " " . $_SESSION['sess_user_name'] . "\n\r',\n\t\t\t\t\t\t'" . $_SESSION['sess_user_name'] . "',\n\t\t\t\t\t\t'" . date('YmdHis') . "'\n\t\t\t\t\t)"; } //echo $sql; if ($ergebnis = $core->Transact($sql)) { /* If the findings are succesfully saved, make an entry into the care_encounter_diagnostics_report table * for signalling purposes */ if ($script_name == "labor_test_findings_radio") { setEventSignalColor($pn, SIGNAL_COLOR_RADIOLOGY_REPORT, SIGNAL_COLOR_LEVEL_FULL); } else { setEventSignalColor($pn, SIGNAL_COLOR_DIAGNOSTICS_REPORT, SIGNAL_COLOR_LEVEL_FULL); } return true; } else { echo "{$sql} {$LDDbNoSave}"; // for debugging. comment out for normal runs return false; } } else { echo "{$sql} {$LDDbNoRead}"; // for debugging. comment out for normal runs return false; } }
//echo $sql; // Load the visual signalling functions include_once $root_path . 'include/inc_visual_signalling_fx.php'; // Set the visual signal setEventSignalColor($pn, SIGNAL_COLOR_RADIOLOGY_REPORT); header("location:{$thisfile}?sid={$sid}&lang={$lang}&edit={$edit}&saved=insert&mode=edit&pn={$pn}&station={$station}&user_origin={$user_origin}&status={$status}&target={$target}&subtarget={$subtarget}&noresize={$noresize}&batch_nr={$batch_nr}&entry_date={$entry_date}"); exit; } else { echo "<p>{$sql}<p>{$LDDbNoSave}"; $mode = ''; } break; // end of case 'save' // end of case 'save' case 'update': $sql = "UPDATE care_test_findings_" . $db_request_table . " SET \n\t\t\t\t\t\t\t\t\t\t findings='" . addslashes(htmlspecialchars($findings)) . "', \n\t\t\t\t\t\t\t\t\t\t diagnosis='" . addslashes(htmlspecialchars($diagnosis)) . "',\n\t\t\t\t\t\t\t\t\t\t doctor_id='" . htmlspecialchars($doctor_id) . "', \n\t\t\t\t\t\t\t\t\t\t findings_date='" . formatDate2Std($findings_date, $date_format) . "',\n\t\t\t\t\t\t\t\t\t\t findings_time='" . date('H:i:s') . "', \n\t\t\t\t\t\t\t\t\t\t history=" . $enc_obj->ConcatHistory("Update: " . date('Y-m-d H:i:s') . " = " . $HTTP_SESSION_VARS['sess_user_name'] . "\n") . ",\n\t\t\t\t\t\t\t\t\t\t modify_id = '" . $HTTP_SESSION_VARS['sess_user_name'] . "',\n\t\t\t\t\t\t\t\t\t\t modify_time='" . date('YmdHis') . "'\n\t\t\t\t\t\t\t\t\t\t WHERE batch_nr = '" . $batch_nr . "'"; if ($ergebnis = $enc_obj->Transact($sql)) { signalNewDiagnosticsReportEvent($findings_date); //echo $sql; header("location:{$thisfile}?sid={$sid}&lang={$lang}&edit={$edit}&saved=insert&mode=edit&pn={$pn}&station={$station}&user_origin={$user_origin}&status={$status}&target={$target}&subtarget={$subtarget}&noresize={$noresize}&batch_nr={$batch_nr}&entry_date={$entry_date}"); exit; } else { echo "<p>{$sql}<p>{$LDDbNoSave}"; $mode = ''; } break; // end of case 'save' // end of case 'save' case 'done': $sql = "UPDATE care_test_findings_" . $db_request_table . " SET \n\t\t\t\t\t\t\t\t\t\t status='done',\n\t\t\t\t\t\t\t\t\t\t history=" . $enc_obj->ConcatHistory("Done: " . date('Y-m-d H:i:s') . " = " . $HTTP_SESSION_VARS['sess_user_name'] . "\n") . ",\n\t\t\t\t\t\t\t\t\t\t modify_id = '" . $HTTP_SESSION_VARS['sess_user_name'] . "',\n\t\t\t\t\t\t\t\t\t\t modify_time='" . date('YmdHis') . "'\n\t\t\t\t\t\t\t\t\t\t WHERE batch_nr = '" . $batch_nr . "'"; if ($ergebnis = $enc_obj->Transact($sql)) {
/* Set form to read */ $edit = 0; /* Set script mode to no edit*/ $db_request_table = $target; $dept_nr = $subtarget; //$db->debug=1; require_once $root_path . 'include/care_api_classes/class_department.php'; $dept_obj = new Department(); /* Here begins the real work */ require_once $root_path . 'include/inc_date_format_functions.php'; if (!isset($mode)) { $mode = ''; } switch ($mode) { case 'update': $sql = "UPDATE care_test_request_" . $db_request_table . " SET \n result='" . htmlentities(addslashes($result)) . "',\n\t\t\t\t\t\t\t\t\t\t result_date='" . formatDate2Std($result_date, $date_format) . "',\n\t\t\t\t\t\t\t\t\t\t result_doctor='" . $result_doctor . "',\n\t\t\t\t\t\t\t\t\t\t history=" . $dept_obj->ConcatHistory("Update: " . date('Y-m-d H:i:s') . " = " . $_SESSION['sess_user_name'] . "\n") . ",\n\t\t\t\t\t\t\t\t\t\t modify_id = '" . $_SESSION['sess_user_name'] . "',\n\t\t\t\t\t\t\t\t\t\t modify_time = '" . date('YmdHis') . "'\n\t\t\t\t\t\t\t\t\t\t WHERE batch_nr = '" . $batch_nr . "'"; if ($ergebnis = $dept_obj->Transact($sql)) { /* If the findings are succesfully saved, make an entry into the care_nursing_station_patients_diagnostics_report table * for signalling purposes */ signalNewDiagnosticsReportEvent($result_date, 'labor_test_request_printpop.php'); //echo $sql; header("location:" . $thisfile . "?sid={$sid}&lang={$lang}&edit={$edit}&saved=update&pn={$pn}&station={$station}&user_origin={$user_origin}&status={$status}&target={$target}&subtarget={$subtarget}&batch_nr={$batch_nr}&noresize={$noresize}"); exit; } else { echo "<p>{$sql}<p>{$LDDbNoSave}"; $mode = ''; } break; // end of case 'save' // end of case 'save'
} if (!$GLOBAL_CONFIG['patient_service_room_hide']) { if (!empty($sc_room_start)) { $sc_room_start = formatDate2Std($sc_room_start, $date_format); } if (!empty($sc_room_end)) { $sc_room_end = formatDate2Std($sc_room_end, $date_format); } $room_class = compact('sc_room_nr', 'sc_room_class_nr', 'sc_room_start', 'sc_room_end', 'encoder'); } if (!$GLOBAL_CONFIG['patient_service_att_dr_hide']) { if (!empty($sc_att_dr_start)) { $sc_att_dr_start = formatDate2Std($sc_att_dr_start, $date_format); } if (!empty($sc_att_dr_end)) { $sc_att_dr_end = formatDate2Std($sc_att_dr_end, $date_format); } $att_dr_class = compact('sc_att_dr_nr', 'sc_att_dr_class_nr', 'sc_att_dr_start', 'sc_att_dr_end', 'encoder'); } if ($update || $encounter_nr) { //echo formatDate2STD($geburtsdatum,$date_format); $itemno = $itemname; $_POST['modify_id'] = $encoder; if ($dbtype == 'mysql' || $dbtype == 'mysqli') { $_POST['history'] = "CONCAT(history,\"\n Update: " . date('Y-m-d H:i:s') . " = {$encoder}\")"; } else { $_POST['history'] = "(history || '\n Update: " . date('Y-m-d H:i:s') . " = {$encoder}')"; } if (isset($_POST['encounter_nr'])) { unset($_POST['encounter_nr']); }
/* Set script mode to no edit*/ $formtitle = $LDPathology; $db_request_table = $subtarget; /* Here begins the real work */ /* Establish db connection */ if (!isset($db) || !$db) { include $root_path . 'include/inc_db_makelink.php'; } if ($dblink_ok) { require_once $root_path . 'include/inc_date_format_functions.php'; if (!isset($mode)) { $mode = ''; } switch ($mode) { case 'update': $sql = "UPDATE care_test_request_" . $db_request_table . " SET \n entry_date='" . formatDate2Std($entry_date, $date_format) . "',\n\t\t\t\t\t\t\t\t\t\t journal_nr='" . $journal_nr . "',\n\t\t\t\t\t\t\t\t\t\t blocks_nr='" . $blocks_nr . "',\n\t\t\t\t\t\t\t\t\t\t deep_cuts='" . $deep_cuts . "',\n\t\t\t\t\t\t\t\t\t\t special_dye='" . $special_dye . "',\n\t\t\t\t\t\t\t\t\t\t immune_histochem='" . $immune_histochem . "',\n\t\t\t\t\t\t\t\t\t\t hormone_receptors='" . $hormone_receptors . "',\n\t\t\t\t\t\t\t\t\t\t specials='" . $specials . "',\n\t\t\t\t\t\t\t\t\t\t modify_id = '" . $_COOKIE[$local_user . $sid] . "'\n\t\t\t\t\t\t\t\t\t\t WHERE batch_nr = '" . $batch_nr . "'"; if ($ergebnis = $db->Execute($sql)) { //echo $sql; header("location:" . $thisfile . URL_REDIRECT_APPEND . "&edit={$edit}&saved=update&pn={$pn}&station={$station}&user_origin={$user_origin}&status={$status}&target={$target}&subtarget={$subtarget}&batch_nr={$batch_nr}&noresize={$noresize}"); exit; } else { echo "<p>{$sql}<p>{$LDDbNoSave}"; $mode = ""; } break; // end of case 'save' // end of case 'save' default: $mode = ""; } // end of switch($mode)
//echo $sql; // Load the visual signalling functions include_once $root_path . 'include/inc_visual_signalling_fx.php'; // Set the visual signal setEventSignalColor($pn, SIGNAL_COLOR_RADIOLOGY_REQUEST); header("location:" . $root_path . "modules/laboratory/labor_test_request_aftersave.php?sid={$sid}&lang={$lang}&edit={$edit}&saved=insert&pn={$pn}&station={$station}&user_origin={$user_origin}&status={$status}&target={$target}&noresize={$noresize}&batch_nr={$batch_nr}"); exit; } else { echo "<p>{$sql}<p>{$LDDbNoSave}"; $mode = ""; } break; // end of case 'save' // end of case 'save' case 'update': $sql = "UPDATE care_test_request_" . $db_request_table . " SET\r\n\t\t\t\t\t\t\t\t dept_nr = '" . $dept_nr . "',\r\n\t\t\t\t\t\t\t\t\t\t xray='" . $xray . "', ct='" . $ct . "', sono='" . $sono . "',\r\n\t\t\t\t\t\t\t\t\t\t mammograph='" . $mammograph . "', mrt='" . $mrt . "', nuclear='" . $nuclear . "',\r\n\t\t\t\t\t\t\t\t\t\t if_patmobile='" . $if_patmobile . "', if_allergy='" . $if_allergy . "',\r\n\t\t\t\t\t\t\t\t\t\t if_hyperten='" . $if_hyperten . "', if_pregnant='" . $if_pregnant . "',\r\n\t\t\t\t\t\t\t\t\t\t clinical_info='" . htmlspecialchars($clinical_info) . "', test_request='" . htmlspecialchars($test_request) . "',\r\n\t\t\t\t\t\t\t\t\t\t send_date='" . formatDate2Std($send_date, $date_format) . "',\r\n\t\t\t\t\t\t\t\t\t\t send_doctor='" . htmlspecialchars($send_doctor) . "', status='" . $status . "',\r\n\t\t\t\t\t\t\t\t\t\t history='" . $core->ConcatHistory('Update: ' . date('Y-m-d H:i:s') . ' = ' . $_SESSION['sess_user_name'] . '\\n') . "',\r\n\t\t\t\t\t\t\t\t\t\t\tbill_number='" . $bill_nr . "';\r\n\t\t\t\t\t\t\t\t\t\t\tbill_status='" . $bill_status . "',\r\n\t\t\t\t\t\t\t\t\t\t\tis_disabled='" . $is_disabled . "',\r\n\t\t\t\t\t\t\t\t\t\t modify_id='" . $_SESSION['sess_user_name'] . "',\r\n\t\t\t\t\t\t\t\t\t\t modify_time='" . date('YmdHis') . "'\r\n\t\t\t\t\t\t\t\t\t\t WHERE batch_nr = '" . $batch_nr; if ($ergebnis = $core->Transact($sql)) { //echo $sql; // Load the visual signalling functions include_once $root_path . 'include/inc_visual_signalling_fx.php'; // Set the visual signal setEventSignalColor($pn, SIGNAL_COLOR_DIAGNOSTICS_REQUEST); header("location:" . $root_path . "modules/laboratory/labor_test_request_aftersave.php?sid={$sid}&lang={$lang}&edit={$edit}&saved=update&pn={$pn}&station={$station}&user_origin={$user_origin}&status={$status}&target={$target}&batch_nr={$batch_nr}&noresize={$noresize}"); exit; } else { echo "<p>{$sql}<p>{$LDDbNoSave}"; $mode = ''; } break; // end of case 'save' /* If mode is edit, get the stored test request when its status is either "pending" or "draft"
if ($ergebnis = $dept_obj->Transact($sql)) { // Load the visual signalling functions include_once $root_path . 'include/inc_visual_signalling_fx.php'; // Set the visual signal setEventSignalColor($pn, SIGNAL_COLOR_DIAGNOSTICS_REQUEST); header("location:" . $root_path . "modules/laboratory/labor_test_request_aftersave.php?sid=" . $sid . "&lang=" . $lang . "&edit=" . $edit . "&saved=insert&pn=" . $pn . "&station=" . $station . "&user_origin=" . $user_origin . "&status=" . $status . "&target=" . $target . "&dept_nr=" . $dept_nr . "&noresize=" . $noresize . "&batch_nr=" . $batch_nr); exit; } else { echo "<p>{$sql}<p>{$LDDbNoSave}"; $mode = ""; } break; // end of case 'save' // end of case 'save' case 'update': $sql = "UPDATE care_test_request_" . $db_request_table . " SET \n\t\t\t\t\t\t\t\t\t\t\ttesting_dept = '" . $dept_nr . "', \n\t\t\t\t\t\t\t\t\t\t\tvisit = '" . $visit . "', \n\t\t\t\t\t\t\t\t\t\t\torder_patient = '" . $order_patient . "', \n\t\t\t\t\t\t\t\t\t\t\tdiagnosis_quiry = '" . $diagnosis_quiry . "', \n\t\t\t\t\t\t\t\t\t\t\tsend_date = '" . formatDate2Std($send_date, $date_format) . "', \n\t\t\t\t\t\t\t\t\t\t\tsend_doctor = '" . $send_doctor . "', \n\t\t\t\t\t\t\t\t\t\t\tstatus = '" . $status . "', \n\t\t\t\t\t\t\t\t\t\t history=" . $dept_obj->ConcatHistory("Update: " . date('Y-m-d H:i:s') . " = " . $_SESSION['sess_user_name'] . "\n") . ",\n\t\t\t\t\t\t\t\t\t\t modify_id = '" . $_SESSION['sess_user_name'] . "',\n\t\t\t\t\t\t\t\t\t\t\tmodify_time='" . date('YmdHis') . "'\n\t\t\t\t\t\t\t\t\t\t\tWHERE batch_nr = '" . $batch_nr . "' "; if ($ergebnis = $dept_obj->Transact($sql)) { // Load the visual signalling functions include_once $root_path . 'include/inc_visual_signalling_fx.php'; // Set the visual signal setEventSignalColor($pn, SIGNAL_COLOR_DIAGNOSTICS_REQUEST); //echo $sql; header("location:" . $root_path . "modules/laboratory/labor_test_request_aftersave.php?sid=" . $sid . "&lang=" . $lang . "&edit=" . $edit . "&saved=update&pn=" . $pn . "&station=" . $station . "&user_origin=" . $user_origin . "&status=" . $status . "&target=" . $target . "&dept_nr=" . $dept_nr . "&batch_nr=" . $batch_nr . "&noresize=" . $noresize); exit; } else { echo "<p>{$sql}<p>{$LDDbNoSave}"; $mode = ""; } break; // end of case 'save' /* If mode is edit, get the stored test request when its status is either "pending" or "draft"
/** * Displays the GUI input form */ function display() { global $db, $sid, $lang, $root_path, $pid, $insurance_show, $user_id, $mode, $dbtype, $breakfile, $cfg, $update, $photo_filename, $HTTP_POST_VARS, $HTTP_POST_FILES, $HTTP_SESSION_VARS; extract($HTTP_POST_VARS); # Load the language tables $lang_tables = $this->langfiles; include $root_path . 'include/inc_load_lang_tables.php'; # Load the other hospitals array include_once $root_path . 'global_conf/other_hospitals.php'; include_once $root_path . 'include/inc_date_format_functions.php'; include_once $root_path . 'include/care_api_classes/class_insurance.php'; include_once $root_path . 'include/care_api_classes/class_person.php'; //$db->debug=true; # Create the new person object $person_obj =& new Person($pid); # Create a new person insurance object $pinsure_obj =& new PersonInsurance($pid); if (!isset($insurance_show)) { $insurance_show = TRUE; } $newdata = 1; $error = 0; $dbtable = 'care_person'; if (!isset($photo_filename) || empty($photo_filename)) { $photo_filename = 'nopic'; } # Assume first that image is not uploaded $valid_image = FALSE; //* Get the global config for person's registration form*/ include_once $root_path . 'include/care_api_classes/class_globalconfig.php'; $glob_obj = new GlobalConfig($GLOBAL_CONFIG); $glob_obj->getConfig('person_%'); //extract($GLOBAL_CONFIG); # Check whether config foto path exists, else use default path $photo_path = is_dir($root_path . $GLOBAL_CONFIG['person_foto_path']) ? $GLOBAL_CONFIG['person_foto_path'] : $this->default_photo_path; if ($mode == 'save' || $mode == 'forcesave') { # If saving is not forced, validate important elements if ($mode != 'forcesave') { # clean and check input data variables if (trim($encoder) == '') { $encoder = $aufnahme_user; } if (trim($name_last) == '') { $errornamelast = 1; $error++; } if (trim($name_first) == '') { $errornamefirst = 1; $error++; } if (trim($date_birth) == '') { $errordatebirth = 1; $error++; } if (trim($addr_str) == '') { $errorstreet = 1; $error++; } if (trim($addr_str_nr) == '') { $errorstreetnr = 1; $error++; } if ($addr_citytown_nr && trim($addr_citytown_name) == '') { $errortown = 1; $error++; } if ($sex == '') { $errorsex = 1; $error++; } if ($insurance_show) { if (trim($insurance_nr) && trim($insurance_firm_name) == '') { $errorinsurancecoid = 1; $error++; } } } # If the validation produced no error, save the data if (!$error) { # Save the old filename for testing $old_fn = $photo_filename; # Create image object include_once $root_path . 'include/care_api_classes/class_image.php'; $img_obj =& new Image(); # Check the uploaded image file if exists and valid if ($img_obj->isValidUploadedImage($HTTP_POST_FILES['photo_filename'])) { $valid_image = TRUE; # Get the file extension $picext = $img_obj->UploadedImageMimeType(); } if ($update) { //echo formatDate2STD($geburtsdatum,$date_format); $sql .= "UPDATE {$dbtable} SET\r\r\n\t\t\t\t\t\t\t title='{$title}',\r\r\n\t\t\t\t\t\t\t name_last='{$name_last}',\r\r\n\t\t\t\t\t\t\t name_first='{$name_first}',\r\r\n\t\t\t\t\t\t\t name_2='{$name_2}',\r\r\n\t\t\t\t\t\t\t name_3='{$name_3}',\r\r\n\t\t\t\t\t\t\t name_middle='{$name_middle}',\r\r\n\t\t\t\t\t\t\t name_maiden='{$name_maiden}',\r\r\n\t\t\t\t\t\t\t name_others='{$name_others}',\r\r\n\t\t\t\t\t\t\t date_birth='" . formatDate2STD($date_birth, $date_format) . "',\r\r\n\t\t\t\t\t\t\t blood_group='" . trim($blood_group) . "',\r\r\n\t\t\t\t\t\t\t sex='{$sex}',\r\r\n\t\t\t\t\t\t\t addr_str='{$addr_str}',\r\r\n\t\t\t\t\t\t\t addr_str_nr='{$addr_str_nr}',\r\r\n\t\t\t\t\t\t\t addr_zip='{$addr_zip}',\r\r\n\t\t\t\t\t\t\t addr_citytown_nr='{$addr_citytown_nr}',\r\r\n\t\t\t\t\t\t\t phone_1_nr='{$phone_1_nr}',\r\r\n\t\t\t\t\t\t\t phone_2_nr='{$phone_2_nr}',\r\r\n\t\t\t\t\t\t\t cellphone_1_nr='{$cellphone_1_nr}',\r\r\n\t\t\t\t\t\t\t cellphone_2_nr='{$cellphone_2_nr}',\r\r\n\t\t\t\t\t\t\t fax='{$fax}',\r\r\n\t\t\t\t\t\t\t email='{$email}',\r\r\n\t\t\t\t\t\t\t citizenship='{$citizenship}',\r\r\n\t\t\t\t\t\t\t civil_status='{$civil_status}',\r\r\n\t\t\t\t\t\t\t sss_nr='{$sss_nr}',\r\r\n\t\t\t\t\t\t\t nat_id_nr='{$nat_id_nr}',\r\r\n\t\t\t\t\t\t\t religion='{$religion}',\r\r\n\t\t\t\t\t\t\t ethnic_orig='{$ethnic_orig}',\r\r\n\t\t\t\t\t\t\t date_update='" . date('Y-m-d H:i:s') . "',"; //if ($old_fn!=$photo_filename){ if ($valid_image) { # Compose the new filename $photo_filename = $pid . '.' . $picext; # Save the file $img_obj->saveUploadedImage($HTTP_POST_FILES['photo_filename'], $root_path . $photo_path . '/', $photo_filename); # add to the sql query $sql .= " photo_filename='{$photo_filename}',"; } # complete the sql query $sql .= " history=" . $person_obj->ConcatHistory("Update " . date('Y-m-d H:i:s') . " " . $HTTP_SESSION_VARS['sess_user_name'] . " \n") . ", modify_id='" . $HTTP_SESSION_VARS['sess_user_name'] . "' WHERE pid={$pid}"; //$db->debug=true; $db->BeginTrans(); $ok = $db->Execute($sql); if ($ok) { $db->CommitTrans(); # Update the insurance data # Lets detect if the data is already existing if ($insurance_show) { if ($insurance_item_nr) { if (!empty($insurance_nr) && !empty($insurance_firm_name) && $insurance_firm_id) { $insure_data = array('insurance_nr' => $insurance_nr, 'firm_id' => $insurance_firm_id, 'class_nr' => $insurance_class_nr, 'history' => "Update " . date('Y-m-d H:i:s') . " " . $HTTP_SESSION_VARS['sess_user_name'] . " \n", 'modify_id' => $HTTP_SESSION_VARS['sess_user_name'], 'modify_time' => date('YmdHis')); $pinsure_obj->updateDataFromArray($insure_data, $insurance_item_nr); } } elseif ($insurance_nr && $insurance_firm_name && $insurance_class_nr) { $insure_data = array('insurance_nr' => $insurance_nr, 'firm_id' => $insurance_firm_id, 'pid' => $pid, 'class_nr' => $insurance_class_nr, 'history' => "Update " . date('Y-m-d H:i:s') . " " . $HTTP_SESSION_VARS['sess_user_name'] . " \n", 'create_id' => $HTTP_SESSION_VARS['sess_user_name'], 'create_time' => date('YmdHis')); $pinsure_obj->insertDataFromArray($insure_data); } } $newdata = 1; //$db->debug=1; // KB: save other_his_no if (isset($_POST['other_his_org']) && !empty($_POST['other_his_org'])) { $person_obj->OtherHospNrSet($_POST['other_his_org'], $_POST['other_his_no'], $_SESSION['sess_user_name']); } if (file_exists($this->displayfile)) { header("Location: {$this->displayfile}" . URL_REDIRECT_APPEND . "&pid={$pid}&from={$from}&newdata=1&target=entry"); exit; } else { echo "Error! Target display file not defined!!"; } } else { $db->RollbackTrans(); } } else { $from = 'entry'; $HTTP_POST_VARS['date_birth'] = @formatDate2Std($date_birth, $date_format); $HTTP_POST_VARS['date_reg'] = date('Y-m-d H:i:s'); $HTTP_POST_VARS['blood_group'] = trim($HTTP_POST_VARS['blood_group']); $HTTP_POST_VARS['status'] = 'normal'; $HTTP_POST_VARS['history'] = "Init.reg. " . date('Y-m-d H:i:s') . " " . $HTTP_SESSION_VARS['sess_user_name'] . "\n"; //$HTTP_POST_VARS['modify_id']=$HTTP_SESSION_VARS['sess_user_name']; $HTTP_POST_VARS['create_id'] = $HTTP_SESSION_VARS['sess_user_name']; $HTTP_POST_VARS['create_time'] = date('YmdHis'); # Prepare internal data to be stored together with the user input data if (!$person_obj->InitPIDExists($GLOBAL_CONFIG['person_id_nr_init'])) { # If db is mysql, insert the initial pid value from global config # else let the dbms make an initial value via the sequence generator e.g. postgres # However, the sequence generator must be configured during db creation to start at # the initial value set in the global config if ($dbtype == 'mysql') { $HTTP_POST_VARS['pid'] = $GLOBAL_CONFIG['person_id_nr_init']; } } else { # Persons are existing. Check if duplicate might exist if (is_object($duperson = $person_obj->PIDbyData($HTTP_POST_VARS))) { $error_person_exists = TRUE; } } //echo $person_obj->getLastQuery(); if (!$error_person_exists || $mode == 'forcesave') { if ($person_obj->insertDataFromInternalArray()) { # If data was newly inserted, get the insert id if mysql, # else get the pid number from the latest primary key if (!$update) { $oid = $db->Insert_ID(); $pid = $person_obj->LastInsertPK('pid', $oid); //EL: set the new pid $person_obj->setPID($pid); } // KB: save other_his_no if (isset($_POST['other_his_org']) && !empty($_POST['other_his_org'])) { $person_obj->OtherHospNrSet($_POST['other_his_org'], $_POST['other_his_no'], $_SESSION['sess_user_name']); } # Save the valid uploaded photo if ($valid_image) { # Compose the new filename by joining the pid number and the file extension with "." $photo_filename = $pid . '.' . $picext; # Save the file if ($img_obj->saveUploadedImage($HTTP_POST_FILES['photo_filename'], $root_path . $photo_path . '/', $photo_filename)) { # Update the filename to the databank $person_obj->setPhotoFilename($pid, $photo_filename); } } //echo $pid; # Update the insurance data # Lets detect if the data is already existing if ($insurance_show) { if ($insurance_item_nr) { if (!empty($insurance_nr) && !empty($insurance_firm_name) && $insurance_firm_id) { $insure_data = array('insurance_nr' => $insurance_nr, 'firm_id' => $insurance_firm_id, 'class_nr' => $insurance_class_nr); $pinsure_obj->updateDataFromArray($insure_data, $insurance_item_nr); } } elseif ($insurance_nr && $insurance_firm_name && $insurance_class_nr) { $insure_data = array('insurance_nr' => $insurance_nr, 'firm_id' => $insurance_firm_id, 'pid' => $pid, 'class_nr' => $insurance_class_nr); $pinsure_obj->insertDataFromArray($insure_data); } } $newdata = 1; if (file_exists($this->displayfile)) { header("Location: {$this->displayfile}" . URL_REDIRECT_APPEND . "&pid={$pid}&from={$from}&newdata=1&target=entry"); exit; } else { echo "Error! Target display file not defined!!"; } } else { echo "<p>{$db->ErrorMsg}()<p>{$LDDbNoSave}"; } } } } // end of if(!$error) } elseif (!empty($this->pid)) { # Get the person´s data if ($data_obj =& $person_obj->getAllInfoObject()) { $zeile = $data_obj->FetchRow(); extract($zeile); # Get the related insurance data $p_insurance =& $pinsure_obj->getPersonInsuranceObject($pid); if ($p_insurance == FALSE) { $insurance_show = TRUE; } else { if (!$p_insurance->RecordCount()) { $insurance_show = TRUE; } elseif ($p_insurance->RecordCount() == 1) { $buffer = $p_insurance->FetchRow(); extract($buffer); $insurance_show = TRUE; $insurance_firm_name = $pinsure_obj->getFirmName($insurance_firm_id); } else { $insurance_show = FALSE; } } } } else { $date_reg = date('Y-m-d H:i:s'); } # Get the insurance classes $insurance_classes =& $pinsure_obj->getInsuranceClassInfoObject('class_nr,name,LD_var AS "LD_var"'); include_once $root_path . 'include/inc_photo_filename_resolve.php'; # # ######## Here starts the GUI output ####################################################### # # # Start Smarty templating here # Create smarty object without initiliazing the GUI (2nd param = FALSE) include_once $root_path . 'gui/smarty_template/smarty_care.class.php'; $this->smarty = new smarty_care('common', FALSE); $img_male = createComIcon($root_path, 'spm.gif', '0'); $img_female = createComIcon($root_path, 'spf.gif', '0'); if (!empty($this->pretext)) { $this->smarty->assign('pretext', $this->pretext); } # Collect extay javascript code $sTemp = ''; ob_start(); ?> <script language="javascript"> <!-- function forceSave(){ document.aufnahmeform.mode.value="forcesave"; document.aufnahmeform.submit(); } function showpic(d){ if(d.value) document.images.headpic.src=d.value; if(d.value) document.images.headpic.src=d.value; } function popSearchWin(target,obj_val,obj_name){ urlholder="./data_search.php<?php echo URL_REDIRECT_APPEND; ?> &target="+target+"&obj_val="+obj_val+"&obj_name="+obj_name; DSWIN<?php echo $sid; ?> =window.open(urlholder,"wblabel<?php echo $sid; ?> ","menubar=no,width=400,height=550,resizable=yes,scrollbars=yes"); } function chkform(d) { if(d.name_last.value==""){ alert("<?php echo $LDPlsEnterLastName; ?> "); d.name_last.focus(); return false; }else if(d.name_first.value==""){ alert("<?php echo $LDPlsEnterFirstName; ?> "); d.name_first.focus(); return false; }else if(d.date_birth.value==""){ alert("<?php echo $LDPlsEnterDateBirth; ?> "); d.date_birth.focus(); return false; }else if(d.sex[0]&&d.sex[1]&&!d.sex[0].checked&&!d.sex[1].checked){ alert("<?php echo $LDPlsSelectSex; ?> "); return false; }else if(d.addr_str.value==""){ alert("<?php echo $LDPlsEnterStreetName; ?> "); d.addr_str.focus(); return false; }else if(d.addr_str_nr.value==""){ alert("<?php echo $LDPlsEnterBldgNr; ?> "); d.addr_str_nr.focus(); return false; }else if(d.addr_citytown_name.value==""){ alert("<?php echo $LDPlsEnterCityTown; ?> "); d.addr_citytown_name.focus(); return false; }else if(d.addr_zip.value==""){ alert("<?php echo $LDPlsEnterZip; ?> "); d.addr_zip.focus(); return false; }else if(d.user_id.value==""){ alert("<?php echo $LDPlsEnterFullName; ?> "); d.user_id.focus(); return false; }else if(d.sss_nr.value==""){ alert("<?php echo $LDPlsEnterSss_nr; ?> "); d.sss_nr.focus(); return false; }else{ return true; } } <?php require $root_path . 'include/inc_checkdate_lang.php'; ?> --> </script> <?php //gjergji : new calendar require_once '../../js/jscalendar/calendar.php'; $calendar = new DHTML_Calendar('../../js/jscalendar/', $lang, 'calendar-system', true); $calendar->load_files(); //end : gjergji $sTemp = ob_get_contents(); ob_end_clean(); $this->smarty->assign('sRegFormJavaScript', $sTemp); $this->smarty->assign('thisfile', $thisfile); if ($error) { $this->smarty->assign('error', TRUE); $this->smarty->assign('sErrorImg', '<img ' . createMascot($root_path, 'mascot1_r.gif', '0', 'bottom') . ' align="absmiddle">'); if ($error > 1) { $this->smarty->assign('sErrorText', $LDErrorS); } else { $this->smarty->assign('sErrorText', $LDError); } } elseif ($error_person_exists) { $this->smarty->assign('errorDupPerson', TRUE); $this->smarty->assign('sErrorImg', '<img ' . createMascot($root_path, 'mascot1_r.gif', '0', 'bottom') . ' align="absmiddle">'); $this->smarty->assign('LDPersonDuplicate', $LDPersonDuplicate); if ($duperson->RecordCount() > 1) { $this->smarty->assign('sErrorText', "{$LDSimilarData2} {$LDPlsCheckFirst2}"); } else { $this->smarty->assign('sErrorText', "{$LDSimilarData} {$LDPlsCheckFirst}"); } $this->smarty->assign('sDupDataColNameRow', "<tr class=\"reg_div\">\r\r\n\t\t\t\t\t<td><FONT SIZE=-1 FACE=\"Arial\" color=\"#000066\"><b>\r\r\n\t\t\t\t\t\t{$LDRegistryNr}</b></td>\r\r\n\t\t\t\t\t<td><FONT SIZE=-1 FACE=\"Arial\" color=\"#000066\"><b>\r\r\n\t\t\t\t\t\t{$LDLastName}</b></td>\r\r\n\t\t\t\t\t<td><FONT SIZE=-1 FACE=\"Arial\" color=\"#000066\"><b>\r\r\n\t\t\t\t\t\t{$LDFirstName}</b></td>\r\r\n\t\t\t\t\t<td><FONT SIZE=-1 FACE=\"Arial\" color=\"#000066\"><b>\r\r\n\t\t\t\t\t\t{$LDBday}</b></td>\r\r\n\t\t\t\t\t<td><FONT SIZE=-1 FACE=\"Arial\" color=\"#000066\"><b>\r\r\n\t\t\t\t\t\t{$LDSex}</b></td>\r\r\n\t\t\t\t\t<td><FONT SIZE=-1 FACE=\"Arial\" color=\"#000066\"><b>\r\r\n\t\t\t\t\t\t{$LDOptions}</b></td>\r\r\n\t\t\t\t\t</tr>"); # List and show the probable same person(s) $toggler = FALSE; $sTemp = ''; while ($dup = $duperson->FetchRow()) { if ($toggler) { $sRowClass = 'wardlistrow2'; } else { $sRowClass = 'wardlistrow1'; } $toggler = !$toggler; $sTemp = $sTemp . "\n" . ' <tr class="' . $sRowClass . '"> <td>' . $dup['pid'] . '</td> <td>' . $dup['name_last'] . '</td> <td>' . $dup['name_first'] . '</td> <td>' . formatDate2Local($dup['date_birth'], $date_format) . '</td> <td>'; switch ($dup['sex']) { case 'f': $sTemp = $sTemp . '<img ' . $img_female . '>'; break; case 'm': $sTemp = $sTemp . '<img ' . $img_male . '>'; break; default: $sTemp = $sTemp . ' '; } $sTemp = $sTemp . ' </td> <td>:: <a href="person_reg_showdetail.php' . URL_APPEND . '&pid=' . $dup['pid'] . '&from=$from&newdata=1&target=entry" target="_blank">' . $LDShowDetails . '</a> :: <a href="patient_register.php' . URL_APPEND . '&pid=' . $dup['pid'] . '&update=1">' . $LDUpdate . '</a> </td> </tr>'; } $this->smarty->assign('sDupDataRows', $sTemp); } if ($pid) { $this->smarty->assign('LDRegistryNr', $LDRegistryNr); } $this->smarty->assign('pid', $pid); $this->smarty->assign('img_source', $img_source); $this->smarty->assign('LDPhoto', $LDPhoto); if (isset($photo_filename)) { $pfile = $photo_filename; } else { $pfile = ''; } $this->smarty->assign('sFileBrowserInput', '<input name="photo_filename" type="file" size="15" onChange="showpic(this)" value="' . $pfile . '">'); # iRowSpanCount counts the rows on the left of the photo image. Begin with 5 because there are 5 static rows. $iRowSpanCount = 5; $this->smarty->assign('LDRegDate', $LDRegDate); $this->smarty->assign('sRegDate', formatDate2Local($date_reg, $date_format) . '<input name="date_reg" type="hidden" value="' . $date_reg . '">'); //$iRowSpanCount++; $this->smarty->assign('LDRegTime', $LDRegTime); $this->smarty->assign('sRegTime', convertTimeToLocal(formatDate2Local($date_reg, $date_format, 0, 1))); // Made hideable as suggested by Kurt brauchli if (!$GLOBAL_CONFIG['person_title_hide']) { $this->smarty->assign('sPersonTitle', $this->createTR($errortitle, 'title', $LDTitle, $title, '', 14)); $iRowSpanCount++; } $this->smarty->assign('sNameLast', $this->createTR($errornamelast, 'name_last', $LDLastName, $name_last, '', 35, TRUE)); //$iRowSpanCount++; $this->smarty->assign('sNameFirst', $this->createTR($errornamefirst, 'name_first', $LDFirstName, $name_first, '', 35, TRUE)); //$iRowSpanCount++; /* Begin SalvoRossitto 26/11/2007 */ if ($errorrelative) { $this->smarty->assign('LDRelative', "<font color=red>{$LDRelative}</font>"); } else { $this->smarty->assign('LDRelative', "{$LDRelative}"); } $this->smarty->assign('sRelativeNameLast', $this->createTR($errorrelativenamelast, 'relative_name_last', $LDLastName, $relative_name_last, 2, 35, FALSE)); $this->smarty->assign('sRelativeNameFirst', $this->createTR($errorrelativenamefirst, 'relative_name_first', $LDFirstName, $relative_name_first, 2, 35, FALSE)); $this->smarty->assign('sRelativePhone', $this->createTR($errorrelativephone, 'relative_phone', $LDPhone, $relative_phone, 2, 35, FALSE)); /* Begin SalvoRossitto 26/11/2007 */ if (!$GLOBAL_CONFIG['person_name_2_hide']) { $this->smarty->assign('sName2', $this->createTR($errorname2, 'name_2', $LDName2, $name_2)); $iRowSpanCount++; } if (!$GLOBAL_CONFIG['person_name_3_hide']) { $this->smarty->assign('sName3', $this->createTR($errorname3, 'name_3', $LDName3, $name_3)); $iRowSpanCount++; } if (!$GLOBAL_CONFIG['person_name_middle_hide']) { $this->smarty->assign('sNameMiddle', $this->createTR($errornamemid, 'name_middle', $LDNameMid, $name_middle)); $iRowSpanCount++; } if (!$GLOBAL_CONFIG['person_name_maiden_hide']) { $this->smarty->assign('sNameMaiden', $this->createTR($errornamemaiden, 'name_maiden', $LDNameMaiden, $name_maiden)); $iRowSpanCount++; } if (!$GLOBAL_CONFIG['person_name_others_hide']) { $this->smarty->assign('sNameOthers', $this->createTR($errornameothers, 'name_others', $LDNameOthers, $name_others)); $iRowSpanCount++; } # Set the rowspan value for the photo image <td> $this->smarty->assign('sPicTdRowSpan', "rowspan={$iRowSpanCount}"); if ($errordatebirth) { $this->smarty->assign('LDBday', "<font color=red>{$LDBday}</font>"); } else { $this->smarty->assign('LDBday', "<font color=red></font> {$LDBday}"); } //gjergji : new calendar /* if($date_birth){ if($mode=='save'||$error||$error_person_exists) $sBdayBuffer = $date_birth; else $sBdayBuffer = formatDate2Local($date_birth,$date_format); }*/ # Uncomment the following when the current date must be inserted # automatically at the start of each document /*else{ $sBdayBuffer = formatDate2Local(date('Y-m-d'),$date_format); }*/ //gjergji : new calendar $this->smarty->assign('sBdayInput', $calendar->show_calendar($calendar, $date_format, 'date_birth', $date_birth)); //end gjergji if ($errorsex) { $this->smarty->assign('LDSex', "<font color=#ff0000>{$LDSex}</font>:"); } else { $this->smarty->assign('LDSex', "<font color=#ff0000></font> {$LDSex}"); } $sSexMBuffer = '<input name="sex" type="radio" value="m" '; if ($sex == "m") { $sSexMBuffer .= ' checked>'; } else { $sSexMBuffer .= '>'; } $this->smarty->assign('sSexM', $sSexMBuffer); $this->smarty->assign('LDMale', $LDMale); $sSexFBuffer = '<input name="sex" type="radio" value="f" '; if ($sex == "f") { $sSexFBuffer .= 'checked>'; } else { $sSexFBuffer .= '>'; } $this->smarty->assign('sSexF', $sSexFBuffer); $this->smarty->assign('LDFemale', $LDFemale); # But patch 2004-03-10 # Clean blood group $blood_group = trim($blood_group); // Made hideable as suggested by Kurt Brauchli if (!$GLOBAL_CONFIG['person_bloodgroup_hide']) { $this->smarty->assign('LDBloodGroup', $LDBloodGroup); $sBGBuffer = ' <input name="blood_group" type="radio" value="A" '; if ($blood_group == 'A') { $sBGBuffer .= 'checked'; } $sBGBuffer .= '>'; $this->smarty->assign('sBGAInput', $sBGBuffer); $this->smarty->assign('LDA', $LDA); $sBGBuffer = ' <input name="blood_group" type="radio" value="B" '; if ($blood_group == 'B') { $sBGBuffer .= 'checked'; } $sBGBuffer .= '>'; $this->smarty->assign('sBGBInput', $sBGBuffer); $this->smarty->assign('LDB', $LDB); $sBGBuffer = ' <input name="blood_group" type="radio" value="AB" '; if ($blood_group == 'AB') { $sBGBuffer .= 'checked'; } $sBGBuffer .= '>'; $this->smarty->assign('sBGABInput', $sBGBuffer); $this->smarty->assign('LDAB', $LDAB); $sBGBuffer = ' <input name="blood_group" type="radio" value="O" '; if ($blood_group == 'O') { $sBGBuffer .= 'checked'; } $sBGBuffer .= '>'; $this->smarty->assign('sBGOInput', $sBGBuffer); $this->smarty->assign('LDO', $LDO); } // KB: make civil status hideable if (!$GLOBAL_CONFIG['person_civilstatus_hide']) { $this->smarty->assign('LDCivilStatus', $LDCivilStatus); $sCSInput = '<input name="civil_status" type="radio" '; $sCSBuffer = $sCSInput . 'value="single" '; if ($civil_status == "single") { $sCSBuffer .= 'checked'; } $this->smarty->assign('sCSSingleInput', $sCSBuffer . '>'); $sCSBuffer = $sCSInput . 'value="married" '; if ($civil_status == "married") { $sCSBuffer .= 'checked'; } $this->smarty->assign('sCSMarriedInput', $sCSBuffer . '>'); $sCSBuffer = $sCSInput . 'value="divorced" '; if ($civil_status == "divorced") { $sCSBuffer .= 'checked'; } $this->smarty->assign('sCSDivorcedInput', $sCSBuffer . '>'); $sCSBuffer = $sCSInput . 'value="widowed" '; if ($civil_status == "widowed") { $sCSBuffer .= 'checked'; } $this->smarty->assign('sCSWidowedInput', $sCSBuffer . '>'); $sCSBuffer = $sCSInput . 'value="separated" '; if ($civil_status == "separated") { $sCSBuffer .= 'checked'; } $this->smarty->assign('sCSSeparatedInput', $sCSBuffer . '>'); $this->smarty->assign('LDSingle', $LDSingle); $this->smarty->assign('LDMarried', $LDMarried); $this->smarty->assign('LDDivorced', $LDDivorced); $this->smarty->assign('LDWidowed', $LDWidowed); $this->smarty->assign('LDSeparated', $LDSeparated); } if ($erroraddress) { $this->smarty->assign('LDAddress', "<font color=red>{$LDAddress}</font>"); } else { $this->smarty->assign('LDAddress', "{$LDAddress}"); } if ($errorstreet) { $this->smarty->assign('LDStreet', "<font color=red><font color=#ff0000></font> {$LDStreet}</font>"); } else { $this->smarty->assign('LDStreet', "<font color=#ff0000></font> {$LDStreet}"); } $this->smarty->assign('sStreetInput', '<input name="addr_str" type="text" size="35" value="' . $addr_str . '">'); if ($errorstreetnr) { $this->smarty->assign('LDStreetNr', "<font color=red><font color=#ff0000></font> {$LDStreetNr}</font>"); } else { $this->smarty->assign('LDStreetNr', "<font color=#ff0000></font> {$LDStreetNr}"); } $this->smarty->assign('sStreetNrInput', '<input name="addr_str_nr" type="text" size="10" value="' . $addr_str_nr . '">'); if ($errortown) { $this->smarty->assign('LDStreet', "<font color=red>{$LDTownCity}</font>"); } else { $this->smarty->assign('LDTownCity', "{$LDTownCity}"); } $this->smarty->assign('sTownCityInput', '<input name="addr_citytown_name" type="text" size="35" value="' . $addr_citytown_name . '">'); $this->smarty->assign('sTownCityMiniCalendar', "<a href=\"javascript:popSearchWin('citytown','aufnahmeform.addr_citytown_nr','aufnahmeform.addr_citytown_name')\"><img " . createComIcon($root_path, 'b-write_addr.gif', '0') . "></a>"); if ($errorzip) { $this->smarty->assign('LDZipCode', "<font color=red><font color=#ff0000></font> {$LDZipCode}</font> "); } else { $this->smarty->assign('LDZipCode', "<font color=#ff0000></font> {$LDZipCode} "); } $this->smarty->assign('sZipCodeInput', '<input name="addr_zip" type="text" size="10" value="' . $addr_zip . '">'); // KB: make insurance completely hideable if (!$GLOBAL_CONFIG['person_insurance_hide']) { if ($insurance_show) { if (!$person_insurance_1_nr_hide) { $this->smarty->assign('bShowInsurance', TRUE); $this->smarty->assign('sInsuranceNr', $this->createTR($errorinsurancenr, 'insurance_nr', $LDInsuranceNr . ' 1', $insurance_nr, 2)); if ($errorinsuranceclass) { $this->smarty->assign('sErrorInsClass', "<font color=\"{$error_fontcolor}\">"); } if ($insurance_classes != false) { $sInsClassBuffer = ''; while ($result = $insurance_classes->FetchRow()) { $sInsClassBuffer .= '<input name="insurance_class_nr" type="radio" value="' . $result['class_nr'] . '" '; if ($insurance_class_nr == $result['class_nr']) { $sInsClassBuffer .= 'checked'; } $sInsClassBuffer .= '>'; $LD = $result['LD_var']; if (isset(${$LD}) && !empty(${$LD})) { $sInsClassBuffer .= ${$LD}; } else { $sInsClassBuffer .= $result['name']; } $sInsClassBuffer .= ' '; } $this->smarty->append('sInsClasses', $sInsClassBuffer); } else { $this->smarty->assign('sInsClasses', 'no insurance class'); } if ($errorinsurancecoid) { $this->smarty->assign('LDInsuranceCo', "<font color=red>{$LDInsuranceCo}</font> :"); } else { $this->smarty->assign('LDInsuranceCo', "{$LDInsuranceCo} :"); } $this->smarty->assign('sInsCoNameInput', '<input name="insurance_firm_name" type="text" size="35" value="' . $insurance_firm_name . '">'); $this->smarty->assign('sInsCoMiniCalendar', "<a href=\"javascript:popSearchWin('insurance','aufnahmeform.insurance_firm_id','aufnahmeform.insurance_firm_name')\"><img " . createComIcon($root_path, 'b-write_addr.gif', '0') . "></a>"); } } else { $this->smarty->assign('bNoInsurance', TRUE); $this->smarty->assign('LDSeveralInsurances', '<a href="#">$LDSeveralInsurances <img ' . createComIcon($root_path, 'frage.gif', '0') . '></a>'); } } if (!$GLOBAL_CONFIG['person_phone_1_nr_hide']) { $this->smarty->assign('sPhone1', $this->createTR($errorphone1, 'phone_1_nr', $LDPhone . ' 1', $phone_1_nr, 2)); } if (!$GLOBAL_CONFIG['person_phone_2_nr_hide']) { $this->smarty->assign('sPhone2', $this->createTR($errorphone2, 'phone_2_nr', $LDPhone . ' 2', $phone_2_nr, 2)); } if (!$GLOBAL_CONFIG['person_cellphone_1_nr_hide']) { $this->smarty->assign('sCellPhone1', $this->createTR($errorcell1, 'cellphone_1_nr', $LDCellPhone . ' 1', $cellphone_1_nr, 2)); } if (!$GLOBAL_CONFIG['person_cellphone_2_nr_hide']) { $this->smarty->assign('sCellPhone2', $this->createTR($errorcell2, 'cellphone_2_nr', $LDCellPhone . ' 2', $cellphone_2_nr, 2)); } if (!$GLOBAL_CONFIG['person_fax_hide']) { $this->smarty->assign('sFax', $this->createTR($errorfax, 'fax', $LDFax, $fax, 2)); } if (!$GLOBAL_CONFIG['person_email_hide']) { $this->smarty->assign('sEmail', $this->createTR($erroremail, 'email', $LDEmail, $email, 2)); } if (!$GLOBAL_CONFIG['person_citizenship_hide']) { $this->smarty->assign('sCitizenship', $this->createTR($errorcitizen, 'citizenship', $LDCitizenship, $citizenship, 2)); } if (!$GLOBAL_CONFIG['person_sss_nr_hide']) { $this->smarty->assign('sSSSNr', $this->createTR($errorsss, 'sss_nr', $LDSSSNr, $sss_nr, 2)); } if (!$GLOBAL_CONFIG['person_nat_id_nr_hide']) { $this->smarty->assign('sNatIdNr', $this->createTR($errornatid, 'nat_id_nr', $LDNatIdNr, $nat_id_nr, 2)); } if (!$GLOBAL_CONFIG['person_religion_hide']) { $this->smarty->assign('sReligion', $this->createTR($errorreligion, 'religion', $LDReligion, $religion, 2)); } if (!$GLOBAL_CONFIG['person_ethnic_orig_hide']) { /** Add by Jean-Philippe LIOT 13/05/2004 **/ $this->smarty->assign('LDEthnicOrig', $LDEthnicOrigin); $this->smarty->assign('sEthnicOrigInput', '<input name="ethnic_orig_txt" type="text" size="35" value="' . $ethnic_orig_txt . '" >'); $this->smarty->assign('sEthnicOrigMiniCalendar', "<a href=\"javascript:popSearchWin('ethnic_orig')\"><img " . createComIcon($root_path, 'b-write_addr.gif', '0') . "></a>"); } // KB: add a field for other HIS nr if (!$GLOBAL_CONFIG['person_other_his_nr_hide']) { $this->smarty->assign('bShowOtherHospNr', TRUE); $this->smarty->assign('LDOtherHospitalNr', $LDOtherHospitalNr); $other_hosp_list = $person_obj->OtherHospNrList(); $sOtherNrBuffer = ''; foreach ($other_hosp_list as $k => $v) { $sOtherNrBuffer .= "<b>" . $kb_other_his_array[$k] . ":</b> " . $v . "<br />\n"; } $this->smarty->assign('sOtherNr', $sOtherNrBuffer); $sOtherNrBuffer = ''; $sOtherNrBuffer .= "<SELECT name=\"other_his_org\">" . "<OPTION value=\"\">--</OPTION>"; foreach ($kb_other_his_array as $k => $v) { $sOtherNrBuffer .= "<OPTION value=\"{$k}\" {$check}>{$v}</OPTION>"; } $sOtherNrBuffer .= "</SELECT>\n" . " " . "{$LDNr}:<INPUT name=\"other_his_no\" size=20><br />\n"; $sOtherNrBuffer .= "({$LDSelectOtherHospital} - {$LDNoNrNoDelete})" . "<br />\n"; $sOtherNrBuffer .= "</TD></TR>\n\n"; $this->smarty->assign('sOtherNrSelect', $sOtherNrBuffer); } $this->smarty->assign('LDRegBy', $LDRegBy); if (isset($user_id) && $user_id) { $buffer = $user_id; } else { $buffer = $HTTP_SESSION_VARS['sess_user_name']; } $this->smarty->assign('sRegByInput', '<input name="user_id" type="text" value="' . $buffer . '" size="35" readonly>'); # Collect the hidden inputs ob_start(); ?> <INPUT TYPE="hidden" name="MAX_FILE_SIZE" value="1000000"> <input type="hidden" name="itemname" value="<?php echo $itemname; ?> "> <input type="hidden" name="sid" value="<?php echo $sid; ?> "> <input type="hidden" name="lang" value="<?php echo $lang; ?> "> <input type="hidden" name="linecount" value="<?php echo $linecount; ?> "> <input type="hidden" name="mode" value="save"> <input type="hidden" name="addr_citytown_nr" value="<?php echo $addr_citytown_nr; ?> "> <input type="hidden" name="insurance_item_nr" value="<?php echo $insurance_item_nr; ?> "> <input type="hidden" name="insurance_firm_id" value="<?php echo $insurance_firm_id; ?> "> <input type="hidden" name="insurance_show" value="<?php echo $insurance_show; ?> "> <input type="hidden" name="ethnic_orig" value="<?php echo $ethnic_orig; ?> "> <?php if ($update) { $this->smarty->assign('sUpdateHiddenInputs', '<input type="hidden" name="update" value=1><input type="hidden" name="pid" value="' . $pid . '">'); } $sTemp = ob_get_contents(); ob_end_clean(); $this->smarty->assign('sHiddenInputs', $sTemp); $this->smarty->assign('pbSubmit', '<input type="image" ' . createLDImgSrc($root_path, 'savedisc.gif', '0') . ' alt="' . $LDSaveData . '" align="absmiddle">'); $this->smarty->assign('pbReset', '<a href="javascript:document.aufnahmeform.reset()"><img ' . createLDImgSrc($root_path, 'reset.gif', '0') . ' alt="' . $LDResetData . '" align="absmiddle"></a>'); if ($error || $error_person_exists) { $this->smarty->assign('pbForceSave', '<input type="button" value="' . $LDForceSave . '" onClick="forceSave()">'); } if (!$newdata) { ob_start(); ?> <form action=<?php echo $thisfile; ?> method=post> <input type=hidden name=sid value=<?php echo $sid; ?> > <input type=hidden name=patnum value=""> <input type=hidden name="lang" value="<?php echo $lang; ?> "> <input type=hidden name="date_format" value="<?php echo $date_format; ?> "> <input type=submit value="<?php echo $LDNewForm; ?> " > </form> <?php $sTemp = ob_get_contents(); ob_end_clean(); $this->smarty->assign('sNewDataForm', $sTemp); } # Set the form template as form $this->smarty->assign('bSetAsForm', TRUE); if ($this->bReturnOnly) { ob_start(); $this->smarty->display('registration_admission/reg_form.tpl'); $sTemp = ob_get_contents(); ob_end_clean(); return $sTemp; } else { # show Template $this->smarty->display('registration_admission/reg_form.tpl'); } }
case 1:$sdt='%'.implode('.%',array_reverse(explode('.',$keyword)));break; case 2:$sdt='%'.implode('.%',array_reverse(explode('.',$keyword)));break; default:$sdt='%$keyword'; } */ /* $sdt=formatDate2Std($keyword,$date_format); if(!empty($sdt)) $sdt='%'.$sdt; */ } elseif (strlen($keyword) > 2) { $sdt = $keyword; } else { $sdt = "________{$keyword}"; // 8 x _ to fill yyyy.mm. } $sdt = formatDate2Std($keyword, $date_format); if (!empty($sdt)) { $sdt = '%' . $sdt; } } else { $sdt = ''; } $such_dept ? $sdp = $keyword : ($sdp = ''); $such_prio ? $spr = $keyword : ($spr = ''); $sql = "SELECT o.* FROM {$dbtable} AS o LEFT JOIN care_department AS d ON o.dept_nr=d.nr\n\t\t\t\t\t\t\t\tWHERE ("; if ($sdt) { $sql = $sql . "o.order_date = '{$sdt}'\n\t\t\t\t\t\t\t\t\t\t\tOR"; } $sql = $sql . " o.dept_nr = " . (int) $sdp . "\n\t\t\t\t\t\t\t\t\t\t\tOR ((d.name_formal = '{$sdp}' OR d.id = '{$sdp}') AND d.nr=o.dept_nr)\n\t\t\t\t\t\t\t\t\t\t\tOR o.priority = '{$spr}' )\n\t\t\t\t\t\t\t\t\t\t\tAND o.status='archive'\n\t\t\t\t\t\t\t\t\t\t\tORDER BY o.order_date DESC, o.order_time DESC"; //LIMIT $ofset, $nrows"; //echo $sql;
# Create image object $img_obj = new Image(); # Clean the content $newstitle = stripslashes($newstitle); $preface = stripslashes($preface); $newsbody = stripslashes($newsbody); if (!isset($category)) { $category = 1; } # Clean the title require $root_path . 'include/inc_newstitle_clean.php'; # Check if the uploaded image file is valid $is_pic = @$img_obj->isValidUploadedImage($_FILES['pic']); # Retrieve the filename extension $picext = @$img_obj->UploadedImageMimeType(); $publishdate = @formatDate2Std($publishdate, $date_format); /* Prepare data set for saving */ $news = array('category' => $category, 'title' => $newstitle, 'preface' => $preface, 'body' => $newsbody, 'pic_mime' => $picext, 'art_num' => $artnum, 'author' => $author, 'publish_date' => $publishdate); require_once $root_path . 'include/care_api_classes/class_news.php'; $newsobj = new News(); if ($news_nr = $newsobj->saveNews($dept_nr, $news)) { if ($is_pic) { # Get the news foto path from global config require_once $root_path . 'include/care_api_classes/class_globalconfig.php'; $globobj = new GlobalConfig($GLOBALCONFIG); $globobj->getConfig('news_fotos_path'); if ($GLOBALCONFIG['news_fotos_path'] == '') { $news_fotos_path = $root_path . 'fotos/news/'; } else { $news_fotos_path = $root_path . $GLOBALCONFIG['news_fotos_path']; }
case 'save': $sql = "INSERT INTO care_test_findings_" . $db_request_table . " \n (\n\t\t\t\t\t\t\t\t\t\t batch_nr, encounter_nr, room_nr, dept_nr, \n\t\t\t\t\t\t\t\t\t\t notes, findings_init, findings_current, \n\t\t\t\t\t\t\t\t\t\t findings_final, entry_nr, rec_date, \n\t\t\t\t\t\t\t\t\t\t type_general, resist_anaerob, \n\t\t\t\t\t\t\t\t\t\t resist_aerob, findings, doctor_id, findings_date, \n\t\t\t\t\t\t\t\t\t\t findings_time, status, history,\n\t\t\t\t\t\t\t\t\t\t create_id,\n\t\t\t\t\t\t\t\t\t\t create_time\n\t\t\t\t\t\t\t\t\t\t )\n\t\t\t\t\t\t\t\t\t\t VALUES \n\t\t\t\t\t\t\t\t\t\t (\n\t\t\t\t\t\t\t\t\t\t '" . $batch_nr . "','" . $pn . "','" . $room_nr . "','" . $dept_nr . "',\n\t\t\t\t\t\t\t\t\t\t '" . htmlspecialchars($notes) . "','" . $findings_init . "','" . $findings_current . "',\n\t\t\t\t\t\t\t\t\t\t '" . $findings_final . "','" . $entry_nr . "','" . formatDate2Std($rec_date, $date_format) . "',\n\t\t\t\t\t\t\t\t\t\t '" . $type_general . "','" . $resist_anaerob . "',\n\t\t\t\t\t\t\t\t\t\t '" . $resist_aerob . "','" . $findings . "','" . $doctor_id . "','" . date('Y-m-d') . "',\n\t\t\t\t\t\t\t\t\t\t '" . date('H:i') . "','initial','Create: " . date('Y-m.d H:i:s') . " = " . $_SESSION['sess_user_name'] . "\n',\n\t\t\t\t\t\t\t\t\t\t '" . $_SESSION['sess_user_name'] . "',\n\t\t\t\t\t\t\t\t\t\t '" . date('YmdHis') . "'\n\t\t\t\t\t\t\t\t\t\t )"; if ($ergebnis = $enc_obj->Transact($sql)) { signalNewDiagnosticsReportEvent(); //echo $sql; header("location:{$thisfile}?sid={$sid}&lang={$lang}&edit={$edit}&saved=insert&mode=edit_findings&pn={$pn}&station={$station}&user_origin={$user_origin}&status={$status}&target={$target}&subtarget={$subtarget}&noresize={$noresize}&batch_nr={$batch_nr}&entry_date={$entry_date}"); exit; } else { echo "<p>{$sql}<p>{$LDDbNoSave}"; $mode = ""; } break; // end of case 'save' // end of case 'save' case 'update': $sql = "UPDATE care_test_findings_" . $db_request_table . " SET \n notes = '" . htmlspecialchars($notes) . "', findings_init = '" . $findings_init . "', findings_current = '" . $findings_current . "', \n\t\t\t\t\t\t\t\t\t\t findings_final = '" . $findings_final . "', entry_nr = '" . $entry_nr . "', rec_date = '" . formatDate2Std($rec_date, $date_format) . "', \n\t\t\t\t\t\t\t\t\t\t type_general = '" . $type_general . "', resist_anaerob ='" . $resist_anaerob . "', resist_aerob = '" . $resist_aerob . "', \n\t\t\t\t\t\t\t\t\t\t findings = '" . $findings . "', doctor_id = '', findings_date = '" . date('Y-m-d') . "', \n\t\t\t\t\t\t\t\t\t\t findings_time = '" . date('H:i') . "', \n\t\t\t\t\t\t\t\t\t\t history =" . $enc_obj->ConcatHistory("Update: " . date('Y-m-d H:i:s') . " = " . $_SESSION['sess_user_name'] . "\n") . ",\n\t\t\t\t\t\t\t\t\t\t modify_id = '" . $_SESSION['sess_user_name'] . "',\n\t\t\t\t\t\t\t\t\t\t modify_time='" . date('YmdHis') . "'\n\t\t\t\t\t\t\t\t\t\t WHERE batch_nr = '{$batch_nr}'"; if ($ergebnis = $enc_obj->Transact($sql)) { signalNewDiagnosticsReportEvent(); //echo $sql; header("location:{$thisfile}?sid={$sid}&lang={$lang}&edit={$edit}&saved=insert&mode=edit_findings&pn={$pn}&station={$station}&user_origin={$user_origin}&status={$status}&target={$target}&subtarget={$subtarget}&noresize={$noresize}&batch_nr={$batch_nr}&entry_date={$entry_date}"); exit; } else { echo "<p>{$sql}<p>{$LDDbNoSave}"; $mode = ""; } break; // end of case 'save' // end of case 'save' case 'done': $sql = "UPDATE care_test_findings_" . $db_request_table . " SET \n\t\t\t\t\t\t\t\t\t\t status='done', \n\t\t\t\t\t\t\t\t\t\t history =" . $enc_obj->ConcatHistory("Done: " . date('Y-m-d H:i:s') . " = " . $_SESSION['sess_user_name'] . "\n") . ",\n\t\t\t\t\t\t\t\t\t\t modify_id = '" . $_SESSION['sess_user_name'] . "',\n\t\t\t\t\t\t\t\t\t\t modify_time='" . date('YmdHis') . "'\n\t\t\t\t\t\t\t\t\t\t WHERE batch_nr = '" . $batch_nr . "'"; if ($ergebnis = $enc_obj->Transact($sql)) {
} include_once $root_path . 'include/care_api_classes/class_globalconfig.php'; $glob_obj = new GlobalConfig($GLOBAL_CONFIG); $glob_obj->getConfig('patient_%'); $sqlselect = "SELECT enc.encounter_nr,enc.encounter_class_nr, enc.is_discharged, reg.name_last, reg.name_first, reg.date_birth, reg.addr_zip, reg.sex"; $sqlfrom = "\tFROM care_encounter as enc,care_person as reg "; $sqlwhere2 = " AND enc.pid=reg.pid \n\t\t\t\t\t\tAND enc.is_discharged NOT IN ('',0)\n\t\t\t\t\t\tAND enc.status IN ('','normal')"; $orderby = " ORDER BY {$oprep}.{$oitem} {$odir}"; if (is_numeric($suchwort)) { $suchwort = (int) $suchwort; $numeric = 1; $sqlwhere1 = " WHERE enc.encounter_nr='{$suchwort}' "; } else { $sqlwhere1 = "WHERE (\n\t\t\t \treg.name_last {$sql_LIKE} '" . addslashes($suchwort) . "%' \n\t\t\t\t\t\t\tOR reg.name_first {$sql_LIKE} '" . addslashes($suchwort) . "%'"; # Try converting the keyword to a proper date format $DOB = formatDate2Std($suchwort, $date_format); if (!empty($DOB) && $DOB != '--') { $sqlwhere1 .= "\tOR reg.date_birth {$sql_LIKE} '{$DOB}' "; } $sqlwhere1 .= ")"; } # Compose final sql query $sql = $sqlselect . $sqlfrom . $sqlwhere1 . $sqlwhere2 . $orderby; if ($ergebnis = $db->SelectLimit($sql, $pagen->MaxCount(), $pgx)) { if (defined('SHOW_SQLQUERY') && SHOW_SQLQUERY) { echo $sql; } if ($linecount = $ergebnis->RecordCount()) { if ($linecount == 1 && $numeric && (!defined('SHOW_SQLQUERY') || !SHOW_SQLQUERY)) { $zeile = $ergebnis->FetchRow(); header('location:patientbill.php' . URL_REDIRECT_APPEND . '&patnum=' . $zeile['encounter_nr'] . '&update=1&mode=' . $mode . '&full_en=' . $zeile['encounter_nr']);
// Load the visual signalling functions include_once $root_path . 'include/inc_visual_signalling_fx.php'; // Set the visual signal setEventSignalColor($pn, SIGNAL_COLOR_DIAGNOSTICS_REQUEST); //echo $sql; header("location:" . $root_path . "modules/laboratory/labor_test_request_aftersave.php?sid=" . $sid . "&lang=" . $lang . "&edit=" . $edit . "&saved=insert&pn=" . $pn . "&station=" . $station . "&user_origin=" . $user_origin . "&status=" . $status . "&target=" . $target . "&noresize=" . $noresize . "&batch_nr=" . $batch_nr); exit; } else { echo "<p>{$sql}<p>{$LDDbNoSave}"; $mode = ""; } break; // end of case 'save' // end of case 'save' case 'update': $sql = "UPDATE care_test_request_" . $db_request_table . " SET \n\t\t\t\t\t\t\t\t\t\t batch_nr='" . $batch_nr . "', \n\t\t\t\t\t\t\t\t\t\t encounter_nr='" . $pn . "', \n\t\t\t\t\t\t\t\t\t\t dept_nr='" . $dept_nr . "', \n\t\t\t\t\t\t\t\t\t\t blood_group='" . $blood_group . "', \n\t\t\t\t\t\t\t\t\t\t rh_factor='" . $rh_factor . "', \n\t\t\t\t\t\t\t\t\t\t kell='" . $kell . "', \n\t\t\t\t\t\t\t\t\t\t date_protoc_nr='" . htmlspecialchars($date_protoc_nr) . "', \n\t\t\t\t\t\t\t\t\t\t pure_blood='" . $pure_blood . "', \n\t\t\t\t\t\t\t\t\t\t red_blood='" . $red_blood . "', \n\t\t\t\t\t\t\t\t\t\t leukoless_blood='" . $leukoless_blood . "', \n\t\t\t\t\t\t\t\t\t\t washed_blood='" . $washed_blood . "', \n\t\t\t\t\t\t\t\t\t\t prp_blood='" . $prp_blood . "', \n\t\t\t\t\t\t\t\t\t\t thrombo_con='" . $thrombo_con . "', \n\t\t\t\t\t\t\t\t\t\t ffp_plasma='" . $ffp_plasma . "', \n\t\t\t\t\t\t\t\t\t\t transfusion_dev='" . $transfusion_dev . "', \n\t\t\t\t\t\t\t\t\t\t match_sample='" . $match_sample . "', \n\t\t\t\t\t\t\t\t\t\t transfusion_date='" . formatDate2Std($transfusion_date, $date_format) . "', \n\t\t\t\t\t\t\t\t\t\t diagnosis='" . htmlspecialchars($diagnosis) . "', \n\t\t\t\t\t\t\t\t\t\t notes='" . htmlspecialchars($notes) . "', \n\t\t\t\t\t\t\t\t\t\t send_date='" . formatDate2Std($send_date, $date_format) . "', \n\t\t\t\t\t\t\t\t\t\t doctor='" . $doctor . "', \n\t\t\t\t\t\t\t\t\t\t phone_nr='" . $phone_nr . "', \n\t\t\t\t\t\t\t\t\t\t status='" . $status . "', \n\t\t\t\t\t\t\t\t\t\t history=" . $enc_obj->ConcatHistory("Update: " . date('Y-m-d H:i:s') . " = " . $_SESSION['sess_user_name'] . "\n") . ",\n\t\t\t\t\t\t\t\t\t\t modify_id='" . $_COOKIE[$local_user . $sid] . "',\n\t\t\t\t\t\t\t\t\t\t modify_time='" . date('YmdHis') . "'\n WHERE batch_nr = '" . $batch_nr . "'"; if ($ergebnis = $enc_obj->Transact($sql)) { // Load the visual signalling functions include_once $root_path . 'include/inc_visual_signalling_fx.php'; // Set the visual signal setEventSignalColor($pn, SIGNAL_COLOR_DIAGNOSTICS_REQUEST); //echo $sql; header("location:" . $root_path . "modules/laboratory/labor_test_request_aftersave.php?sid=" . $sid . "&lang=" . $lang . "&edit=" . $edit . "&saved=update&pn=" . $pn . "&station=" . $station . "&user_origin=" . $user_origin . "&status=" . $status . "&target=" . $target . "&batch_nr=" . $batch_nr . "&noresize=" . $noresize); exit; } else { echo "<p>{$sql}<p>{$LDDbNoSave}"; $mode = ""; } break; // end of case 'save' /* If mode is edit, get the stored test request when its status is either "pending" or "draft"
$full_en = $pn; if ($enc_obj->is_loaded) { $result =& $enc_obj->encounter; } } else { $edit = 0; $mode = ''; $pn = ''; } } if (!isset($mode)) { $mode = ''; } switch ($mode) { case 'save': $sql = "INSERT INTO care_test_request_" . $db_request_table . " \n\t\t\t\t\t\t\t\t (\n\t\t\t\t\t\t\t\t\t\t batch_nr, encounter_nr, dept_nr, quick_cut, \n\t\t\t\t\t\t\t\t\t\t qc_phone, quick_diagnosis, qd_phone, material_type, \n\t\t\t\t\t\t\t\t\t\t material_desc, localization, clinical_note, extra_note, \n\t\t\t\t\t\t\t\t\t\t repeat_note, gyn_last_period, gyn_period_type, \n\t\t\t\t\t\t\t\t\t\t gyn_gravida, gyn_menopause_since, \n\t\t\t\t\t\t\t\t\t\t gyn_hysterectomy, gyn_contraceptive, \n\t\t\t\t\t\t\t\t\t\t gyn_iud, gyn_hormone_therapy, \n\t\t\t\t\t\t\t\t\t\t doctor_sign, op_date, send_date,\n\t\t\t\t\t\t\t\t\t\t status, history, create_id, create_time)\n\t\t\t\t\t\t\t\t\t\t VALUES \n\t\t\t\t\t\t\t\t\t\t (\n\t\t\t\t\t\t\t\t\t\t '" . $batch_nr . "','" . $pn . "','" . $dept_nr . "', '" . $quick_cut . "', \n\t\t\t\t\t\t\t\t\t\t '" . $qc_phone . "', '" . $quick_diagnosis . "', '" . $qd_phone . "', '" . $material_type . "', \n\t\t\t\t\t\t\t\t\t\t '" . addslashes(htmlspecialchars($material_desc)) . "', '" . addslashes(htmlspecialchars($localization)) . "', '" . addslashes(htmlspecialchars($clinical_note)) . "', '" . addslashes(htmlspecialchars($extra_note)) . "', \n\t\t\t\t\t\t\t\t\t\t '" . addslashes(htmlspecialchars($repeat_note)) . "', '" . addslashes($gyn_last_period) . "', '" . addslashes($gyn_period_type) . "', \n\t\t\t\t\t\t\t\t\t\t '" . addslashes($gyn_gravida) . "', '" . addslashes($gyn_menopause_since) . "', \n\t\t\t\t\t\t\t\t\t\t '" . addslashes($gyn_hysterectomy) . "', '" . addslashes($gyn_contraceptive) . "', \n\t\t\t\t\t\t\t\t\t\t '" . addslashes($gyn_iud) . "', '" . addslashes($gyn_hormone_therapy) . "', \n\t\t\t\t\t\t\t\t\t\t '" . addslashes($doctor_sign) . "', '" . formatDate2Std($op_date, $date_format) . "', '" . date('Y-m-d H:i:s') . "',\n\t\t\t\t\t\t\t\t\t\t '" . $status . "',\n\t\t\t\t\t\t\t\t\t\t 'Create: " . date('Y-m-d H:i:s') . " = " . $_SESSION['sess_user_name'] . "\n',\n\t\t\t\t\t\t\t\t\t\t '" . $_SESSION['sess_user_name'] . "', '" . date('YmdHis') . "'\n\t\t\t\t\t\t\t\t\t\t )"; if ($ergebnis = $enc_obj->Transact($sql)) { //echo $sql; // Load the visual signalling functions include_once $root_path . 'include/inc_visual_signalling_fx.php'; // Set the visual signal setEventSignalColor($pn, SIGNAL_COLOR_DIAGNOSTICS_REQUEST); header("location:" . $root_path . "modules/laboratory/labor_test_request_aftersave.php" . URL_REDIRECT_APPEND . "&edit={$edit}&saved=insert&pn={$pn}&station={$station}&user_origin={$user_origin}&status={$status}&target={$target}&noresize={$noresize}&batch_nr={$batch_nr}"); exit; } else { echo "<p>{$sql}<p>{$LDDbNoSave}"; $mode = ""; } break; // end of case 'save' // end of case 'save'
/* Set script mode to no edit*/ $formtitle = $LDRadiology; //$db_request_table=$subtarget; $db_request_table = 'radio'; //$db->debug=1; /* Here begins the real work */ require_once $root_path . 'include/inc_date_format_functions.php'; if (!isset($mode)) { $mode = ''; } switch ($mode) { case 'update': # Create a core object include_once $root_path . 'include/inc_front_chain_lang.php'; $core =& new Core(); $sql = "UPDATE care_test_request_" . $db_request_table . " SET\r\n\t\t\t\t\t\t\t\t\t\t xray_nr='" . $xray_nr . "',\r\n\t\t\t\t\t\t\t\t\t\t r_cm_2='" . $r_cm_2 . "',\r\n\t\t\t\t\t\t\t\t\t\t mtr='" . $mtr . "',\r\n xray_date='" . formatDate2Std($xray_date, $date_format) . "',\r\n\t\t\t\t\t\t\t\t\t\t results='" . addslashes(htmlspecialchars($results)) . "',\r\n results_date='" . formatDate2Std($results_date, $date_format) . "',\r\n\t\t\t\t\t\t\t\t\t\t results_doctor='" . htmlspecialchars($results_doctor) . "',\r\n\t\t\t\t\t\t\t\t\t\t status='received',\r\n\t\t\t\t\t\t\t\t\t\t history=" . $core->ConcatHistory("Update " . date('Y-m-d H:i:s') . " " . $_SESSION['sess_user_name'] . "\n") . ",\r\n\t\t\t\t\t\t\t\t\t\t modify_id = '" . $_SESSION['sess_user_name'] . "',\r\n\t\t\t\t\t\t\t\t\t\t modify_time='" . date('YmdHis') . "'\r\n\t\t\t\t\tWHERE batch_nr = '" . $batch_nr . "'"; if ($ergebnis = $core->Transact($sql)) { //echo $sql; header("location:" . $thisfile . "?sid={$sid}&lang={$lang}&edit={$edit}&saved=update&pn={$pn}&station={$station}&user_origin={$user_origin}&status={$status}&target={$target}&subtarget={$subtarget}&batch_nr={$batch_nr}&noresize={$noresize}"); exit; } else { echo "<p>{$sql}<p>{$LDDbNoSave}"; $mode = ''; } break; // end of case 'save' default: $mode = ''; } // end of switch($mode) /* Get the pending test requests */
/** * Displays the GUI input form */ function display() { global $db, $sid, $lang, $root_path, $pid, $insurance_show, $user_id, $mode, $dbtype, $no_tribe, $no_region, $update, $photo_filename; #, $_FILES $_POST, $_SESSION; extract($_POST); require_once $root_path . 'include/care_api_classes/class_advanced_search.php'; # Load the language tables $lang_tables = $this->langfiles; include $root_path . 'include/inc_load_lang_tables.php'; include_once $root_path . 'include/inc_date_format_functions.php'; include_once $root_path . 'include/care_api_classes/class_insurance.php'; include_once $root_path . 'include/care_api_classes/class_person.php'; $db->debug = FALSE; # Create the new person object $person_obj =& new Person($pid); # Create a new person insurance object $pinsure_obj =& new PersonInsurance($pid); if (!isset($insurance_show)) { $insurance_show = TRUE; } $newdata = 1; $error = 0; $dbtable = 'care_person'; if (!isset($photo_filename) || empty($photo_filename)) { $photo_filename = 'nopic'; } # Assume first that image is not uploaded $valid_image = FALSE; //* Get the global config for person's registration form*/ include_once $root_path . 'include/care_api_classes/class_globalconfig.php'; $glob_obj = new GlobalConfig($GLOBAL_CONFIG); $glob_obj->getConfig('person_%'); extract($GLOBAL_CONFIG); # Check whether config foto path exists, else use default path $photo_path = is_dir($root_path . $GLOBAL_CONFIG['person_foto_path']) ? $GLOBAL_CONFIG['person_foto_path'] : $this->default_photo_path; if ($mode == 'save' || $mode == 'forcesave') { $search_obj =& new advanced_search(); if (is_array($result_array = $search_obj->get_equal_words("tribe_name", "care_tz_tribes", false, 65, 'tribe_id')) && $name_maiden && !$no_tribe) { $tribe_array = $result_array; } else { $tribe_array = $result_array; } if (is_array($result_array = $search_obj->get_equal_words("name", "care_tz_religion", false, 65, 'nr')) && $religion && !$person_religion_hide) { $religion_array = $result_array; } else { $religion_array = $result_array; } /* if (is_array($result_array=$search_obj->get_equal_words("region_name", "care_tz_region", false, 65, 'region_id')) && $email && !$person_email_hide ) { $region_array=$result_array; } else { $region_array=$result_array; } if (is_array($result_array=$search_obj->get_equal_words1("district_name", "care_tz_district", false, 65, 'district_id',$email)) && $sss_nr ) { $district_array=$result_array; } else { $district_array=$result_array; } if (is_array($result_array=$search_obj->get_equal_words1("ward_name", "care_tz_ward", false, 65, 'ward_id',$sss_nr)) && $nat_id_nr ) { $ward_array=$result_array; } else { $ward_array=$result_array; } */ # If saving is not forced, validate important elements if ($mode != 'forcesave') { # clean and check input data variables if (trim($encoder) == '') { $encoder = $aufnahme_user; } if (trim($name_last) == '') { $errornamelast = 1; $error++; } //if (trim($selian_pid)=='' || !is_numeric($selian_pid) || (!$update && $person_obj->SelianFileExists($selian_pid))) { $errorfilenr=1; $error++;} if ($person_obj->IsHospitalFileNrMandatory()) { if (trim($selian_pid) == '' || !$update && $person_obj->SelianFileExists($selian_pid)) { $errorfilenr = 1; $error++; } } if (trim($name_first) == '') { $errornamefirst = 1; $error++; } if (trim($date_birth) == '') { $errordatebirth = 1; $error++; } if (mktime(0, 0, 0, substr($date_birth, 3, 2), substr($date_birth, 0, 2), substr($date_birth, 6, 4)) > time()) { $errordatebirth = 1; $error++; } //if (is_array($tribe_array) && !$no_tribe) {$errormaiden=1; $error++;} //if (is_array($town_array)) {$errortown=1; $error++;} //if (!$citizenship) { $errortown=1; $error++;} if ($sex == '') { $errorsex = 1; $error++; } } # If the validation produced no error, save the data if (!$error) { # Save the old filename for testing $old_fn = $photo_filename; # Create image object include_once $root_path . 'include/care_api_classes/class_image.php'; $img_obj =& new Image(); # Check the uploaded image file if exists and valid if ($img_obj->isValidUploadedImage($_FILES['photo_filename'])) { $valid_image = TRUE; # Get the file extension $picext = $img_obj->UploadedImageMimeType(); } //addr_citytown_nr='$addr_citytown_nr', if ($update) { //echo formatDate2STD($geburtsdatum,$date_format); $sql = "UPDATE {$dbtable} SET\n\t\t\t\t\t\t\t title='{$title}',\n\t\t\t\t\t\t\t selian_pid='{$selian_pid}',\n\t\t\t\t\t\t\t name_last='{$name_last}',\n\t\t\t\t\t\t\t name_first='{$name_first}',\n\t\t\t\t\t\t\t name_2='{$name_2}',\n\t\t\t\t\t\t\t name_3='{$name_3}',\n\t\t\t\t\t\t\t name_middle='{$name_middle}',\n\t\t\t\t\t\t\t name_maiden='{$name_maiden}',\n\t\t\t\t\t\t\t name_others='{$name_others}',\n\t\t\t\t\t\t\t date_birth='" . formatDate2STD($date_birth, $date_format) . "',\n\t\t\t\t\t\t\t blood_group='" . trim($blood_group) . "',\n\t\t\t\t\t\t\t rh='" . trim($rh) . "',\n\t\t\t\t\t\t\t sex='{$sex}',\n\t\t\t\t\t\t\t addr_str='{$addr_str}',\n\t\t\t\t\t\t\t addr_str_nr='{$addr_str_nr}',\n\t\t\t\t\t\t\t addr_zip='{$addr_zip}',\n\t\t\t\t\t\t\t addr_citytown_nr='{$addr_citytown_nr}',\n\t\t\t\t\t\t\t addr_citytown_name='{$addr_citytown_name}',\n\t\t\t\t\t\t\t phone_1_nr='{$phone_1_nr}',\n\t\t\t\t\t\t\t phone_2_nr='{$phone_2_nr}',\n\t\t\t\t\t\t\t cellphone_1_nr='{$cellphone_1_nr}',\n\t\t\t\t\t\t\t cellphone_2_nr='{$cellphone_2_nr}',\n\t\t\t\t\t\t\t fax='{$fax}',\n\t\t\t\t\t\t\t email='',\n\t\t\t\t\t\t\t citizenship ='{$citizenship}',\n\t\t\t\t\t\t\t civil_status='{$civil_status}',\n\t\t\t\t\t\t\t sss_nr='',\n\t\t\t\t\t\t\t nat_id_nr='',\n\t\t\t\t\t\t\t religion='{$religion}', insurance_ID='{$insurance_ID}',\n\t\t\t\t\t\t\t ethnic_orig='{$ethnic_orig}',\n\t\t\t\t\t\t\t date_update='" . date('Y-m-d H:i:s') . "',"; if ($region != "-1" && $district != "-1" && $ward != "-1") { $sql .= "region='{$region}',\n\t\t\t\t\t\t\t district='{$district}',\n\t\t\t\t\t\t\t ward='{$ward}',"; } //if ($old_fn!=$photo_filename){ if ($valid_image) { # Compose the new filename $photo_filename = $pid . '.' . $picext; # Save the file $img_obj->saveUploadedImage($_FILES['photo_filename'], $root_path . $photo_path . '/', $photo_filename); # add to the sql query $sql .= " photo_filename='{$photo_filename}',"; } # complete the sql query $sql .= " history=" . $person_obj->ConcatHistory("Update " . date('Y-m-d H:i:s') . " " . $_SESSION['sess_user_name'] . " \n") . ", modify_id='" . $_SESSION['sess_user_name'] . "' WHERE pid={$pid}"; //$db->debug=true; $db->BeginTrans(); $ok = $db->Execute($sql); if ($ok) { $db->CommitTrans(); # Update the insurance data # Lets detect if the data is already existing if ($insurance_show) { if ($insurance_item_nr) { if (!empty($insurance_nr) && !empty($insurance_firm_name) && $insurance_firm_id) { $insure_data = array('insurance_nr' => $insurance_nr, 'firm_id' => $insurance_firm_id, 'class_nr' => $insurance_class_nr, 'history' => "Update " . date('Y-m-d H:i:s') . " " . $_SESSION['sess_user_name'] . " \n", 'modify_id' => $_SESSION['sess_user_name'], 'modify_time' => date('YmdHis')); $pinsure_obj->updateDataFromArray($insure_data, $insurance_item_nr); } } elseif ($insurance_nr && $insurance_firm_name && $insurance_class_nr) { $insure_data = array('insurance_nr' => $insurance_nr, 'firm_id' => $insurance_firm_id, 'pid' => $pid, 'class_nr' => $insurance_class_nr, 'history' => "Update " . date('Y-m-d H:i:s') . " " . $_SESSION['sess_user_name'] . " \n", 'create_id' => $_SESSION['sess_user_name'], 'create_time' => date('YmdHis')); $pinsure_obj->insertDataFromArray($insure_data); } } $newdata = 1; if (file_exists($this->displayfile)) { header("location: {$this->displayfile}" . URL_REDIRECT_APPEND . "&pid={$pid}&from={$from}&newdata=1&target=entry"); exit; } else { echo "Error! Target display file not defined!!"; } } else { $db->RollbackTrans(); } } else { $from = 'entry'; $_POST['date_birth'] = @formatDate2Std($date_birth, $date_format); $_POST['date_reg'] = date('Y-m-d H:i:s'); $_POST['blood_group'] = trim($_POST['blood_group']); $_POST['status'] = 'normal'; $_POST['history'] = "Init.reg. " . date('Y-m-d H:i:s') . " " . $_SESSION['sess_user_name'] . "\n"; //$_POST['modify_id']=$_SESSION['sess_user_name']; $_POST['create_id'] = $_SESSION['sess_user_name']; $_POST['create_time'] = date('YmdHis'); # Prepare internal data to be stored together with the user input data if (!$person_obj->InitPIDExists($GLOBAL_CONFIG['person_id_nr_init'])) { # If db is mysql, insert the initial pid value from global config # else let the dbms make an initial value via the sequence generator e.g. postgres # However, the sequence generator must be configured during db creation to start at # the initial value set in the global config if ($dbtype == 'mysql') { $_POST['pid'] = $GLOBAL_CONFIG['person_id_nr_init']; } } else { # Persons are existing. Check if duplicate might exist if (is_object($duperson = $person_obj->PIDbyData($_POST))) { $error_person_exists = TRUE; } } //echo $person_obj->getLastQuery(); if (!$error_person_exists || $mode == 'forcesave') { if ($person_obj->insertDataFromInternalArray()) { # If data was newly inserted, get the insert id if mysq, else get the pid number) if (!$update) { $oid = $db->Insert_ID(); $pid = $person_obj->LastInsertPK('pid', $oid); /* if($dbtype=='mysql'){ $pid=$db->Insert_ID(); }else{ $pid=$person_obj->postgre_Insert_ID($dbtable,'pid',$db->Insert_ID()); }*/ } //if(!$update) $pid=$db->Insert_ID(); # Save the valid uploaded photo if ($valid_image) { # Compose the new filename by joining the pid number and the file extension with "." $photo_filename = $pid . '.' . $picext; # Save the file if ($img_obj->saveUploadedImage($_FILES['photo_filename'], $root_path . $photo_path . '/', $photo_filename)) { # Update the filename to the databank $person_obj->setPhotoFilename($pid, $photo_filename); } } //echo $pid; //echo $citizenship; # Update the insurance data # Lets detect if the data is already existing if ($insurance_show) { if ($insurance_item_nr) { if (!empty($insurance_nr) && !empty($insurance_firm_name) && $insurance_firm_id) { $insure_data = array('insurance_nr' => $insurance_nr, 'firm_id' => $insurance_firm_id, 'class_nr' => $insurance_class_nr); $pinsure_obj->updateDataFromArray($insure_data, $insurance_item_nr); } } elseif ($insurance_nr && $insurance_firm_name && $insurance_class_nr) { $insure_data = array('insurance_nr' => $insurance_nr, 'firm_id' => $insurance_firm_id, 'pid' => $pid, 'class_nr' => $insurance_class_nr); $pinsure_obj->insertDataFromArray($insure_data); } } $newdata = 1; if (file_exists($this->displayfile)) { header("location: {$this->displayfile}" . URL_REDIRECT_APPEND . "&pid={$pid}&from={$from}&newdata=1&target=entry"); exit; } else { echo "Error! Target display file not defined!!"; } } else { echo "<p>{$db->ErrorMsg}()<p>{$LDDbNoSave}"; } } } } // end of if(!$error) } elseif (!empty($this->pid)) { # Get the person�s data if ($data_obj =& $person_obj->getAllInfoObject()) { $zeile = $data_obj->FetchRow(); extract($zeile); //print_r($zeile); # Get the related insurance data $p_insurance =& $pinsure_obj->getPersonInsuranceObject($pid); if ($p_insurance == FALSE) { $insurance_show = TRUE; } else { if (!$p_insurance->RecordCount()) { $insurance_show = TRUE; } elseif ($p_insurance->RecordCount() == 1) { $buffer = $p_insurance->FetchRow(); extract($buffer); $insurance_show = TRUE; $insurance_firm_name = $pinsure_obj->getFirmName($insurance_firm_id); } else { $insurance_show = FALSE; } } } } else { $date_reg = date('Y-m-d H:i:s'); } # Get the insurance classes $insurance_classes =& $pinsure_obj->getInsuranceClassInfoObject('class_nr,name,LD_var AS "LD_var"'); include_once $root_path . 'include/inc_photo_filename_resolve.php'; $search_obj =& new advanced_search(); if (!$update) { $tribe = $name_maiden; $town = $citizenship; } if (is_array($result_array = $search_obj->get_equal_words("tribe_name", "care_tz_tribes", false, 65, 'tribe_id')) && $name_maiden && !$no_tribe) { $tribe_array = $result_array; } else { $tribe_array = $result_array; } /* if (is_array($result_array=$search_obj->get_equal_words("village_name", "care_tz_village", false, 65, 'village_id',$ward)) && $addr_citytown_nr) { $town_array=$result_array; } else { $town_array=$result_array; }*/ if (is_array($result_array = $search_obj->get_equal_words("name", "care_tz_religion", false, 65, 'nr')) && $religion) { $religion_array = $result_array; } else { $religion_array = $result_array; } /* if (is_array($result_array=$search_obj->get_equal_words("region_name", "care_tz_region", false, 65, 'region_id')) && $email && !$person_email_hide ) { $region_array=$result_array; } else { $region_array=$result_array; } if (is_array($result_array=$search_obj->get_equal_words1("district_name", "care_tz_district", false, 65, 'district_id',$email)) && $sss_nr ) { $district_array=$result_array; } else { $district_array=$result_array; } if (is_array($result_array=$search_obj->get_equal_words1("ward_name", "care_tz_ward", false, 65, 'ward_id',$sss_nr)) && $nat_id_nr ) { $ward_array=$result_array; } else { $ward_array=$result_array; } */ ######## Here starts the GUI output ####################################################### $img_male = createComIcon($root_path, 'spm.gif', '0'); $img_female = createComIcon($root_path, 'spf.gif', '0'); $tbg = 'background="' . $root_path . 'gui/img/common/' . $theme_com_icon . '/tableHeader_gr.gif"'; if (!empty($this->pretext)) { echo $this->pretext; } ?> <script language="javascript"> <!-- function test(){ document.aufnahmeform.action="<?php $_SERVER['PHP_SELF']; ?> "; document.aufnahmeform.submit(); } function forceSave(){ document.aufnahmeform.mode.value="forcesave"; document.aufnahmeform.submit(); } function showpic(d){ if(d.value) document.images.headpic.src=d.value; } function popSearchWin(target,obj_val,obj_name){ urlholder="./data_search.php<?php echo URL_REDIRECT_APPEND; ?> &target="+target+"&obj_val="+obj_val+"&obj_name="+obj_name; DSWIN<?php echo $sid; ?> =window.open(urlholder,"wblabel<?php echo $sid; ?> ","menubar=no,width=400,height=550,resizable=yes,scrollbars=yes"); } function list_popup(d,chosentype) { if(d.value=="notinlist") { urlholder="<?php echo $root_path; ?> modules/registration_admission/notinlist.php<?php echo URL_APPEND . '&chosentype=" + chosentype + "'; ?> "; notinlist=window.open(urlholder,"notinlist","width=500,height=450,menubar=no,resizable=yes,scrollbars=yes"); } } function chkform(d) { <?php if ($person_obj->IsHospitalFileNrMandatory()) { echo 'if(d.selian_pid.value==""){ alert("Please enter Hospital File Number"); d.selian_pid.focus(); return false; }else'; } ?> if(d.name_last.value==""){ alert("<?php echo $LDPlsEnterLastName; ?> "); d.name_last.focus(); return false; }else if(d.name_first.value==""){ alert("<?php echo $LDPlsEnterFirstName; ?> "); d.name_first.focus(); return false; }else if(d.name_2.value==""){ alert("<?php echo 'Please Enter Father Name'; ?> "); d.name_2.focus(); return false; }else if(d.date_birth.value==""){ alert("<?php echo $LDPlsEnterDateBirth; ?> "); d.date_birth.focus(); return false; }else if(d.sex[0]&&d.sex[1]&&!d.sex[0].checked&&!d.sex[1].checked){ alert("<?php echo $LDPlsSelectSex; ?> "); return false; <?php if ($update) { $sql = "SELECT * FROM care_person where pid=" . $pid; $ergebnis = $db->Execute($sql); while ($person = $ergebnis->FetchRow()) { $region = $person['region']; } } if (!$update or $region == '') { echo '}else if(d.region.value=="-1"){'; echo 'alert("Please select region");'; echo 'd.region.focus();'; echo 'return false;'; echo '}else if(d.district.value=="-1"){'; echo 'alert("Please select district");'; echo 'd.district.focus();'; echo 'return false;'; echo '}else if(d.ward.value=="-1"){'; echo ' alert("Please select Ward");'; echo ' d.ward.focus();'; echo ' return false;'; } else { echo '}else if(d.region.value!="-1"){'; echo 'if(d.district.value=="-1")'; echo '{'; echo 'alert("Please select district");'; echo 'd.district.focus();'; echo 'return false;'; echo '}'; echo 'if(d.ward.value=="-1")'; echo '{'; echo ' alert("Please select ward");'; echo ' d.ward.focus();'; echo ' return false;'; echo '}'; } ?> }else if(d.user_id.value==""){ alert("<?php echo $LDPlsEnterFullName; ?> "); d.user_id.focus(); return false; }else if(d.name_maiden.value=="-1"){ alert ("Select tribe!"); return false; }else if(d.religion.value=="-1"){ alert ("Select religion!"); return false; }else{ return true; } } <?php require $root_path . 'include/inc_checkdate_lang.php'; ?> --> </script> <script language="javascript" src="<?php echo $root_path; ?> js/setdatetime.js"></script> <script language="javascript" src="<?php echo $root_path; ?> js/checkdate.js"></script> <script language="javascript" src="<?php echo $root_path; ?> js/dtpick_care2x.js"></script> <FONT SIZE=-1 FACE="Arial"> <form method="post" action="<?php echo $thisfile; ?> " name="aufnahmeform" ENCTYPE="multipart/form-data" onSubmit="return chkform(this)"> <table border=0 cellspacing=0 cellpadding=0> <?php if ($error) { echo "<script language=\"Javascript\" type=\"text/javascript\"> </script>"; //alert('Information is missing in the input field marked red!') ; ?> <tr bgcolor=#ffffee> <td colspan=3> <center> <font face=arial color=#7700ff size=4> <img <?php echo createMascot($root_path, 'mascot1_r.gif', '0', 'bottom'); ?> align="absmiddle"> <?php if ($error > 1) { echo "<script language=\"Javascript\" type=\"text/javascript\"> </script>"; //alert('$LDErrorS') echo $LDErrorS; } else { /* echo "<script language=\"Javascript\" type=\"text/javascript\"> alert('Information is missing in the input field marked red!') </script>"; */ echo $LDError; } ?> </center> </td> </tr> <?php } elseif ($error_person_exists) { ?> <tr bgcolor=#ffffee> <td colspan=3> <center> <table border=0> <tr> <td><img <?php echo createMascot($root_path, 'mascot1_r.gif', '0', 'bottom'); ?> align="absmiddle"></td> <td><font face=arial color=#7700ff size=4> <?php echo $LDPersonDuplicate; if ($duperson->RecordCount() > 1) { echo " {$LDSimilarData2} {$LDPlsCheckFirst2}"; } else { echo "{$LDSimilarData} {$LDPlsCheckFirst}"; } echo "<script language=\"Javascript\" type=\"text/javascript\"> </script>"; // alert('$LDSimilarData $LDPlsCheckFirst') echo ' </td> </tr> </table> </center> </td> </tr> <tr> <td colspan=3> <table border=0 cellspacing=0 cellpadding=1 bgcolor="#000000" width=100%> <tr> <td> <table border=0 cellspacing=0 width=100% bgcolor="#ffffff">'; echo ' <tr bgcolor="#66ee66" background="' . $root_path . 'gui/img/common/default/tableHeaderbg.gif">'; echo "\n\t\t\t\t\t<td {$tbg}><FONT SIZE=-1 FACE=\"Arial\" color=\"#000066\"><b>\n\t\t\t\t\t\t{$LDRegistryNr}</b></td>\n\t\t\t\t\t<td {$tbg}><FONT SIZE=-1 FACE=\"Arial\" color=\"#000066\"><b>\n\t\t\t\t\t\t{$LDLastName}</b></td>\n\t\t\t\t\t<td {$tbg}><FONT SIZE=-1 FACE=\"Arial\" color=\"#000066\"><b>\n\t\t\t\t\t\t{$LDFirstName}</b></td>\n\t\t\t\t\t<td {$tbg}><FONT SIZE=-1 FACE=\"Arial\" color=\"#000066\"><b>\n\t\t\t\t\t\t{$LDBday}</b></td>\n\t\t\t\t\t<td {$tbg}><FONT SIZE=-1 FACE=\"Arial\" color=\"#000066\"><b>\n\t\t\t\t\t\t{$LDSex}</b></td>\n\t\t\t\t\t<td {$tbg}><FONT SIZE=-1 FACE=\"Arial\" color=\"#000066\"><b>\n\t\t\t\t\t\t{$LDOptions}</b></td>\n\t\t\t\t\t</tr>"; # Show the probable same person while ($dup = $duperson->FetchRow()) { echo ' <tr> <td><font face=arial color=#000000 size=2>' . $dup['pid'] . '</td> <td><font face=arial color=#000000 size=2>' . $dup['name_last'] . '</td> <td><font face=arial color=#000000 size=2>' . $dup['name_first'] . '</td> <td><font face=arial color=#000000 size=2>' . formatDate2Local($dup['date_birth'], $date_format) . '</td> <td>'; switch ($dup['sex']) { case 'f': echo '<img ' . $img_female . '>'; break; case 'm': echo '<img ' . $img_male . '>'; break; default: echo ' '; break; } echo ' </td> <td><font face=arial color=#000000 size=2>:: <a href="person_reg_showdetail.php' . URL_APPEND . '&pid=' . $dup['pid'] . '&from=$from&newdata=1&target=entry" target="_blank">' . $LDShowDetails . '</a> :: <a href="patient_register.php' . URL_APPEND . '&pid=' . $dup['pid'] . '&update=1">' . $LDUpdate . '</a> </td> </tr>'; } echo ' </table> </td> </tr> </table>'; } ?> </td> </tr> <tr> <td> <FONT SIZE=-1 FACE="Arial"><?php if ($pid) { echo $LDRegistryNr; } ?> </td> <td > <FONT SIZE=-1 FACE="Arial" color="#800000"> <?php if ($pid) { if (IS_TANZANIAN) { echo $this->showPID($pid); } else { echo $pid; } } ?> </td> <td rowspan=6 class="photo_id" > <FONT SIZE=-1 FACE="Arial"> <a href="#" onClick="showpic(document.aufnahmeform.photo_filename)"><img <?php echo $img_source; ?> id="headpic" name="headpic"></a> <br> <?php echo $LDPhoto; ?> <br><input name="photo_filename" type="file" size="15" onChange="showpic(this)" value="<?php if (isset($photo_filename)) { echo $photo_filename; } ?> "> </td> </tr> <tr> <td class="reg_item"> <?php echo $LDRegDate; ?> : </td> <td class="reg_input"> <FONT SIZE=-1 FACE="Arial" color="#800000"> <?php echo formatDate2Local($date_reg, $date_format); ?> <input name="date_reg" type="hidden" value="<?php echo $date_reg; ?> "> </td> </tr> <tr> <td class="reg_item"> <?php echo $LDRegTime; ?> : </td> <td class="reg_input"> <FONT SIZE=-1 FACE="Arial" color="#800000"><?php echo convertTimeToLocal(formatDate2Local($date_reg, $date_format, 0, 1)); ?> </td> </tr> <tr> <td class="reg_item"> <FONT SIZE=-1 FACE="Arial"><?php if ($person_obj->IsHospitalFileNrMandatory()) { $asterik = '*'; } else { $asterik = ' '; } if ($errorfilenr) { echo '<font color="#ff0000">*' . $LDFileNr . '</font><br> Try this one: ' . $person_obj->GetNewSelianFileNumber(); } else { echo $asterik . $LDFileNr; } ?> </td> <td class="reg_input"> <input type="text" name="selian_pid" size=14 maxlength=6 value="<?php echo $selian_pid; ?> " onFocus="this.select();"> </td> </tr> <?php $this->createTR($errornamefirst, 'name_first', ' *' . $LDFirstName, $name_first, '', '', FALSE); $this->createTR($errorname2, 'name_2', ' *' . $LDName2, $name_2, '', '', FALSE); $this->createTR($errornamelast, 'name_last', ' *' . $LDLastName, $name_last, '', '', FALSE); $this->createTR($errornamemid, 'name_middle', $LDNameMid, $name_middle, '', '', FALSE); // This is for balozi if (!$no_tribe) { ?> <tr> <td class="reg_item"><FONT SIZE=-1 FACE="Arial,verdana,sans serif"> <?php if ($errormaiden) { echo '<font color="FF0000">'; } echo '* ' . $LDNameMaiden; ?> </td> <td class="reg_input" colspan=1> <?php echo '<SELECT name="name_maiden" onChange="list_popup(this, \'tribe\');">'; echo '<OPTION value="-1" >' . $LDPleaseSelectTribe . '</OPTION>'; foreach ($tribe_array as $unit) { //if($update && (strtoupper($name_maiden) == strtoupper($unit[1]))) if (strtoupper($name_maiden) == strtoupper($unit[1])) { $check = 'selected'; } else { $check = ''; } echo '<OPTION value="' . $unit[1] . '" ' . $check . '>' . $unit[0] . '</OPTION>'; } // echo '<OPTION value="notinlist">NOT IN LIST</OPTION>'; echo '</SELECT>'; ?> </td> </tr> <?php } ?> <tr> <td class="reg_item"> <FONT SIZE=-1 FACE="Arial"><?php if ($errordatebirth) { echo "<font color=red>"; } ?> * <?php echo $LDBday; ?> </font>: </td> <td class="reg_input"> <FONT SIZE=-1 FACE="Arial"> <input name="date_birth" type="text" size="15" maxlength=10 value="<?php if ($date_birth) { if ($mode == 'save' || $error || $error_person_exists) { echo $date_birth; } else { echo formatDate2Local($date_birth, $date_format); } } # Uncomment the following when the current date must be inserted # automatically at the start of each document /*else{ echo formatDate2Local(date('Y-m-d'),$date_format); }*/ ?> " onFocus="this.select();" onBlur="IsValidDate(this,'<?php echo $date_format; ?> ')" onKeyUp="setDate(this,'<?php echo $date_format; ?> ','<?php echo $lang; ?> ');"> <a href="javascript:show_calendar('aufnahmeform.date_birth','<?php echo $date_format; ?> ')"> <img <?php echo createComIcon($root_path, 'show-calendar.gif', '0', 'absmiddle'); ?> ></a> <font size=1>[ <?php $dfbuffer = "LD_" . strtr($date_format, ".-/", "phs"); echo ${$dfbuffer}; ?> ] </font><br> <input name="date_age" type="text" size="15" maxlength=10 value="" onKeyUp="setDatebyAge(this,this.form.date_birth,'<?php echo $date_format; ?> ','<?php echo $lang; ?> ')"> <font size=1> <?php echo $LDAge; ?> </font> </td> <td> </td> <tr> <td class="reg_item"> <FONT SIZE=-1 FACE="Arial"> <?php if ($errorsex) { echo "<font color=#ff0000>"; } echo '* ' . $LDSex . '</font>'; ?> :<td> <input name="sex" type="radio" value="m" <?php if ($sex == "m") { echo "checked"; } ?> ><?php echo $LDMale; ?> <input name="sex" type="radio" value="f" <?php if ($sex == "f") { echo "checked"; } ?> > <?php echo $LDFemale; if ($errorsex) { echo "</font>"; } # But patch 2004-03-10 # Clean blood group $blood_group = trim($blood_group); ?> </td> </tr> <tr> <td class="reg_item"> <FONT SIZE=-1 FACE="Arial"><?php if ($errorreligion) { echo "<font color=red>"; } ?> * <?php echo $LDReligion; ?> : </td> <td class="reg_input"> <?php echo '<SELECT name="religion" onChange="list_popup(this,\'religion\');">'; echo '<OPTION value="-1" >' . $LDSelectReligion . '</OPTION>'; foreach ($religion_array as $unit) { if (strtoupper($religion) == strtoupper($unit[1])) { $check = 'selected'; } else { $check = ''; } echo '<OPTION value="' . $unit[1] . '" ' . $check . '>' . $unit[0] . '</OPTION>'; } // echo '<OPTION value="notinlist">NOT IN LIST</OPTION>'; echo '</SELECT>'; ?> </td> </tr> <?php if (!$person_name_others_hide) { $this->createTR($errornameothers, 'name_others', $LDNameOthers, $name_others); } ?> <!-- TODO: Kompletly not shown, or dependig on who is editing: Doctor, Lab? --> <tr> <td class="reg_item"> <?php echo $LDBloodGroup; ?> : </td> <td class="reg_input"> <FONT SIZE=-1 FACE="Arial"> <input name="blood_group" type="radio" value="A" <?php if ($blood_group == 'A') { echo 'checked'; } ?> ><?php echo $LDA; ?> <input name="blood_group" type="radio" value="B" <?php if ($blood_group == 'B') { echo 'checked'; } ?> ><?php echo $LDB; ?> <input name="blood_group" type="radio" value="AB" <?php if ($blood_group == 'AB') { echo 'checked'; } ?> ><?php echo $LDAB; ?> <input name="blood_group" type="radio" value="O" <?php if ($blood_group == 'O') { echo 'checked'; } ?> ><?php echo $LDO; ?> </td> <td> <?php echo $LDRHfactor; ?> <input name="rh" type="radio" value="pos" <?php if ($rh == 'pos') { echo 'checked'; } ?> ><?php echo $LDRHpos; ?> <input name="rh" type="radio" value="neg" <?php if ($rh == 'neg') { echo 'checked'; } ?> ><?php echo $LDRHneg; ?> </td> </tr> <tr> <td class="reg_item"> <FONT SIZE=-1 FACE="Arial"><?php if ($errorcivil) { echo "<font color=red>"; } ?> <?php echo $LDCivilStatus; ?> </font>: </td> <td colspan=2 class="reg_input"> <FONT SIZE=-1 FACE="Arial"> <input name="civil_status" type="radio" value="single" <?php if ($civil_status == "single") { echo "checked"; } ?> ><?php echo $LDSingle; ?> <input name="civil_status" type="radio" value="married" <?php if ($civil_status == "married") { echo "checked"; } ?> ><?php echo $LDMarried; ?> <FONT SIZE=-1 FACE="Arial"> <input name="civil_status" type="radio" value="divorced" <?php if ($civil_status == "divorced") { echo "checked"; } ?> ><?php echo $LDDivorced; ?> <input name="civil_status" type="radio" value="widowed" <?php if ($civil_status == "widowed") { echo "checked"; } ?> ><?php echo $LDWidowed; ?> <FONT SIZE=-1 FACE="Arial"> <input name="civil_status" type="radio" value="separated" <?php if ($civil_status == "separated") { echo "checked"; } ?> ><?php echo $LDSeparated; ?> </td> </tr> <tr> <td class="reg_item"> <FONT SIZE=-1 FACE="Arial"> <?php echo $LDInsurance; ?> : </td> <td class="reg_input"> <?php // Create array of all insurances for GUI $coreObj->sql = "SELECT DISTINCT parent FROM care_tz_insurance WHERE cancel_flag='0' order by name asc"; $result = $db->Execute($coreObj->sql); $name_insurer_array = array(); while ($row = $result->FetchRow()) { $nr = $row['insurance_ID']; if ($nr != -1) { $coreObj->sql = "SELECT name FROM care_tz_company WHERE insurance_ID={$nr}"; $ergebnis = $db->Execute($coreObj->sql); $row = $ergebnis->FetchRow(); $arrayTemp = array("name" => $row['name'], "id" => $nr); array_push($name_insurer_array, $arrayTemp); } } echo '<SELECT name="insurance_ID">'; echo '<OPTION value="-1" >--select insurance--</OPTION>'; foreach ($name_insurer_array as $row) { if ($insurance_ID == $row[id]) { $check = 'selected'; } else { $check = ''; } echo '<OPTION value="' . $row[id] . '" ' . $check . '>' . $row[name] . '</OPTION>'; } echo '</SELECT>'; ?> </td> </tr> <tr> <td class="reg_item"> <FONT SIZE=-1 FACE="Arial"><?php echo $LDOccupation; ?> : </td> <td class="reg_input"> <input type="text" name="title" size=14 maxlength=25 value="<?php echo $title; ?> " onFocus="this.select();"> </td> </tr> <tr> <td class="reg_item"> <FONT SIZE=-1 FACE="Arial"><?php echo $LDEducation; ?> : </td> <td class="reg_input"> <input type="text" name="name_others" size=14 maxlength=25 value="<?php echo $name_others; ?> " onFocus="this.select();"> </td> </tr> <!-- <tr> <td colspan=2> <FONT SIZE=-1 FACE="Arial"><?php if ($erroraddress) { echo "<font color=red>"; } echo $LDAddress; ?> </font>: </td> </tr> --> <?php if (!$person_email_hide) { //{ ?> <tr> <td class="reg_item"><FONT SIZE=-1 FACE="Arial,verdana,sans serif"> <?php if ($errormaiden) { echo '<font color="FF0000">'; } echo '* ' . 'Region'; $sql = "SELECT DISTINCT region_id, region_name FROM care_tz_region region INNER JOIN care_tz_district distrcit ON distrcit.is_additional=region.region_id INNER JOIN care_tz_ward ward ON distrcit.district_id=ward.is_additional ORDER BY region_name, district_name, ward_name"; //$sql="SELECT region_id,region_name FROM view_care_region_district_ward GROUP BY region_id order by region_name "; $catchment_area_obj = $db->Execute($sql); ?> </td> <td class="reg_input" colspan=1> <select name="region" size="1" onChange="redirect(this.options.selectedIndex)"> <option value="-1" id="-1">---select region--------</option> <?php while ($catchment_area_row = $catchment_area_obj->FetchRow()) { echo '<option value="' . $catchment_area_row['region_name'] . '" id=' . $catchment_area_row['region_id'] . '>' . $catchment_area_row['region_name'] . '</option>'; } ?> </select> <?php } ?> </td> <?php if ($update) { ?> <td class="reg_input"><FONT SIZE=-1 FACE="Arial,verdana,sans serif"> <?php if ($errormaiden) { echo '<font color="FF0000">'; } $sql = "Select * from care_person where pid=" . $pid; $result = $db->Execute($sql); $region = $result->FetchRow(); echo '' . 'Region:<FONT SIZE=-1 FACE="Arial" color="#800000"> ' . $region['region'] . '</FONT>'; ?> </td><?php } ?> </tr> <tr></tr> <tr> <td class="reg_item"><FONT SIZE=-1 FACE="Arial,verdana,sans serif"> <?php if ($errormaiden) { echo '<font color="FF0000">'; } echo '* ' . 'District'; ?> </td> <td class="reg_input" colspan=1> <select name="district" size="1" onChange="redirect1(this.options.selectedIndex)"> <option value="-1" >---select district--------</option> </select> </td> <?php if ($update) { ?> <td class="reg_input"><FONT SIZE=-1 FACE="Arial,verdana,sans serif"> <?php if ($errormaiden) { echo '<font color="FF0000">'; } $sql = "Select * from care_person where pid=" . $pid; $result = $db->Execute($sql); $region = $result->FetchRow(); echo '' . 'District: <FONT SIZE=-1 FACE="Arial" color="#800000">' . $region['district'] . '</FONT>'; ?> </td><?php } ?> </tr> <tr></tr> <tr> <td class="reg_item"><FONT SIZE=-1 FACE="Arial,verdana,sans serif"> <?php if ($errormaiden) { echo '<font color="FF0000">'; } echo '* ' . 'Ward'; ?> </td> <td class="reg_input" colspan=1> <select name="ward" size="1"> <option value="-1" >-select Ward-</option> </select> <?php ?> <script language="javascript"> <?php // fill up all regions, districts and wards: $sql = "SELECT region_id, region_name, district_id, district_name, ward_id, ward_name FROM care_tz_region region INNER JOIN care_tz_district distrcit ON distrcit.is_additional=region.region_id INNER JOIN care_tz_ward ward ON distrcit.district_id=ward.is_additional ORDER BY region_name, district_name, ward_name"; $catchment_area_obj = $db->Execute($sql); $number_of_rows = $catchment_area_obj->RecordCount(); echo "var group=new Array(" . $number_of_rows . ")\n"; echo "for (i=0; i<" . $number_of_rows . "; i++)\n"; echo "group[i]=new Array()\n"; echo "group[0]= new Option(\"---select Region -----\");\n"; echo "group[0][0]=new Option(\"---select district--------\");\n"; echo "group[1][0]=new Option(\"now select this one\");\n"; echo "group[1][0][0]=new Option(\"-select Ward-\");\n"; // define some variables that eclipse will get no trouble by syntax error check... $previous_region_id = -1; $previous_district_id = -1; $region_id = 1; $district_id = 0; $ward_id = 0; // remember if it's the first row... $FIRST_ROW = TRUE; while ($catchment_area_row = $catchment_area_obj->FetchRow()) { // reading out all information of this row and store each to a variable $this_region_name = $catchment_area_row['region_name']; $this_district_name = $catchment_area_row['district_name']; $this_district_id = $catchment_area_row['district_id']; $this_ward_name = $catchment_area_row['ward_name']; $this_ward_id = $catchment_area_row['ward_id']; if ($FIRST_ROW == TRUE) { // it's the first row, the "this" is the same as the "previous" status $previous_region_id = $region_id; $previous_ward_id = $ward_id; $previous_district_id = $district_id; // if its the first row, so we can attach this line directly to the jscript-array: echo "group[" . $region_id . "][" . $district_id . "]=new Option(\"" . $this_district_name . "\");\n"; // "this" is no longer the first row, set it to FALSE $FIRST_ROW = FALSE; } else { // reading out all information of this row and store each to a variable $this_region_id = $catchment_area_row['region_id']; $this_region_name = $catchment_area_row['region_name']; $this_district_name = $catchment_area_row['district_name']; $this_district_id = $catchment_area_row['district_id']; // it is not the first row, so we have to be a bit more carefully if ($this_region_id == $previous_region_id) { // if its the same region ID like the previous one, so check if it's a new district as well: if ($this_district_id == $previous_district_id) { // if its the same district ID like the previous one, then we have a new ward echo "group[" . $region_id . "][" . $district_id . "][" . $ward_id . "]=new Option(\"" . $this_ward_name . "\"); // Ward_id=" . $this_ward_id . "\n"; $ward_id = $ward_id + 1; } else { $district_id = $district_id + 1; $previous_district_id = $this_district_id; $ward_id = 0; echo "group[" . $region_id . "][" . $district_id . "]=new Option(\"" . $this_district_name . "\"); //Region_id=" . $this_region_id . "\n"; } } else { // it's a new region, so reset the value of "this region" $district_id = 0; $region_id = $region_id + 1; echo "group[" . $region_id . "][" . $district_id . "]=new Option(\"" . $this_district_name . "\"); //Region_id=" . $this_region_id . "\n"; $previous_region_id = $this_region_id; } // end of if ($this_region_id==$previous_region_id) } // end of if ($FIRST_ROW==TRUE) } ?> var temp_district=document.aufnahmeform.district var temp_ward=document.aufnahmeform.ward function redirect(x){ // delete all previous entries for (m=temp_district.options.length-1;m>0;m--) temp_district.options[m]=null; // set the new ones to this option list for (i=1;i<group[x].length;i++){ temp_district.options[i]=new Option(group[x][i].text) } temp_district.options[0].selected=true; temp_district.options[0].value=-1; redirect1(0) } function redirect1(y){ for (m=temp_ward.options.length-1;m>=0;m--) temp_ward.options[m]=null; var region_index = document.aufnahmeform.region.options.selectedIndex; var district_index = document.aufnahmeform.district.options.selectedIndex; var i = 0; for (i=0;i<100;i++){ temp_ward.options[i]=new Option(group[region_index][district_index][i].text) } temp_ward.options[0].selected=true temp_ward.options[0].value=-1; } </script> </td> <?php if ($update) { ?> <td class="reg_input"><FONT SIZE=-1 FACE="Arial,verdana,sans serif"> <?php if ($errormaiden) { echo '<font color="FF0000">'; } $sql = "Select * from care_person where pid=" . $pid; $result = $db->Execute($sql); $region = $result->FetchRow(); echo '' . 'Ward: <FONT SIZE=-1 FACE="Arial" color="#800000">' . $region['ward'] . '</FONT>'; ?> </td><?php } ?> <tr> <td colspan=2> <FONT SIZE=-1 FACE="Arial"><?php if ($erroraddress) { echo "<font color=red>"; } echo $LDAddress; ?> </font>: </td> </tr> <tr> <td class="reg_item"> <FONT SIZE=-1 FACE="Arial"><?php echo $LDTownCity; ?> : </td> <td class="reg_input"><input name="citizenship" type="text" value="<?php echo $citizenship; ?> " ></td> <!--<td class="reg_input"> <?php echo '<SELECT name="addr_citytown_nr" onChange="list_popup(this,\'city\');">'; echo '<OPTION value="-1" >-- select location --</OPTION>'; foreach ($town_array as $unit) { if (strtoupper($addr_citytown_nr) == strtoupper($unit[1])) { $check = 'selected'; } else { $check = ''; } echo '<OPTION value="' . $unit[1] . '" ' . $check . '>' . $unit[0] . '</OPTION>'; } // echo '<OPTION value="notinlist">NOT IN LIST</OPTION>'; echo '</SELECT>'; ?> </td>--> <td class="reg_input"> <FONT SIZE=-1 FACE="Arial"><?php if ($errorzip) { echo "<font color=red>"; } echo $LDPOBOX . " "; ?> <input name="addr_zip" type="text" size="10" value="<?php echo $addr_zip; ?> " > </td> </tr> <?php if ($insurance_show) { if (!$person_insurance_1_nr_hide) { ?> <!--<tr> <td class="reg_item"> <FONT SIZE=-1 FACE="Arial"><?php if ($errorinsurancecoid) { echo '<font color="' . $error_fontcolor . '">'; } echo $LDInsuranceCo; ?> : </td> <td colspan=2 class="reg_input"><FONT SIZE=-1 FACE="Arial"><?php if ($errorinsuranceclass) { echo '<font color="' . $error_fontcolor . '">'; } ?> <input name="insurance_category" type="radio" value="silver" <?php if ($insurance_category == "silver") { echo 'checked'; } ?> > <?php echo $LDInsuranceSilver; ?> <input name="insurance_category" type="radio" value="gold" <?php if ($insurance_category == "gold") { echo 'checked'; } ?> > <?php echo $LDInsuranceGold; ?> <input name="insurance_category" type="radio" value="friedkin" <?php if ($insurance_category == "friedkin") { echo 'checked'; } ?> > <?php echo $LDInsuranceFriedkin; ?> <input name="insurance_category" type="radio" value="selian" <?php if ($insurance_category == "selian") { echo 'checked'; } ?> > <?php echo $LDInsuranceSelianstuff; ?> </td> </tr>--> <?php } } else { ?> <tr> <td colspan=2 class="reg_item"> <a><?php echo $LDSeveralInsurances; ?> <img <?php echo createComIcon($root_path, 'frage.gif', '0'); ?> ></a> </td> </tr> <?php } if (!$person_phone_1_nr_hide) { $this->createTR($errorphone1, 'phone_1_nr', $LDPhone, $phone_1_nr, 2); } if (!$person_cellphone_1_nr_hide) { $this->createTR($errorcell1, 'cellphone_1_nr', $LDCellPhone, $cellphone_1_nr, 2); } if (!$person_cellphone_2_nr_hide) { $this->createTR($errorcell2, 'cellphone_2_nr', $LDCellPhone . ' 2', $cellphone_2_nr, 2); } if (!$person_religion_hide) { ?> <?php } ?> <!--<tr> <td class="reg_item" valign=top class="reg_input"> <?php echo $LDOtherHospitalNr; ?> </td> <td colspan=2 class="reg_input"> <?php /* $other_hosp_list = $person_obj->OtherHospNrList(); $sOtherNrBuffer=''; foreach( $other_hosp_list as $k=>$v ){ echo "<b>".$kb_other_his_array[$k].":</b> ".$v."<br />\n"; } echo '<SELECT name="other_his_org"> <OPTION value="">--</OPTION>'; foreach( $kb_other_his_array as $k=>$v ){ echo '<OPTION value="$k" $check>$v</OPTION>'; } echo '</SELECT> '.$LDNr.':<INPUT name="other_his_no" size=20><br>'; echo '('.$LDSelectOtherHospital.' - '.$LDNoNrNoDelete.')<br></TD></TR>'; */ ?> </td> </tr>--> <tr> <td class="reg_item"> <FONT SIZE=-1 FACE="Arial" ><FONT SIZE=2 FACE="Arial"><font color=#ff0000><?php echo $LDRegBy; ?> </font> </td> <td colspan=2 class="reg_input"> <FONT SIZE=-1 FACE="Arial"><nobr> <input name="user_id" type="text" value="<?php if (isset($user_id) && $user_id) { echo $user_id; } else { echo $_SESSION['sess_user_name']; } ?> " size="35" readonly> </nobr> </td> </tr> </table> <p> <INPUT TYPE="hidden" name="MAX_FILE_SIZE" value="1000000"> <input type="hidden" name="itemname" value="<?php echo $itemname; ?> "> <input type="hidden" name="sid" value="<?php echo $sid; ?> "> <input type="hidden" name="lang" value="<?php echo $lang; ?> "> <input type="hidden" name="linecount" value="<?php echo $linecount; ?> "> <input type="hidden" name="mode" value="save"> <input type="hidden" name="insurance_item_nr" value="<?php echo $insurance_item_nr; ?> "> <input type="hidden" name="insurance_firm_id" value="<?php echo $insurance_firm_id; ?> "> <input type="hidden" name="insurance_show" value="<?php echo $insurance_show; ?> "> <input type="hidden" name="ethnic_orig" value="<?php echo $ethnic_orig; ?> "> <?php if ($update) { echo '<input type="hidden" name="update" value=1>'; echo '<input type="hidden" name="pid" value="' . $pid . '">'; } ?> <input type="image" <?php echo createLDImgSrc($root_path, 'savedisc.gif', '0'); ?> alt="<?php echo $LDSaveData; ?> " align="absmiddle"> <a href="javascript:document.aufnahmeform.reset()"><img <?php echo createLDImgSrc($root_path, 'reset.gif', '0'); ?> alt="<?php echo $LDResetData; ?> " align="absmiddle"></a> <?php //if($error||$error_person_exists) echo '<input type="button" value="'.$LDForceSave.'" onClick="forceSave()">'; ?> </form> <?php if (!$newdata) { ?> <form action=<?php echo $thisfile; ?> method=post> <input type=hidden name=sid value=<?php echo $sid; ?> > <input type=hidden name=patnum value=""> <input type=hidden name="lang" value="<?php echo $lang; ?> "> <input type=hidden name="date_format" value="<?php echo $date_format; ?> "> <input type=submit value="<?php echo $LDNewForm; ?> " > </form> <?php } }
$data = array('encounter_nr' => $patnum, 'upload_date' => date('Y-m-d'), 'history' => "Upload " . date('Y-m-d H:i:s') . " " . $_SESSION['sess_user_name'] . "\n", 'modify_id' => '', 'modify_time' => 0, 'create_id' => $_SESSION['sess_user_name'], 'create_time' => date('YmdHis')); for ($i = 0; $i < $maxpic; $i++) { $picfile = 'picfile' . $i; $shotdate = 'sdate' . $i; $shotnr = 'nr' . $i; //echo $shotnr."<br>"; //echo $picfile.' '.$shotdate.' '.$shotnr; # Check the image if (!$img->isValidUploadedImage($_FILES[$picfile])) { continue; } # Get the file extension $picext = $img->UploadedImageMimeType(); $picext = strtolower($picext); if (stristr($picext, 'gif') || stristr($picext, 'jpg') || stristr($picext, 'png')) { $data['shot_date'] = formatDate2Std(${$shotdate}, $date_format); $data['shot_nr'] = ${$shotnr}; $data['mime_type'] = $picext; if ($insid = $img->saveImageData($data)) { # Get the last inserted primary key $picnr = $img->LastInsertPK('nr', $insid); $picfilename[$i] = $picnr . '.' . $picext; echo '<tr><td>' . $_FILES[$picfile]['name'] . '</td><td> <img ' . createComIcon($root_path, 'fwd.gif', '0', 'absmiddle') . '> '; if ($disc_pix_mode) { if (!is_dir($d)) { # if $d directory not exist create it with CHMOD 777 mkdir($d, 0777); # Copy the trap files to this new directory copy($root_path . 'fotos/encounter/donotremove/index.htm', $d . '/index.htm'); copy($root_path . 'fotos/encounter/donotremove/index.php', $d . '/index.php'); }