Esempio n. 1
0
 function display_postpartum_record_detail() {
 //
 // called from _details_mc()
 // lowest level detail about postpartum 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(postpartum_date, '%a %d %b %Y, %h:%i%p') postpartum_date, ".
            "user_id, postpartum_week, visit_sequence, date_format(postpartum_timestamp, '%a %d %b %Y, %h:%i%p') postpartum_timestamp, ".
            "blood_pressure_systolic, blood_pressure_diastolic, visit_type, ".
            "breastfeeding_flag, family_planning_flag, fever_flag, ".
            "vaginal_infection_flag, vaginal_bleeding_flag, pallor_flag, cord_ok_flag ".
            "from m_consult_mc_postpartum where patient_id = '$patient_id' and ".
            "mc_id = '".$get_vars["mc_id"]."' and visit_sequence = '".$get_vars["ppvisitseq"]."'";
     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='postpartum_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=POSTP".($get_vars["mc_id"]?"&mc_id=".$get_vars["mc_id"]."&visitseq=".$get_vars["visitseq"]."#postpartum_visit":"")."'>";
                 print "<table bgcolor='$bgcolor' 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/>";
                 print "VISIT DATE: ".$mc["postpartum_date"]."<br/>";
                 print "VISIT SEQUENCE: ".$mc["visit_sequence"]."<br/>";
                 print "VISIT TYPE: ".$mc["visit_type"]."<br/>";
                 print "POSTPARTUM WEEK: ".$mc["postpartum_week"]."<br/>";
                 print "<hr size='1'/>";
                 print "LAST UPDATE: ".$mc["postpartum_timestamp"]."<br/>";
                 print "UPDATE BY: ".user::get_username($mc["user_id"])."<br/>";
                 print "<hr size='1'/>";
                 print "VITAL SIGNS:<br/>";
                 print "&nbsp;SYS BP: ".$mc["blood_pressure_systolic"]."<br/>";
                 print "&nbsp;DIAS BP: ".$mc["blood_pressure_diastolic"]."<br/>";
                 print "<br/>";
                 print "POSTPARTUM EVENTS:<br/>";
                 print "&nbsp;Fever >38&deg;C: ".($mc["fever_flag"]=="Y"?"Yes":"No")."<br/>";
                 print "&nbsp;Vaginal Infection: ".($mc["vaginal_infection_flag"]=="Y"?"Yes":"No")."<br/>";
                 print "&nbsp;Vaginal Bleeding: ".($mc["vaginal_bleeding_flag"]=="Y"?"Yes":"No")."<br/>";
                 print "&nbsp;Pallor: ".($mc["pallor_flag"]=="Y"?"Yes":"No")."<br/>";
                 print "&nbsp;Baby's Cord OK: ".($mc["cord_ok_flag"]=="Y"?"Yes":"No")."<br/>";
                 print "<br/>";
                 print "OTHER INFO:<br/>";
                 print "&nbsp;Breastfeeding: ".($mc["breastfeeding_flag"]=="Y"?"Yes":"No")."<br/>";
                 print "&nbsp;Family Planning Method: ".($mc["family_planning_flag"]=="Y"?"Yes":"No")."<br/>";
                 print "<br/>";
                 if ($_SESSION["priv_update"]) {
                     print "<input type='submit' name='submitmc' value='Update Visit' class='tinylight' style='border: 1px solid black'/>";
                     print "<input type='hidden' name='postpartum_id' value='".$mc["mc_id"]."'/>";
                     print "<input type='hidden' name='visit_sequence' value='".$mc["visit_sequence"]."'/>";
                 }
                 print "</span>";
                 print "</td></tr></table>";
                 print "</form>";
             }
         }
     }
 }
