function display_ccdev_firstvisit()
{
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);
}
print "<b>" . FTITLE_FIRST_VISIT_DATA . "</b><br/><br/>";
$patient_id = healthcenter::get_patient_id($get_vars["consult_id"]);
$sql = "select ccdev_id, patient_id, " . "mother_name, mother_educ_id, mother_occup_id, " . "father_name, father_educ_id, father_occup_id, " . "date_format(ccdev_timestamp, '%a %d %b %Y, %h:%i%p'), ccdev_dob, " . "birth_weight, delivery_location,date_format(date_registered,'%a %d %b %Y') actual_serv_date " . "from m_patient_ccdev where patient_id = '{$patient_id}'";
$result = mysql_query($sql) or die(mysql_error());
if ($result) {
if (mysql_num_rows($result)) {
list($cid, $pid, $mname, $meduc, $moccup, $fname, $feduc, $foccup, $ts, $dob, $bw, $loc, $actual_serv_date) = mysql_fetch_array($result);
print "<table cellpadding='3' style='border: 1px dashed black'><tr><td>";
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=" . $get_vars["ptmenu"] . "&module=" . $get_vars["module"] . "&ccdev=" . $get_vars["ccdev"] . "#visit'>";
print "REGISTRY ID: <b>" . module::pad_zero($cid, 7) . "</b><br/>";
print "DATE: <b>{$actual_serv_date}</b><br/><br/>";
print "MOTHER: {$mname}<br/>";
print "Education: " . education::get_education_name($meduc) . "<br/>";
print "Occupation: " . occupation::get_occupation_name($moccup) . "<br/><br/>";
print "FATHER: {$fname}<br/>";
print "Education: " . education::get_education_name($feduc) . "<br/>";
print "Occupation: " . occupation::get_occupation_name($foccup) . "<br/><br/>";
print "DELIVERY LOCATION: {$loc}<br/>";
print "BIRTH WEIGHT: {$bw} KG<br/><br/>";
if ($_SESSION["priv_update"]) {
print "<input type='hidden' name='ccdev_id' value='{$cid}'/>";
print "<input type='submit' name='submitccdev' value='Update Visit Data' class='tinylight' style='border: 1px solid black'/>";
}
print "</form>";
print "</td></tr></table><br/>";
}
}
}
function _occupation_cat()
{
//
// main submodule for patient outcomes
// calls form_outcome()
// display_outcome()
// process_outcome()
//
// always check dependencies
if ($exitinfo = $this->missing_dependencies('ntp')) {
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);
}
$o = new occupation();
if ($post_vars["submitcat"]) {
$o->process_occupcat($menu_id, $post_vars, $get_vars);
}
$o->display_occupcat($menu_id, $post_vars, $get_vars);
$o->form_occupcat($menu_id, $post_vars, $get_vars);
}
}
}
if (file_exists('../modules/ntp_report/class.ntp_report.php')) {
include '../modules/ntp_report/class.ntp_report.php';
$ntp_report = new ntp_report;
if (!$module->activated('ntp_report') && $initmod) {
$ntp_report->init_sql();
$ntp_report->init_menu();
$ntp_report->init_deps();
$ntp_report->init_lang();
$ntp_report->init_help();
}
}
if (file_exists('../modules/occupation/class.occupation.php')) {
include '../modules/occupation/class.occupation.php';
$occupation = new occupation;
if (!$module->activated('occupation') && $initmod) {
$occupation->init_sql();
$occupation->init_menu();
$occupation->init_deps();
$occupation->init_lang();
$occupation->init_help();
}
}
if (file_exists('../modules/patient/class.patient.php')) {
include '../modules/patient/class.patient.php';
$patient = new patient;
if (!$module->activated('patient') && $initmod) {
$patient->init_sql();
$patient->init_menu();
$patient->init_deps();
function display_ntp_record_details()
{
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);
}
// manage Delete here
if ($post_vars["submitntp"] && $get_vars["ntp_id"]) {
if ($post_vars["submitntp"] == "Delete") {
if (module::confirm_delete($menu_id, $post_vars, $get_vars)) {
print $sql = "delete from m_patient_ntp where ntp_id = '" . $get_vars["ntp_id"] . "'";
if ($result = mysql_query($sql)) {
header("location: " . $_SERVER["PHP_SELF"] . "?page=" . $get_vars["page"] . "&menu_id=" . $get_vars["menu_id"] . "&consult_id=" . $get_vars["consult_id"] . "&ptmenu=" . $get_vars["ptmenu"] . "&module=" . $get_vars["module"] . "&ntp=VISIT1");
}
} else {
if ($post_vars["confirm_delete"] == "No") {
header("location: " . $_SERVER["PHP_SELF"] . "?page=" . $get_vars["page"] . "&menu_id=" . $get_vars["menu_id"] . "&consult_id=" . $get_vars["consult_id"] . "&ptmenu=" . $get_vars["ptmenu"] . "&module=" . $get_vars["module"] . "&ntp=VISIT1");
}
}
}
}
$patient_id = healthcenter::get_patient_id($get_vars["consult_id"]);
$consult_date = healthcenter::get_consult_date($get_vars["consult_id"]);
$sql = "select patient_id, date_format(ntp_consult_date, '%a %d %b %Y, %h:%i%p') ntp_consult_date, date_format(ntp_timestamp, '%a %d %b %Y, %h:%i%p') ts, ntp_id, user_id, " . "occupation_id, household_contacts, region_id, body_weight, bcg_scar, " . "previous_treatment_flag, previous_treatment_duration, previous_treatment_drugs, " . "patient_type_id, outcome_id, treatment_partner_id, treatment_category_id, contact_person, course_end_flag, " . "intensive_start_date, maintenance_start_date, treatment_end_date, " . "sputum1_date, sputum2_date, sputum3_date, " . "intensive_projected_end_date, maintenance_projected_end_date, " . "to_days('{$consult_date}') days_consult_date, " . "to_days(intensive_projected_end_date) days_proj_int_end, " . "to_days(maintenance_projected_end_date) days_proj_maint_end, " . "to_days(sputum1_date) days_sputum1_date, " . "to_days(sputum2_date) days_sputum2_date, " . "to_days(sputum3_date) days_sputum3_date " . "from m_patient_ntp " . "where ntp_id = '" . $get_vars["ntp_id"] . "'";
if ($result = mysql_query($sql)) {
if (mysql_num_rows($result)) {
while ($ntpdata = mysql_fetch_array($result)) {
print "<table width='250' style='border: 1px dotted black'>";
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=ntp&ntp=INTAKE&ntp_id=" . $get_vars["ntp_id"] . "'>";
print "<tr><td>";
print "<span class='tinylight'>";
print "Patient Name: " . strtoupper(patient::get_name($ntpdata["patient_id"])) . "<br/>";
print "Registration Date: " . $ntpdata["ntp_consult_date"] . "<br/>";
print "Last Update: " . $ntpdata["ts"] . "<br/>";
print "Updated By: " . user::get_username($ntpdata["user_id"]) . "<br/>";
print "<hr size='1'/>";
print "IMPORTANT DATES:<br/>";
print "Start Intensive Phase: " . ($ntpdata["intensive_start_date"] != "0000-00-00" ? $ntpdata["intensive_start_date"] : "NA") . "<br/>";
print "Start Maintenance Phase: " . ($ntpdata["maintenance_start_date"] != "0000-00-00" ? $ntpdata["maintenance_start_date"] : "NA") . "<br/>";
print "End of Treatment: " . ($ntpdata["maintenance_start_date"] != "0000-00-00" ? $ntpdata["maintenance_start_date"] : "NA") . "<br/><br/>";
print "PROJECTED DATES:<br/>";
print "Proj End Intensive Phase: " . ($ntpdata["intensive_projected_end_date"] == "0000-00-00" ? "NA" : ($ntpdata["days_proj_int_end"] <= $ntpdata["days_consult_date"] ? "<font color='red'>" . $ntpdata["intensive_projected_end_date"] . "</font>" : $ntpdata["intensive_projected_end_date"])) . "<br/>";
print "Proj End Maint Phase: " . ($ntpdata["maintenance_projected_end_date"] == "0000-00-00" ? "NA" : ($ntpdata["days_proj_maint_end"] <= $ntpdata["days_consult_date"] ? "<font color='red'>" . $ntpdata["maintenance_projected_end_date"] . "</font>" : $ntpdata["maintenance_projected_end_date"])) . "<br/>";
if ($ntpdata["treatment_category"] == 3) {
print "Sputum Exam #1 Date: " . ($ntpdate["sputum1_date"] == "0000-00-00" ? "NA" : ($ntpdata["days_sputum1_date"] <= $ntpdata["days_consult_date"] ? "<font color='red'>" . $ntpdata["sputum1_date"] . "</font>" : $ntpdata["sputum1_date"])) . "<br/>";
} else {
print "Sputum Exam #1 Date: " . ($ntpdate["sputum1_date"] == "0000-00-00" ? "NA" : ($ntpdata["days_sputum1_date"] <= $ntpdata["days_consult_date"] ? "<font color='red'>" . $ntpdata["sputum1_date"] . "</font>" : $ntpdata["sputum1_date"])) . "<br/>";
print "Sputum Exam #2 Date: " . ($ntpdate["sputum2_date"] == "0000-00-00" ? "NA" : ($ntpdata["days_sputum2_date"] <= $ntpdata["days_consult_date"] ? "<font color='red'>" . $ntpdata["sputum2_date"] . "</font>" : $ntpdata["sputum2_date"])) . "<br/>";
print "Sputum Exam #3 Date: " . ($ntpdate["sputum3_date"] == "0000-00-00" ? "NA" : ($ntpdata["days_sputum3_date"] <= $ntpdata["days_consult_date"] ? "<font color='red'>" . $ntpdata["sputum3_date"] . "</font>" : $ntpdata["sputum3_date"])) . "<br/>";
}
print "<hr size='1'/>";
print "Occupation: " . occupation::get_occupation_name($ntpdata["occupation_id"]) . "<br/>";
print "Contact Person: " . $ntpdata["contact_person"] . "<br/>";
print "Region: " . region::get_region_name($ntpdata["region_id"]) . "<br/>";
print "<hr size='1'/>";
print "BCG Scar: " . ($ntpdata["bcg_scar"] == "D" ? "Doubtful" : $ntpdata["bcg_scar"]) . "<br/>";
print "Household Contacts: " . $ntpdata["household_contacts"] . " " . ($ntpdata["household_contacts"] == 1 ? "person" : "persons") . "<br/>";
print "Previous Treatment? " . $ntpdata["previous_treatment_flag"] . "<br/>";
if ($ntpdata["previous_treatment_flag"] == "Y") {
print "<span class='tinylight'>";
print " Drugs: " . $ntpdata["previous_treatment_drugs"] . "<br/>";
print " Duration: " . ($ntpdata["previous_treatment_duration"] == "M1" ? ">1 month" : "<1 month") . "<br/>";
print "</span>";
}
print "Patient Type: " . ntp::get_patient_type($ntpdata["patient_type_id"]) . "<br/>";
print "Tx Category: " . ntp::get_treatment_cat($ntpdata["treatment_category_id"]) . "<br/>";
print "Tx Outcome: " . ntp::get_treatment_outcome($ntpdata["outcome_id"]) . "<br/>";
print "Tx Partner: " . ntp::get_partner_name($ntpdata["treatment_partner_id"]) . "<br/>";
if ($_SESSION["priv_delete"]) {
if ($ntpdata["course_end_flag"] != "Y") {
print "<input type='submit' class='tinylight' name='submitntp' value='Delete' style='border: 1px solid black'/>";
}
}
print "</span>";
print "</td></tr>";
print "</form>";
print "</table>";
}
}
}
}
