function form_consult_lab_sputum() {
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);
}
echo "<a name='sputum'></a>";
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=sputum&request_id=".$get_vars["request_id"]."&lab_id=SPT". "&ptmenu=LABS' 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_sputum = "select sp1_collection_date, sp2_collection_date, sp3_collection_date, ".
"sp1_appearance, sp2_appearance, sp3_appearance, ".
"sp1_reading, sp2_reading, sp3_reading, lab_diag1, lab_diag2, lab_diag3, lab_diagnosis, release_flag, sputum_period ".
"from m_consult_lab_sputum ".
"where request_id = '".$get_vars["request_id"]."'";
if ($result_sputum = mysql_query($sql_sputum)) {
if (mysql_num_rows($result_sputum)) {
$sputum = mysql_fetch_array($result_sputum);
//print_r($sputum);
// set up collection dates
if ($sputum["sp1_collection_date"]<>"0000-00-00") {
list($year,$month,$day) = explode("-",$sputum["sp1_collection_date"]);
$sp1_collection_date = "$month/$day/$year";
}
if ($sputum["sp2_collection_date"]<>"0000-00-00") {
list($year,$month,$day) = explode("-",$sputum["sp2_collection_date"]);
$sp2_collection_date = "$month/$day/$year";
}
if ($sputum["sp3_collection_date"]<>"0000-00-00") {
list($year,$month,$day) = explode("-",$sputum["sp3_collection_date"]);
$sp3_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='sp1_collection_date' value='".($sp1_collection_date?$sp1_collection_date:$post_vars["sp1_collection_date"])."' style='border: 1px solid #000000'> ";
print "<a href=\"javascript:show_calendar4('document.form_lab.sp1_collection_date', document.form_lab.sp1_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><td>";
print "<input type='text' size='10' class='tinylight' name='sp2_collection_date' value='".($sp2_collection_date?$sp2_collection_date:$post_vars["sp2_collection_date"])."' style='border: 1px solid #000000'> ";
print "<a href=\"javascript:show_calendar4('document.form_lab.sp2_collection_date', document.form_lab.sp2_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><td>";
print "<input type='text' size='10' class='tinylight' name='sp3_collection_date' value='".($sp3_collection_date?$sp3_collection_date:$post_vars["sp3_collection_date"])."' style='border: 1px solid #000000'> ";
print "<a href=\"javascript:show_calendar4('document.form_lab.sp3_collection_date', document.form_lab.sp3_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_VISUAL_APPEARANCE."</td>";
print "<td>".sputum::show_sputum_appearance(($sputum["sp1_appearance"]?$sputum["sp1_appearance"]:$post_vars["sp1_appearance"]),'sp1_appearance')."</td>";
print "<td>".sputum::show_sputum_appearance(($sputum["sp2_appearance"]?$sputum["sp2_appearance"]:$post_vars["sp2_appearance"]),'sp2_appearance')."</td>";
print "<td>".sputum::show_sputum_appearance(($sputum["sp3_appearance"]?$sputum["sp3_appearance"]:$post_vars["sp3_appearance"]),'sp3_appearance')."</td>";
print "</tr>";
print "<tr><td class='boxtitle'>SPUTUM EXAM RESULT</td>";
print sputum::show_sputum_dropdown('lab_diag1',$sputum["lab_diag1"]);
print sputum::show_sputum_dropdown('lab_diag2',$sputum["lab_diag2"]);
print sputum::show_sputum_dropdown('lab_diag3',$sputum["lab_diag3"]);
print "</tr>";
print "<tr><td class='boxtitle'>".LBL_READING."</td>";
print "<td>".sputum::show_sputum_reading(($sputum["sp1_reading"]?$sputum["sp1_reading"]:$post_vars["sp1_reading"]),'sp1_reading')."</td>";
print "<td>".sputum::show_sputum_reading(($sputum["sp2_reading"]?$sputum["sp2_reading"]:$post_vars["sp2_reading"]),'sp2_reading')."</td>";
print "<td>".sputum::show_sputum_reading(($sputum["sp3_reading"]?$sputum["sp3_reading"]:$post_vars["sp3_reading"]),'sp3_reading')."</td>";
print "</tr>";
print "<tr><td class='boxtitle'>".LBL_SPUTUM_PERIOD."</td>";
print "<td colspan='3'>";
print sputum::show_sputum_period(($sputum["sputum_period"]?$sputum["sputum_period"]:$post_vars["sputum_period"]));
print "</td>";
print "</tr>";
print "<tr><td class='boxtitle'>FINAL ".LBL_LAB_DIAGNOSIS."</td>";
print "<td colspan='3'>";
print "<select name='lab_diagnosis' class='tinylight'>";
print "<option value=''>Select Diagnosis</option>";
print "<option value='P' ".(($sputum["lab_diagnosis"]?$sputum["lab_diagnosis"]:$post_vars["lab_diagnosis"])=="P"?"selected":"").">Positive</option>";
print "<option value='N' ".(($sputum["lab_diagnosis"]?$sputum["lab_diagnosis"]:$post_vars["lab_diagnosis"])=="N"?"selected":"").">Negative</option>";
print "<option value='D' ".(($sputum["lab_diagnosis"]?$sputum["lab_diagnosis"]:$post_vars["lab_diagnosis"])=="D"?"selected":"").">Doubtful</option>";
print "</select>";
print "</td>";
print "</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' ".(($sputum["release_flag"]?$sputum["release_flag"]:$post_vars["release_flag"])=="Y"?"checked":"")." value='1'/> ".INSTR_RELEASE_FLAG."<br />";
print "</td></tr>";
print "<tr><td align='center'>";
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>";
}