Esempio n. 2
0
 function _consult_lab_urinalysis_results()
 {
     $q_lab_urinalysis = mysql_query("SELECT date_format(date_lab_exam,'%m/%d/%Y') as 'date_lab_exam',physical_color,physical_reaction,physical_transparency,physical_gravity,physical_ph,chem_albumin,chem_sugar,chem_pregnancy,sediments_rbc,sediments_pus,sediments_epithelial,sediments_urates,sediments_calcium,sediments_fat,sediments_phosphate,sediments_uric,sediments_amorphous,sediments_carbonates,sediments_bacteria,sediments_mucus,cast_coarsely,cast_pus,cast_hyaline,cast_finely,cast_redcell,cast_waxy FROM m_consult_lab_urinalysis WHERE request_id='{$_GET['request_id']}' AND release_flag='Y'") or die("Cannot query 146" . mysql_error());
     $q_lab_details = mysql_query("SELECT patient_id,date_format(request_timestamp,'%a %d %b %Y, %h %i %p') as 'date_requested', request_user_id, date_format(done_timestamp,'%a %d %b %Y, %h %i %p') as 'date_done', request_done, done_user_id FROM m_consult_lab WHERE request_id='{$_GET['request_id']}' AND request_done='Y'") or die("Cannot query 147:" . mysql_error());
     list($date_lab_exam, $color, $reaction, $transparency, $gravity, $ph, $albumin, $sugar, $pregnancy, $rbc, $pus, $epithelial, $urates, $calcium, $fat, $phosphate, $uric, $amorphous, $carbonates, $bacteria, $mucus, $cast_coarsely, $cast_pus, $cast_hyaline, $cast_finely, $cast_redcell, $cast_waxy) = mysql_fetch_array($q_lab_urinalysis);
     list($pxid, $date_request, $request_user_id, $date_done, $request_done, $done_user_id) = mysql_fetch_array($q_lab_details);
     echo "<a name='urinalysis_result'></a>";
     echo "<table style='border: 1px dotted black' width='400'><tr><td colspan='2'>";
     echo "<span class='tinylight'>";
     echo "<b>URINALYSIS RESULTS FOR " . strtoupper(patient::get_name($pxid)) . "</b><br/>";
     echo "REQUEST ID: <font color='red'>" . module::pad_zero($_GET["request_id"], 7) . "</font><br/>";
     echo "DATE REQUESTED: " . $date_request . "<br/>";
     echo "REQUESTED BY: " . user::get_username($request_user_id) . "<br/>";
     echo "DATE COMPLETED: " . $date_done . "<br/>";
     echo "PROCESSED BY: " . ($done_user_id ? user::get_username($done_user_id) : "NA") . "<br/>";
     echo "RELEASED: " . $request_done . "<br/>";
     echo "<hr size='1'/>";
     echo "<tr><td colspan='2' class='boxtitle'>URINALYSIS EXAM DATE:&nbsp;{$date_lab_exam}";
     echo "</td></tr>";
     echo "<tr><td class='boxtitle'>PHYSICAL APPEARANCE</td><td class='boxtitle'>QUANT. CHEMICAL TEST</td></tr>";
     echo "<tr>";
     echo "<td>";
     echo "<table>";
     echo "<tr><td class='boxtitle'>COLOR:</td><td class='tinylight'>{$color}</td></tr>";
     echo "<tr><td class='boxtitle'>REACTION:</td><td class='tinylight'>{$reaction}</td></tr>";
     echo "<tr><td class='boxtitle'>TRANSPARENCY:</td><td class='tinylight'>{$transparency}</td></tr>";
     echo "<tr><td class='boxtitle'>SPECIFIC GRAVITY:</td><td class='tinylight'>{$gravity}</td></tr>";
     echo "<tr><td class='boxtitle'>pH:</td><td class='tinylight'>{$ph}</td></tr>";
     echo "</table>";
     echo "</td>";
     echo "<td valign='top'>";
     echo "<table>";
     echo "<tr><td class='boxtitle'>ALBUMIN:</td><td class='tinylight'>{$albumin}</td></tr>";
     echo "<tr><td class='boxtitle'>SUGAR:</td><td class='tinylight'>{$sugar}</td></tr>";
     echo "<tr><td class='boxtitle'>PREGNANCY TEST:</td><td class='tinylight'>{$pregnancy}</td></tr>";
     echo "</table>";
     echo "</td>";
     echo "</tr>";
     echo "<tr><td colspan='2' class='boxtitle'><hr size='1'>SEDIMENTS</td></tr>";
     echo "<tr><td valign='top'>";
     echo "<table>";
     echo "<tr><td class='boxtitle'>RED BLOOD CELLS:</td><td class='tinylight'>{$rbc}</td></tr>";
     echo "<tr><td class='boxtitle'>PUS CELLS:</td><td class='tinylight'>{$pus}</td></tr>";
     echo "<tr><td class='boxtitle'>EPHITHELIAL CELLS:</td><td class='tinylight'>{$epithelial}</td></tr>";
     echo "<tr><td class='boxtitle'>AMORPHOUS URATES:</td><td class='tinylight'>{$urates}</td></tr>";
     echo "<tr><td class='boxtitle'>CALCIUM OXALATES:</td><td class='tinylight'>{$calcium}</td></tr>";
     echo "<tr><td class='boxtitle'>FAT GLOBULES:</td><td class='tinylight'>{$fat}</td></tr>";
     echo "</table>";
     echo "</td>";
     echo "<td class='boxtitle'>";
     echo "<table>";
     echo "<tr><td class='boxtitle'>TRIPLE PHOSPHATES:</td><td class='tinylight'>{$phosphate}</td></tr>";
     echo "<tr><td class='boxtitle'>URIC ACID CRYSTALS:</td><td class='tinylight'>{$uric}</td></tr>";
     echo "<tr><td class='boxtitle'>AMORPHOUS PHOSPATES:</td><td class='tinylight'>{$amorphous}</td></tr>";
     echo "<tr><td class='boxtitle'>BACTERIA:</td><td class='tinylight'>{$bacteria}</td></tr>";
     echo "<tr><td class='boxtitle'>MUCUS THREADS:</td><td class='tinylight'>{$mucus}</td></tr>";
     echo "</table>";
     echo "</td>";
     echo "</tr>";
     echo "<tr>";
     echo "<td colspan='2' class='boxtitle'><hr size='1'>CASTS</td></tr>";
     echo "<tr>";
     echo "<td class='boxtitle'>";
     echo "<table>";
     echo "<tr><td class='boxtitle'>COARSELY GRANULAR CAST:</td><td class='tinylight'>{$cast_coarsely}</td></tr>";
     echo "<tr><td class='boxtitle'>PUS CELLS CAST:</td><td class='tinylight'>{$cast_pus}</td></tr>";
     echo "<tr><td class='boxtitle'>HYALINE CAST:</td><td class='tinylight'>{$cast_hyaline}</td></tr>";
     echo "</table>";
     echo "</td>";
     echo "<td class='boxtitle'>";
     echo "<table>";
     echo "<tr><td class='boxtitle'>FINELY GRANULAR CAST:</td><td class='tinylight'>{$cast_finely}</td></tr>";
     echo "<tr><td class='boxtitle'>RED CELL CAST:</td><td class='tinylight'>{$cast_redcell}</td></tr>";
     echo "<tr><td class='boxtitle'>WAXY CAST:</td><td class='tinylight'>{$cast_waxy}</td></tr>";
     echo "</table>";
     echo "</td>";
     echo "</tr>";
     echo "</span>";
     echo "</table>";
 }
