示例#1
0
    }
}
if (!isset($target) || empty($target)) {
    $target = 'entry';
}
# Create encounter object
require_once $root_path . 'include/care_api_classes/class_encounter.php';
$enc_obj = new Encounter();
/* Save dept name to session */
if (!$_SESSION['sess_dept_name']) {
    $_SESSION['sess_dept_name'];
}
/* Create dept object and preload dept info */
require_once $root_path . 'include/care_api_classes/class_department.php';
$dept_obj = new Department();
$dept_obj->preloadDept($dept_nr);
$buffer = $dept_obj->LDvar();
if (isset(${$buffer}) && !empty(${$buffer})) {
    $_SESSION['sess_dept_name'] = ${$buffer};
} else {
    $_SESSION['sess_dept_name'] = $dept_obj->FormalName();
}
/* Load global configs */
include_once $root_path . 'include/care_api_classes/class_globalconfig.php';
$GLOBAL_CONFIG = array();
$glob_obj = new GlobalConfig($GLOBAL_CONFIG);
$glob_obj->getConfig('patient_%');
if (substr($matchcode, 0, 1) == '%' || substr($matchcode, 0, 1) == '&') {
    header("location:'.{$root_path}.'language/" . $lang . "/lang_" . $lang . "_invalid-access-warning.php");
    exit;
}
        }
    } else {
        echo "<p>{$sql}<p>{$LDDbNoRead}";
    }
}
# Detect the type of form
# $bgc1 = The main background color of the form
switch ($target) {
    case 'radio':
        $formtitle = $LDRadiology;
        $bgc1 = '#ffffff';
        break;
    case 'generic':
        include_once $root_path . 'include/care_api_classes/class_department.php';
        $dept_obj = new Department();
        if ($dept_obj->preloadDept($stored_request['testing_dept'])) {
            $buffer = $dept_obj->LDvar();
            if (isset(${$buffer}) && !empty(${$buffer})) {
                $formtitle = ${$buffer};
            } else {
                $formtitle = $dept_obj->FormalName();
            }
        }
        $bgc1 = '#bbdbc4';
        break;
    case 'chemlabor':
        $formtitle = $LDChemicallaboratory;
        $bgc1 = '#fff3f3';
        if (file_exists($root_path . 'language/' . $lang . '/lang_' . $lang . '_konsil_chemlabor.php')) {
            include_once $root_path . 'language/' . $lang . '/lang_' . $lang . '_konsil_chemlabor.php';
        } else {
     $title = $LDTestRequest . " - " . $LDTestType[$target];
     $breakfile = $root_path . "modules/radiology/radiolog.php" . URL_APPEND;
     $test_pass_logo = 'thorax_sm.jpg';
     break;
 case 'admin':
     $title = $LDPendingRequest . " - " . $LDTestType[$subtarget];
     if ($subtarget == 'radio') {
         $breakfile = $root_path . "modules/radiology/radiolog.php" . URL_APPEND;
         $test_pass_logo = "thorax_sm.jpg";
     }
     $fileforward = "labor_test_request_admin_" . $subtarget . ".php" . URL_REDIRECT_APPEND . "&target=" . $target . "&subtarget=" . $subtarget . "&noresize=1&&user_origin=" . $user_origin;
     break;
 case 'generic':
     include_once $root_path . 'include/care_api_classes/class_department.php';
     $dept_obj = new Department();
     if ($dept_obj->preloadDept($subtarget)) {
         $buffer = $dept_obj->LDvar();
         if (isset(${$buffer}) && !empty(${$buffer})) {
             $title = $LDPendingRequest . " - " . ${$buffer};
         } else {
             $title = $LDPendingRequest . " - " . $dept_obj->FormalName();
         }
     }
     $fileforward = "labor_test_request_admin_generic.php" . URL_REDIRECT_APPEND . "&target=" . $target . "&subtarget=" . $subtarget . "&noresize=1&&user_origin=" . $user_origin;
     if ($user_origin == 'amb') {
         $userck = 'ck_amb_user';
         $breakfile = $root_path . 'modules/ambulatory/ambulatory.php' . URL_APPEND;
     } else {
         $userck = 'ck_lab_user';
         $breakfile = $root_path . "modules/doctors/doctors.php" . URL_APPEND;
     }