function form_consult_history()
 {
     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_history from m_consult_notes where notes_id = '" . $get_vars["notes_id"] . "'";
     if ($result = mysql_query($sql)) {
         if (mysql_num_rows($result)) {
             list($history) = mysql_fetch_array($result);
         }
     }
     $checkSQL = "select pasthistory_id, familyhistory_id, medintake_id,\n\t        \t\tmenarche, date_format(lmp,'%m/%d/%Y'), period_duration, cycle, pads_perday,\n\t        \t\tonset_sexinter, method_id, menopause, meno_age,\n\t        \t\tsmoking, pack_peryear, alcohol, bottles_perday, ill_drugs\n\t        \t\tfrom m_patient_history where patient_id = '{$patient_id}'";
     if ($checkResult = mysql_query($checkSQL)) {
         if (mysql_num_rows($checkResult)) {
             list($pasthistory_id, $familyhistory_id, $medintake_id, $menarche, $lmp, $period_duration, $cycle, $pads_perday, $onset_sexinter, $method_id, $menopause, $meno_age, $smoking, $pack_peryear, $alcohol, $bottles_perday, $ill_drugs) = mysql_fetch_array($checkResult);
         }
         /*else {
                 	$checkSQL = "SELECT date_format(patient_lmp,'%m/%d/%Y') FROM m_patient_mc WHERE patient_id='$patient_id' ORDER by patient_lmp DESC LIMIT 1";
           	if ($checkResult = mysql_query($checkSQL)) {
                   if (mysql_num_rows($checkResult)) {
                   	list($lmp) = 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='history_form'>";
     print "<table width='350px'>";
     print "<form method='post' action='#history_form' name='form_history'>";
     print "<tr><td>";
     print "<b>" . FTITLE_CONSULT_HISTORY_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'>PAST MEDICAL HISTORY</span><br/></td></tr>";
     print "<tr><td>";
     print notes::checkbox_medical_history('past', $pasthistory_id);
     print "<br/><hr></hr><br/></td></tr>";
     print "<tr id='end' class='header'><td>";
     print "<span class='clickable'>-</span> <span class='boxtitle'>FAMILY HISTORY</span><br/></td></tr>";
     print "<tr><td>";
     print notes::checkbox_medical_history('family', $familyhistory_id);
     print "<br/><hr></hr><br/></td></tr>";
     print "<tr id='end' class='header'><td>";
     print "<span class='clickable'>-</span> <span class='boxtitle'>MEDICINE INTAKE HISTORY</span><br/></td></tr>";
     print "<tr><td>";
     print notes::checkbox_medicine_history($medintake_id);
     print "<br/><hr></hr><br/></td></tr>";
     //get menstrual history
     print notes::get_menstrual_history($menarche, $lmp, $period_duration, $cycle, $pads_perday, $onset_sexinter, $method_id, $menopause, $meno_age);
     print "<tr id='end' class='header'><td>";
     print "<span class='clickable'>-</span> <span class='boxtitle'>PERSONAL/SOCIAL HISTORY</span><br/></td></tr>";
     print "<tr><td>";
     print "<span style='width: 80px; display:inline-block;'>Smoking: </span>";
     print "<select name='smoking'>";
     print "<option value=''>-Select-</option>";
     print "<option value='Y' " . ($smoking == 'Y' ? 'selected' : '') . ">Yes</option>";
     print "<option value='N' " . ($smoking == 'N' ? 'selected' : '') . ">No</option>";
     print "<option value='Q' " . ($smoking == 'Q' ? 'selected' : '') . ">Quit</option>";
     print "</select>";
     print " <span style='width: 130px; display:inline-block;'>No. of Pack/Year: </span>";
     print "<input type='text' name='pack' style='width:50px;' value='" . ($smoking == 'N' ? '0' : $pack_peryear) . "'>";
     print "<span style='width: 80px; display:inline-block;'>Alcohol: </span>";
     print "<select name='alcohol'>";
     print "<option value=''>-Select-</option>";
     print "<option value='Y' " . ($alcohol == 'Y' ? 'selected' : '') . ">Yes</option>";
     print "<option value='N' " . ($alcohol == 'N' ? 'selected' : '') . ">No</option>";
     print "<option value='Q' " . ($alcohol == 'Q' ? 'selected' : '') . ">Quit</option>";
     print "</select>";
     print " <span style='width: 130px; display:inline-block;'>No. of Bottles/Day: </span>";
     print "<input type='text' name='bottles' style='width:50px;' value='" . ($alcohol == 'N' ? '0' : $bottles_perday) . "'>";
     print "<span style='width: 80px; display:inline-block;'>Illicit drugs: </span>";
     print "<select name='illdrugs'>";
     print "<option value=''>-Select-</option>";
     print "<option value='Y' " . ($ill_drugs == 'Y' ? 'selected' : '') . ">Yes</option>";
     print "<option value='N' " . ($ill_drugs == 'N' ? 'selected' : '') . ">No</option>";
     print "<option value='Q' " . ($ill_drugs == 'Q' ? 'selected' : '') . ">Quit</option>";
     print "</select>";
     print "<br/><br/><hr></hr><br/></td></tr>";
     print "<tr id='end' class='header'><td id='surgical'>";
     print "<span class='clickable'>-</span> <span class='boxtitle'>SURGICAL HISTORY</span><br/></tr>";
     print notes::get_surgical_history();
     //print "<input type='text' name='surgicalname[]' placeholder='Operation'>";
     //print "<input type='text' size='7' value='' name='surgicaldate'>";
     //print "<a href=\"javascript:show_calendar4('document.form_history.surgicaldate', document.form_history.surgicaldate.value);\"><img src='../images/cal.gif' width='16' height='16' border='0' alt='Click Here to Pick up the date'></a>";
     //print notes::_calendar();
     /*print "<tr><td>";
       print "<input type='button' value='Add Surgical History' onclick='addSurgical();'>";
       print "<br/><br/></td></tr>";*/
     print "<tr id='end' class='header nopointer'><td><br/>";
     print "<span class='boxtitle'>" . LBL_HISTORY_TEMPLATE . "</span><br/>";
     notes::show_templates("HX", $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'>";
         $history_text = notes::get_template_text($post_vars["template"]);
         print stripslashes(nl2br($history_text));
         print "<br/>";
         print "<input type='hidden' name='template_text' value='{$history_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") {
         $history = $post_vars["history_text"] . $post_vars["template_text"];
     }
     print "<br/></td></tr>";
     print "<tr id='end' class='header nopointer'><td>";
     print "<span class='boxtitle'>" . LBL_NOTES_HISTORY . "</span><br> ";
     print "<textarea rows='15' cols='40' class='tinylight' name='history_text' style='border: 1px solid black'>" . ($history ? $history : $post_vars["history_text"]) . "</textarea>";
     print "<br/></td></tr>";
     print "<tr id='end' class='header nopointer'><td>";
     print "<input type='submit' name='submitnotes' value='Save History' class='textbox' style='border: 1px solid black'/> ";
     print "<br/></td></tr>";
     print "</form>";
     print "</table><br/>";
 }