Esempio n. 3
0
 function _consult_lab_sputum_results() {
     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];
     }
             
     $sql = mysql_query("select l.request_id, l.request_user_id, l.request_done, ".
            "date_format(l.request_timestamp, '%a %d %b %Y, %h:%i%p') request_timestamp, ".
            "s.consult_id, s.patient_id, done_user_id, ".
            "if(l.done_timestamp<>'00000000000000', date_format(l.done_timestamp, '%a %d %b %Y, %h:%i%p'), 'NA') done_timestamp, ".
            "if(l.request_done='Y', (unix_timestamp(l.done_timestamp)-unix_timestamp(l.request_timestamp))/3600,(unix_timestamp(sysdate())-unix_timestamp(l.request_timestamp))/3600) elapsed, ".
            "s.sp1_collection_date, s.sp2_collection_date, s.sp3_collection_date, ".
            "s.sp1_appearance, s.sp2_appearance, s.sp3_appearance, ".
            "s.sp1_reading, s.sp2_reading, s.sp3_reading, s.lab_diagnosis, ".
            "s.user_id, s.request_id, s.release_flag, s.sputum_period,s.lab_diag1,s.lab_diag2,s.lab_diag3 ".
            "from m_consult_lab_sputum s, m_consult_lab l ".
            "where l.request_id = s.request_id and ".
            "s.request_id = '".$get_vars["request_id"]."'") or die("Cannot query ".mysql_error());
            
           
     if ($sql) {
         if (mysql_num_rows($sql)) {
             $sputum = mysql_fetch_array($sql);
             
             $res1 = ((!empty($sputum["lab_diag1"])?(($sputum["lab_diag1"]=="P")?"Positive":(($sputum["lab_diag1"]=="N")?"Negative":"Doubtful")):"No diagnosis yet"));
             $res2 = ((!empty($sputum["lab_diag2"])?(($sputum["lab_diag2"]=="P")?"Positive":(($sputum["lab_diag2"]=="N")?"Negative":"Doubtful")):"No diagnosis yet"));          
             $res3 = ((!empty($sputum["lab_diag3"])?(($sputum["lab_diag3"]=="P")?"Positive":(($sputum["lab_diag3"]=="N")?"Negative":"Doubtful")):"No diagnosis yet"));
             
             
             print "<a name='sputum_result'>";
             print "<table style='border: 1px dotted black'><tr><td>";
             print "<span class='tinylight'>";
             print "<b>SPUTUM RESULTS FOR ".strtoupper(patient::get_name($sputum["patient_id"]))."</b><br/>";
             print "REQUEST ID: <font color='red'>".module::pad_zero($sputum["request_id"],7)."</font><br/>";
             print "DATE REQUESTED: ".$sputum["request_timestamp"]."<br/>";
             print "REQUESTED BY: ".user::get_username($sputum["request_user_id"])."<br/>";
             print "DATE COMPLETED: ".$sputum["done_timestamp"]."<br/>";
             print "PROCESSED BY: ".($sputum["done_user_id"]?user::get_username($sputum["done_user_id"]):"NA")."<br/>";
             print "HOURS ELAPSED: ".$sputum["elapsed"]."<br/>";
             print "RELEASED: ".$sputum["release_flag"]."<br/>";
             print "<hr size='1'/>";
             print "SPUTUM EXAM PERIOD:<br/> ";
             print "&nbsp;&nbsp;".sputum::get_sputum_period_name($sputum["sputum_period"])."<br/>";
             print "<hr size='1'/>";
             print "SPECIMEN COLLECTION DATES - DIAGNOSIS<br/>";
             print "sp #1: ".$sputum["sp1_collection_date"]." - ".$res1."<br/>";
             print "sp #2: ".$sputum["sp2_collection_date"]." - ".$res2."<br/>";
             print "sp #3: ".$sputum["sp3_collection_date"]." - ".$res3."<br/>";
             print "<hr size='1'/>";
             print "SPECIMEN VISUAL APPEARANCE:<br/>";
             print "sp #1: ".sputum::get_sputum_appearance_name($sputum["sp1_appearance"])."<br/>";
             print "sp #2: ".sputum::get_sputum_appearance_name($sputum["sp2_appearance"])."<br/>";
             print "sp #3: ".sputum::get_sputum_appearance_name($sputum["sp3_appearance"])."<br/>";
             print "<hr size='1'/>";
             print "SPECIMEN READING:<br/>";
             print "sp #1: ".sputum::get_sputum_reading_name($sputum["sp1_reading"])."<br/>";
             print "sp #2: ".sputum::get_sputum_reading_name($sputum["sp2_reading"])."<br/>";
             print "sp #3: ".sputum::get_sputum_reading_name($sputum["sp3_reading"])."<br/>";
             print "<hr size='1'/>";
             print "FINAL LAB DIAGNOSIS: ".sputum::get_diagnosis_name($sputum["lab_diagnosis"])."<br/>";
             print "</span>";
             print "</td></tr></table>";
         }
         
     }
     
     
 }
 function _consult_lab_hematology_results()
 {
     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];
     }
     $q_hema = mysql_query("SELECT date_format(date_lab_exam,'%m/%d/%Y') as 'date_lab_exam',hemoglobin,hematocrit,rbc,rbc_mcv,rbc_mchc,rbc_mch,wbc,wbc_polys,wbc_lympho,wbc_mxd,wbc_mono,wbc_eosin,wbc_baso,platelet,reticulocytes,esr,clotting_time,bleeding_time,malaria,slit_smear,fbs,blood_type,user_id,patient_id,others,rh,stabs FROM m_consult_lab_hematology WHERE request_id='{$_GET['request_id']}'") or die("Cannot query: 131" . mysql_error());
     $q_lab = mysql_query("SELECT patient_id,date_format(request_timestamp,'%a %d %Y,%h %i %p') as 'date_requested',request_user_id,date_format(done_timestamp,'%a %d %b %Y, %h %i %p') as 'date_done',request_done,done_user_id FROM m_consult_lab WHERE request_id='{$_GET['request_id']}'") or die("Cannot query 132" . mysql_error());
     if (mysql_num_rows($q_hema) != 0) {
         list($date_lab_exam, $hemo, $hema, $rbc, $mcv, $mchc, $mch, $wbc, $polys, $lympho, $mxd, $mono, $eosin, $baso, $platelet, $reticulocytes, $esr, $clotting_time, $bleeding_time, $malaria, $slit_smear, $fbs, $blood_type, $user_id, $patient_id, $others, $rh, $stabs) = mysql_fetch_array($q_hema);
     } else {
         $date_lab_exam = date('m/d/Y');
     }
     list($pxid, $date_request, $request_user_id, $date_done, $request_done, $done_user_id) = mysql_fetch_array($q_lab);
     echo "<a name='hematology_result'></a>";
     echo "<table style='border: 1px dotted black' width='400'><tr><td colspan='4'>";
     echo "<span class='tinylight'>";
     echo "<b>HEMATOLOGY RESULTS FOR " . strtoupper(patient::get_name($pxid)) . "</b><br/>";
     echo "REQUEST ID: <font color='red'>" . module::pad_zero($_GET["request_id"], 7) . "</font><br/>";
     echo "DATE REQUESTED: " . $date_request . "<br/>";
     echo "REQUESTED BY: " . user::get_username($request_user_id) . "<br/>";
     echo "DATE COMPLETED: " . $date_done . "<br/>";
     echo "PROCESSED BY: " . ($done_user_id ? user::get_username($done_user_id) : "NA") . "<br/>";
     echo "RELEASED: " . $request_done . "<br/>";
     echo "<hr size='1'></td></tr>";
     echo "<tr><td colspan='4' class='boxtitle'>DATE EXAMINED &nbsp; {$date_lab_exam}";
     echo "</td></tr>";
     echo "<tr><td>TEST</td><td>RESULT</td><td>TEST</td><td>RESULT</td></tr>";
     echo "<tr><td class='boxtitle'>HEMOGLOBIN</td><td class='tinylight'>{$hemo}</td><td class='boxtitle'>PLATELET</td><td class='tinylight'>{$platelet}</td></tr>";
     echo "<tr><td class='boxtitle'>HEMATOCRIT</td><td class='tinylight'>{$hema}</td><td class='boxtitle'>RETICULOCYTES</td><td class='tinylight'>{$reticulocytes}</td></tr>";
     echo "<tr><td class='boxtitle'>RBC</td><td class='tinylight'>{$rbc}</td><td class='boxtitle'>ESR</td><td class='tinylight'>{$esr}</td></tr>";
     echo "<tr><td class='boxtitle'>MCV</td><td class='tinylight'>{$mcv}</td><td class='boxtitle'>CLOTING TIME</td><td class='tinylight'>{$clotting_time}</td></tr>";
     echo "<tr><td class='boxtitle'>MCHC</td><td class='tinylight'>{$mchc}</td><td class='boxtitle'>BLEEDING TIME</td><td class='tinylight'>{$bleeding_time}</td></tr>";
     echo "<tr><td class='boxtitle'>MCH</td><td class='tinylight'>{$mch}</td><td class='boxtitle'>MALARIA</td><td class='tinylight'>{$malaria}</td></tr>";
     echo "<tr><td class='boxtitle'>WBC</td><td class='tinylight'>{$wbc}</td><td class='boxtitle'>SLIT SMEAR</td><td class='tinylight'>{$slit_smear}</td></tr>";
     echo "<tr><td class='boxtitle'>POLYS</td><td class='tinylight'>{$polys}</td><td class='boxtitle'>FBS</td><td class='tinylight'>{$fbs}</td></tr>";
     echo "<tr><td class='boxtitle'>LYMPHO</td><td class='tinylight'>{$lympho}</td><td class='boxtitle'>";
     $blood_type = $blood_type == '0' ? '' : $blood_type;
     echo "BLOOD TYPE";
     echo "</td><td class='tinylight'>{$blood_type}";
     echo "</td></tr>";
     echo "<tr><td class='boxtitle'>RH</td><td class='tinylight'>{$rh}</td><td colspan='2'>&nbsp;</td></tr>";
     echo "<tr><td class='boxtitle'>MXD</td><td class='tinylight'>{$mxd}</td><td colspan='2'>&nbsp;</td></tr>";
     echo "<tr><td class='boxtitle'>MONO</td><td class='tinylight'>{$mono}</td><td colspan='2'>&nbsp;</td></tr>";
     echo "<tr><td class='boxtitle'>EOSIN</td><td class='tinylight'>{$eosin}</td><td colspan='2'>&nbsp;</td></tr>";
     echo "<tr><td class='boxtitle'>BASO</td><td class='tinylight'>{$baso}</td><td colspan='2'>&nbsp;</td></tr>";
     echo "<tr><td class='boxtitle'>STABS</td><td class='tinylight'>{$stabs}</td><td colspan='2'>&nbsp;</td></tr>";
     echo "</table>";
     $_SESSION["lab_print"] = "HEMATOLOGY RESULTS FOR " . strtoupper(patient::get_name($pxid)) . "<br/>" . "DATE REQUESTED: " . $date_request . "<br/>" . "REQUESTED BY: " . user::get_username($request_user_id) . "<br/>" . "DATE COMPLETED: " . $date_done . "<br/>" . "PROCESSED BY: " . ($done_user_id ? user::get_username($done_user_id) : "NA") . "<br/>" . "<br/><br/>" . "HEMOGLOBIN: {$hemo}<br/>PLATELET: {$platelet}<br/>" . "HEMATOCRIT: {$hema}<br/>RETICULOCYTES: {$reticulocytes}<br/>" . "RBC: {$rbc}<br/>ESR: {$esr}<br/>" . "MCV: {$mcv}<br/>CLOTING TIME: {$clotting_time}<br/>" . "MCHC: {$mchc}<br/>BLEEDING TIME: {$bleeding_time}<br/>" . "MCH: {$mch}<br/>MALARIA: {$malaria}<br/>" . "WBC: {$wbc}<br/>SLIT SMEAR: {$slit_smear}<br/>" . "POLYS: {$polys}<br/>FBS: {$fbs}<br/>" . "LYMPHO: {$lympho}<br/>" . "BLOOD TYPE: {$blood_type}" . "<br/>" . "RH: {$rh}<br/>" . "MXD: {$mxd}<br/>" . "MONO: {$mono}<br/>" . "EOSIN: {$eosin}<br/>" . "BASO: {$baso}<br/>" . "STABS: {$stabs}";
 }
