/** * 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; } }
include_once $root_path . 'include/inc_visual_signalling_fx.php'; if ($presc_obj->GetClassOfItem($article_item_number) == 'drug_list') { // Set the visual signal setEventSignalColor($encounter_nr, SIGNAL_COLOR_DOCTOR_INFO); } else { if ($presc_obj->GetClassOfItem($article_item_number) == 'supplies') { // Set the visual signal setEventSignalColor($encounter_nr, SIGNAL_COLOR_CONSUMABLES); } else { if ($presc_obj->GetClassOfItem($article_item_number) == 'service') { // Set the visual signal setEventSignalColor($encounter_nr, SIGNAL_COLOR_SERVICES); } else { if ($presc_obj->GetClassOfItem($article_item_number) == 'dental' || $presc_obj->GetClassOfItem($article_item_number) == 'minor_proc_op' || $presc_obj->GetClassOfItem($article_item_number) == 'obgyne_op' || $presc_obj->GetClassOfItem($article_item_number) == 'ortho_op' || $presc_obj->GetClassOfItem($article_item_number) == 'surgical_op') { // Set the visual signal setEventSignalColor($encounter_nr, SIGNAL_COLOR_PROCEDURES); } } } } //******** break; //if (isset($externalcall)) // header("location:".$thisfile.URL_REDIRECT_APPEND."&target=$target&type_nr=$type_nr&allow_update=1&externalcall=".$externalcall."&pid=".$_SESSION['sess_pid']); //exit; //break; //if (isset($externalcall)) // header("location:".$thisfile.URL_REDIRECT_APPEND."&target=$target&type_nr=$type_nr&allow_update=1&externalcall=".$externalcall."&pid=".$_SESSION['sess_pid']); //exit; //break; case 'update':
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 dept_nr = '" . $dept_nr . "', \n\t\t\t\t\t\t\t\t\t\t quick_cut = '" . $quick_cut . "', \n\t\t\t\t\t\t\t\t\t\t qc_phone = '" . $qc_phone . "', \n\t\t\t\t\t\t\t\t\t\t quick_diagnosis = '" . $quick_diagnosis . "',\n\t\t\t\t\t\t\t\t\t\t qd_phone = '" . $qd_phone . "', \n\t\t\t\t\t\t\t\t\t\t material_type = '" . $material_type . "',\n\t\t\t\t\t\t\t\t\t\t material_desc = '" . htmlspecialchars($material_desc) . "', \n\t\t\t\t\t\t\t\t\t\t localization = '" . htmlspecialchars($localization) . "',\n\t\t\t\t\t\t\t\t\t\t clinical_note = '" . htmlspecialchars($clinical_note) . "', \n\t\t\t\t\t\t\t\t\t\t extra_note = '" . htmlspecialchars($extra_note) . "', \n\t\t\t\t\t\t\t\t\t\t repeat_note = '" . htmlspecialchars($repeat_note) . "',\n\t\t\t\t\t\t\t\t\t\t gyn_last_period = '" . htmlspecialchars($gyn_last_period) . "', \n\t\t\t\t\t\t\t\t\t\t gyn_period_type = '" . htmlspecialchars($gyn_period_type) . "', \n\t\t\t\t\t\t\t\t\t\t gyn_gravida = '" . htmlspecialchars($gyn_gravida) . "',\n\t\t\t\t\t\t\t\t\t\t gyn_menopause_since = '" . htmlspecialchars($gyn_menopause_since) . "', \n\t\t\t\t\t\t\t\t\t\t gyn_hysterectomy = '" . htmlspecialchars($gyn_hysterectomy) . "',\n\t\t\t\t\t\t\t\t\t\t gyn_contraceptive = '" . htmlspecialchars($gyn_contraceptive) . "', \n\t\t\t\t\t\t\t\t\t\t gyn_iud = '" . htmlspecialchars($gyn_iud) . "', \n\t\t\t\t\t\t\t\t\t\t gyn_hormone_therapy = '" . htmlspecialchars($gyn_hormone_therapy) . "',\n\t\t\t\t\t\t\t\t\t\t doctor_sign = '" . htmlspecialchars($doctor_sign) . "', \n\t\t\t\t\t\t\t\t\t\t op_date = '" . formatDate2STD($op_date, $date_format) . "',\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 = '" . $_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)) { //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=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" * otherwise it is not editable anymore which happens when the lab has already processed the request, * or when it is discarded, hidden, locked, or otherwise. * * If the "parameter" element is not empty, parse it to the $stored_param variable */ // end of case 'save'
$radtests = $db->Execute($sql); $stored_tests = $radtests->FetchRow(); if (!isset($mode) && $batch_nr && $pn) { $mode = 'edit'; } switch ($mode) { case 'save': $sql = "INSERT INTO care_test_findings_" . $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, \n\t\t\t\t\t\t\t\t\t\t findings, diagnosis,\n\t\t\t\t\t\t\t\t\t\t doctor_id, findings_date, findings_time, \n\t\t\t\t\t\t\t\t\t\t status, \n\t\t\t\t\t\t\t\t\t\t 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 . "','" . $dept_nr . "', \n\t\t\t\t\t\t\t\t\t\t '" . addslashes(htmlspecialchars($findings)) . "','" . addslashes(htmlspecialchars($diagnosis)) . "',\n\t\t\t\t\t\t\t\t\t\t '" . htmlspecialchars($doctor_id) . "', '" . formatDate2Std($findings_date, $date_format) . "', '" . date('H:i:s') . "',\n\t\t\t\t\t\t\t\t\t\t 'initial', \n\t\t\t\t\t\t\t\t\t\t 'Create: " . 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 '" . $HTTP_SESSION_VARS['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 )"; $script_name = "labor_test_findings_radio"; if ($ergebnis = $enc_obj->Transact($sql)) { signalNewDiagnosticsReportEvent($findings_date, $script_name); //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}");
} else { $saved = false; echo "<p>{$report_obj->sql}{$LDDbNoSave}"; } } if ($dateput2 && $berichtput2 && $author2) { if (!$_POST['ref_notes_nr']) { $_POST['timeput'] = date('H:i:s'); } if ($dateput2) { $_POST['dateput2'] = formatDate2STD($dateput2, $date_format); } $_POST['berichtput2'] = deactivateHotHtml($berichtput2); if ($report_obj->saveEffectivityReport($_POST)) { // Set the visual signal setEventSignalColor($pn, SIGNAL_COLOR_NURSE_REPORT, SIGNAL_COLOR_LEVEL_FULL); $saved = true; } else { $saved = false; echo "<p>{$report_obj->sql}{$LDDbNoSave}"; } } if ($saved) { header("location:{$thisfile}?sid={$sid}&lang={$lang}&saved=1&pn={$pn}&station={$station}&edit={$edit}"); } } else { $saved = false; } } else { // end of if(mode==save) $enc_obj->where = " encounter_nr={$pn}";
$parsedParamList['paramater_name'] = $key; $parsedParamList['parameter_value'] = $value; $lab_obj_sub->setDataArray($parsedParamList); $lab_obj_sub->insertDataFromInternalArray(); } } $saved = true; } else { echo "<p>" . $lab_obj->getLastQuery() . "{$LDDbNoSave}"; } } # If save successful, jump to display values if ($saved) { include_once $root_path . 'include/inc_visual_signalling_fx.php'; # Set the visual signal setEventSignalColor($encounter_nr, SIGNAL_COLOR_DIAGNOSTICS_REPORT); header("location:labor_test_request_admin_chemlabor.php?sid={$sid}"); exit; } # end of if(mode==save) } else { #If mode is not "save" then get the basic personal data if ($debug) { echo "mode is not save then get the basic personal data<br>"; } # If previously saved, get the values if ($saved) { if ($result =& $lab_obj->getBatchResult($batch_nr)) { while ($row = $result->FetchRow()) { $pdata[$row['paramater_name']] = $row['parameter_value']; }
} else { $saved = false; echo "<p>{$report_obj->sql}{$LDDbNoSave}"; } } if ($dateput2 && $berichtput2 && $author2) { if (!$_POST['ref_notes_nr']) { $_POST['timeput'] = date('H:i:s'); } if ($dateput2) { $_POST['dateput2'] = formatDate2STD($dateput2, $date_format); } $_POST['berichtput2'] = deactivateHotHtml($berichtput2); if ($report_obj->saveInquiry($_POST)) { // Set the visual signal setEventSignalColor($pn, SIGNAL_COLOR_QUERY_DOCTOR, SIGNAL_COLOR_LEVEL_FULL); $saved = true; } else { $saved = false; echo "<p>{$report_obj->sql}{$LDDbNoSave}"; } } if ($saved) { header("location:{$thisfile}?sid={$sid}&lang={$lang}&saved=1&pn={$pn}&station={$station}&edit={$edit}"); } } else { $saved = false; } } else { // end of if(mode==save) $enc_obj->where = " encounter_nr={$pn}";
} else { continue; } } if ($saved) { if ($mark_antibiotic) { setEventSignalColor($pn, SIGNAL_COLOR_ANTIBIOTIC); } if ($mark_diuretic) { setEventSignalColor($pn, SIGNAL_COLOR_DIURETIC); } if ($mark_anticoag) { setEventSignalColor($pn, SIGNAL_COLOR_ANTICOAG); } if ($mark_iv) { setEventSignalColor($pn, SIGNAL_COLOR_IV); } header("location:{$thisfile}?sid={$sid}&lang={$lang}&edit={$edit}&saved=1&pn={$pn}&station={$station}&winid={$winid}&yr={$yr}&mo={$mo}&dy={$dy}&dyidx={$dyidx}&dystart={$dystart}&dyname={$dyname}"); exit; } } // end of if(mode==save) $count = 0; $medis = $charts_obj->getAllCurrentPrescription($pn); if (is_object($medis)) { $count = $medis->RecordCount(); } ?> <?php html_rtl($lang);
require './roots.php'; require $root_path . 'include/inc_environment_global.php'; /** * CARE2X Integrated Hospital Information System Deployment 2.1 - 2004-10-02 * GNU General Public License * Copyright 2005 Robert Meggle based on the development of Elpidio Latorilla (2002,2003,2004,2005) * elpidio@care2x.org, meggle@merotech.de * * See the file "copy_notice.txt" for the licence notice */ //define('NO_2LEVEL_CHK',1); //require($root_path.'include/inc_front_chain_lang.php'); $lang_tables[] = 'diagnoses_ICD10.php'; require $root_path . 'include/inc_front_chain_lang.php'; //Load the diagnstics-class: require_once $root_path . 'include/care_api_classes/class_tz_diagnostics.php'; $diagnostic_obj = new Diagnostics(); /* print_r ( $_SESSION ); echo "<br>"; echo "das will ich sehen: ".$_SESSION['sess_full_en']; */ if ($todo == 'submit') { // Load the visual signalling functions include_once $root_path . 'include/inc_visual_signalling_fx.php'; // Set the visual signal setEventSignalColor($_SESSION['sess_en'], SIGNAL_COLOR_QUERY_DOCTOR); $diagnostic_obj->EnterNewCase($_POST); } require "gui/gui_icd10_diagnose.php";