function form_mc_prenatal() {
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);
}
if ($post_vars["prenatal_id"] && $post_vars["submitmc"] && $post_vars["visit_sequence"]) {
$sql = "select mc_id, patient_id, consult_id, patient_weight, prenatal_date, ".
"blood_pressure_systolic, blood_pressure_diastolic, fundic_height, ".
"presentation, fhr, fhr_location, trimester, visit_sequence, data_type ".
"from m_consult_mc_prenatal ".
"where mc_id = '".$post_vars["prenatal_id"]."' and visit_sequence = '".$post_vars["visit_sequence"]."'";
if ($result = mysql_query($sql)) {
if (mysql_num_rows($result)) {
$mc = mysql_fetch_array($result);
//print_r($mc);
}
}
}
// PRENATAL INFO
// get most recent pregnancy id
$patient_id = healthcenter::get_patient_id($get_vars["consult_id"]);
$mc_id = mc::registry_record_exists($patient_id);
if ($mc_id) {
// edit prenatal data
if ($post_vars["prenatal_id"]) {
list($aog_weeks,$aog_days) = mc::get_aog($mc_id, healthcenter::get_consult_date($mc["consult_id"]));
$aog = ($aog_weeks + ($aog_days/7));
$trimester = $mc["trimester"];
//$visit_sequence = $mc["visit_sequence"];
$visit_sequence = $post_vars["visit_sequence"];
} else {
// new prenatal data headers
$sql_count = mysql_query("SELECT count(mc_id) FROM m_consult_mc_prenatal WHERE mc_id='$mc_id'") or die("cannot query: 1236");
$prenatal_seq = mysql_fetch_array($sql_count);
$seq = $prenatal_seq[0] + 1;
list($aog_weeks,$aog_days) = mc::get_aog($mc_id, $get_vars["consult_id"]);
$aog = ($aog_weeks + ($aog_days/7));
$trimester = mc::get_trimester($mc_id, healthcenter::get_consult_date($get_vars["consult_id"]));
//$visit_sequence = mc::get_visit_sequence($mc_id, $get_vars["consult_id"]);
$visit_sequence = $seq;
}
print "<a name='prenatal'>";
print "<table width='300'>";
if ($post_vars["Delete Prenatal"]) {
$tail = "prenatal";
} else {
$tail = "";
}
print "<form action = '".$_SERVER["SELF"]."?page=".$get_vars["page"]."&menu_id=".$get_vars["menu_id"]."&consult_id=".$get_vars["consult_id"]."&ptmenu=".$get_vars["ptmenu"]."&module=mc&mc=PREN&mc_id=$mc_id#$tail' name='form_mc_prenatal' method='post'>";
print "<tr valign='top'><td>";
print "<b>".FTITLE_MC_PRENATAL_FORM."</b><br/><br/>";
print "</td></tr>";
print "<tr valign='top'><td>";
print "<a name='prevtx'>";
//print "<span class='boxtitle'>".LBL_IMPORT_EXTERNAL_DATA."?</span><br> ";
//print "<input type='checkbox' name='data_import_flag' onchange='this.form.submit();' ".(($mc["data_type"]?$mc["data_type"]=="EXT":$post_vars["data_import_flag"])?"checked":"")." value='1'/> Check if external HBMR<br />";
print "</td></tr>";
//if ($mc["data_type"]=="EXT" || $post_vars["data_import_flag"]) {
if ($mc["prenatal_date"]) {
list($date, $time) = explode(" ", $mc["prenatal_date"]);
list($year, $month, $day) = explode("-", $date);
$visit_date = "$month/$day/$year";
}
print "<tr valign='top'><td>";
print "<span class='boxtitle'>".LBL_PRENATAL_VISIT_DATE."</span><br>";
print "<input type='text' size='10' maxlength='10' class='textbox' name='visit_date' value='".($visit_date?$visit_date:$post_vars["visit_date"])."' style='border: 1px solid #000000'> ";
print "<a href=\"javascript:show_calendar4('document.form_mc_prenatal.visit_date', document.form_mc_prenatal.visit_date.value);\"><img src='../images/cal.gif' width='16' height='16' border='0' alt='Click Here to Pick up the date'></a><br>";
print "<small>Click on the calendar icon to select date. Otherwise use MM/DD/YYYY format.</small><br>";
print "</td></tr>";
//}
print "<tr valign='top'><td>";
print "<table bgcolor='#FFCCFF' width='300' cellpadding='3'>";
//if ($post_vars["data_import_flag"]) {
print "<tr valign='top'><td>";
print "<span class='boxtitle'>".LBL_PRENATAL_VISIT_SEQUENCE."</span><br>";
// print "<input type='text' size='5' maxlength='5' class='textbox' name='visit_sequence' value='".($mc["visit_sequence"]?$mc["visit_sequence"]:$post_vars["visit_sequence"])."' style='border: 1px solid #000000'> ";
print "<input type='text' size='5' maxlength='5' class='textbox' name='visit_sequence' value='$visit_sequence' style='border: 1px solid #000000' readonly> ";
print "</td></tr>";
//} else {
/* print "<tr valign='top'><td>";
print "<span class='boxtitle'>REGISTRY INFORMATION</span><br/>";
print "<span class='tinylight'>";
print "REGISTRY ID: <font color='red'>".module::pad_zero($mc_id, 7)."</font><br/>";
print "AOG THIS VISIT: $aog_weeks WKS $aog_days DAYS<br/>";
print "PATIENT TRIMESTER: $trimester<br/>";
print "VISIT SEQUENCE: $visit_sequence<br/>";
print "</span>";
print "</td></tr>";
*/
//}
print "<tr valign='top'><td>";
if ($post_vars["prenatal_id"]) {
$systolic = $mc["blood_pressure_systolic"];
$diastolic = $mc["blood_pressure_diastolic"];
} else {
list($systolic, $diastolic) = healthcenter::get_blood_pressure($get_vars["consult_id"]);
}
print "<span class='boxtitle'>".LBL_BLOOD_PRESSURE."</span><br> ";
print "<span class='tinylight'>SYSTOLIC</span> <input type='text' class='tinylight' size='5' maxlength='3' name='patient_systolic' value='$systolic' style='border: 1px solid #000000'> ";
print "<span class='tinylight'>DIASTOLIC</span> <input type='text' class='tinylight' size='5' maxlength='3' name='patient_diastolic' value='$diastolic' style='border: 1px solid #000000'> ";
print "</td></tr>";
print "<tr valign='top'><td>";
if ($post_vars["prenatal_id"]) {
$weight = $mc["patient_weight"];
} else {
$weight = healthcenter::get_body_weight($get_vars["consult_id"]);
}
print "<span class='boxtitle'>".LBL_PATIENT_WEIGHT." (KG)</span><br> ";
print "<input type='text' class='tinylight' size='5' maxlength='5' name='patient_weight' value='$weight' style='border: 1px solid #000000'> ";
print "</td></tr>";
print "<tr valign='top'><td>";
print "<span class='boxtitle'>".LBL_OBSTETRIC_EXAM."</span><br> ";
print "<span class='tinylight'>FUNDIC HEIGHT (CM)</span> <input type='text' class='tinylight' size='5' maxlength='5' name='fundic_height' value='".($mc["fundic_height"]?$mc["fundic_height"]:$post_vars["fundic_height"])."' style='border: 1px solid #000000'><br/> ";
print "<span class='tinylight'>FHR (beats/min)</span> <input type='text' class='tinylight' size='5' maxlength='5' name='fhr' value='".($mc["fhr"]?$mc["fhr"]:$post_vars["fhr"])."' style='border: 1px solid #000000'><br/> ";
print "<span class='tinylight'>FHR LOCATION</span> ";
print mc::show_fhr_location($mc["fhr_location"]);
print "</td></tr>";
print "<tr valign='top'><td>";
print "<span class='boxtitle'>".LBL_PRESENTATION."</span><br> ";
print mc::show_presentation($mc["presentation"]);
print "</td></tr>";
/*
print "<tr valign='top'><td>";
print "<span class='boxtitle'>".LBL_RISK_FACTORS." (risk factors shown are those that are marked for monitoring)</span> <br> ";
if ($visit_sequence>1) {
if ($post_vars["prenatal_id"]) {
print mc::checkbox_risk_factors($post_vars["prenatal_id"], $mc["consult_id"], "M");
} else {
print mc::checkbox_risk_factors($mc_id, $get_vars["consult_id"], "M");
}
} else {
print "<font color='red'>".LBL_SAME_RISK_FACTORS_VISIT1."</font><br/>";
}
print "</td></tr>";
*/
print "</table>";
print "</td></tr>";
print "<tr><td><br/>";
if ($post_vars["prenatal_id"]) {
if ($_SESSION["priv_update"]) {
print "<input type='hidden' name='mc_id' value='".$get_vars["mc_id"]."' />";
//print "<input type='hidden' name='consult_id' value='".$mc["mc_id"]."' />";
if (!$post_vars["data_import_flag"]) {
print "<input type='hidden' name='visit_sequence' value='$visit_sequence' />";
}
print "<input type='submit' value = 'Update Prenatal' class='textbox' name='submitmc' style='border: 1px solid #000000'> ";
print "<input type='submit' value = 'Delete Prenatal' class='textbox' name='submitmc' style='border: 1px solid #000000'> ";
}
} else {
if ($_SESSION["priv_add"]) {
print "<input type='hidden' name='mc_id' value='".$get_vars["mc_id"]."' />";
if (!$post_vars["data_import_flag"]) {
print "<input type='hidden' name='aog_weeks' value='$aog' />";
print "<input type='hidden' name='trimester' value='$trimester' />";
print "<input type='hidden' name='visit_sequence' value='$visit_sequence' />";
}
print "<br><input type='submit' value = 'Save Prenatal Data' class='textbox' name='submitmc' style='border: 1px solid #000000'><br>";
}
}
print "</td></tr>";
print "</form>";
print "</table><br>";
$q_remarks = mysql_query("SELECT prenatal_remarks FROM m_patient_mc WHERE mc_id='$get_vars[mc_id]'") or die("Cannot query: 1574");
list($remarks) = mysql_fetch_array($q_remarks);
echo "<form method='POST' name='form_prenatal_remarks'>";
echo "<table bgcolor='#FFCCFF' width='300' cellpadding='3'>";
echo "<a name='prerem'></a>";
echo "<span class='boxtitle'>PRENATAL REMARKS</span>";
if($_POST["update_prenatal"]):
echo "<tr><td><textarea name='prenatal_remarks' cols='35' rows='4'>";
else:
echo "<tr><td><textarea name='prenatal_remarks' cols='35' rows='4' readonly>";
endif;
echo $remarks;
echo "</textarea></td></tr>";
if($_POST["update_prenatal"]):
echo "<tr><td><input type='submit' name='submitmc' value='Save Prenatal Remarks' style='border: 1px solid #000000'></input> <input type='button' name='cancel' value='Cancel' onclick='history.go(-1)' style='border: 1px solid #000000'></input></td></tr>";
else:
echo "<tr><td><input type='submit' name='update_prenatal' value='Update Prenatal Remarks' style='border: 1px solid #000000'></input></td></tr>";
endif;
echo "</table>";
echo "</form>";
} else {
print "<font color='red'>No valid Registry ID. Please create a new one.</font>";
}
}
function form_mc_prenatal()
{
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);
}
//if ($post_vars["prenatal_id"] && $post_vars["submitmc"] && $post_vars["visit_sequence"]) {
if ($post_vars["prenatal_id"] && $post_vars["submitmc"]) {
$result = mysql_query("SELECT mc_id, patient_id, consult_id, patient_weight, prenatal_date, blood_pressure_systolic, blood_pressure_diastolic, fundic_height, presentation, fhr, fhr_location, trimester, visit_sequence, data_type, flag_private FROM m_consult_mc_prenatal WHERE mc_id='{$post_vars['prenatal_id']}' AND visit_sequence='{$post_vars['visit_sequence']}'") or die("Cannot query: 1665: " . mysql_error());
if ($result) {
if (mysql_num_rows($result)) {
$mc = mysql_fetch_array($result);
//print_r($mc);
}
}
}
// PRENATAL INFO
// get most recent pregnancy id
$patient_id = healthcenter::get_patient_id($get_vars["consult_id"]);
$mc_id = mc::registry_record_exists($patient_id);
$value_private = $mc["flag_private"] ? 'checked' : '';
if ($mc_id) {
// edit prenatal data
if ($post_vars["prenatal_id"]) {
list($aog_weeks, $aog_days) = mc::get_aog($_GET["mc_id"], healthcenter::get_consult_date($mc["consult_id"]));
$aog = $aog_weeks + $aog_days / 7;
$trimester = $mc["trimester"];
//$visit_sequence = $mc["visit_sequence"];
$visit_sequence = $post_vars["visit_sequence"];
} else {
// new prenatal data headers
$sql_count = mysql_query("SELECT count(mc_id) FROM m_consult_mc_prenatal WHERE mc_id='{$_GET['mc_id']}'") or die("cannot query: 1236");
$prenatal_seq = mysql_fetch_array($sql_count);
$seq = $prenatal_seq[0] + 1;
list($aog_weeks, $aog_days) = mc::get_aog($mc_id, $get_vars["consult_id"]);
$aog = $aog_weeks + $aog_days / 7;
$trimester = mc::get_trimester($mc_id, healthcenter::get_consult_date($get_vars["consult_id"]));
//$visit_sequence = mc::get_visit_sequence($mc_id, $get_vars["consult_id"]);
$visit_sequence = $seq;
}
print "<a name='prenatal'>";
print "<table width='300'>";
if ($post_vars["Delete Prenatal"]) {
$tail = "prenatal";
} else {
$tail = "";
}
print "<form action = '" . $_SERVER["SELF"] . "?page=" . $get_vars["page"] . "&menu_id=" . $get_vars["menu_id"] . "&consult_id=" . $get_vars["consult_id"] . "&ptmenu=" . $get_vars["ptmenu"] . "&module=mc&mc=PREN&mc_id={$mc_id}#{$tail}' name='form_mc_prenatal' method='post'>";
print "<a name='prenatal_form'>";
print "<tr valign='top'><td>";
print "<b>" . FTITLE_MC_PRENATAL_FORM . "</b><br/><br/>";
print "</td></tr>";
print "<tr valign='top'><td>";
print "<a name='prevtx'>";
print "</td></tr>";
if ($mc["prenatal_date"]) {
list($date, $time) = explode(" ", $mc["prenatal_date"]);
list($year, $month, $day) = explode("-", $date);
$visit_date = "{$month}/{$day}/{$year}";
}
print "<tr valign='top'><td>";
print "<span class='boxtitle'>" . LBL_PRENATAL_VISIT_DATE . "</span><br>";
print "<input type='text' size='10' maxlength='10' class='textbox' name='visit_date' value='" . ($visit_date ? $visit_date : $post_vars["visit_date"]) . "' style='border: 1px solid #000000'> ";
print "<a href=\"javascript:show_calendar4('document.form_mc_prenatal.visit_date', document.form_mc_prenatal.visit_date.value);\"><img src='../images/cal.gif' width='16' height='16' border='0' alt='Click Here to Pick up the date'></a><br>";
print "</td></tr>";
print "<tr valign='top'><td>";
print "<table bgcolor='#FFCCFF' width='300' cellpadding='3'>";
//if ($post_vars["data_import_flag"]) {
print "<tr valign='top'><td>";
print "<span class='boxtitle'>" . LBL_PRENATAL_VISIT_SEQUENCE . "<br>";
print "THIS IS YOUR PRENATAL VISIT: " . $visit_sequence . "</span>";
//print "<input type='text' size='5' maxlength='5' class='textbox' name='visit_sequence' value='$visit_sequence' style='border: 1px solid #000000' readonly> ";
print "</td></tr>";
print "<tr valign='top'><td>";
if ($post_vars["prenatal_id"]) {
$systolic = $mc["blood_pressure_systolic"];
$diastolic = $mc["blood_pressure_diastolic"];
} else {
list($systolic, $diastolic) = healthcenter::get_blood_pressure($get_vars["consult_id"]);
}
print "<span class='boxtitle'>" . LBL_BLOOD_PRESSURE . "</span><br> ";
print "<span class='tinylight'>SYSTOLIC</span> <input type='text' class='tinylight' size='5' maxlength='3' name='patient_systolic' value='{$systolic}' style='border: 1px solid #000000'> ";
print "<span class='tinylight'>DIASTOLIC</span> <input type='text' class='tinylight' size='5' maxlength='3' name='patient_diastolic' value='{$diastolic}' style='border: 1px solid #000000'> ";
print "</td></tr>";
print "<tr valign='top'><td>";
if ($post_vars["prenatal_id"]) {
$weight = $mc["patient_weight"];
} else {
$weight = healthcenter::get_body_weight($get_vars["consult_id"]);
}
print "<span class='boxtitle'>" . LBL_PATIENT_WEIGHT . " (KG)</span><br> ";
print "<input type='text' class='tinylight' size='5' maxlength='5' name='patient_weight' value='{$weight}' style='border: 1px solid #000000'> ";
print "</td></tr>";
print "<tr valign='top'><td>";
print "<span class='boxtitle'>" . LBL_OBSTETRIC_EXAM . "</span><br> ";
print "<span class='tinylight'>FUNDIC HEIGHT (CM)</span> <input type='text' class='tinylight' size='5' maxlength='5' name='fundic_height' value='" . ($mc["fundic_height"] ? $mc["fundic_height"] : $post_vars["fundic_height"]) . "' style='border: 1px solid #000000'><br/> ";
print "<span class='tinylight'>FHR (beats/min)</span> <input type='text' class='tinylight' size='5' maxlength='5' name='fhr' value='" . ($mc["fhr"] ? $mc["fhr"] : $post_vars["fhr"]) . "' style='border: 1px solid #000000'><br/> ";
print "<span class='tinylight'>FHR LOCATION</span> ";
print mc::show_fhr_location($mc["fhr_location"]);
print "</td></tr>";
print "<tr valign='top'><td>";
print "<span class='boxtitle'>" . LBL_PRESENTATION . "</span><br> ";
print mc::show_presentation($mc["presentation"]);
print "</td></tr>";
/*
print "<tr valign='top'><td>";
print "<span class='boxtitle'>".LBL_RISK_FACTORS." (risk factors shown are those that are marked for monitoring)</span> <br> ";
if ($visit_sequence>1) {
if ($post_vars["prenatal_id"]) {
print mc::checkbox_risk_factors($post_vars["prenatal_id"], $mc["consult_id"], "M");
} else {
print mc::checkbox_risk_factors($mc_id, $get_vars["consult_id"], "M");
}
} else {
print "<font color='red'>".LBL_SAME_RISK_FACTORS_VISIT1."</font><br/>";
}
print "</td></tr>";
*/
echo "<tr>";
echo "<td><span class='tinylight'>";
echo "<input type='checkbox' name='check_private' {$value_private}>";
echo "<b>SEEN OUTSIDE OF THE RHU? (i.e. private clinic)</b>";
echo "</input>";
echo "</span></td>";
echo "</tr>";
print "</table>";
print "</td></tr>";
print "<tr><td><br/>";
if ($post_vars["prenatal_id"]) {
if ($_SESSION["priv_update"]) {
print "<input type='hidden' name='mc_id' value='" . $get_vars["mc_id"] . "' />";
//print "<input type='hidden' name='consult_id' value='".$mc["mc_id"]."' />";
if (!$post_vars["data_import_flag"]) {
print "<input type='hidden' name='visit_sequence' value='{$visit_sequence}' />";
}
print "<input type='submit' value = 'Update Prenatal' class='textbox' name='submitmc' style='border: 1px solid #000000'> ";
print "<input type='submit' value = 'Delete Prenatal' class='textbox' name='submitmc' style='border: 1px solid #000000'> ";
}
} else {
if ($_SESSION["priv_add"]) {
print "<input type='hidden' name='mc_id' value='" . $get_vars["mc_id"] . "' />";
if (!$post_vars["data_import_flag"]) {
print "<input type='hidden' name='aog_weeks' value='{$aog}' />";
print "<input type='hidden' name='trimester' value='{$trimester}' />";
print "<input type='hidden' name='visit_sequence' value='{$visit_sequence}' />";
}
print "<input type='submit' value = 'Save Prenatal Data' class='textbox' name='submitmc' style='border: 1px solid #000000'><br>";
}
}
print "</td></tr>";
print "</form>";
print "</table><br>";
$q_remarks = mysql_query("SELECT prenatal_remarks FROM m_patient_mc WHERE mc_id='{$get_vars['mc_id']}'") or die("Cannot query: 1574");
list($remarks) = mysql_fetch_array($q_remarks);
echo "<form method='POST' name='form_prenatal_remarks'>";
echo "<table bgcolor='#FFCCFF' width='300' cellpadding='3'>";
echo "<a name='prerem'></a>";
echo "<span class='boxtitle'>PRENATAL REMARKS</span>";
if ($_POST["update_prenatal"]) {
echo "<tr><td><textarea name='prenatal_remarks' cols='35' rows='4'>";
} else {
echo "<tr><td><textarea name='prenatal_remarks' cols='35' rows='4' readonly>";
}
echo $remarks;
echo "</textarea></td></tr>";
if ($_POST["update_prenatal"]) {
echo "<tr><td><input type='submit' name='submitmc' value='Save Prenatal Remarks' style='border: 1px solid #000000'></input> <input type='button' name='cancel' value='Cancel' onclick='history.go(-1)' style='border: 1px solid #000000'></input></td></tr>";
} else {
echo "<tr><td><input type='submit' name='update_prenatal' value='Update Prenatal Remarks' style='border: 1px solid #000000'></input></td></tr>";
}
echo "</table>";
echo "</form>";
} else {
print "<a name='prenatal'>";
print "<font color='red'>No valid Registry ID. Please create a new one.</font>";
}
}