Esempio n. 5
0
 function _consult_lab_fecalysis_results()
 {
     $q_fecalysis = mysql_query("SELECT date_format(date_lab_exam,'%m/%d/%Y') as 'date_lab_exam',fecal_color,fecal_consistency,fecal_occultblood,fecal_ova,fecal_wbc,fecal_rbc,fecal_bacteria,fecal_fat,fecal_starch,fecal_others,user_id,patient_id FROM m_consult_lab_fecalysis WHERE request_id='{$_GET['request_id']}' AND release_flag='Y'") or die("Cannot query 150" . mysql_error());
     $q_lab_details = mysql_query("SELECT patient_id,date_format(request_timestamp,'%a %d %b %Y, %h %i %p') as 'date_requested', request_user_id, date_format(done_timestamp,'%a %d %b %Y, %h %i %p') as 'date_done', request_done, done_user_id FROM m_consult_lab WHERE request_id='{$_GET['request_id']}' AND request_done='Y'") or die("Cannot query 151:" . mysql_error());
     list($pxid, $date_request, $request_user_id, $date_done, $request_done, $done_user_id) = mysql_fetch_array($q_lab_details);
     list($date_lab_exam, $color, $consistency, $blood, $ova, $wbc, $rbc, $bacteria, $fat, $starch, $others, $userid, $pxid) = mysql_fetch_row($q_fecalysis);
     echo "<a name='fecalysis_result'></a>";
     echo "<table style='border: 1px dotted black'><tr><td>";
     print "<span class='tinylight'>";
     print "<b>FECALYSIS RESULTS FOR " . strtoupper(patient::get_name($pxid)) . "</b><br/>";
     print "REQUEST ID: <font color='red'>" . module::pad_zero($_GET["request_id"], 7) . "</font><br/>";
     print "DATE REQUESTED: " . $date_request . "<br/>";
     print "REQUESTED BY: " . user::get_username($request_user_id) . "<br/>";
     print "DATE COMPLETED: " . $date_done . "<br/>";
     print "PROCESSED BY: " . ($done_user_id ? user::get_username($done_user_id) : "NA") . "<br/>";
     print "RELEASED: " . $request_done . "<br/>";
     print "<hr size='1'/>";
     print "<b>FECALYSIS EXAM DATE: </b>" . $date_lab_exam . "<br/> ";
     print "<b>MACROSCOPIC</b><br/><b>PHYSICAL</b><br/>";
     print "<b>COLOR: </b>" . $color . "<br/>";
     print "<b>CONSISTENCY: </b>" . $consistency . "<br/>";
     print "<b>CHEMICAL</b><br/>";
     print "<b>OCCULT BLOOD: </b>" . $blood . "<br/>";
     print "<hr size='1'/>";
     print "<b>MICROSCOPIC </b><br/>";
     print "<b>OVA OR PARASITE: </b>" . $ova . "<br/>";
     print "<b>WBC: </b>" . $wbc . "<br/>";
     print "<b>RBC: </b>" . $rbc . "<br/>";
     print "<b>BACTERIA: </b>" . $bacteria . "<br/>";
     print "<b>FAT GLOBULES: </b>" . $fat . "<br/>";
     print "<b>STARCH GRANULES: </b>" . $starch . "<br/>";
     print "<b>OTHERS: </b>" . $others . "<br/>";
     print "</span>";
     echo "</td></tr></table>";
 }
