function display_prenatal_record_detail() {
//
// called from _details_mc()
// lowest level detail about prenatal visit
//
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 mc_id, patient_id, consult_id, date_format(prenatal_date, '%a %d %b %Y, %h:%i%p') visit_date, prenatal_date, ".
"user_id, aog_weeks, trimester, visit_sequence, patient_weight, date_format(prenatal_timestamp, '%a %d %b %Y, %h:%i%p') prenatal_timestamp, ".
"blood_pressure_systolic, blood_pressure_diastolic, fundic_height, ".
"presentation, fhr, fhr_location, data_type ".
"from m_consult_mc_prenatal where patient_id = '$patient_id' and ".
"mc_id = '".$get_vars["mc_id"]."' and visit_sequence = '".$get_vars["visitseq"]."'";
if ($result = mysql_query($sql)) {
if (mysql_num_rows($result)) {
$mc = mysql_fetch_array($result);
if ($get_vars["mc_id"]==$mc["mc_id"]) {
print "<a name='prenatal_detail'>";
$bgcolor = ($get_vars["consult_id"]==$mc["consult_id"]?"#FFFFCC":"#FFFFFF");
print "<form method='post' action='".$_SERVER["PHP_SELF"]."?page=".$get_vars["page"]."&menu_id=".$get_vars["menu_id"]."&consult_id=".$get_vars["consult_id"]."&ptmenu=DETAILS&module=mc&mc=PREN".($get_vars["mc_id"]?"&mc_id=".$get_vars["mc_id"]."&visitseq=".$get_vars["visitseq"]."#visit1form":"")."'>";
print "<table bgcolor='$bgcolor' width='280' style='border: 1px dotted black'><tr><td>";
print "<span class='tinylight'>";
//print ($mc["data_type"]=="EXT"?"<font color='red'><b>DATA FROM EXTERNAL RECORDS</b></font><br/>":"")."";
print "REGISTRY ID: <font color='red'>".module::pad_zero($mc["mc_id"], 7)."</font><br/>";
print "PATIENT NAME: ".patient::get_name($patient_id)."<br/>";
print "VISIT DATE: ".$mc["visit_date"]."<br/>";
print "VISIT SEQUENCE ".$mc["visit_sequence"]."<br/>";
print "TRIMESTER: ".$mc["trimester"]."<br/>";
print "<hr size='1'/>";
print "LAST UPDATE: ".$mc["prenatal_timestamp"]."<br/>";
print "UPDATE BY: ".user::get_username($mc["user_id"])."<br/>";
print "<hr size='1'/>";
print "<table cellpadding='0' cellspacing='0'><tr valign='top'><td>";
// column 1
print "<span class='tinylight'>";
print "FUNDIC HT (CM): ".$mc["fundic_height"]."<br/>";
print "FETAL PRES: ".$mc["presentation"]."<br/>";
list($aog_wks, $aog_days) = mc::get_aog($mc["mc_id"], $mc["prenatal_date"]);
print "AOG: ".$aog_wks." WKS ".$aog_days." DAYS<br/>";
print "FHR (BPM): ".$mc["fhr"]."<br/>";
print "LOCATION: ".$mc["fhr_location"]."<br/>";
print "</span>";
print "</td><td>";
// column 2
print "<span class='tinylight'>";
print " WEIGHT (KG): ".$mc["patient_weight"]."<br/>";
print " SYS BP: ".$mc["blood_pressure_systolic"]."<br/>";
print " DIAS BP: ".$mc["blood_pressure_diastolic"]."<br/>";
print "</span>";
print "</td></tr></table>";
print "<hr size='1'/>";
print "RISK FACTORS:<br/>";
$sql_risk = "select c.visit_risk_id, r.hospital_flag, r.monitor_flag ".
"from m_consult_mc_visit_risk c, m_lib_mc_risk_factors r ".
"where c.visit_risk_id = r.risk_id and ".
"c.consult_id = '".$mc["consult_id"]."'";
if ($result_risk = mysql_query($sql_risk)) {
if (mysql_num_rows($result_risk)) {
while ($risk = mysql_fetch_array($result_risk)) {
print "<img src='../images/arrow_redwhite.gif' border='0' /> ";
print ($risk["hospital_flag"]=="Y"?"<font color='red'>".mc::get_riskfactor_name($risk["visit_risk_id"])."</font>":mc::get_riskfactor_name($risk["visit_risk_id"]))."<br/>";
}
}
}
print "<br/>";
if ($_SESSION["priv_update"]) {
print "<input type='submit' name='submitmc' value='Update Record' class='tinylight' style='border: 1px solid black'/>";
print "<input type='hidden' name='prenatal_id' value='".$mc["mc_id"]."'/>";
print "<input type='hidden' name='visit_sequence' value='".$mc["visit_sequence"]."'/>";
}
print "</span>";
print "</td></tr></table>";
print "</form>";
}
}
}
}
