function NewRecord1_Button_Insert_OnClick(&$sender)
{
$NewRecord1_Button_Insert_OnClick = true;
$Component =& $sender;
$Container =& CCGetParentContainer($sender);
global $NewRecord1;
//Compatibility
//End NewRecord1_Button_Insert_OnClick
//Custom Code @11-2A29BDB7
// -------------------------
global $Redirect;
if (1 > 0) {
$Redirect = "login?ret_link=" . ccgetparam("ret_link", "");
}
// -------------------------
//End Custom Code
//Close NewRecord1_Button_Insert_OnClick @10-A9FC55FD
return $NewRecord1_Button_Insert_OnClick;
}
function Label3_BeforeShow(&$sender)
{
$Label3_BeforeShow = true;
$Component =& $sender;
$Container =& CCGetParentContainer($sender);
global $Label3;
//Compatibility
//End Label3_BeforeShow
//Custom Code @11-2A29BDB7
// -------------------------
global $Redirect;
$db = new clsDBconnection1();
$sql = "select surname, other_names from patient inner join result on patient.patient_id=result.patient_id where result.result_id=" . ccgetparam("result_id", "");
$db->query($sql);
$Result = $db->next_record();
$Label3->SetValue($db->f('surname') . " " . $db->f('other_names'));
// -------------------------
//End Custom Code
//Close Label3_BeforeShow @10-55E33DF9
return $Label3_BeforeShow;
}
function result_AfterUpdate(&$sender)
{
$result_AfterUpdate = true;
$Component =& $sender;
$Container =& CCGetParentContainer($sender);
global $result;
//Compatibility
//End result_AfterUpdate
//Custom Code @182-2A29BDB7
// -------------------------
global $Redirect;
if (is_numeric(ccgetparam('result_id'))) {
$db = new clsDBconnection1();
$sqlq = "Update result set status_id=3 where result_id=" . ccgetparam('result_id');
$db->query($sqlq);
$db->next_record();
$Redirect = "../print_report.php?result_id=" . CCGetParam("result_id", "");
}
// -------------------------
//End Custom Code
//Close result_AfterUpdate @51-FF40E88D
return $result_AfterUpdate;
}
function patient_BeforeShow(&$sender)
{
$patient_BeforeShow = true;
$Component =& $sender;
$Container =& CCGetParentContainer($sender);
global $patient;
//Compatibility
//End patient_BeforeShow
//Custom Code @57-2A29BDB7
// -------------------------
if (ccgetparam("patient_id", "") != "" or ccgetparam("onAdd", "") == 1) {
$patient->Visible = true;
} else {
$patient->Visible = false;
}
// -------------------------
//End Custom Code
//Close patient_BeforeShow @42-055DA218
return $patient_BeforeShow;
}
$header_print_report->Initialize();
$title_users_sub_dept_sex = new clsGridtitle_users_sub_dept_sex("", $MainPage);
$patID = new clsControl(ccsLabel, "patID", "patID", ccsText, "", CCGetRequestParam("patID", ccsGet, NULL), $MainPage);
$resultID = new clsControl(ccsLabel, "resultID", "resultID", ccsText, "", CCGetRequestParam("resultID", ccsGet, NULL), $MainPage);
$startDate = new clsControl(ccsLabel, "startDate", "startDate", ccsText, "", CCGetRequestParam("startDate", ccsGet, NULL), $MainPage);
$deptShort = new clsControl(ccsLabel, "deptShort", "deptShort", ccsText, "", CCGetRequestParam("deptShort", ccsGet, NULL), $MainPage);
$Label1 = new clsControl(ccsLabel, "Label1", "Label1", ccsText, "", CCGetRequestParam("Label1", ccsGet, NULL), $MainPage);
$MainPage->header_print_report =& $header_print_report;
$MainPage->title_users_sub_dept_sex =& $title_users_sub_dept_sex;
$MainPage->patID =& $patID;
$MainPage->resultID =& $resultID;
$MainPage->startDate =& $startDate;
$MainPage->deptShort =& $deptShort;
$MainPage->Label1 =& $Label1;
if (!is_array($resultID->Value) && !strlen($resultID->Value) && $resultID->Value !== false) {
$resultID->SetText(ccgetparam('result_id', ''));
}
if (!is_array($Label1->Value) && !strlen($Label1->Value) && $Label1->Value !== false) {
$Label1->SetText(getUsername());
}
$title_users_sub_dept_sex->Initialize();
BindEvents();
$CCSEventResult = CCGetEvent($CCSEvents, "AfterInitialize", $MainPage);
if ($Charset) {
header("Content-Type: " . $ContentType . "; charset=" . $Charset);
} else {
header("Content-Type: " . $ContentType);
}
//End Initialize Objects
//Initialize HTML Template @1-28F2FDD6
$CCSEventResult = CCGetEvent($CCSEvents, "OnInitializeView", $MainPage);
function Page_BeforeShow(&$sender)
{
$Page_BeforeShow = true;
$Component =& $sender;
$Container =& CCGetParentContainer($sender);
global $write_report;
//Compatibility
//End Page_BeforeShow
//Custom Code @69-2A29BDB7
// -------------------------
if (is_numeric(ccgetparam('result_id'))) {
$db = new clsDBconnection1();
$sqlq = "Update result set status_id=2 where result_id=" . ccgetparam('result_id');
$db->query($sqlq);
$db->next_record();
}
// -------------------------
//End Custom Code
//Close Page_BeforeShow @1-4BC230CD
return $Page_BeforeShow;
}
$MainPage->header_receptionist_sa =& $header_receptionist_sa;
$MainPage->Label1 =& $Label1;
$MainPage->Label2 =& $Label2;
$MainPage->Label3 =& $Label3;
$MainPage->result =& $result;
$MainPage->result_users =& $result_users;
$MainPage->Label4 =& $Label4;
$MainPage->Label5 =& $Label5;
if (!is_array($Label2->Value) && !strlen($Label2->Value) && $Label2->Value !== false) {
$Label2->SetText(getUserName());
}
if (!is_array($Label4->Value) && !strlen($Label4->Value) && $Label4->Value !== false) {
$Label4->SetValue(time());
}
if (!is_array($Label5->Value) && !strlen($Label5->Value) && $Label5->Value !== false) {
$Label5->SetText(ccgetparam('result_id'));
}
$result->Initialize();
$result_users->Initialize();
BindEvents();
$CCSEventResult = CCGetEvent($CCSEvents, "AfterInitialize", $MainPage);
if ($Charset) {
header("Content-Type: " . $ContentType . "; charset=" . $Charset);
} else {
header("Content-Type: " . $ContentType);
}
//End Initialize Objects
//Initialize HTML Template @1-6AE7B07D
$CCSEventResult = CCGetEvent($CCSEvents, "OnInitializeView", $MainPage);
$Tpl = new clsTemplate($FileEncoding, $TemplateEncoding);
if (strlen($TemplateSource)) {