Esempio n. 6
0
 function display_reminder_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];
         $validuser = $arg_list[3];
         $isadmin = $arg_list[4];
         //print_r($arg_list);
     }
     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=reminder&reminder=DATA'>";
     print "<table width='300' cellpadding='2' style='border: 1px dotted black'><tr><td>";
     $patient_id = healthcenter::get_patient_id($get_vars["consult_id"]);
     print "<b>NAME: " . strtoupper(patient::get_name($patient_id)) . "</b><br/>";
     $sql = "select patient_id, cellular_phone, home_phone, " . "office_phone, email_address, home_address, " . "barangay, reg_timestamp, user_id " . "from m_patient_reminder_data " . "where patient_id = {$patient_id}";
     if ($result = mysql_query($sql)) {
         if (mysql_num_rows($result)) {
             $reminder = mysql_fetch_array($result);
             print "<span class='tinylight'>";
             if (strlen($reminder["cellular_phone"]) > 0) {
                 print "CELLULAR PHONE: " . $reminder["cellular_phone"] . "<br/>";
             }
             if (strlen($reminder["home_phone"]) > 0) {
                 print "HOME PHONE: " . $reminder["home_phone"] . "<br/>";
             }
             if (strlen($reminder["office_phone"]) > 0) {
                 print "OFFICE PHONE: " . $reminder["office_phone"] . "<br/>";
             }
             if (strlen($reminder["email_address"]) > 0) {
                 print "EMAIL ADDRESS: " . $reminder["email_address"] . "<br/>";
             }
             if (strlen($reminder["home_address"]) > 0) {
                 print "HOME ADDRESS: " . $reminder["home_address"] . "<br/>";
             }
             if ($reminder["barangay"]) {
                 print "BARANGAY: " . barangay::barangay_name($reminder["barangay"]) . "<br/>";
             }
             print "<br/></span>";
             print "<input type='hidden' name='patient_id' value='" . $reminder["patient_id"] . "' />";
             if ($_SESSION["priv_update"] || $_SESSION["priv_delete"]) {
                 print "<input type='submit' name='submitdetail' value='Edit Reminder Data' class='tinylight' style='border: 1px solid black' />";
             }
         } else {
             print "<font color='red'>No reminder data</font><br/>";
         }
     }
     print "</td></tr></table>";
     print "</form>";
 }
    function _consult_lab_fecalysis_results() {
        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];
        }
        $sql = "select l.request_id, l.request_user_id, l.request_done, ".
               "date_format(l.request_timestamp, '%a %d %b %Y, %h:%i%p') request_timestamp, ".
               "f.consult_id, f.patient_id, done_user_id, ".
               "if(l.done_timestamp<>'00000000000000', date_format(l.done_timestamp, '%a %d %b %Y, %h:%i%p'), 'NA') done_timestamp, ".
               "if(l.request_done='Y', (unix_timestamp(l.done_timestamp)-unix_timestamp(l.request_timestamp))/3600,(unix_timestamp(sysdate())-unix_timestamp(l.request_timestamp))/3600) elapsed, ".
               "f.fec_collection_date, ".
               "f.fec_macro_findings, ".
               "f.fec_micro_findings, ".
               "f.user_id, f.request_id ".
               "from m_consult_lab_fecalysis f, m_consult_lab l ".
               "where l.request_id = f.request_id and ".
               "f.request_id = '".$get_vars["request_id"]."'";
        if ($result = mysql_query($sql)) {
            if (mysql_num_rows($result)) {
                $fecalysis = mysql_fetch_array($result);
                print "<a name='fecalysis'>";
                print "<table style='border: 1px dotted black'><tr><td>";
                print "<span class='tinylight'>";
                print "<b>FECALYSIS RESULTS FOR ".strtoupper(patient::get_name($fecalysis["patient_id"]))."</b><br/>";
                print "REQUEST ID: <font color='red'>".module::pad_zero($fecalysis["request_id"],7)."</font><br/>";
                print "DATE REQUESTED: ".$fecalysis["request_timestamp"]."<br/>";
                print "REQUESTED BY: ".user::get_username($fecalysis["request_user_id"])."<br/>";
                print "DATE COMPLETED: ".$fecalysis["done_timestamp"]."<br/>";
                print "PROCESSED BY: ".($fecalysis["done_user_id"]?user::get_username($fecalysis["done_user_id"]):"NA")."<br/>";
                print "RELEASED: ".$fecalysis["release_flag"]."<br/>";
                print "<hr size='1'/>";
                print "SPECIMEN COLLECTION DATE:<br/>";
                print $fecalysis["fec_collection_date"]."<br/>";
                print "<hr size='1'/>";
                print "MACROSCOPIC FINDINGS:<br/>";
                print $fecalysis["fec_macro_findings"]."<br/>";
                print "<hr size='1'/>";
                print "MICROSCOPIC FINDINGS:<br/>";
                print $fecalysis["fec_micro_findings"]."<br/>";
		print "<hr size='1'/>";
                print "</span>";
                print "</td></tr></table>";
            }
        }
    }
