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>"; }
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>"; }
function form_consult_assign_lab() { // // use this to import data from lab // 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); } $patient_id = healthcenter::get_patient_id($get_vars["consult_id"]); print "<b>" . FTITLE_ASSIGN_NON_NTP_LABS . "</b><br/><br/>"; // query gets similar lab_id records from m_consult_lab // that are not in m_consult_ntp_labs_request print "<a name='assignlab_form'>"; print "<table width='300'>"; print "<form action = '" . $_SERVER["SELF"] . "?page=" . $get_vars["page"] . "&menu_id={$menu_id}&consult_id=" . $get_vars["consult_id"] . "&ptmenu=" . $get_vars["ptmenu"] . "&module=" . $get_vars["module"] . "&ntp=" . $get_vars["ntp"] . "&ntp_id=" . $get_vars["ntp_id"] . "' name='form_assign_ntp_labs' method='post'>"; print "<tr valign='top'><td>"; print "<span class='boxtitle'>" . LBL_NTP_REGISTRY_ID . "</span><br> "; print "REGISTRY ID: <font color='red'>" . module::pad_zero($get_vars["ntp_id"], 7) . "</font><br/>"; print "<br/></td></tr>"; print "<tr valign='top'><td>"; print "<span class='boxtitle'>" . INSTR_ASSIGN_NON_NTP_LABS . "</span><br/>"; $sql = "SELECT s.request_id, l.lab_id, date_format(s.lab_timestamp, '%a %d %b %Y, %h:%i%p') lab_timestamp " . "FROM m_consult_lab l, m_consult_lab_sputum s " . "left join m_consult_ntp_labs_request n " . "on n.request_id = l.request_id " . "where s.request_id = l.request_id and isnull(n.request_id) "; if ($result = mysql_query($sql)) { if (mysql_num_rows($result)) { while ($ntp_lab = mysql_fetch_array($result)) { print "<input type='checkbox' name='labs[]' value='" . $ntp_lab["request_id"] . "' /><font color='red'>" . module::pad_zero($ntp_lab["request_id"], 7) . "</font>: " . lab::get_lab_name($ntp_lab["lab_id"]); print "<br/> " . $ntp_lab["lab_timestamp"] . "<br/>"; } } else { print "<font color='red'>No lab records for this category</font><br/>"; } } print "</td></tr>"; print "<tr><td>"; if ($_SESSION["priv_add"]) { print "<input type='hidden' name='registry_id' value='" . $get_vars["ntp_id"] . "'/>"; print "<br><input type='submit' value = 'Assign Lab Exam' class='textbox' name='submitntp' style='border: 1px solid #000000'><br>"; } print "</td></tr>"; print "</form>"; print "</table><br>"; }