function display_registry_record_detail() {
//
// called from _details_mc()
// contains most alerts for this pregnancy
//
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(mc_timestamp, '%a %d %b %Y, %h:%i%p') mc_timestamp, ".
"patient_lmp, patient_edc, trimester1_date, trimester2_date, round((to_days(mc_consult_date)-to_days(patient_lmp))/7,0) patient_aog, ".
"MOD((to_days(mc_consult_date)-to_days(patient_lmp)),7) remainder, ".
"trimester3_date, postpartum_date, to_days(trimester1_date) days_trim1, ".
"to_days(trimester2_date) days_trim2, to_days(trimester3_date) days_trim3, ".
"to_days(postpartum_date) days_pp, to_days(mc_consult_date) days_today, obscore_gp, obscore_fpal, user_id, ".
"blood_type, patient_age, patient_height, delivery_date, ".
"outcome_id, birthweight, end_pregnancy_flag ".
"from m_patient_mc where patient_id = '$patient_id' and mc_id = '".$get_vars["mc_id"]."'";
if ($result = mysql_query($sql)) {
if (mysql_num_rows($result)) {
$mc = mysql_fetch_array($result);
if ($get_vars["mc_id"]==$mc["mc_id"]) {
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=".$get_vars["mc"]."&mc_id=".$get_vars["mc_id"]."#visit1form'>";
print "<table width='280' style='border: 1px dotted black'><tr><td>";
print "<span class='tinylight'>";
print "REGISTRY ID: <font color='red'>".module::pad_zero($mc["mc_id"], 7)."</font><br/>";
print "PATIENT NAME: ".patient::get_name($patient_id)."<br/>";
$patient_age = patient::get_age($patient_id);
print "AGE: ".(!mc::is_normal_age($patient_age)?"<font color='red'><b>$patient_age</b></font>":$patient_age)."<br/>";
print "SCORE: ".mc::check_gp_score($mc["obscore_gp"])." ".mc::check_fpal_score($mc["obscore_fpal"])."<br/>";
print "<hr size='1'/>";
print "REG DATE: ".$mc["mc_timestamp"]."<br/>";
print "REG 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 "LMP: ".$mc["patient_lmp"]."<br/>";
print "EDC: ".$mc["patient_edc"]."<br/>";
// get AOG according to whether patient has delivered or not
// if has delivered, compute AOG according to that
// if not compute by consult_date
list($aog_wks, $aog_days) = mc::get_aog($mc["mc_id"], (mc::get_delivery_date($mc["mc_id"])=="0000-00-00"?healthcenter::get_consult_date($get_vars["consult_id"]):mc::get_delivery_date($mc["mc_id"])));
print "AOG: ".$aog_wks." WKS ".$aog_days." DAYS<br/>";
print "</span>";
print "</td><td>";
// column 2
print "<span class='tinylight'>";
print " BLOOD TYPE: ".($mc["blood_type"]=="AB"?"<font color='red'><b>".$mc["blood_type"]."</b></font>":$mc["blood_type"])."<br/>";
print " HEIGHT (cm): ".(!mc::is_normal_height($mc["patient_height"])?"<font color='red'><b>".$mc["patient_height"]."</b></font>":$mc["patient_height"])."<br/>";
list($systolic, $diastolic) = healthcenter::get_blood_pressure($get_vars["consult_id"]);
print " SYS BP: ".($systolic?$systolic:"NA")."<br/>";
print " DIAS BP: ".($diastolic?$diastolic:"NA")."<br/>";
if ($systolic && $diastolic) {
print " STAGE: ";
healthcenter::hypertension_stage($systolic, $diastolic,$patient_age)."<br/>";
}
print "</span>";
print "</td></tr></table>";
print "<hr size='1'/>";
print "IMPORTANT DATES:<br/>";
print "End of 1st trimester: ".($mc["days_today"]>=$mc["days_trim1"]?"<font color='red'>".$mc["trimester1_date"]."</font>":$mc["trimester1_date"])."<br/>";
print "End of 2nd trimester: ".($mc["days_today"]>=$mc["days_trim2"]?"<font color='red'>".$mc["trimester2_date"]."</font>":$mc["trimester2_date"])."<br/>";
print "End of 3rd trimester: ".($mc["days_today"]>=$mc["days_trim3"]?"<font color='red'>".$mc["trimester3_date"]."</font>":$mc["trimester3_date"])."<br/>";
print "End of postpartum period: ".($mc["days_today"]>=$mc["days_pp"]?"<font color='red'>".$mc["postpartum_date"]."</font>":$mc["postpartum_date"])."<br/>";
echo "<hr size='1'>";
echo "Tetanus Toxoid Status: ";
echo "<font color='red'><b>".mc::get_tt_status($mc["mc_id"],$patient_id,$mc["patient_edc"])."</b></font>";
echo "</hr>";
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/>";
}
}
}
if ($mc["delivery_date"]<>"0000-00-00") {
// if registry record closed display the rest
print "<hr size='1'/>";
print "<table cellspacing='0' cellpadding='0' width='100%' bgcolor='#CCFFCC'><tr><td class='tinylight'>";
print "DELIVERY DATE: ".$mc["delivery_date"]."<br/>";
print "OUTCOME: ".mc::get_pregnancy_outcome($mc["outcome_id"])."<br/>";
print "BIRTH WT (KG): ".$mc["birthweight"]."<br/>";
print "</td></tr></table>";
}
print "<br/>";
if ($_SESSION["priv_add"]) {
if ($mc["end_pregnancy_flag"]=="N") {
// prevent editing of closed registry record
print "<input type='submit' name='submitmc' value='Update Visit 1' class='tinylight' style='border: 1px solid black'/> ";
print "<input type='submit' name='submitmc' value='Update Postpartum Data Form' class='tinylight' style='border: 1px solid black'/> ";
}
print "<input type='hidden' name='mc_id' value='".$mc["mc_id"]."'/>";
}
print "</span>";
print "</td></tr></table>";
print "</form>";
}
}
}
}
function mc_alarms()
{
if (func_num_args() > 0) {
$arr = func_get_args();
$family_id = $arr[0];
$members = $arr[1];
$program_id = $arr[2];
}
$arr_px = array();
//will contain patient id of family_members with any of the cases under indicators
$arr_fam = array();
/*the function will accept the family id and family_members
1).navigate through the mc tables using the patient id of the family. each indicator has its own SQL.
2). execute on SQL for the indicator,
3). pushed the patient_id, indicator id and the consult id to an array back to the calling function (get_indicator_instance)
4). retrun value is an array of format family_id=>array(patient_id1=>array(indicator_id1=>array(consult_id1,consult_id2,...consult_id[n]),indicator_id2=>array(consult_id1,consult_id2,...,consult_id[n])),patient_id2...);
*/
foreach ($members as $key => $patient_id) {
$arr_px = array();
$arr_indicator = array();
//this will contain indicator_id and array of consult_id
$q_mc_indicators = mysql_query("SELECT alert_indicator_id,sub_indicator FROM m_lib_alert_indicators WHERE main_indicator='{$program_id}' ORDER by sub_indicator ASC") or die("Cannot query 475: " . mysql_error());
//$arr_case_id = array(); //this will contain the consult_id and enrollment id's
while (list($indicator_id, $sub_indicator) = mysql_fetch_array($q_mc_indicators)) {
$arr_case_id = array();
//this will contain the consult_id and enrollment id's
$arr_definition = $this->get_alert_definition($indicator_id);
//composed of defition id, days before and after.
$alert_id = $arr_definition[0];
$days_before = $arr_definition[1];
$days_after = $arr_definition[2];
$date_today = date('Y-m-d');
//echo $indicator_id.' '.$days_before.'<br>';
switch ($indicator_id) {
case '1':
//indicator id for quality prenatal visit
$q_mc = mysql_query("SELECT mc_id,trimester1_date,trimester2_date,trimester3_date FROM m_patient_mc WHERE patient_id='{$patient_id}' AND end_pregnancy_flag='N' AND delivery_date='0000-00-00' AND patient_edc >= NOW()") or die("Cannot query 510 " . mysql_error());
if (mysql_num_rows($q_mc) != 0) {
list($mc_id, $tri1, $tri2, $tri3) = mysql_fetch_array($q_mc);
$reference_date = date('Y-m-d') <= $tri1 ? $tri1 : (date('Y-m-d') <= $tri2 ? $tri2 : (date('Y-m-d') <= $tri3 ? $tri3 : ''));
$trimester = $reference_date == $tri1 ? 1 : ($reference_date == $tri2 ? 2 : 3);
//echo $reference_date.'/'.$mc_id.'/'.$trimester;
if ($reference_date) {
array_push($arr_case_id, $mc_id, $reference_date);
//push if the present date is on or before the reference prenatal visit date
}
}
break;
//end case
//end case
case '2':
//indicator id for EDC
$q_mc = mysql_query("SELECT mc_id, patient_edc FROM m_patient_mc WHERE patient_id='{$patient_id}' AND end_pregnancy_flag='N' AND delivery_date='0000-00-00' AND '{$date_today}' BETWEEN patient_lmp AND patient_edc AND (to_days(patient_edc)-to_days('{$date_today}')) <= '{$days_before}'") or die("Cannot query 562 " . mysql_error());
if (mysql_num_rows($q_mc) != 0) {
list($mc_id, $patient_edc) = mysql_fetch_array($q_mc);
array_push($arr_case_id, $mc_id, $patient_edc);
} else {
}
break;
case '3':
//indicator id for postpartum visit
//refence date will be the date of delivery. message will appear as long as the duration set in the days_after value (0 - persistent, n - days)
$q_mc = mysql_query("SELECT mc_id,delivery_date FROM m_patient_mc WHERE patient_id='{$patient_id}' AND delivery_date!='0000-00-00' AND (to_days('{$date_today}')-to_days(delivery_date)) >= 0") or die("Cannot query 580 " . mysql_error());
if (mysql_num_rows($q_mc) != 0) {
list($mc_id, $delivery_date) = mysql_fetch_row($q_mc);
$q_postpartum = mysql_query("SELECT mc_id FROM m_consult_mc_postpartum WHERE mc_id='{$mc_id}'") or die("Cannot query 586 " . mysql_error());
//check if the patient has visited during postpartum period
if (mysql_num_rows($q_postpartum) < 2) {
//at least 2 postpartum visits are required. if not satisfied, set 1 to alert flag
array_push($arr_case_id, $mc_id, $delivery_date);
}
}
break;
case '4':
//tetanus toxoid intake (CPAB)
//determine if the patient has an active pregnancy.
$q_mc = mysql_query("SELECT mc_id, patient_edc FROM m_patient_mc WHERE patient_id='{$patient_id}' AND end_pregnancy_flag='N' AND delivery_date='0000-00-00' AND patient_edc >= NOW()") or die("Cannot query 596 " . mysql_error());
//if it does, determine the status of the tetanus toxoid
if (mysql_num_rows($q_mc) != 0) {
list($mc_id, $patient_edc) = mysql_fetch_array($q_mc);
$tt_status = mc::get_tt_status($mc_id, $patient_id, $patient_edc);
if (eregi('not', $tt_status)) {
// a not substring means that the tt is not active
array_push($arr_case_id, $mc_id, $patient_edc);
}
}
break;
case '5':
//vitamin A intake (200,000 units)
$q_mc = mysql_query("SELECT mc_id, patient_edc FROM m_patient_mc WHERE patient_id='{$patient_id}' AND end_pregnancy_flag='N' AND delivery_date='0000-00-00' AND patient_edc >= NOW()") or die("Cannot query 596 " . mysql_error());
if (mysql_num_rows($q_mc) != 0) {
list($mc_id, $patient_edc) = mysql_fetch_array($q_mc);
// sql here to determine the vitamin A quantity intake
$q_vit = mysql_query("SELECT SUM(service_qty) as sum_vita FROM m_consult_mc_services WHERE mc_id='{$mc_id}' AND service_id='VITA'") or die("Cannot query 615 " . mysql_error());
list($sum_vita) = mysql_fetch_array($q_vit);
if ($sum_vita < 200000) {
//throw to the arr_case_id if the sum is less than 200000 units of vitamin A
array_push($arr_case_id, $mc_id, $patient_edc);
}
}
break;
case '6':
//iron with folic acid intake
$q_mc = mysql_query("SELECT mc_id, patient_edc FROM m_patient_mc WHERE patient_id='{$patient_id}' AND end_pregnancy_flag='N' AND delivery_date='0000-00-00' AND patient_edc >= NOW()") or die("Cannot query 596 " . mysql_error());
if (mysql_num_rows($q_mc) != 0) {
list($mc_id, $patient_edc) = mysql_fetch_array($q_mc);
$q_iron = mysql_query("SELECT SUM(service_qty) as sum_iron FROM m_consult_mc_services WHERE mc_id='{$mc_id}' AND service_id='IRON'") or die("Cannot query 633 " . mysql_error());
list($sum_iron) = mysql_fetch_array($q_iron);
if ($sum_iron == 0) {
//push the mc_id to the arr_case_id if no ironintake
array_push($arr_case_id, $mc_id, $patient_edc);
}
}
break;
case '40':
//post trimester alert. patient didn't attended any prenatal visits
$q_mc = mysql_query("SELECT mc_id,trimester1_date,trimester2_date,trimester3_date FROM m_patient_mc WHERE patient_id='{$patient_id}' AND end_pregnancy_flag='N' AND delivery_date='0000-00-00' AND patient_edc >= NOW()") or die("Cannot query 510 " . mysql_error());
if (mysql_num_rows($q_mc) != 0) {
list($mc_id, $tri1, $tri2, $tri3, ) = mysql_fetch_array($q_mc);
$trimester = $this->get_trimester($mc_id, date('Y-m-d'));
$tri_date = $trimester == '2' ? $tri1 : ($trimester == '3' ? $tri2 : '');
if ($tri_date != '') {
$q_prenatal = mysql_query("SELECT date_until FROM m_lib_alert_type WHERE alert_indicator_id=1") or die("Cannot query 975: " . mysql_error());
if (mysql_num_rows($q_prenatal) != 0) {
list($date_until) = mysql_fetch_array($q_prenatal);
if ($date_until == $this->get_date_diff_days($tri_date, date('Y-m-d'))) {
//echo $trimester.'/'.$tri1.'/'.$tri2.'/'.$tri3.'/'.$tri_date.'/'.$this->get_date_diff_days($tri_date,date('Y-m-d')).'<br>';
array_push($arr_case_id, $mc_id, date('Y-m-d'));
}
} else {
}
}
} else {
}
default:
break;
}
//end switch for case id's
if (!empty($arr_case_id)) {
array_push($arr_indicator, array($indicator_id => $arr_case_id));
}
}
//end while for indicators
if (!empty($arr_indicator)) {
array_push($arr_px, array($patient_id => $arr_indicator));
array_push($arr_fam, $arr_px);
}
}
//end foreach for patient id's
return $arr_fam;
}
function get_cpab_status($ccdev_id, $pxid)
{
$q_mother = mysql_query("SELECT a.date_registered,date_format(a.ccdev_timestamp,'%Y-%m-%d') date_stamp,a.mother_px_id,b.patient_lastname,b.patient_firstname FROM m_patient_ccdev a, m_patient b WHERE a.patient_id='{$pxid}' AND b.patient_id=a.mother_px_id AND b.patient_gender='F'") or die(mysql_error());
$get_bday = mysql_query("SELECT patient_dob from m_patient where patient_id='{$pxid}'") or die("cannot query: 581");
list($px_dob) = mysql_fetch_array($get_bday);
if (mysql_num_rows($q_mother) != 0) {
list($actual_date, $datestamp, $mother_id, $lname, $fname) = mysql_fetch_array($q_mother);
$status = mc::get_tt_status(0, $mother_id, $px_dob);
echo "<font color='red'>" . $status . "</font>";
} else {
echo "<font color='red'>Unknown (mother's ID does not exists)</font>";
}
}
function display_registry_record_detail()
{
//
// called from _details_mc()
// contains most alerts for this pregnancy
//
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"]);
$arr_cause = array('SPON' => 'Spontaneous Abortion / Miscarriage', 'IND' => 'Induced Abortion', 'UNK' => 'Unknown');
$sql = "select mc_id, patient_id, consult_id, date_format(mc_timestamp, '%a %d %b %Y, %h:%i%p') mc_timestamp, " . "patient_lmp, patient_edc, trimester1_date, trimester2_date, round((to_days(mc_consult_date)-to_days(patient_lmp))/7,0) patient_aog, " . "MOD((to_days(mc_consult_date)-to_days(patient_lmp)),7) remainder, " . "trimester3_date, postpartum_date, to_days(trimester1_date) days_trim1, " . "to_days(trimester2_date) days_trim2, to_days(trimester3_date) days_trim3, " . "to_days(postpartum_date) days_pp, to_days(mc_consult_date) days_today, obscore_gp, obscore_fpal, user_id, " . "blood_type, patient_age, patient_height, delivery_date, " . "outcome_id, birthweight, end_pregnancy_flag,pregnancy_termination_cause,date_terminated_abortion,termination_code " . "from m_patient_mc where patient_id = '{$patient_id}' and mc_id = '" . $get_vars["mc_id"] . "'";
if ($result = mysql_query($sql)) {
if (mysql_num_rows($result)) {
$mc = mysql_fetch_array($result);
if ($get_vars["mc_id"] == $mc["mc_id"]) {
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=" . $get_vars["mc"] . "&mc_id=" . $get_vars["mc_id"] . "#visit1form' name='display_reg_detail'>";
print "<table width='350' style='border: 1px dotted black'><tr><td>";
print "<span class='tinylight'>";
print "REGISTRY ID: <font color='red'>" . module::pad_zero($mc["mc_id"], 7) . "</font><br/>";
print "PATIENT NAME: " . patient::get_name($patient_id) . "<br/>";
$patient_age = patient::get_age($patient_id);
print "AGE: " . (!mc::is_normal_age($patient_age) ? "<font color='red'><b>{$patient_age}</b></font>" : $patient_age) . "<br/>";
print "SCORE: " . mc::check_gp_score($mc["obscore_gp"]) . " " . mc::check_fpal_score($mc["obscore_fpal"]) . "<br/>";
print "<hr size='1'/>";
print "REG DATE: " . $mc["mc_timestamp"] . "<br/>";
print "REG 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 "LMP: " . $mc["patient_lmp"] . "<br/>";
print "EDC: " . $mc["patient_edc"] . "<br/>";
// get AOG according to whether patient has delivered or not
// if has delivered, compute AOG according to that
// if not compute by consult_date
list($aog_wks, $aog_days) = mc::get_aog($mc["mc_id"], mc::get_delivery_date($mc["mc_id"]) == "0000-00-00" ? healthcenter::get_consult_date($get_vars["consult_id"]) : mc::get_delivery_date($mc["mc_id"]));
print "AOG: " . $aog_wks . " WKS " . $aog_days . " DAYS<br/>";
print "</span>";
print "</td><td>";
// column 2
print "<span class='tinylight'>";
print " BLOOD TYPE: " . ($mc["blood_type"] == "AB" ? "<font color='red'><b>" . $mc["blood_type"] . "</b></font>" : $mc["blood_type"]) . "<br/>";
print " HEIGHT (cm): " . (!mc::is_normal_height($mc["patient_height"]) ? "<font color='red'><b>" . $mc["patient_height"] . "</b></font>" : $mc["patient_height"]) . "<br/>";
list($systolic, $diastolic) = healthcenter::get_blood_pressure($get_vars["consult_id"]);
print " SYS BP: " . ($systolic ? $systolic : "NA") . "<br/>";
print " DIAS BP: " . ($diastolic ? $diastolic : "NA") . "<br/>";
if ($systolic && $diastolic) {
print " STAGE: ";
healthcenter::hypertension_stage($systolic, $diastolic, $patient_age) . "<br/>";
}
print "</span>";
print "</td></tr></table>";
print "<hr size='1'/>";
print "IMPORTANT DATES:<br/>";
print "End of 1st trimester: " . ($mc["days_today"] >= $mc["days_trim1"] ? "<font color='red'>" . $mc["trimester1_date"] . "</font>" : $mc["trimester1_date"]) . "<br/>";
print "End of 2nd trimester: " . ($mc["days_today"] >= $mc["days_trim2"] ? "<font color='red'>" . $mc["trimester2_date"] . "</font>" : $mc["trimester2_date"]) . "<br/>";
print "End of 3rd trimester: " . ($mc["days_today"] >= $mc["days_trim3"] ? "<font color='red'>" . $mc["trimester3_date"] . "</font>" : $mc["trimester3_date"]) . "<br/>";
print "End of postpartum period: " . ($mc["days_today"] >= $mc["days_pp"] ? "<font color='red'>" . $mc["postpartum_date"] . "</font>" : $mc["postpartum_date"]) . "<br/>";
echo "<hr size='1'>";
echo "Tetanus Toxoid Status: ";
echo "<font color='red'><b>" . mc::get_tt_status($mc["mc_id"], $patient_id, $mc["patient_edc"]) . "</b></font>";
echo "</hr>";
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/>";
}
}
}
if ($mc["delivery_date"] != "0000-00-00") {
// if registry record closed display the rest
print "<hr size='1'/>";
print "<table cellspacing='0' cellpadding='0' width='100%' bgcolor='#CCFFCC'><tr><td class='tinylight'>";
print "DELIVERY DATE: " . $mc["delivery_date"] . "<br/>";
print "OUTCOME: " . mc::get_pregnancy_outcome($mc["outcome_id"]) . "<br/>";
print "BIRTH WT (KG): " . $mc["birthweight"] . "<br/>";
print "</td></tr>";
echo "</table>";
}
if ($mc["end_pregnancy_flag"] == 'Y') {
echo "<p align='center'><input type='submit' value='Open Pregnancy Record' name='submitmc' class='tinylight' style='border: 1px solid black'></input></p>";
}
print "<br/>";
if (!empty($mc["pregnancy_termination_cause"]) && $mc[end_pregnancy_flag] == 'Y') {
echo "<hr size='1'>";
echo "DETAILS OF TERMINATION: ";
echo $mc["pregnancy_termination_cause"] . "<br/>";
echo "CAUSE OF TERMINATION: ";
echo empty($mc["termination_code"]) ? ' ' : $arr_cause[$mc["termination_code"]] . '</br>';
echo "DATE OF PREGNANCY TERMINATION: ";
echo $mc["date_terminated_abortion"];
echo "</hr>";
}
if ($_SESSION["priv_add"]) {
if ($mc["end_pregnancy_flag"] == "N") {
// prevent editing of closed registry record
echo "<hr size='1'>";
print "<p align='center'>";
print "<input type='submit' name='submitmc' value='Update Visit 1' class='tinylight' style='border: 1px solid black'/><br><br>";
print "<input type='submit' name='submitmc' value='Update Postpartum Data Form' class='tinylight' style='border: 1px solid black'/><br><br>";
print "<input type='submit' name='submitmc' value='Delete Postpartum Data Form' class='tinylight' style='border: 1px solid black'/><br><br>";
print "<input type='submit' name='submitmc' value='Terminate This Pregnancy' class='tinylight' style='border: 1px solid black'/> ";
print "</span>";
echo "</hr>";
}
print "<input type='hidden' name='mc_id' value='" . $mc["mc_id"] . "'/>";
}
print "</span>";
print "</td></tr>";
echo "<tr><td>";
switch ($_POST["submitmc"]) {
case "Terminate This Pregnancy":
if (mc::check_postpartum($_GET["mc_id"], $patient_id)) {
echo "<script language='javascript'>";
echo "window.alert('This patient has record for postpartum (i.e. date of delivery). Termination of pregnancy should occur during the prenatal period and before the actual delivey due to certain causes like miscarriage and abortion. If the you wish to terminate this pregnancy, Delete the Postpartum Data first to clear out the postpartum data.')";
echo "</script>";
} else {
//before terminating the pregnancy, make sure that cause is being captured
mc::display_terminate_cause();
}
break;
default:
break;
}
echo "</td></tr>";
echo "</table>";
print "</form>";
}
}
}
}