Esempio n. 8
0
 function display_vaccine_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);
     }
     $patient_id = healthcenter::get_patient_id($get_vars["consult_id"]);
     $sql = "select consult_id, user_id, patient_id, vaccine_timestamp, date_format(vaccine_timestamp, '%a %d %b %Y, %h:%i%p'), " . "vaccine_id, adr_flag, actual_vaccine_date, source_module " . "from m_consult_vaccine where " . "vaccine_id = '" . $get_vars["vaccine"] . "' and patient_id = '{$patient_id}' and " . "vaccine_timestamp = '" . $get_vars["ts"] . "'";
     if ($result = mysql_query($sql)) {
         if (mysql_num_rows($result)) {
             list($cid, $uid, $pid, $vstamp, $vdate, $vid, $adr, $actual_date, $source) = mysql_fetch_array($result);
             print "<a name='detail'>";
             print "<table width='250' cellpadding='3' style='border:1px dashed black'><tr><td>";
             print "<form name='form_vaccine_detail' 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=vaccine&vaccine={$vid}&ts={$vstamp}&actual={$actual_vdate}'>";
             print "<span class='tinylight'>";
             print "PATIENT: " . patient::get_name($pid) . "<br/>";
             print "DATA SOURCE: " . strtoupper($source) . "<br/>";
             print "VACCINE: " . vaccine::get_vaccine_name($vid) . "<br/>";
             print "REPORT DATE: {$vdate}<br/>";
             print "RECORDED BY: " . user::get_username($uid) . "<br/>";
             print "ACTUAL VACCINE DATE:<br/>";
             if ($actual_date != "0000-00-00") {
                 list($year, $month, $day) = explode("-", $actual_date);
                 $conv_date = "{$month}/{$day}/{$year}";
             }
             print "<input type='text' size='10' maxlength='10' class='tinylight' name='actual_vaccine_date' value='" . ($conv_date ? $conv_date : $post_vars["actual_vaccine_date"]) . "' style='border: 1px solid #000000'> ";
             print "<a href=\"javascript:show_calendar4('document.form_vaccine_detail.actual_vaccine_date', document.form_vaccine_detail.actual_vaccine_date.value);\"><img src='../images/cal.gif' width='16' height='16' border='0' alt='Click Here to Pick up the date'></a><br>";
             print "<input type='checkbox' name='adr_flag' " . ($adr == "Y" ? "checked" : "") . " value='1'/> " . INSTR_ADVERSE_VACCINE_REACTION . "<br/>";
             print "<input type='hidden' name='vaccine' value='" . $get_vars["vaccine"] . "'/>";
             print "<input type='hidden' name='vaccine_consult_id' value='{$cid}'/>";
             print "<input type='hidden' name='ts' value='" . $get_vars["ts"] . "'/>";
             if ($_SESSION["priv_delete"]) {
                 print "<input type='submit' name='submitdetail' value='Delete Record' class='tinylight' style='border: 1px solid black'/> ";
             }
             if ($_SESSION["priv_update"]) {
                 print "<input type='submit' name='submitdetail' value='Update Record' class='tinylight' style='border: 1px solid black'/> ";
             }
             print "</span>";
             print "</form>";
             print "</td></tr></table>";
         }
     }
 }
 function display_notifiable_diseases_hx()
 {
     //
     // displays notifiable diseases
     // entered for all consults
     //
     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"]);
     $patient_name = patient::get_name($get_vars["patient_id"]);
     print "<table width='300'>";
     print "<tr valign='top'><td>";
     print "<b>" . FTITLE_NOTIFIABLE_DISEASES_CONSULT_HX . "</b><br>";
     print "</td></tr>";
     $sql = "select distinct h.consult_id, h.disease_id, l.disease_name, h.onset_date " . "from m_lib_disease_notifiable l, m_consult_disease_notifiable h " . "where l.disease_id = h.disease_id and h.patient_id = '{$patient_id}'";
     if ($result = mysql_query($sql)) {
         if (mysql_num_rows($result)) {
             print "<tr valign='top'><td>";
             while (list($cid, $did, $name, $onset) = mysql_fetch_array($result)) {
                 print "<img src='../images/arrow_redwhite.gif' border='0'/> ";
                 print "<a href='" . $_SERVER["SELF"] . "?page=" . $get_vars["page"] . "&menu_id=" . $get_vars["menu_id"] . "&consult_id=" . $get_vars["consult_id"] . "&ptmenu=DETAILS&module=philhealth&philhealth=LABS&pid={$hid}'>{$hid}</a> {$name} ({$onset}) <br/>";
             }
             print "</td></tr>";
         } else {
             print "<tr valign='top'><td><font color='red'>No records.</font></td></tr>";
         }
     }
     print "</table><br>";
 }
