function form_consult_pe() { 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"]); $sql = "select notes_physicalexam from m_consult_notes where notes_id = '" . $get_vars["notes_id"] . "'"; if ($result = mysql_query($sql)) { if (mysql_num_rows($result)) { list($pe) = mysql_fetch_array($result); } } $checkSQL = "select breast_screen,breast_remarks,skin_code, skin_remarks, heent_code, heent_remarks,\n\t \t\tchest_code, chest_remarks, heart_code, heart_remarks,\n\t \t\tabdomen_code, abdomen_remarks, extremities_code, extremities_remarks\n\t \t\tfrom m_consult_notes_pe where notes_id = '" . $get_vars["notes_id"] . "'"; if ($checkResult = mysql_query($checkSQL)) { if (mysql_num_rows($checkResult)) { list($breast_screen, $breast_remarks, $skin_code, $skin_remarks, $heent_code, $heent_remarks, $chest_code, $chest_remarks, $heart_code, $heart_remarks, $abdomen_code, $abdomen_remarks, $extremities_code, $extremities_remarks) = mysql_fetch_array($checkResult); } } print "<script type='text/javascript' src='../js/script/jquery-1.10.2.min.js'></script>"; print " <script>\n\t\t\t\t\t\$(document).ready(function(){\n\t\t\t\t\t\t\$(function(){\n\t\t\t\t\t\t \$('.header').nextUntil('tr.header').hide();\n\t\t\t\t\t\t \$('.header').find('span.clickable').html('+');\n\t\t\n\t\t\n\t\t\t\t\t\t\$('.header').click(function(){\n\t\t\t\t\t\t \$(this).find('span.clickable').text(function(_, value){return value=='-'?'+':'-'});\n\t\t\t\t\t\t \$(this).nextUntil('tr#end').slideToggle(100, function(){\n\t\t\t\t\t\t });\n\t\t\t\t\t\t});\n\t\t\t\t\t\t \n\t\t\t\t\t\t});\n\t\t\t\t\t});\n\t\t\t\t</script>"; print "<style type='text/css'>\n\t\t\t\t\ttr#end.header.nopointer td:first-child\n\t\t\t\t\t{\n\t\t\t\t\t\tcursor:default;\n\t\t\t\t\t}\n\t\t\t \ttr.header td:first-child, tr.alertheader td:first-child\n\t\t\t\t\t{\n\t\t\t\t\t cursor:pointer;\n\t\t\t\t\t}\n\t\t\t\t</style>"; print "<a name='pe_form'>"; print "<table width='300'>"; print "<form method='post' action='#pe_form' name='form_pe'>"; print "<tr><td>"; print "<b>" . FTITLE_CONSULT_PE_FORM . "</b><br/>"; print "<br/></td></tr>"; print "<tr><td>"; print "<span class='boxtitle'>" . LBL_NOTES_ID . "</span><br/>"; print "<font color='red'>" . module::pad_zero($get_vars["notes_id"], 7) . "</font><br/>"; print "<br/></td></tr>"; print "<tr id='end' class='header'><td>"; print "<span class='clickable'>-</span> <span class='boxtitle'>Skin</span><br/></td></tr>"; print "<tr><td>"; print notes::checkbox_pe('Skin', $skin_code, $skin_remarks); print "<br/></td></tr>"; print "<tr id='end' class='header'><td>"; print "<span class='clickable'>-</span> <span class='boxtitle'>HEENT</span><br/></td></tr>"; print "<tr><td>"; print notes::checkbox_pe('HEENT', $heent_code, $heent_remarks); print "<br/></td></tr>"; print "<tr id='end' class='header'><td>"; print "<span class='clickable'>-</span> <span class='boxtitle'>Chest/Lungs</span><br/></td></tr>"; print "<tr><td>"; print notes::checkbox_pe('Chest/Lungs', $chest_code, $chest_remarks); print "<br/></td></tr>"; print "<tr id='end' class='header'><td>"; print "<span class='clickable'>-</span> <span class='boxtitle'>Heart</span><br/></td></tr>"; print "<tr><td>"; print notes::checkbox_pe('Heart', $heart_code, $heart_remarks); print "<br/></td></tr>"; print "<tr id='end' class='header'><td>"; print "<span class='clickable'>-</span> <span class='boxtitle'>Abdomen</span><br/></td></tr>"; print "<tr><td>"; print notes::checkbox_pe('Abdomen', $abdomen_code, $abdomen_remarks); print "<br/></td></tr>"; print "<tr id='end' class='header'><td>"; print "<span class='clickable'>-</span> <span class='boxtitle'>Extremities</span><br/></td></tr>"; print "<tr><td>"; print notes::checkbox_pe('Extremities', $extremities_code, $extremities_remarks); print "<br/></td></tr><tr id='end' class='header nopointer'><td><br/></td></tr>"; //breastcancerscreen print notes::dropdown_breastcancerscreen($breast_screen, $breast_remarks); print "<tr id='end' class='header nopointer'><td><br/>"; print "<span class='boxtitle'>" . LBL_PE_TEMPLATE . "</span><br/>"; notes::show_templates("PE", $post_vars["template"]); if ($post_vars["template"]) { print "<br/><br/>"; print "<span class='boxtitle'>" . LBL_TEMPLATE_CONTENT . "</span><br> "; print "<table width='200' style='border: 1px dotted black'><tr><td class='tinylight'>"; $pe_text = notes::get_template_text($post_vars["template"]); print stripslashes(nl2br($pe_text)); print "<br/>"; print "<input type='hidden' name='template_text' value='{$pe_text}' />"; print "<input type='hidden' name='prev_template' value='" . $post_vars["template"] . "' class='tinylight' style='border: 1px solid black; background-color: #CCFF33'/>"; print "<input type='submit' name='submitnotes' value='Add Template' class='tinylight' style='border: 1px solid black; background-color: #CCFF33'/>"; print "</td></tr></table>"; } if ($post_vars["submitnotes"] == "Add Template") { $pe = $post_vars["pe_text"] . $post_vars["template_text"]; } print "<br/></td></tr>"; print "<tr id='end' class='header nopointer'><td>"; print "<span class='boxtitle'>" . LBL_NOTES_PE . "</span><br> "; print "<textarea rows='15' cols='40' class='tinylight' name='pe_text' style='border: 1px solid black'>" . ($pe ? $pe : $post_vars["pe_text"]) . "</textarea>"; print "<br/></td></tr>"; print "<tr id='end' class='header nopointer'><td>"; print "<input type='submit' name='submitnotes' value='Save PE' class='textbox' style='border: 1px solid black'/> "; print "<br/></td></tr>"; print "</form>"; print "</table><br/>"; }