コード例 #1
0
/**
*  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;
    }
}
コード例 #2
0
         //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)) {
コード例 #3
0
/* 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'
コード例 #4
0
ファイル: aufnahme_start.php プロジェクト: patmark/care2x-tz
 }
 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']);
     }
コード例 #5
0
/* 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"
コード例 #8
0
    /**
     * 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 . '&nbsp;';
                }
                $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 .= '&nbsp;';
                        }
                        $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" . "&nbsp;&nbsp;" . "{$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');
        }
    }
コード例 #9
0
         		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;
コード例 #10
0
ファイル: inc_news_save.php プロジェクト: patmark/care2x-tz
# 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'];
        }
コード例 #11
0
 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)) {
コード例 #12
0
ファイル: search.php プロジェクト: patmark/care2x-tz
 }
 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']);
コード例 #13
0
         // 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"
コード例 #14
0
        $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'
コード例 #15
0
/* 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 */
コード例 #16
0
    /**
     * 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 '&nbsp;';
                        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;
            }
        }
        ?>
&nbsp;
			</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>&nbsp;</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;
        ?>
&nbsp;&nbsp;
			<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;
        ?>
&nbsp;&nbsp;
				<input name="blood_group" type="radio" value="B"  <?php 
        if ($blood_group == 'B') {
            echo 'checked';
        }
        ?>
><?php 
        echo $LDB;
        ?>
&nbsp;&nbsp;
				<input name="blood_group" type="radio" value="AB"  <?php 
        if ($blood_group == 'AB') {
            echo 'checked';
        }
        ?>
><?php 
        echo $LDAB;
        ?>
&nbsp;&nbsp;
				<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;
        ?>
&nbsp;&nbsp;
				<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;
        ?>
&nbsp;&nbsp;
				<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;
        ?>
&nbsp;&nbsp;
			</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">
				&nbsp;&nbsp;<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>&nbsp;&nbsp;'.$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 
        }
    }
コード例 #17
0
 $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');
                 }