Esempio n. 10
0
 function display_consult_icd10_hx()
 {
     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);
     }
     // process delete here
     $patient_id = healthcenter::get_patient_id($get_vars["consult_id"]);
     $patient_name = patient::get_name($get_vars["patient_id"]);
     print "<table width='300'>";
     print "<tr valign='top'><td>";
     print "<b>" . FTITLE_CONSULT_ICD10_HX . "</b><br>";
     print "</td></tr>";
     $sql = "select h.consult_id, h.diagnosis_code, l.description " . "from m_lib_icd10_en l, m_consult_icd10 h " . "where l.diagnosis_code = h.diagnosis_code and h.patient_id = '{$patient_id}' " . "order by h.diagnosis_code";
     if ($result = mysql_query($sql)) {
         if (mysql_num_rows($result)) {
             print "<tr valign='top'><td>";
             while (list($cid, $icd, $name) = mysql_fetch_array($result)) {
                 print "<img src='../images/arrow_redwhite.gif' border='0'/> ";
                 print "<b>{$icd}</b> {$name} ";
                 print "<br/>";
             }
             print "</td></tr>";
         } else {
             print "<tr valign='top'><td><font color='red'>No records.</font></td></tr>";
         }
     }
     print "</table><br>";
 }
Esempio n. 11
0
    function display_appointment_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];
            //print_r($arg_list);
        }
        $sql = "select schedule_id, visit_date, consult_id, date_format(schedule_timestamp, '%a %d %b %Y, %h:%i%p') schedule_timestamp, user_id, ".
               "patient_id, appointment_id, reminder_flag, actual_date, to_days(visit_date)- to_days(actual_date) variance ".
               "from m_consult_appointments where schedule_id = '".$get_vars["schedule_id"]."'";
        if ($result = mysql_query($sql)) {
            if (mysql_num_rows($result)) {
                $appt = mysql_fetch_array($result);
                print "<a name='detail'>";
                print "<table width='600' cellpadding='1'><tr valign='top'><td>";
                // column 1
                print "<form method='post' action='".$_SERVER["PHP_SELF"]."?page=".$get_vars["page"]."&menu_id=".$get_vars["menu_id"]."&patient_id=".$get_vars["patient_id"]."&schedule_id=".$appt["schedule_id"]."&year=".$get_vars["year"]."&month=".$get_vars["month"]."&day=".$get_vars["day"]."&s=0'>";
                print "<table width='300' bgcolor='#FFFFCC' cellpadding='3'><tr><td>";
                print "<span class='PATIENT'>".strtoupper(patient::get_name($appt["patient_id"]))."</span><br/><br/>";
                print "VISIT DATE: <font color='red'><b>".$appt["visit_date"]."</b></font><br/>";
                print "ACTUAL DATE: <font color='red'><b>".($appt["actual_date"]=="0000-00-00"?"No visit yet":$appt["actual_date"])."</b></font><br/>";
                if ($appt["actual_date"]<>"0000-00-00") {
                    print "VARIANCE, DAYS: ".($appt["variance"]<0?"<font color='red'><b>".$appt["variance"]."</b></font>":$appt["variance"])."<br/>";
                }
                print "REMINDER: ".$appt["reminder_flag"]."<br/>";
                print "APPT SET BY: ".user::get_username($appt["user_id"])."<br/><br/>";
                print "<span class='boxtitle'>APPT CODE</span><br/> ".appointment::get_appointment_name($appt["appointment_id"])."<br/><br/>";
                /*
                print "<span class='boxtitle'>ACTUAL FOLLOWUP DATE</span><br/>";
                if ($injury["injury_date"]) {
                    list($year, $month, $day) = explode("-", $injury["injury_date"]);
                    $injury_date = "$month/$day/$year";
                }
                print "<input type='text' size='15' maxlength='10' class='textbox' name='injury_date' value='".($injury_date?$injury_date:$post_vars["injury_date"])."' style='border: 1px solid #000000'> ";
                print "<a href=\"javascript:show_calendar4('document.form_consult_injury.injury_date', document.form_consult_injury.injury_date.value);\"><img src='../images/cal.gif' width='16' height='16' border='0' alt='Click Here to Pick up the date'></a><br>";
                print "<small>Click on the calendar icon to select date. Otherwise use MM/DD/YYYY format.</small><br>";
                print "<br/>";
                */
                if ($appt["actual_date"]=="0000-00-00") {
                    print "<span class='boxtitle'>".LBL_DEFER_CONSULT."?</span><br/>";
                    print "<input type='checkbox' name='defer_consult' checked value='1'/> ".INSTR_DEFER_CONSULT."<br/><br/>";
                }
                if ($_SESSION["priv_add"]) {
                    if ($appt["actual_date"]=="0000-00-00") {
                        print "<input type='submit' class='textbox' name='submitsked' value='Arrived' style='border: 1px solid black'/> ";
                    }
                }
                if ($_SESSION["priv_delete"]) {
                    print "<input type='submit' class='textbox' name='submitsked' value='Delete' style='border: 1px solid black'/> ";
                }
                print "<input type='hidden' name='schedule_id' value='".$get_vars["schedule_id"]."'/>";
                print "<input type='hidden' name='consult_patient_id' value='".$appt["patient_id"]."'/>";
                print "</td></tr></table></form>";

                print "</td><td width='50%'>";
                // column 2
                // followup history
                // compute only for those who have followed up
                print "<b>".LBL_FOLLOW_UP_BEHAVIOR."</b><br/>";
                $sql_hx = "select case when (to_days(visit_date)-to_days(actual_date)) >= 0 and actual_date <> '0000-00-00' then 'on time' ".
                          "when (to_days(visit_date)-to_days(actual_date)) < 0 and actual_date <> '0000-00-00' then 'not on time' ".
                          "when actual_date = '0000-00-00' then 'no follow up' ".
                          "end status, count(schedule_id) times, round(avg(to_days(visit_date)-to_days(actual_date)),2) variance ".
                          "from m_consult_appointments ".
                          "where patient_id = ".$appt["patient_id"]." and ".
                          "actual_date <> '0000-00-00' group by status";
                if ($result_hx = mysql_query($sql_hx)) {
                    if (mysql_num_rows($result_hx)) {
                        print "<table width='300'>";
                        print "<tr valign='top'><td class='tinylight'><b>STATUS</b></td><td class='tinylight'><b>FREQUENCY</b></td><td class='tinylight'><b>AVE VARIANCE</b></td></tr>";
                        while (list($status, $times, $variance) = mysql_fetch_array($result_hx)) {
                            print "<tr valign='top'><td class='tinylight'>$status</td><td class='tinylight'>$times</td><td class='tinylight'>$variance</td></tr>";
                        }
                        print "</table><br/>";
                    } else {
                        print "<font color='red'>No records to process</font><br/><br/>";
                    }
                }
                print "<b>".LBL_PATIENT_DETAILS."</b><br/><br/>";
                print "<span class='tinylight'>";
                print "<b>".FTITLE_FAMILY_INFO."</b><br/>";
                $family_id = family::get_family_id($appt["patient_id"]);
                if ($family_id) {
                print "FAMILY ID: $family_id<br/>";
                print "ADDRESS: ".family::get_family_address($family_id)."<br/>";
                print "BARANGAY: ".family::barangay_name($family_id)."<br/>";
                print "MEMBERS:<br/>".family::get_family_members($family_id)."<br/>";
                } else {
                    print "<font color='red'>No family record.</font><br/><br/>";
                }
                print "<b>".FTITLE_PATIENT_GROUP_HX."</b><br/>";

                $sql_ptgroup = "select count(c.ptgroup_id), g.ptgroup_name, g.ptgroup_module, c.ptgroup_id, c.consult_id ".
                               "from m_consult_ptgroup c, m_lib_ptgroup g, m_consult h ".
                               "where g.ptgroup_id = c.ptgroup_id and ".
                               "h.consult_id = c.consult_id and ".
                               "h.patient_id = '".$appt["patient_id"]."' ".
                               "group by c.ptgroup_id";
                if ($result = mysql_query($sql_ptgroup)) {
                    if (mysql_num_rows($result)) {
                        while (list($count, $name, $mod, $grp, $cid) = mysql_fetch_array($result)) {
                            print "<img src='../images/arrow_redwhite.gif' border='0'/> ";
                            print "$name: $count ".($count>1?" visits":"visit")."<br/> ";
                        }
                    } else {
                        print "<font color='red'>No records.</font><br/>";
                    }
                }
                print "</span>";
                print "</td></tr></table><br/>";
            }
        }
    }
