function _ccdev_services()
{
//
// library submodule for ccdev services
// calls form_service()
// display_service()
// process_service()
//
// always check dependencies
if ($exitinfo = $this->missing_dependencies('ccdev')) {
return print $exitinfo;
}
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);
}
$c = new ccdev();
if ($post_vars["submitservice"]) {
$c->process_service($menu_id, $post_vars, $get_vars);
}
$c->display_service($menu_id, $post_vars, $get_vars);
$c->form_service($menu_id, $post_vars, $get_vars);
}
function epi_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();
foreach ($members as $key => $patient_id) {
$arr_px = array();
$arr_indicator = array();
//this will contain indicator_id and array of consult_id
$q_epi_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());
$q_epi = $this->check_ccdev_enrollment($patient_id);
if (mysql_num_rows($q_epi) != 0) {
list($ccdev_id, $dob) = mysql_fetch_array($q_epi);
//echo $ccdev_id.' '.$patient_id.' '.$dob.'<br>';
while (list($indicator_id, $sub_indicator) = mysql_fetch_array($q_epi_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');
switch ($indicator_id) {
case '7':
//BCG immunization
$eligibility = $this->check_vaccine_eligibility($patient_id, $dob, 'BCG');
$buffer_day = $this->get_vaccine_min_age_eligibility('BCG');
break;
case '8':
//DPT1 immunization
$eligibility = $this->check_vaccine_eligibility($patient_id, $dob, 'DPT1');
$buffer_day = $this->get_vaccine_min_age_eligibility('DPT1');
break;
case '9':
//DPT2 immunization
$eligibility = $this->check_vaccine_eligibility($patient_id, $dob, 'DPT2');
$buffer_day = $this->get_vaccine_min_age_eligibility('DPT2', $patient_id, $dob);
break;
case '10':
//DPT3 immunization
$eligibility = $this->check_vaccine_eligibility($patient_id, $dob, 'DPT3');
$buffer_day = $this->get_vaccine_min_age_eligibility('DPT3', $patient_id, $dob);
break;
case '11':
$eligibility = $this->check_vaccine_eligibility($patient_id, $dob, 'OPV1');
$buffer_day = $this->get_vaccine_min_age_eligibility('OPV1');
break;
case '12':
$eligibility = $this->check_vaccine_eligibility($patient_id, $dob, 'OPV2');
$buffer_day = $this->get_vaccine_min_age_eligibility('OPV2', $patient_id, $dob);
break;
case '13':
$eligibility = $this->check_vaccine_eligibility($patient_id, $dob, 'OPV3');
$buffer_day = $this->get_vaccine_min_age_eligibility('OPV3', $patient_id, $dob);
break;
case '14':
$eligibility = $this->check_vaccine_eligibility($patient_id, $dob, 'HEPB1');
$buffer_day = $this->get_vaccine_min_age_eligibility('HEPB1');
break;
case '15':
$eligibility = $this->check_vaccine_eligibility($patient_id, $dob, 'HEPB2');
$buffer_day = $this->get_vaccine_min_age_eligibility('HEPB2', $patient_id, $dob);
break;
case '16':
$eligibility = $this->check_vaccine_eligibility($patient_id, $dob, 'HEPB3');
$buffer_day = $this->get_vaccine_min_age_eligibility('HEPB3', $patient_id, $dob);
break;
case '17':
$eligibility = $this->check_vaccine_eligibility($patient_id, $dob, 'MSL');
$buffer_day = $this->get_vaccine_min_age_eligibility('MSL');
break;
case '18':
//FIC
//$eligibility = $this->check_vaccine_eligibility($patient_id,$dob,'MSL');
$eligibility = (eregi('FIC', ccdev::determine_vacc_status($patient_id)) ? false : true) && $this->get_patient_age($patient_id) > 0;
$buffer_day = '365';
break;
case '19':
//CIC
if (eregi('CIC', ccdev::determine_vacc_status($patient_id)) == true && eregi('FIC', ccdev::determine_vacc_status($patient_id)) == false) {
$buffer_day = '365';
$eligibility = true;
} else {
$eligibility = false;
}
break;
case '41':
//PENTA1
$eligibility = $this->check_vaccine_eligibility($patient_id, $dob, 'PENTA1');
$buffer_day = $this->get_vaccine_min_age_eligibility('PENTA1');
break;
case '42':
//PENTA2
$eligibility = $this->check_vaccine_eligibility($patient_id, $dob, 'PENTA2');
$buffer_day = $this->get_vaccine_min_age_eligibility('PENTA2', $patient_id, $dob);
break;
case '43':
//PENTA3
$eligibility = $this->check_vaccine_eligibility($patient_id, $dob, 'PENTA3');
$buffer_day = $this->get_vaccine_min_age_eligibility('PENTA3', $patient_id, $dob);
break;
case '44':
//MMR
$eligibility = $this->check_vaccine_eligibility($patient_id, $dob, 'MMR');
$buffer_day = $this->get_vaccine_min_age_eligibility('MMR');
break;
case '45':
//ROTA 1
$eligibility = $this->check_vaccine_eligibility($patient_id, $dob, 'ROTA');
$buffer_day = $this->get_vaccine_min_age_eligibility('ROTA');
break;
case '46':
//ROTA 2
$eligibility = $this->check_vaccine_eligibility($patient_id, $dob, 'ROTA2');
$buffer_day = $this->get_vaccine_min_age_eligibility('ROTA2', $patient_id, $dob);
break;
default:
break;
}
//end switch
if ($eligibility == true) {
$base_date = date('Y/m/d', strtotime(date("Y-m-d", strtotime($dob)) . " +" . $buffer_day . " day"));
array_push($arr_case_id, $ccdev_id, $base_date);
}
if (!empty($arr_case_id)) {
array_push($arr_indicator, array($indicator_id => $arr_case_id));
}
}
//end while
if (!empty($arr_indicator)) {
array_push($arr_px, array($patient_id => $arr_indicator));
array_push($arr_fam, $arr_px);
}
}
}
//end for each
return $arr_fam;
}
}
}
if (file_exists('../modules/calendar/class.calendar.php')) {
include '../modules/calendar/class.calendar.php';
$calendar = new calendar;
if (!$module->activated('calendar') && $initmod) {
$calendar->init_sql();
$calendar->init_menu();
$calendar->init_deps();
$calendar->init_lang();
$calendar->init_help();
}
}
if (file_exists('../modules/ccdev/class.ccdev.php')) {
include '../modules/ccdev/class.ccdev.php';
$ccdev = new ccdev;
if (!$module->activated('ccdev') && $initmod) {
$ccdev->init_sql();
$ccdev->init_menu();
$ccdev->init_deps();
$ccdev->init_lang();
$ccdev->init_help();
}
}
if (file_exists('../modules/ccdev_report/class.ccdev_report.php')) {
include '../modules/ccdev_report/class.ccdev_report.php';
$ccdev_report = new ccdev_report;
if (!$module->activated('ccdev_report') && $initmod) {
$ccdev_report->init_sql();
$ccdev_report->init_menu();
$ccdev_report->init_deps();
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;
}
}
}
