function _consult_lab_fecalysis()
{
if (func_num_args() > 0) {
$arg_list = func_get_args();
$menu_id = $arg_list[0];
$post_vars = $arg_list[1];
$get_vars = $arg_list[2];
$validuser = $arg_list[3];
$isadmin = $arg_list[4];
}
if ($exitinfo = $this->missing_dependencies('fecalysis')) {
return print $exitinfo;
}
$f = new fecalysis();
if ($_POST["submitlab"] == 'Update Lab Exam') {
//print_r($_POST);
$q_request = mysql_query("SELECT request_id FROM m_consult_lab_fecalysis WHERE request_id='{$_POST['request_id']}'") or die("Cannot query 101 " . mysql_error());
if ($_POST[release_flag] == 1) {
$release = 'Y';
$release_date = date('Y-m-d H:i:s');
$q_update_lab = mysql_query("UPDATE m_consult_lab SET request_done='{$release}',done_timestamp='{$release_date}',done_user_id='{$_SESSION['userid']}' WHERE request_id='{$_POST['request_id']}' AND lab_id='{$_GET['lab_id']}'") or die("Cannot query 107 " . mysql_error());
} else {
$release = 'N';
$release_date = '';
}
$pxid = healthcenter::get_patient_id($_GET[consult_id]);
list($m, $d, $y) = explode('/', $_POST[fecal_date]);
$date_lab_exam = $y . '-' . $m . '-' . $d;
if (mysql_num_rows($q_request) != 0) {
$update_fecal = mysql_query("UPDATE m_consult_lab_fecalysis SET date_lab_exam='{$date_lab_exam}',fecal_color='{$_POST['fecal_color']}',fecal_consistency='{$_POST['fecal_consistency']}',fecal_occultblood='{$_POST['fecal_blood']}',fecal_ova='{$_POST['fecal_ova']}',fecal_wbc='{$_POST['fecal_wbc']}',fecal_rbc='{$_POST['fecal_rbc']}',fecal_bacteria='{$_POST['fecal_bacteria']}',fecal_fat='{$_POST['fecal_fat']}',fecal_starch='{$_POST['fecal_starch']}',fecal_others='{$_POST['fecal_others']}',release_flag='{$release}',release_date='{$release_date}' WHERE request_id='{$_GET['request_id']}'") or die("Cannot query 120 " . mysql_error());
} else {
$insert_fecal = mysql_query("INSERT INTO m_consult_lab_fecalysis SET consult_id='{$_GET['consult_id']}', request_id='{$_POST['request_id']}', patient_id='{$pxid}', date_lab_exam='{$date_lab_exam}', fecal_color='{$_POST['fecal_color']}', fecal_consistency='{$_POST['fecal_consistency']}', fecal_occultblood='{$_POST['fecal_blood']}',fecal_ova='{$_POST['fecal_ova']}',fecal_wbc='{$_POST['fecal_wbc']}',fecal_rbc='{$_POST['fecal_rbc']}',fecal_bacteria='{$_POST['fecal_bacteria']}', fecal_fat='{$_POST['fecal_fat']}',fecal_starch='{$_POST['fecal_starch']}',fecal_others='{$_POST['fecal_others']}',user_id='{$_SESSION['userid']}',release_flag='{$release}',release_date='{$release_date}'") or die("Cannot query 106" . mysql_error());
}
if ($update_fecal || $insert_fecal) {
echo "<script language='Javascript'>";
echo "window.alert('Fecalysis data was successfully been saved.')";
echo "</script>";
}
}
$f->form_consult_lab_fecalysis($menu_id, $post_vars, $get_vars);
}
}
}
if (file_exists('../modules/family_planning/class.family_planning.php')) {
include '../modules/family_planning/class.family_planning.php';
$family_planning = new family_planning();
if (!$module->activated('family_planning') && $initmod) {
$family_planning->init_sql();
$family_planning->init_menu();
$family_planning->init_deps();
$family_planning->init_lang();
$family_planning->init_help();
}
}
if (file_exists('../modules/fecalysis/class.fecalysis.php')) {
include '../modules/fecalysis/class.fecalysis.php';
$fecalysis = new fecalysis();
if (!$module->activated('fecalysis') && $initmod) {
$fecalysis->init_sql();
$fecalysis->init_menu();
$fecalysis->init_deps();
$fecalysis->init_lang();
$fecalysis->init_help();
}
}
if (file_exists('../modules/graph/class.graph.php')) {
include '../modules/graph/class.graph.php';
$graph = new graph();
if (!$module->activated('graph') && $initmod) {
$graph->init_sql();
$graph->init_menu();
$graph->init_deps();
function form_consult_lab_fecalysis() {
if (func_num_args()>0) {
$arg_list = func_get_args();
$menu_id = $arg_list[0];
$post_vars = $arg_list[1];
$get_vars = $arg_list[2];
$validuser = $arg_list[3];
$isadmin = $arg_list[4];
//print_r($arg_list);
}
print "<table width='300'>";
print "<form action = '".$_SERVER["SELF"]."?page=".$get_vars["page"]."&menu_id=".$get_vars["menu_id"]."&consult_id=".$get_vars["consult_id"]."&module=fecalysis&request_id=".$get_vars["request_id"]."&lab_id=SPT' name='form_lab' method='post'>";
print "<tr valign='top'><td>";
print "<b>".FTITLE_LAB_EXAM_FORM."</b><br><br>";
print "</td></tr>";
print "<tr valign='top'><td>";
print "<span class='boxtitle'>".LBL_LAB_REQUEST_DETAILS."</span><br> ";
$sql = "select lab_id, consult_id, date_format(request_timestamp, '%a %d %b %Y, %h:%i%p') request_timestamp, request_user_id, request_done, ".
"date_format(done_timestamp, '%a %d %b %Y, %h:%i%p') done_timestamp, done_user_id ".
"from m_consult_lab ".
"where request_id = '".$get_vars["request_id"]."'";
if ($result = mysql_query($sql)) {
if (mysql_num_rows($result)) {
$lab = mysql_fetch_array($result);
print "<table width='250' bgcolor='#FFFF99' style='border: 1px solid black'><tr><td class='tinylight'>";
print "<b>".LBL_LAB_EXAM.":</b> ".lab::get_lab_name($lab["lab_id"])."<br/>";
print "<b>".LBL_DATE_REQUESTED.":</b> ".$lab["request_timestamp"]."<br/>";
print "<b>".LBL_REQUESTED_BY.":</b> ".user::get_username($lab["request_user_id"])."<br/>";
print "<b>".LBL_DATE_PROCESSED.":</b> ".($lab["done_timestamp"]?$lab["done_timestamp"]:"NA")."<br/>";
print "<b>".LBL_PROCESSED_BY.":</b> ".($lab["done_user_id"]?user::get_username($lab["done_user_id"]):"NA")."<br/>";
print "</td></tr></table>";
}
}
print "</td></tr>";
print "<tr valign='top'><td>";
if ($get_vars["request_id"]) {
$sql_fecalysis = "select fec_collection_date, ".
"fec_macro_findings, ".
"fec_micro_findings,release_flag, ".
"from m_consult_lab_fecalysis ".
"where request_id = '".$get_vars["request_id"]."'";
if ($result_fecalysis = mysql_query($sql_fecalysis)) {
if (mysql_num_rows($result_fecalysis)) {
$fecalysis = mysql_fetch_array($result_fecalysis);
//print_r($fecalysis);
// set up collection dates
if ($fecalysis["fec_collection_date"]<>"0000-00-00") {
list($year,$month,$day) = explode("-",$fecalysis["fec_collection_date"]);
$fec_collection_date = "$month/$day/$year";
}
}
}
}
print "<table width='250' style='border: 1px dotted black'>";
print "<tr><td class='boxtitle'>".LBL_SPECIMEN."</td><td class='boxtitle'>#1</td><td class='boxtitle'>#2</td><td class='boxtitle'>#3</td></tr>";
print "<tr><td class='boxtitle'nowrap>".LBL_COLLECTION_DATE."</td>";
print "<td>";
print "<input type='text' size='10' class='tinylight' name='fec_collection_date' value='".($fec_collection_date?$fec_collection_date:$post_vars["fec_collection_date"])."' style='border: 1px solid #000000'> ";
print "<a href=\"javascript:show_calendar4('document.form_lab.fec_collection_date', document.form_lab.fec_collection_date.value);\"><img src='../images/cal.gif' width='16' height='16' border='0' alt='Click Here to Pick up the date'></a> ";
print "</td>";
print "</tr>";
// print "<tr><td class='boxtitle'nowrap>".LBL_MACROSCOPIC_FINDINGS."</td>";
// print "<td>".fecalysis::load_template(($fecalysis["fec_macro_findings"]?$fecalysis["fec_macro_findings"]:$post_vars["fec_macro_findings"]),'fec_macro_findings')."</td>";
// print "</tr>";
// print "<tr><td class='boxtitle'nowrap>".LBL_MICROSCOPIC_FINDINGS."</td>";
// print "<td>".fecalysis::load_template(($fecalysis["fec_micro_findings"]?$fecalysis["fec_micro_findings"]:$post_vars["fec_micro_findings"]),'fec_micro_findings')."</td>";
// print "</tr>";
print "<tr valign='top'><td>";
print "<br>";
print "<span class='boxtitle'>".LBL_MACROSCOPIC_FINDINGS."</span><br> ";
$default_macroscopic = fecalysis::load_template("FEC_MACROSCOPIC");
print "<textarea class='textbox' rows='8' cols='30' name='FEC_MACROSCOPIC' style='border: 1px solid #000000'>".($fecalysis["FEC_MACROSCOPIC"]?$fecalysis["FEC_MACROSCOPIC"]:($post_vars["FEC_MACROSCOPIC"]?$post_vars["FEC_MACROSCOPIC"]:$default_macroscopic))."</textarea><br>";
print "</td></tr>";
print "<tr valign='top'><td>";
print "<span class='boxtitle'>".LBL_MICROSCOPIC_FINDINGS."</span><br> ";
$default_microscopic = fecalysis::load_template("FEC_MICROSCOPIC");
print "<textarea class='textbox' rows='8' cols='30' name='FEC_MICROSCOPIC' style='border: 1px solid #000000'>".($fecalysis["FEC_MICROSCOPIC"]?$fecalysis["FEC_MICROSCOPIC"]:($post_vars["FEC_MICROSCOPIC"]?$post_vars["FEC_MICROSCOPIC"]:$default_microscopic))."</textarea><br>";
print "</td></tr>";
print "</table>";
print "</td></tr>";
print "<tr valign='top'><td>";
print "<span class='boxtitle'>".LBL_RELEASE_FLAG."</span><br> ";
print "<input type='checkbox' name='release_flag' ".(($fecalysis["release_flag"]?$fecalysis["release_flag"]:$post_vars["release_flag"])=="Y"?"checked":"")." value='1'/> ".INSTR_RELEASE_FLAG."<br />";
print "<br/></td></tr>";
print "<tr><td><br>";
if ($get_vars["request_id"]) {
print "<input type='hidden' name='request_id' value='".$get_vars["request_id"]."'>";
if ($_SESSION["priv_update"]) {
print "<input type='submit' value = 'Update Lab Exam' class='textbox' name='submitlab' style='border: 1px solid #000000'> ";
}
if ($_SESSION["priv_delete"]) {
print "<input type='submit' value = 'Delete Lab Exam' class='textbox' name='submitlab' style='border: 1px solid #000000'> ";
}
}
print "</td></tr>";
print "</form>";
print "</table><br>";
}