Esempio n. 12
0
 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 "&nbsp;&nbsp;Drugs: " . $ntpdata["previous_treatment_drugs"] . "<br/>";
                     print "&nbsp;&nbsp;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>";
             }
         }
     }
 }
 function display_services() {
     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"]);
     $patient_name = patient::get_name($get_vars["patient_id"]);
     print "<table width='300'>";
     print "<tr valign='top'><td>";
     print "<b>".FTITLE_PHILHEALTH_SERVICES."</b><br>";
     print "</td></tr>";
     $sql = "select h.patient_id, h.philhealth_id, s.service_name ".
            "from m_lib_philhealth_services s, m_consult_philhealth_services h ".
            "where s.service_id = h.service_id and h.consult_id = '".$get_vars["consult_id"]."'";
     if ($result = mysql_query($sql)) {
         if (mysql_num_rows($result)) {
             print "<tr valign='top'><td>";
             while (list($pid, $hid, $lab) = mysql_fetch_array($result)) {
                 print "<img src='../images/arrow_redwhite.gif' border='0'/> ";
                 print "<a href='".$_SERVER["SELF"]."?page=".$get_vars["page"]."&menu_id=".$get_vars["menu_id"]."&consult_id=".$get_vars["consult_id"]."&ptmenu=DETAILS&module=philhealth&philhealth=LABS&pid=$hid'>$hid</a> $lab<br/>";
             }
             print "</td></tr>";
         } else {
             print "<tr valign='top'><td><font color='red'>No records.</font></td></tr>";
         }
     }
     print "</table><br>";
 }