function _wtforage() { // // main method for wtforage // caution -> use only for age 5 and below // call method: // $wt_class = wtforage ($age_month, $gender, $actual_weight); // where $age_month = age of patient // can be obtained from m_patient // $gender = patient gender (M or F) // can be obtained from m_patient // $weight = actual patient weight // can be obtained from m_consult_vitals // $wt_class: BELOW NORMAL (Very Low), BELOW NORMAL (Low), NORMAL, ABOVE NORMAL // // always check dependencies if ($exitinfo = $this->missing_dependencies('wtforage')) { return print($exitinfo); } if (func_num_args()>0) { $arg_list = func_get_args(); $consult_id = $arg_list[0]; } $patient_id = healthcenter::get_patient_id($consult_id); $age_month = round((ccdev::get_age_weeks($patient_id))/4.33,0); $gender = patient::get_gender($patient_id); $actual_weight = wtforage::get_body_weight($consult_id); /* print $sql = "select wt_class from m_lib_wtforage where age_month='$age_month' AND gender='$gender' ". "AND weight_min <= '$actual_weight' AND weight_max >= '$actual_weight'"; if ($result = mysql_query($sql)) { if (mysql_num_rows($result)) { list($wt_class) = mysql_fetch_array($result); return $wt_class; } */ $sql = "select weight_min, weight_max, wt_class ". "from m_lib_wtforage ". "where age_month = '$age_month' and gender = '$gender'"; if ($result = mysql_query($sql)) { if (mysql_num_rows($result)) { while (list($min, $max, $class) = mysql_fetch_array($result)) { if ($max > $min) { if ($actual_weight >= $min && $actual_weight <= $max) { //print "Min $min<br/>"; //print "Max $max<br/>"; //print "Class $class<br/>"; $ret_val = array ($min, $max, $class); } } if ($min === $max) { if ($actual_weight >= $max) { //print "Min $min<br/>"; //print "Max $max<br/>"; //print "Class $class<br/>"; $ret_val = array ($min, $max, $class); } } } return $ret_val; } } }
function display_patient_data() { 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]; } $patient_id = healthcenter::get_patient_id($get_vars["consult_id"]); $actual_weight = wtforage::get_body_weight($get_vars["consult_id"]); $ccdev_id = ccdev::registry_record_exists($patient_id); print "<span class='tinylight'>"; print LBL_CCDEV_ID . ": <font color='red'>" . ($ccdev_id ? module::pad_zero($ccdev_id, 7) : "none") . "</font><br/>"; print LBL_AGE_IN_WEEKS . ": " . ccdev::get_age_weeks($patient_id) . "<br/>"; print LBL_WEIGHT . ": {$actual_weight}<br/>"; list($min, $max, $class) = wtforage::_wtforage($get_vars["consult_id"]); if ($class) { print LBL_WT_FOR_AGE . ": <font color='red'>" . strtoupper($class) . "</font> (min: {$min}, max: {$max})<br/>"; } else { print LBL_WT_FOR_AGE . ": <font color='red'>" . LBL_NO_WEIGHT_AVAILABLE . "</font><br/>"; } print LBL_IMMUNIZATION_STATUS . ": "; $vacc_status = ccdev::determine_vacc_status($patient_id); if ($vacc_status == 'Incomplete') { echo "<font color='red'><b>{$vacc_status}</b></font><br>"; } else { echo "<b>{$vacc_status}</b><br>"; } print "CHILD PROTECTECTED AT BIRTH" . ": "; echo ccdev::get_cpab_status($ccdev_id, $patient_id) . "<br>"; print "LOW BIRTH WEIGHT" . ": "; echo ccdev::check_low_birth_wt($ccdev_id, $patient_id) . '<br>'; print "</span>"; }
function display_patient_data() { 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]; } $patient_id = healthcenter::get_patient_id($get_vars["consult_id"]); $actual_weight = wtforage::get_body_weight($get_vars["consult_id"]); $ccdev_id = ccdev::registry_record_exists($patient_id); print "<span class='tinylight'>"; print LBL_CCDEV_ID.": <font color='red'>".($ccdev_id?module::pad_zero($ccdev_id,7):"none")."</font><br/>"; print LBL_AGE_IN_WEEKS.": ".ccdev::get_age_weeks($patient_id)."<br/>"; print LBL_WEIGHT.": $actual_weight<br/>"; list($min, $max, $class) = wtforage::_wtforage($get_vars["consult_id"]); if ($class) { print LBL_WT_FOR_AGE.": <font color='red'>".strtoupper($class)."</font> (min: $min, max: $max)<br/>"; } else { print LBL_WT_FOR_AGE.": <font color='red'>".LBL_NO_WEIGHT_AVAILABLE."</font><br/>"; } print LBL_IMMUNIZATION_STATUS.": ".ccdev::get_immunization_status($patient_id)."<br/>"; print "</span>"; }