interface/reports/clinical_reports.php

   1 <?php
   2  // Copyright (C) 2010 OpenEMR Support LLC
   3  //
   4  // This program is free software; you can redistribute it and/or
   5  // modify it under the terms of the GNU General Public License
   6  // as published by the Free Software Foundation; either version 2
   7  // of the License, or (at your option) any later version.
   8
   9  // This report lists prescriptions and their dispensations according
  10  // to various input selection criteria.
  11  //
  12  // Prescription report written by Rod Roark, 2010
  13  // Fixed drug name search to work in a broader sense - tony@mi-squared.com, 2010
  14  // Added five new reports as per EHR certification requirements for Patient Lists - OpenEMR Support LLC, 2010
  15
  16 //SANITIZE ALL ESCAPES
  17 $sanitize_all_escapes=true;
  18 //
  19
  20 //STOP FAKE REGISTER GLOBALS
  21 $fake_register_globals=false;
  22
  23         require_once("../globals.php");
  24         require_once("$srcdir/patient.inc");
  25         require_once("$srcdir/options.inc.php");
  26         require_once("../drugs/drugs.inc.php");
  27         require_once("$srcdir/formatting.inc.php");
  28
  29         function add_date($givendate,$day=0,$mth=0,$yr=0) {
  30                 $cd = strtotime($givendate);
  31                 $newdate = date('Y-m-d', mktime(date('h',$cd),
  32                 date('i',$cd), date('s',$cd), date('m',$cd)+$mth,
  33                 date('d',$cd)+$day, date('Y',$cd)+$yr));
  34                 return $newdate;
  35         }
  36
  37         $type = $_POST["type"];
  38         $facility = isset($_POST['facility']) ? $_POST['facility'] : '';
  39         $sql_date_from = fixDate($_POST['date_from'], date('Y-01-01'));
  40         $sql_date_to = fixDate($_POST['date_to']  , add_date(date('Y-m-d')));
  41         $patient_id = trim($_POST["patient_id"]);
  42         $age_from = $_POST["age_from"];
  43         $age_to = $_POST["age_to"];
  44         $sql_gender = $_POST["gender"];
  45         $sql_ethnicity = $_POST["ethnicity"];
  46         $sql_race=$_POST["race"];
  47         $form_drug_name = trim($_POST["form_drug_name"]);
  48         $form_diagnosis = trim($_POST["form_diagnosis"]);
  49         $form_lab_results = trim($_POST["form_lab_results"]);
  50         $form_service_codes = trim($_POST["form_service_codes"]);
  51 ?>
  52 <html>
  53 <head>
  54 <?php html_header_show();?>
  55 <title>
  56 <?php echo htmlspecialchars(xl('Clinical Reports'),ENT_NOQUOTES); ?>
  57 </title>
  58 <script type="text/javascript" src="../../library/overlib_mini.js"></script>
  59 <script type="text/javascript" src="../../library/textformat.js"></script>
  60 <script type="text/javascript" src="../../library/dialog.js"></script>
  61 <script type="text/javascript" src="../../library/js/jquery.1.3.2.js"></script>
  62 <script language="JavaScript">
  63
  64  var mypcc = '<?php echo $GLOBALS['phone_country_code'] ?>';
  65
  66            function toggle(id) {
  67                 var tr = document.getElementById(id);
  68                 if (tr==null) { return; }
  69                 var bExpand = tr.style.display == '';
  70                 tr.style.display = (bExpand ? 'none' : '');
  71             }
  72             function changeimage(id, sMinus, sPlus) {
  73                 var img = document.getElementById(id);
  74                 if (img!=null) {
  75                    var bExpand = img.src.indexOf(sPlus) >= 0;
  76                         if (!bExpand)
  77                         img.src = "../pic/blue-up-arrow.gif";
  78                         else
  79                         img.src = "../pic/blue-down-arrow.gif";
  80                 }
  81             }
  82            function Toggle_trGrpHeader2(t_id,i_id) {
  83                 var img=i_id;
  84                 changeimage(img, 'blue-down-arrow.gif', 'blue-up-arrow.gif');
  85                 var id1=t_id;
  86                 toggle(id1);
  87              }
  88 // This is for callback by the find-code popup.
  89 // Appends to or erases the current list of diagnoses.
  90 function set_related(codetype, code, selector, codedesc) {
  91  var f = document.forms[0][current_sel_name];
  92  var s = f.value;
  93  if (code) {
  94   if (s.length > 0) s += ';';
  95   s += codetype + ':' + code;
  96  } else {
  97   s = '';
  98  }
  99  f.value = s;
 100 }
 101
 102 //This invokes the find-code popup.
 103 function sel_diagnosis(e) {
 104  current_sel_name = e.name;
 105  dlgopen('../patient_file/encounter/find_code_popup.php?codetype=ICD9<?php if ($GLOBALS['ippf_specific']) echo '&?codetype=IPPF' ?>', '_blank', 500, 400);
 106 }
 107
 108 //This invokes the find-code popup.
 109 function sel_procedure(e) {
 110  current_sel_name = e.name;
 111  dlgopen('../patient_file/encounter/find_code_popup.php?codetype=CPT4<?php if ($GLOBALS['ippf_specific']) echo '&?codetype=IPPF' ?>', '_blank', 500, 400);
 112 }
 113 </script>
 114 <link rel='stylesheet' href='<?php echo $css_header ?>' type='text/css'>
 115 <style type="text/css">
 116 /* specifically include & exclude from printing */
 117 @media print {
 118 #report_parameters {
 119         visibility: hidden;
 120         display: none;
 121 }
 122 #report_parameters_daterange {
 123         visibility: visible;
 124         display: inline;
 125 }
 126 #report_results table {
 127         margin-top: 0px;
 128 }
 129 }
 130
 131 /* specifically exclude some from the screen */
 132 @media screen {
 133 #report_parameters_daterange {
 134         visibility: hidden;
 135         display: none;
 136 }
 137 }
 138 .optional_area_service_codes {
 139         <?php
 140         if($type != 'Service Codes' || $type == '')
 141         {
 142         ?>
 143         display: none;
 144         <?php
 145         }
 146         ?>
 147 }
 148 </style>
 149 <script language="javascript" type="text/javascript">
 150         function checkType() {
 151                 if($('#type').val() == 'Service Codes')
 152                 {
 153                         $('.optional_area_service_codes').css("display", "inline");
 154                 }
 155                 else
 156                 {
 157                         $('.optional_area_service_codes').css("display", "none");
 158                 }
 159         }
 160
 161         function submitForm() {
 162                 var d_from = new String($('#date_from').val());
 163                 var d_to = new String($('#date_to').val());
 164
 165                 var d_from_arr = d_from.split('-');
 166                 var d_to_arr = d_to.split('-');
 167
 168                 var dt_from = new Date(d_from_arr[0], d_from_arr[1], d_from_arr[2]);
 169                 var dt_to = new Date(d_to_arr[0], d_to_arr[1], d_to_arr[2]);
 170
 171                 var mili_from = dt_from.getTime();
 172                 var mili_to = dt_to.getTime();
 173                 var diff = mili_to - mili_from;
 174
 175                 $('#date_error').css("display", "none");
 176
 177                 if(diff < 0) //negative
 178                 {
 179                         $('#date_error').css("display", "inline");
 180                 }
 181                 else
 182                 {
 183                         $("#form_refresh").attr("value","true");
 184                         $("#theform").submit();
 185                 }
 186         }
 187
 188         $(document).ready(function() {
 189                 $(".numeric_only").keydown(function(event) {
 190                         //alert(event.keyCode);
 191                         // Allow only backspace and delete
 192                         if ( event.keyCode == 46 || event.keyCode == 8 ) {
 193                                 // let it happen, don't do anything
 194                         }
 195                         else {
 196                                 if(!((event.keyCode >= 96 && event.keyCode <= 105) || (event.keyCode >= 48 && event.keyCode <= 57)))
 197                                 {
 198                                         event.preventDefault();
 199                                 }
 200                         }
 201                 });
 202         });
 203 </script>
 204 </head>
 205 <body class="body_top">
 206 <!-- Required for the popup date selectors -->
 207 <div id="overDiv" style="position:absolute; visibility:hidden; z-index:1000;"></div>
 208 <span class='title'>
 209 <?php echo htmlspecialchars(xl('Report - Clinical'),ENT_NOQUOTES); ?>
 210 </span>
 211 <!-- Search can be done using age range, gender, and ethnicity filters.
 212 Search options include diagnosis, procedure, prescription, medical history, and lab results.
 213 -->
 214 <div id="report_parameters_daterange"> <?php echo htmlspecialchars(date("d F Y", strtotime($sql_date_from)),ENT_NOQUOTES) .
 215       " &nbsp; to &nbsp; ". htmlspecialchars(date("d F Y", strtotime($sql_date_to)),ENT_NOQUOTES); ?> </div>
 216 <form name='theform' id='theform' method='post' action='clinical_reports.php'>
 217         <div id="report_parameters">
 218                 <input type='hidden' name='form_refresh' id='form_refresh' value=''/>
 219                 <table>
 220                       <tr>
 221                         <td width='740px'><div style='float:left'>
 222                                 <table class='text'>
 223                                         <tr>
 224                                                 <td class='label' width="100"><?php echo htmlspecialchars(xl('Facility'),ENT_NOQUOTES); ?>: </td>
 225                                                 <td width="250"> <?php dropdown_facility($facility,'facility',false); ?> </td>
 226                                                 <td class='label' width="100"><?php echo htmlspecialchars(xl('From'),ENT_NOQUOTES); ?>: </td>
 227                                                 <td><input type='text' name='date_from' id="date_from" size='10' value='<?php echo htmlspecialchars($sql_date_from,ENT_QUOTES); ?>' onkeyup='datekeyup(this,mypcc)' onblur='dateblur(this,mypcc)' title='yyyy-mm-dd'> <img src='../pic/show_calendar.gif' align='absbottom' width='24' height='22' id='img_from_date' border='0' alt='[?]' style='cursor:pointer' title='<?php echo htmlspecialchars(xl('Click here to choose a date'),ENT_QUOTES); ?>'></td>
 228                                         </tr>
 229                                         <tr>
 230                                                 <td class='label'><?php echo htmlspecialchars(xl('Patient ID'),ENT_NOQUOTES); ?>:</td>
 231                                                 <td><input name='patient_id' class="numeric_only" type='text' id="patient_id" title='<?php echo htmlspecialchars(xl('Optional numeric patient ID'),ENT_QUOTES); ?>' value='<?php echo htmlspecialchars($patient_id,ENT_QUOTES); ?>' size='10' maxlength='20' /></td>
 232                                                 <td class='label'><?php echo htmlspecialchars(xl('To'),ENT_NOQUOTES); ?>: </td>
 233                                                 <td><input type='text' name='date_to' id="date_to" size='10' value='<?php echo htmlspecialchars($sql_date_to,ENT_QUOTES); ?>' onKeyUp='datekeyup(this,mypcc)' onBlur='dateblur(this,mypcc)' title='yyyy-mm-dd'> <img src='../pic/show_calendar.gif' align='absbottom' width='24' height='22' id='img_to_date' border='0' alt='[?]' style='cursor:pointer' title='<?php echo htmlspecialchars(xl('Click here to choose a date'),ENT_QUOTES); ?>'></td>
 234                                         </tr>
 235                                         <tr>
 236                                                 <td class='label'><?php echo htmlspecialchars(xl('Age Range'),ENT_NOQUOTES); ?>:</td>
 237                                                 <td><?php echo htmlspecialchars(xl('From'),ENT_NOQUOTES); ?>
 238                                                         <input name='age_from' class="numeric_only" type='text' id="age_from" value="<?php echo htmlspecialchars($age_from,ENT_QUOTES); ?>" size='3' maxlength='3' /> <?php echo htmlspecialchars(xl('To'),ENT_NOQUOTES); ?>
 239                                                         <input name='age_to' class="numeric_only" type='text' id="age_to" value="<?php echo htmlspecialchars($age_to,ENT_QUOTES); ?>" size='3' maxlength='3' /></td>
 240                                                 <td class='label'><?php echo htmlspecialchars(xl('Problem DX'),ENT_NOQUOTES); ?>:</td>
 241                                                 <td><input type='text' name='form_diagnosis' size='10' maxlength='250' value='<?php echo htmlspecialchars($form_diagnosis,ENT_QUOTES); ?>' onclick='sel_diagnosis(this)' title='<?php echo htmlspecialchars(xl('Click to select or change diagnoses'),ENT_QUOTES); ?>' readonly /></td>
 242                                                 <td>&nbsp;</td>
 243 <!-- Visolve -->
 244                                         </tr>
 245                                         <tr>
 246                                                 <td class='label'><?php echo htmlspecialchars(xl('Gender'),ENT_NOQUOTES); ?>:</td>
 247                                                 <td><?php echo generate_select_list('gender', 'sex', $sql_gender, 'Select Gender', 'Unassigned', '', ''); ?></td>
 248                                                 <td class='label'><?php echo htmlspecialchars(xl('Drug'),ENT_NOQUOTES); ?>:</td>
 249                                                 <td><input type='text' name='form_drug_name' size='10' maxlength='250' value='<?php echo htmlspecialchars($form_drug_name,ENT_QUOTES); ?>' title='<?php echo htmlspecialchars(xl('Optional drug name, use % as a wildcard'),ENT_QUOTES); ?>' /></td>
 250
 251                                         </tr>
 252                                         <tr>
 253                                                 <td class='label'><?php echo htmlspecialchars(xl('Race'),ENT_NOQUOTES); ?>:</td>
 254                                                 <td><?php echo generate_select_list('race', 'race', $sql_race, 'Select Race', 'Unassigned', '', ''); ?></td>
 255                                                 <td class='label'><?php echo htmlspecialchars(xl('Ethnicity'),ENT_NOQUOTES); ?>:</td>
 256                                                 <td><?php echo generate_select_list('ethnicity', 'ethnicity', $sql_ethnicity, 'Select Ethnicity', 'Unassigned', '', ''); ?></td>
 257
 258                                         </tr>
 259                                         <tr>
 260                                                 <td class='label' width='100'><?php echo htmlspecialchars(xl('Lab Result'),ENT_NOQUOTES); ?>:</td>
 261                                                 <td width='100'><input type='text' name='form_lab_results' size='13' maxlength='250' value='<?php echo htmlspecialchars($form_lab_results,ENT_QUOTES); ?>' title='<?php echo htmlspecialchars(xl('Result, use % as a wildcard'),ENT_QUOTES); ?>' /></td>
 262
 263                                                  <td class='label' width='100'><?php echo htmlspecialchars(xl('Option'),ENT_NOQUOTES); ?>:</td>
 264                                                  <td><select name="type" id="type" onChange="checkType();">
 265                                                         <option> <?php echo htmlspecialchars(xl('Select'),ENT_NOQUOTES); ?></option>
 266                                                         <option value="Procedure" <?php if($type == 'Procedure') { echo "selected"; } ?>><?php echo htmlspecialchars(xl('Procedure'),ENT_NOQUOTES); ?></option>
 267                                                         <option value="Medical History" <?php if($type == 'Medical History') { echo "selected"; } ?>><?php echo htmlspecialchars(xl('Medical History'),ENT_NOQUOTES); ?></option>
 268
 269                                                        <option value="Service Codes" <?php if($type == 'Service Codes') { echo "selected"; } ?>><?php echo htmlspecialchars(xl('Service Codes'),ENT_NOQUOTES); ?></option>
 270                                                    </select></td>
 271                                                 <td> &nbsp;</td>
 272                                         </tr>
 273                                 </table>
 274                                 <table>
 275                                         <tr class="optional_area_service_codes">
 276                                         <td width='100'>&nbsp;</td>
 277                                         <td width='100'>&nbsp;</td>
 278                                         <td width='195'>&nbsp;</td>
 279                                         <td class='label' width='76'><?php echo htmlspecialchars(xl('Code'),ENT_NOQUOTES); ?>:</td>
 280                                         <td> <input type='text' name='form_service_codes' size='10' maxlength='250' value='<?php echo htmlspecialchars($form_service_codes,ENT_QUOTES); ?>' onclick='sel_procedure(this)' title='<?php echo htmlspecialchars(xl('Click to select or change service codes'),ENT_QUOTES); ?>' readonly />&nbsp;</td>
 281                                         </tr>
 282                                 </table>
 283                                 <table class='text'>
 284                                         <tr>
 285                                                 <!-- Sort by Start -->
 286                                                  <td class='label' width='63'><?php echo htmlspecialchars(xl('Sort By'),ENT_NOQUOTES); ?>:</td>
 287                                                  <td>
 288                                                    <input type='checkbox' name='form_pt_name'<?php if ($_POST['form_pt_name'] == true) echo ' checked'; ?>>
 289                                                    <?php echo htmlspecialchars(xl('Patient Name'),ENT_NOQUOTES); ?>&nbsp;
 290
 291                                                    <input type='checkbox' name='form_pt_age'<?php if ($_POST['form_pt_age'] == true) echo ' checked'; ?>>
 292                                                    <?php echo htmlspecialchars(xl('Age'),ENT_NOQUOTES); ?>&nbsp;
 293
 294                                                    <input type='checkbox' name='form_diagnosis_code'<?php if ($_POST['form_diagnosis_code'] == true) echo ' checked'; ?>>
 295                                                    <?php echo htmlspecialchars(xl('Diagnosis Code'),ENT_NOQUOTES); ?>&nbsp;
 296
 297                                                    <input type='checkbox' name='form_diagnosis_tit'<?php if ($_POST['form_diagnosis_tit'] == true) echo ' checked'; ?>>
 298                                                    <?php echo htmlspecialchars(xl('Diagnosis Title'),ENT_NOQUOTES); ?>&nbsp;
 299
 300                                                    <input type='checkbox' name='form_drug'<?php if ($_POST['form_drug'] == true) echo ' checked'; ?>>
 301                                                   <?php echo htmlspecialchars(xl('Drug'),ENT_NOQUOTES); ?>&nbsp;
 302
 303                                                    <input type='checkbox' name='ndc_no'<?php if ($_POST['ndc_no'] == true) echo ' checked'; ?>>
 304                                                    <?php echo htmlspecialchars(xl('NDC Number'),ENT_NOQUOTES); ?>&nbsp;
 305                                                    <input type='checkbox' name='lab_results'<?php if ($_POST['lab_results'] == true) echo ' checked'; ?>>
 306                                                   <?php echo htmlspecialchars(xl('Lab Results'),ENT_NOQUOTES); ?>&nbsp;
 307                                                </td>
 308                                         </tr>
 309                                 <!-- Sort by ends -->
 310                                         </tr>
 311                                         <tr>
 312                                                 <td colspan=3><span id="date_error" style="color: #F00; font-siz: 11px; display: none;"><?php echo htmlspecialchars(xl('From Date Cannot be Greater than To Date.'),ENT_NOQUOTES); ?></span>&nbsp;</td>
 313                                         </tr>
 314                                 </table>
 315                                 </div></td>
 316                                 <td height="100%" valign='middle' width="175"><table style='border-left:1px solid; width:100%; height:100%'>
 317                                         <tr>
 318                                                 <td><div style='margin-left:15px'> <a href='#' class='css_button' onclick='submitForm();'> <span>
 319                                                                         <?php echo htmlspecialchars(xl('Submit'),ENT_NOQUOTES); ?>
 320                                                                         </span> </a>
 321                                                                         <?php if ($_POST['form_refresh']) { ?>
 322                                                                         <a href='#' class='css_button' onclick='window.print()'> <span>
 323                                                                         <?php echo htmlspecialchars(xl('Print'),ENT_NOQUOTES); ?>
 324                                                                         </span> </a>
 325                                                                         <?php } ?>
 326                                                         </div></td>
 327                                         </tr>
 328                                 </table></td>
 329                         </tr>
 330                 </table>
 331         </div>
 332 <!-- end of parameters -->
 333 <?php
 334 // SQL scripts for the various searches
 335 $sqlBindArray = array();
 336 if ($_POST['form_refresh'])
 337 {
 338 $sqlstmt = "select
 339                 concat(pd.fname, ' ', pd.lname) AS patient_name,
 340                 pd.pid AS patient_id,
 341                 DATE_FORMAT(FROM_DAYS(DATEDIFF(NOW(),pd.dob)), '%Y')+0 AS patient_age,
 342                 pd.sex AS patient_sex,
 343                 pd.race AS patient_race,pd.ethnicity AS patient_ethinic,
 344                 concat(u.fname, ' ', u.lname)  AS users_provider";
 345         if(strlen($form_diagnosis) > 0) {
 346                 $sqlstmt=$sqlstmt.",li.date AS lists_date,
 347                    li.diagnosis AS lists_diagnosis,
 348                         li.title AS lists_title";
 349         }
 350         if(strlen($form_drug_name) > 0) {
 351
 352                 $sqlstmt=$sqlstmt.",r.id as id, r.date_modified AS prescriptions_date_modified, r.dosage as dosage, r.route as route, r.interval as hinterval, r.refills as refills, r.drug as drug,
 353                 r.form as hform, r.size as size, r.unit as hunit, d.name as name, d.ndc_number as ndc_number,r.quantity as quantity";
 354         }
 355         if(strlen($form_lab_results) > 0) {
 356
 357                 $sqlstmt = $sqlstmt.",pr.date AS procedure_result_date,
 358                            pr.facility AS procedure_result_facility,
 359                                 pr.units AS procedure_result_units,
 360                                 pr.result AS procedure_result_result,
 361                                 pr.range AS procedure_result_range,
 362                                 pr.abnormal AS procedure_result_abnormal,
 363                                 pr.comments AS procedure_result_comments,
 364                                 pr.document_id AS procedure_result_document_id";
 365         }
 366         if ( $type == 'Procedure') {
 367                $sqlstmt = $sqlstmt.",po.date_ordered AS procedure_order_date_ordered,
 368             pt.standard_code AS procedure_type_standard_code,
 369             pt.name   as procedure_name,
 370             po.order_priority AS procedure_order_order_priority,
 371             po.order_status AS procedure_order_order_status,
 372                         po.encounter_id AS procedure_order_encounter,
 373             po.patient_instructions AS procedure_order_patient_instructions,
 374             po.activity AS procedure_order_activity,
 375             po.control_id AS procedure_order_control_id ";
 376        }
 377        if ( $type == 'Medical History') {
 378                 $sqlstmt = $sqlstmt.",hd.date AS history_data_date,
 379             hd.tobacco AS history_data_tobacco,
 380             hd.alcohol AS history_data_alcohol,
 381             hd.recreational_drugs AS history_data_recreational_drugs   ";
 382        }
 383       if($type == 'Service Codes') {
 384               $sqlstmt .= ", c.code as code,
 385                         c.code_text as code_text,
 386                         fe.encounter as encounter,
 387                         b.date as date";
 388                         $mh_stmt = $mh_stmt.",code,code_text,encounter,date";
 389       }
 390 //from
 391         $sqlstmt=$sqlstmt." from patient_data as pd left outer join users as u on u.id = pd.providerid
 392             left outer join facility as f on f.id = u.facility_id";
 393
 394         if(strlen($form_diagnosis) > 0 ){
 395                 $sqlstmt = $sqlstmt." left outer join lists as li on li.pid  = pd.pid ";
 396         }
 397         if ( $type == 'Procedure' ||( strlen($form_lab_results)!=0) ) {
 398                $sqlstmt = $sqlstmt." left outer join procedure_order as po on po.patient_id = pd.pid
 399             left outer join procedure_report as pp on pp.procedure_order_id   = po.procedure_order_id
 400             left outer join procedure_type as pt on pt.procedure_type_id    = po.procedure_type_id ";
 401         }
 402        if (strlen($form_lab_results)!=0 ) {
 403                $sqlstmt = $sqlstmt." left outer join procedure_result as pr on pr.procedure_report_id  = pp.procedure_report_id
 404             and pr.procedure_type_id = po.procedure_type_id ";
 405         }
 406         if(strlen($form_drug_name)!=0) {
 407                $sqlstmt=$sqlstmt." left outer join prescriptions AS r on r.patient_id=pd.pid
 408                         LEFT OUTER JOIN drugs AS d ON d.drug_id = r.drug_id";
 409         }
 410       if ( $type == 'Medical History') {
 411               $sqlstmt = $sqlstmt." left outer join history_data as hd on hd.pid   =  pd.pid
 412             and (isnull(hd.tobacco)  = 0
 413             or isnull(hd.alcohol)  = 0
 414             or isnull(hd.recreational_drugs)  = 0)";
 415       }
 416       if($type == 'Service Codes') {
 417             $sqlstmt = $sqlstmt." left outer join billing as b on b.pid = pd.pid
 418             left outer join form_encounter as fe on fe.encounter = b.encounter and b.code_type = 'CPT4'
 419             left outer join codes as c on c.code = b.code ";
 420       }
 421 //where
 422       $whr_stmt="where 1=1";
 423       if(strlen($form_diagnosis) > 0 ) {
 424             $whr_stmt=$whr_stmt." AND li.date >= ? AND li.date < DATE_ADD(?, INTERVAL 1 DAY) AND li.date <= ?";
 425             array_push($sqlBindArray, $sql_date_from, $sql_date_to, date("Y-m-d H:i:s"));
 426         }
 427         if(strlen($form_lab_results)!=0 ) {
 428               $whr_stmt=$whr_stmt." AND pr.date >= ? AND pr.date < DATE_ADD(?, INTERVAL 1 DAY) AND pr.date <= ?";
 429               array_push($sqlBindArray, $sql_date_from, $sql_date_to, date("Y-m-d H:i:s"));
 430         }
 431         if(strlen($form_drug_name)!=0) {
 432               $whr_stmt=$whr_stmt." AND r.date_modified >= ? AND r.date_modified < DATE_ADD(?, INTERVAL 1 DAY) AND r.date_modified <= ?";
 433               array_push($sqlBindArray, $sql_date_from, $sql_date_to, date("Y-m-d H:i:s"));
 434         }
 435         if($type == 'Medical History') {
 436              $whr_stmt=$whr_stmt." AND hd.date >= ? AND hd.date < DATE_ADD(?, INTERVAL 1 DAY) AND hd.date <= ?";
 437              array_push($sqlBindArray, $sql_date_from, $sql_date_to, date("Y-m-d H:i:s"));
 438         }
 439         if($type == 'Procedure') {
 440              $whr_stmt=$whr_stmt." AND po.date_ordered >= ? AND po.date_ordered < DATE_ADD(?, INTERVAL 1 DAY) AND po.date_ordered <= ?";
 441              array_push($sqlBindArray, $sql_date_from, $sql_date_to, date("Y-m-d H:i:s"));
 442          }
 443         if($type == "Service Codes") {
 444              $whr_stmt=$whr_stmt." AND b.date >= ? AND b.date < DATE_ADD(?, INTERVAL 1 DAY) AND b.date <= ?";
 445              array_push($sqlBindArray, $sql_date_from, $sql_date_to, date("Y-m-d H:i:s"));
 446         }
 447         if(strlen($form_lab_results) != 0) {
 448             $whr_stmt= $whr_stmt." AND (pr.result LIKE ?) ";
 449             array_push($sqlBindArray, $form_lab_results);
 450         }
 451         if(strlen($form_drug_name) > 0) {
 452             $whr_stmt .= " AND (
 453                         d.name LIKE ?
 454                         OR r.drug LIKE ?
 455                         ) ";
 456             array_push($sqlBindArray, $form_drug_name, $form_drug_name);
 457          }
 458        if($type == 'Service Codes') {
 459           if(strlen($form_service_codes) != 0) {
 460              $whr_stmt = $whr_stmt." AND (b.code = ?) ";
 461              $service_code = explode(":",$form_service_codes);
 462              array_push($sqlBindArray, $service_code[1]);
 463        }
 464        }
 465       if(strlen($patient_id) != 0) {
 466            $whr_stmt = $whr_stmt."   and pd.pid = ?";
 467            array_push($sqlBindArray, $patient_id);
 468        }
 469
 470      if(strlen($age_from) != 0) {
 471            $whr_stmt = $whr_stmt."   and DATE_FORMAT(FROM_DAYS(DATEDIFF(NOW(),pd.dob)), '%Y')+0 >= ?";
 472            array_push($sqlBindArray, $age_from);
 473      }
 474      if(strlen($age_to) != 0) {
 475            $whr_stmt = $whr_stmt."   and DATE_FORMAT(FROM_DAYS(DATEDIFF(NOW(),pd.dob)), '%Y')+0 <= ?";
 476            array_push($sqlBindArray, $age_to);
 477     }
 478     if(strlen($sql_gender) != 0) {
 479           $whr_stmt = $whr_stmt."   and pd.sex = ?";
 480           array_push($sqlBindArray, $sql_gender);
 481     }
 482    if(strlen($sql_ethnicity) != 0) {
 483          $whr_stmt = $whr_stmt."   and pd.ethnicity = ?";
 484          array_push($sqlBindArray, $sql_ethnicity);
 485     }
 486    if(strlen($sql_race) != 0) {
 487          $whr_stmt = $whr_stmt."   and pd.race = ?";
 488          array_push($sqlBindArray, $sql_race);
 489    }
 490   if($facility != '') {
 491         $whr_stmt = $whr_stmt."   and f.id = ? ";
 492         array_push($sqlBindArray, $facility);
 493   }
 494   if(strlen($form_diagnosis) > 0) {
 495         $whr_stmt = $whr_stmt." AND (li.diagnosis LIKE ? or li.diagnosis LIKE ? or li.diagnosis LIKE ? or li.diagnosis = ?) ";
 496         array_push($sqlBindArray, $form_diagnosis.";%", '%;'.$form_diagnosis.';%', '%;'.$form_diagnosis, $form_diagnosis);
 497   }
 498 // order by
 499   $odrstmt = $odrstmt."ORDER BY patient_id";
 500   if ($_POST['form_pt_name'] == true){
 501         $odrstmt=$odrstmt.",patient_name";
 502   }
 503   if ($_POST['form_pt_age'] == true) {
 504         $odrstmt=$odrstmt.",patient_age";
 505   }
 506   if (($_POST['form_diagnosis_code'] == true) && (strlen($form_diagnosis) > 0)){
 507         $odrstmt=$odrstmt.",lists_diagnosis";
 508   }
 509   if (($_POST['form_diagnosis_tit'] == true) && (strlen($form_diagnosis) > 0)){
 510          $odrstmt=$odrstmt.",lists_title";
 511   }
 512   if (($_POST['form_drug'] == true)&& (strlen($form_drug_name) > 0)){
 513         $odrstmt=$odrstmt.",r.drug";
 514   }
 515   if (($_POST['ndc_no'] == true) && (strlen($form_drug_name) > 0)) {
 516          $odrstmt=$odrstmt.",d.ndc_number";
 517   }
 518   if (($_POST['lab_results'] == true) && (strlen($form_lab_results) > 0)) {
 519          $odrstmt=$odrstmt.",procedure_result_result";
 520   }
 521
 522
 523   if($type == 'Medical History') {
 524         $sqlstmt="select * from (".$sqlstmt." ".$whr_stmt." ".$odrstmt.",history_data_date desc) a group by patient_id";
 525   }
 526   else
 527         $sqlstmt=$sqlstmt." ".$whr_stmt." ".$odrstmt;
 528
 529 $result = sqlStatement($sqlstmt,$sqlBindArray);
 530
 531 $row_id = 1.1;//given to each row to identify and toggle
 532 $img_id = 1.2;
 533 $k=1.3;
 534
 535 if(sqlNumRows($result) > 0)
 536 {
 537 ?>
 538 <br>
 539         <div id = "report_results">
 540         <?php while ($row = sqlFetchArray($result)) { ?>
 541         <table width=90% align="center" cellpadding="5" cellspacing="0" style="font-family:tahoma;color:black;" border="0">
 542                 <tr bgcolor = "#CCCCCC" style="font-size:15px;">
 543                         <td><b><?php echo htmlspecialchars(xl('Summary of'),ENT_NOQUOTES); echo " "; ?> <?php echo htmlspecialchars($row['patient_name'],ENT_NOQUOTES); ?></b></td>
 544                         <td>&nbsp;</td>
 545                         <td>&nbsp;</td>
 546                         <td align="center">
 547                         <span onclick="javascript:Toggle_trGrpHeader2(<?php echo $row_id; ?>,<?php echo $img_id; ?>);"><img src="../pic/blue-down-arrow.gif" id="<?php echo $img_id; $img_id++; ?>" title="<?php echo htmlspecialchars( xl('Click here to view patient details'), ENT_QUOTES); ?>" /></span>
 548                         </td></tr>
 549                         <table width="100%" align="center" id = "<?php echo $row_id; $row_id++;?>" class="border1" style="display:none; font-size:13px;" cellpadding=5>
 550                                 <tr bgcolor="#C3FDB8" align="left">
 551                                 <td><b><?php echo htmlspecialchars(xl('Patient Name'),ENT_NOQUOTES); ?></b></td>
 552                                 <td><b><?php echo htmlspecialchars(xl('PID'),ENT_NOQUOTES);?></b></td>
 553                                 <td><b><?php echo htmlspecialchars(xl('Age'),ENT_NOQUOTES);?></b></td>
 554                                 <td><b><?php echo htmlspecialchars(xl('Gender'),ENT_NOQUOTES); ?></b></td>
 555                                 <td><b><?php echo htmlspecialchars(xl('Race'),ENT_NOQUOTES);?></b></td>
 556                                 <td><b><?php echo htmlspecialchars(xl('Ethnicity'),ENT_NOQUOTES);?></b></td>
 557                                 <td colspan=5><b><?php echo htmlspecialchars(xl('Provider'),ENT_NOQUOTES);?></b></td>
 558                                 </tr>
 559                                 <tr bgcolor="#FFFFFF">
 560                                 <td><?php echo htmlspecialchars($row['patient_name'],ENT_NOQUOTES); ?>&nbsp;</td>
 561                                 <td> <?php echo htmlspecialchars($row['patient_id'],ENT_NOQUOTES); ?>&nbsp;</td>
 562                                 <td> <?php echo htmlspecialchars($row['patient_age'],ENT_NOQUOTES); ?>&nbsp;</td>
 563                                 <td> <?php echo htmlspecialchars(generate_display_field(array('data_type'=>'1','list_id'=>'sex'), $row['patient_sex']),ENT_NOQUOTES); ?>&nbsp;</td>
 564                                 <td> <?php echo htmlspecialchars(generate_display_field(array('data_type'=>'1','list_id'=>'race'), $row['patient_race']),ENT_NOQUOTES); ?>&nbsp;</td>
 565                                <td> <?php echo htmlspecialchars(generate_display_field(array('data_type'=>'1','list_id'=>'ethnicity'), $row['patient_ethinic']),ENT_NOQUOTES); ?>&nbsp;</td>
 566                                <td colspan=5> <?php echo htmlspecialchars($row['users_provider'],ENT_NOQUOTES); ?>&nbsp;</td>
 567                                 </tr>
 568 <!-- Diagnosis Report Start-->
 569                                 <?php
 570                                 if(strlen($form_diagnosis) > 0)
 571                                 {
 572                                 ?>
 573                                 <tr bgcolor="#C3FDB8" align= "left">
 574                                 <td colspan=12><b><?php echo "#"; echo htmlspecialchars(xl('Diagnosis Report'),ENT_NOQUOTES);?></b></td>
 575                                 </tr>
 576                                 <tr bgcolor="#C3FDB8" align= "left">
 577                                 <td><b><?php echo htmlspecialchars(xl('Diagnosis Date'),ENT_NOQUOTES);?></b></td>
 578                                 <td><b><?php echo htmlspecialchars(xl('Diagnosis'),ENT_NOQUOTES);?></b></td>
 579                                 <td colspan=9><b><?php echo htmlspecialchars(xl('Diagnosis Name'),ENT_NOQUOTES);?></b></td>
 580                                 </tr>
 581                                 <tr bgcolor="#FFFFFF">
 582                                 <td><?php echo htmlspecialchars($row['lists_date'],ENT_NOQUOTES); ?>&nbsp;</td>
 583                                 <td><?php echo htmlspecialchars($row['lists_diagnosis'],ENT_NOQUOTES); ?>&nbsp;</td>
 584                                 <td colspan=9><?php echo htmlspecialchars($row['lists_title'],ENT_NOQUOTES); ?>&nbsp;</td>
 585                                 </tr>
 586         <?php } ?>
 587 <!-- Diagnosis Report End-->
 588
 589 <!-- Prescription Report Start-->
 590                                <?php
 591                                 if(strlen($form_drug_name) > 0)
 592                                 {
 593                                 ?>
 594                                 <tr bgcolor="#C3FDB8" align= "left">
 595                                 <td colspan=12><b><?php echo "#"; echo htmlspecialchars(xl('Prescription Report'),ENT_NOQUOTES);?><b></td></tr>
 596                                 <tr bgcolor="#C3FDB8" align= "left">
 597                                 <td><b><?php echo htmlspecialchars(xl('Date'),ENT_NOQUOTES); ?></b></td>
 598                                 <td><b><?php echo htmlspecialchars(xl('Drug Name'),ENT_NOQUOTES);?></b></td>
 599                                 <td><b><?php echo htmlspecialchars(xl('Route'),ENT_NOQUOTES);?></b></td>
 600                                 <td><b><?php echo htmlspecialchars(xl('Dosage'),ENT_NOQUOTES);?></b></td>
 601                                 <td><b><?php echo htmlspecialchars(xl('Form'),ENT_NOQUOTES);?></b></td>
 602                                 <td><b><?php echo htmlspecialchars(xl('Interval'),ENT_NOQUOTES);?></b></td>
 603                                 <td><b><?php echo htmlspecialchars(xl('Size'),ENT_NOQUOTES);?></b></td>
 604                                 <td><b><?php echo htmlspecialchars(xl('Unit'),ENT_NOQUOTES);?></b></td>
 605                                 <td><b><?php echo htmlspecialchars(xl('ReFill'),ENT_NOQUOTES);?></b></td>
 606                                 <td><b><?php echo htmlspecialchars(xl('Quantity'),ENT_NOQUOTES);?></b></td>
 607                                 <td><b><?php echo htmlspecialchars(xl('NDC'),ENT_NOQUOTES);?></b></td>
 608                                 </tr>
 609                                 <tr bgcolor="#FFFFFF" align="">
 610                                 <?php
 611                                         $rx_route =  generate_display_field(array('data_type'=>'1','list_id'=>'drug_route'), $row['route']) ;
 612                                         $rx_form = generate_display_field(array('data_type'=>'1','list_id'=>'drug_form'), $row['hform']) ;
 613                                         $rx_interval = generate_display_field(array('data_type'=>'1','list_id'=>'drug_interval'), $row['hinterval']) ;
 614                                         $rx_units =   generate_display_field(array('data_type'=>'1','list_id'=>'drug_units'), $row['hunit']);
 615                                 ?>
 616                                  <td> <?php echo htmlspecialchars(oeFormatShortDate($row['prescriptions_date_modified']),ENT_NOQUOTES); ?>&nbsp;</td>
 617                                 <td><?php echo htmlspecialchars($row['drug'],ENT_NOQUOTES); ?></td>
 618                                 <td><?php echo htmlspecialchars($rx_route,ENT_NOQUOTES); ?></td>
 619                                 <td><?php echo htmlspecialchars($row['dosage'],ENT_NOQUOTES); ?></td>
 620                                 <td><?php echo htmlspecialchars($rx_form,ENT_NOQUOTES); ?></td>
 621                                 <td><?php echo htmlspecialchars($rx_interval,ENT_NOQUOTES); ?></td>
 622                                 <td><?php echo htmlspecialchars($row['size'],ENT_NOQUOTES); ?></td>
 623                                 <td><?php echo htmlspecialchars($rx_units,ENT_NOQUOTES); ?></td>
 624                                 <td><?php echo htmlspecialchars($row['refills'],ENT_NOQUOTES); ?></td>
 625                                 <td><?php echo htmlspecialchars($row['quantity'],ENT_NOQUOTES); ?></td>
 626                                 <td><?php echo htmlspecialchars($row['ndc_number'],ENT_NOQUOTES); ?></td>
 627                                 </tr>
 628                                 <?php } ?>
 629 <!-- Prescription Report End-->
 630
 631 <!-- Lab Results Report Start-->
 632                                 <?php
 633                                 if(strlen($form_lab_results) > 0)
 634                                 {
 635                                 ?>
 636                                 <tr bgcolor="#C3FDB8" align= "left">
 637                                 <td colspan=12><b><?php echo "#"; echo htmlspecialchars(xl('Lab Results Report'),ENT_NOQUOTES);?><b></td></tr>
 638                                 <tr bgcolor="#C3FDB8" align= "left">
 639                                 <td><b><?php echo htmlspecialchars(xl('Date'),ENT_NOQUOTES); ?></b></td>
 640                                 <td><b><?php echo htmlspecialchars(xl('Facility'),ENT_NOQUOTES);?></b></td>
 641                                 <td><b><?php echo htmlspecialchars(xl('Unit'),ENT_NOQUOTES);?></b></td>
 642                                 <td><b><?php echo htmlspecialchars(xl('Result'),ENT_NOQUOTES);?></b></td>
 643                                 <td><b><?php echo htmlspecialchars(xl('Range'),ENT_NOQUOTES);?></b></td>
 644                                 <td><b><?php echo htmlspecialchars(xl('Abnormal'),ENT_NOQUOTES);?></b></td>
 645                                 <td><b><?php echo htmlspecialchars(xl('Comments'),ENT_NOQUOTES);?></b></td>
 646                                 <td colspan=4><b><?php echo htmlspecialchars(xl('Document ID'),ENT_NOQUOTES);?></b></td>
 647                                 </tr>
 648                                 <tr bgcolor="#FFFFFF">
 649                                 <td> <?php echo htmlspecialchars(oeFormatShortDate($row['procedure_result_date']),ENT_NOQUOTES); ?>&nbsp;</td>
 650                                 <td> <?php echo htmlspecialchars($row['procedure_result_facility'],ENT_NOQUOTES); ?>&nbsp;</td>
 651                                 <td> <?php echo htmlspecialchars(generate_display_field(array('data_type'=>'1','list_id'=>'proc_unit'),$row['procedure_result_units']),ENT_NOQUOTES); ?>&nbsp;</td>
 652                                  <td> <?php echo htmlspecialchars($row['procedure_result_result'],ENT_NOQUOTES); ?>&nbsp;</td>
 653                                  <td> <?php echo htmlspecialchars($row['procedure_result_range'],ENT_NOQUOTES); ?>&nbsp;</td>
 654                                  <td> <?php echo htmlspecialchars($row['procedure_result_abnormal'],ENT_NOQUOTES); ?>&nbsp;</td>
 655                                  <td> <?php echo htmlspecialchars($row['procedure_result_comments'],ENT_NOQUOTES); ?>&nbsp;</td>
 656                                  <td colspan=4> <?php echo htmlspecialchars($row['procedure_result_document_id'],ENT_NOQUOTES); ?>&nbsp;</td>
 657                         </tr>
 658                                 <?php } ?>
 659 <!-- Lab Results End-->
 660
 661 <!-- Procedures Report Start-->
 662                                 <?php
 663                                 if ( $type == 'Procedure')
 664                                 {
 665                                 ?>
 666                                 <tr bgcolor="#C3FDB8" align= "left">
 667                                 <td colspan=12><b><?php echo "#"; echo htmlspecialchars(xl('Procedure Report'),ENT_NOQUOTES);?><b></td></tr>
 668                                 <tr bgcolor="#C3FDB8" align= "left">
 669                                 <td><b><?php echo htmlspecialchars(xl('Date'),ENT_NOQUOTES); ?></b></td>
 670                                 <td><b><?php echo htmlspecialchars(xl('Standard Name'),ENT_NOQUOTES);?></b></td>
 671                                 <td><b><?php echo htmlspecialchars(xl('Procedure'),ENT_NOQUOTES); ?></b></td>
 672                                 <td><b><?php echo htmlspecialchars(xl('Encounter'),ENT_NOQUOTES);?></b></td>
 673                                 <td><b><?php echo htmlspecialchars(xl('Priority'),ENT_NOQUOTES);?></b></td>
 674                                 <td><b><?php echo htmlspecialchars(xl('Status'),ENT_NOQUOTES);?></b></td>
 675                                 <td><b><?php echo htmlspecialchars(xl('Instruction'),ENT_NOQUOTES);?></b></td>
 676                                 <td><b><?php echo htmlspecialchars(xl('Activity'),ENT_NOQUOTES);?></b></td>
 677                                 <td colspan=3><b><?php echo htmlspecialchars(xl('Control ID'),ENT_NOQUOTES);?></b></td>
 678                                 </tr>
 679                                 <tr bgcolor="#FFFFFF">
 680                                 <?php
 681                                     $procedure_type_standard_code_arr = explode(':', $row['procedure_type_standard_code']);
 682                                     $procedure_type_standard_code = $procedure_type_standard_code_arr[1];
 683                                  ?>
 684                                   <!-- Procedure -->
 685                                   <td> <?php echo htmlspecialchars(oeFormatShortDate($row['procedure_order_date_ordered']),ENT_NOQUOTES); ?>&nbsp;</td>
 686                                   <td> <?php echo htmlspecialchars($procedure_type_standard_code,ENT_NOQUOTES); ?>&nbsp;</td>
 687                                   <td> <?php echo htmlspecialchars($row['procedure_name'],ENT_NOQUOTES); ?>&nbsp;</td>
 688                                   <td> <?php echo htmlspecialchars($row['procedure_order_encounter'],ENT_NOQUOTES); ?>&nbsp;</td>
 689                                   <td> <?php echo htmlspecialchars(generate_display_field(array('data_type'=>'1','list_id'=>'ord_priority'),$row['procedure_order_order_priority']),ENT_NOQUOTES); ?>&nbsp;</td>
 690                                   <td> <?php echo htmlspecialchars(generate_display_field(array('data_type'=>'1','list_id'=>'ord_status'),$row['procedure_order_order_status']),ENT_NOQUOTES); ?>&nbsp;</td>
 691                                   <td> <?php echo htmlspecialchars($row['procedure_order_patient_instructions'],ENT_NOQUOTES); ?>&nbsp;</td>
 692                                   <td> <?php echo htmlspecialchars($row['procedure_order_activity'],ENT_NOQUOTES); ?>&nbsp;</td>
 693                                   <td colspan=3> <?php echo htmlspecialchars($row['procedure_order_control_id'],ENT_NOQUOTES); ?>&nbsp;</td>
 694
 695                                   </tr>
 696                         <?php } ?>
 697 <!-- Procedure Report End-->
 698
 699 <!-- Medical History Report Start-->
 700                                 <?php
 701                                 if ( $type == 'Medical History')
 702                                 {
 703                                 ?>
 704                                 <tr bgcolor="#C3FDB8" align= "left">
 705                                 <td colspan=12><b><?php echo "#"; echo htmlspecialchars(xl('Medical History'),ENT_NOQUOTES);?><b></td></tr>
 706                                 <tr bgcolor="#C3FDB8" align= "left">
 707                                 <td><b><?php echo htmlspecialchars(xl('History Date'),ENT_NOQUOTES); ?></b></td>
 708                                 <td><b><?php echo htmlspecialchars(xl('Tobacco'),ENT_NOQUOTES);?></b></td>
 709                                 <td><b><?php echo htmlspecialchars(xl('Alcohol'),ENT_NOQUOTES);?></b></td>
 710                                 <td colspan=8><b><?php echo htmlspecialchars(xl('Recreational Drugs'),ENT_NOQUOTES);?></b></td>
 711                                 </tr>
 712                                 <tr bgcolor="#FFFFFF">
 713                                 <?php
 714                                         $tmp_t = explode('|', $row['history_data_tobacco']);
 715                                         $tmp_a = explode('|', $row['history_data_alcohol']);
 716                                         $tmp_d = explode('|', $row['history_data_recreational_drugs']);
 717                                         $his_tobac =  generate_display_field(array('data_type'=>'1','list_id'=>'smoking_status'), $tmp_t[3]) ;
 718                                 ?>
 719                                 <td> <?php echo htmlspecialchars(oeFormatShortDate($row['history_data_date']),ENT_NOQUOTES); ?>&nbsp;</td>
 720                                 <td> <?php echo htmlspecialchars($his_tobac,ENT_NOQUOTES); ?>&nbsp;</td>
 721                                 <?php
 722                                         if ($tmp_a[1] == "currentalcohol") $res = xl('Current Alcohol');
 723                                         if ($tmp_a[1] == "quitalcohol") $res = xl('Quit Alcohol');
 724                                         if ($tmp_a[1] == "neveralcohol") $res = xl('Never Alcohol');
 725                                         if ($tmp_a[1] == "not_applicablealcohol") $res = xl('N/A');
 726                                 ?>
 727                                  <td> <?php echo htmlspecialchars($res,ENT_NOQUOTES); ?>&nbsp;</td>
 728                                  <?php
 729                                          if ($tmp_d[1] == "currentrecreational_drugs") $resd = xl('Current Recreational Drugs');
 730                                          if ($tmp_d[1] == "quitrecreational_drugs") $resd = xl('Quit');
 731                                          if ($tmp_d[1] == "neverrecreational_drugs") $resd = xl('Never');
 732                                          if ($tmp_d[1] == "not_applicablerecreational_drugs") $resd = xl('N/A');
 733                                   ?>
 734                                   <td colspan=8> <?php echo htmlspecialchars($resd,ENT_NOQUOTES); ?>&nbsp;</td>
 735                                   </tr>
 736                                   <?php } ?>
 737 <!-- Medical History Report End-->
 738
 739 <!-- Service Codes Report Start-->
 740                                 <?php
 741                                 if ( $type == 'Service Codes') {
 742                                 ?>
 743                                 <tr bgcolor="#C3FDB8" align= "left">
 744                                 <td colspan=11><b><?php echo "#"; echo htmlspecialchars(xl('Service Codes'),ENT_NOQUOTES);?><b></td></tr>
 745                                 <tr bgcolor="#C3FDB8" align= "left">
 746                                 <td><b><?php echo htmlspecialchars(xl('Date'),ENT_NOQUOTES); ?></b></td>
 747                                 <td><b><?php echo htmlspecialchars(xl('Code'),ENT_NOQUOTES);?></b></td>
 748                                 <td><b><?php echo htmlspecialchars(xl('Encounter ID'),ENT_NOQUOTES);?></b></td>
 749                                 <td colspan=8><b><?php echo htmlspecialchars(xl('Code Text'),ENT_NOQUOTES);?></b></td></tr>
 750                                 <tr bgcolor="#FFFFFF">
 751                                 <td><?php echo htmlspecialchars(oeFormatShortDate($row['date']),ENT_NOQUOTES); ?>&nbsp;</td>
 752                                 <td><?php echo htmlspecialchars($row['code'],ENT_NOQUOTES); ?>&nbsp;</td>
 753                                 <td><?php echo htmlspecialchars($row['encounter'],ENT_NOQUOTES); ?>&nbsp;</td>
 754                                 <td colspan=8><?php echo htmlspecialchars($row['code_text'],ENT_NOQUOTES); ?>&nbsp;</td>
 755                                 </tr>
 756                                 <?php } ?>
 757 <!-- Service Codes Report End-->
 758                                  </table>
 759                  <?php }  //while loop end ?>
 760                 </table> <!-- Main table ends -->
 761 <?php
 762 } //End if $result
 763 } //End if form_refresh
 764 else
 765 {
 766         ?><div class='text'> <?php echo htmlspecialchars(xl('Please input search criteria above, and click Submit to view results.'),ENT_NOQUOTES); ?> </div><?php
 767 }
 768 ?>
 769 </form>
 770 </body>
 771
 772 <!-- stuff for the popup calendar -->
 773 <style type="text/css">
 774         @import url(../../library/dynarch_calendar.css);
 775 </style>
 776 <script type="text/javascript" src="../../library/dynarch_calendar.js"></script>
 777 <?php include_once("{$GLOBALS['srcdir']}/dynarch_calendar_en.inc.php"); ?>
 778 <script type="text/javascript" src="../../library/dynarch_calendar_setup.js"></script>
 779 <script language="Javascript">
 780         Calendar.setup({inputField:"date_from", ifFormat:"%Y-%m-%d", button:"img_from_date"});
 781         Calendar.setup({inputField:"date_to", ifFormat:"%Y-%m-%d", button:"img_to_date"});
 782 </script>
 783 </html>