interface/reports/encounters_report.php

   1 <?php
   2
   3 /**
   4  *  Encounters report.
   5  *
   6  *  This report shows past encounters with filtering and sorting,
   7  *  Added filtering to show encounters not e-signed, encounters e-signed and forms e-signed.
   8  *
   9  * @package   OpenEMR
  10  * @link      http://www.open-emr.org
  11  * @author    Rod Roark <rod@sunsetsystems.com>
  12  * @author    Terry Hill <terry@lilysystems.com>
  13  * @author    Brady Miller <brady.g.miller@gmail.com>
  14  * @copyright Copyright (c) 2007-2016 Rod Roark <rod@sunsetsystems.com>
  15  * @copyright Copyright (c) 2015 Terry Hill <terry@lillysystems.com>
  16  * @copyright Copyright (c) 2017-2018 Brady Miller <brady.g.miller@gmail.com>
  17  * @license   https://github.com/openemr/openemr/blob/master/LICENSE GNU General Public License 3
  18  */
  19
  20 require_once("../globals.php");
  21 require_once("$srcdir/forms.inc.php");
  22 require_once("$srcdir/patient.inc.php");
  23 require_once "$srcdir/options.inc.php";
  24
  25 use OpenEMR\Common\Acl\AclMain;
  26 use OpenEMR\Billing\BillingUtilities;
  27 use OpenEMR\Common\Csrf\CsrfUtils;
  28 use OpenEMR\Common\Twig\TwigContainer;
  29 use OpenEMR\Core\Header;
  30
  31 if (!AclMain::aclCheckCore('encounters', 'coding_a')) {
  32     echo (new TwigContainer(null, $GLOBALS['kernel']))->getTwig()->render('core/unauthorized.html.twig', ['pageTitle' => xl("Encounters Report")]);
  33     exit;
  34 }
  35
  36 if (!empty($_POST)) {
  37     if (!CsrfUtils::verifyCsrfToken($_POST["csrf_token_form"])) {
  38         CsrfUtils::csrfNotVerified();
  39     }
  40 }
  41
  42 $alertmsg = ''; // not used yet but maybe later
  43
  44 // For each sorting option, specify the ORDER BY argument.
  45 //
  46 $ORDERHASH = array(
  47   'doctor'  => 'lower(u.lname), lower(u.fname), fe.date',
  48   'patient' => 'lower(p.lname), lower(p.fname), fe.date',
  49   'pubpid'  => 'lower(p.pubpid), fe.date',
  50   'time'    => 'fe.date, lower(u.lname), lower(u.fname)',
  51   'encounter'    => 'fe.encounter, fe.date, lower(u.lname), lower(u.fname)',
  52 );
  53
  54 function show_doc_total($lastdocname, $doc_encounters)
  55 {
  56     if ($lastdocname) {
  57         echo " <tr>\n";
  58         echo "  <td class='detail'>" .  text($lastdocname) . "</td>\n";
  59         echo "  <td class='detail' align='right'>" . text($doc_encounters) . "</td>\n";
  60         echo " </tr>\n";
  61     }
  62 }
  63
  64 $form_from_date = (isset($_POST['form_from_date'])) ? DateToYYYYMMDD($_POST['form_from_date']) : date('Y-m-d');
  65 $form_to_date   = (isset($_POST['form_to_date'])) ? DateToYYYYMMDD($_POST['form_to_date']) : date('Y-m-d');
  66 $form_provider  = $_POST['form_provider'] ?? null;
  67 $form_facility  = $_POST['form_facility'] ?? null;
  68 $form_details   = (!empty($_POST['form_details'])) ? true : false;
  69 $form_new_patients = (!empty($_POST['form_new_patients'])) ? true : false;
  70 $form_esigned = (!empty($_POST['form_esigned'])) ? true : false;
  71 $form_not_esigned = (!empty($_POST['form_not_esigned'])) ? true : false;
  72 $form_encounter_esigned = (!empty($_POST['form_encounter_esigned'])) ? true : false;
  73
  74 $form_orderby = (!empty($_REQUEST['form_orderby']) && $ORDERHASH[$_REQUEST['form_orderby']]) ? $_REQUEST['form_orderby'] : 'doctor';
  75 $orderby = $ORDERHASH[$form_orderby];
  76
  77 // Get the info.
  78 //
  79 $esign_fields = '';
  80 $esign_joins = '';
  81 if ($form_encounter_esigned) {
  82     $esign_fields = ", es.table, es.tid ";
  83     $esign_joins = "LEFT OUTER JOIN esign_signatures AS es ON es.tid = fe.encounter ";
  84 }
  85
  86 if ($form_esigned) {
  87     $esign_fields = ", es.table, es.tid ";
  88     $esign_joins = "LEFT OUTER JOIN esign_signatures AS es ON es.tid = fe.encounter ";
  89 }
  90
  91 if ($form_not_esigned) {
  92     $esign_fields = ", es.table, es.tid ";
  93     $esign_joins = "LEFT JOIN esign_signatures AS es on es.tid = fe.encounter ";
  94 }
  95
  96 $sqlBindArray = array();
  97
  98 $query = "SELECT " .
  99   "fe.encounter, fe.date, fe.reason, " .
 100   "f.formdir, f.form_name, " .
 101   "p.fname, p.mname, p.lname, p.pid, p.pubpid, p.dob, " .
 102   "u.lname AS ulname, u.fname AS ufname, u.mname AS umname " .
 103   "$esign_fields" .
 104   "FROM ( form_encounter AS fe, forms AS f ) " .
 105   "LEFT OUTER JOIN patient_data AS p ON p.pid = fe.pid " .
 106   "LEFT JOIN users AS u ON u.id = fe.provider_id " .
 107   "$esign_joins" .
 108   "WHERE f.pid = fe.pid AND f.encounter = fe.encounter AND f.formdir = 'newpatient' ";
 109 if ($form_to_date) {
 110     $query .= "AND fe.date >= ? AND fe.date <= ? ";
 111     array_push($sqlBindArray, $form_from_date . ' 00:00:00', $form_to_date . ' 23:59:59');
 112 } else {
 113     $query .= "AND fe.date >= ? AND fe.date <= ? ";
 114     array_push($sqlBindArray, $form_from_date . ' 00:00:00', $form_from_date . ' 23:59:59');
 115 }
 116
 117 if ($form_provider) {
 118     $query .= "AND fe.provider_id = ? ";
 119     array_push($sqlBindArray, $form_provider);
 120 }
 121
 122 if ($form_facility) {
 123     $query .= "AND fe.facility_id = ? ";
 124     array_push($sqlBindArray, $form_facility);
 125 }
 126
 127 if ($form_new_patients) {
 128     $query .= "AND fe.date = (SELECT MIN(fe2.date) FROM form_encounter AS fe2 WHERE fe2.pid = fe.pid) ";
 129 }
 130
 131 if ($form_encounter_esigned) {
 132     $query .= "AND es.tid = fe.encounter AND es.table = 'form_encounter' ";
 133 }
 134
 135 if ($form_esigned) {
 136     $query .= "AND es.tid = fe.encounter ";
 137 }
 138
 139 if ($form_not_esigned) {
 140     $query .= "AND es.tid IS NULL ";
 141 }
 142
 143 $query .= "ORDER BY $orderby";
 144
 145 $res = sqlStatement($query, $sqlBindArray);
 146 ?>
 147 <html>
 148 <head>
 149     <title><?php echo xlt('Encounters Report'); ?></title>
 150
 151     <?php Header::setupHeader(['datetime-picker', 'report-helper']); ?>
 152
 153     <style>
 154         /* specifically include & exclude from printing */
 155         @media print {
 156             #report_parameters {
 157                 visibility: hidden;
 158                 display: none;
 159             }
 160             #report_parameters_daterange {
 161                 visibility: visible;
 162                 display: inline;
 163             }
 164             #report_results table {
 165                margin-top: 0px;
 166             }
 167         }
 168
 169         /* specifically exclude some from the screen */
 170         @media screen {
 171             #report_parameters_daterange {
 172                 visibility: hidden;
 173                 display: none;
 174             }
 175         }
 176     </style>
 177
 178     <script>
 179         $(function () {
 180             oeFixedHeaderSetup(document.getElementById('mymaintable'));
 181             var win = top.printLogSetup ? top : opener.top;
 182             win.printLogSetup(document.getElementById('printbutton'));
 183
 184             $('.datepicker').datetimepicker({
 185                 <?php $datetimepicker_timepicker = false; ?>
 186                 <?php $datetimepicker_showseconds = false; ?>
 187                 <?php $datetimepicker_formatInput = true; ?>
 188                 <?php require($GLOBALS['srcdir'] . '/js/xl/jquery-datetimepicker-2-5-4.js.php'); ?>
 189                 <?php // can add any additional javascript settings to datetimepicker here; need to prepend first setting with a comma ?>
 190             });
 191         });
 192
 193         function dosort(orderby) {
 194             var f = document.forms[0];
 195             f.form_orderby.value = orderby;
 196             f.submit();
 197             return false;
 198         }
 199
 200         function refreshme() {
 201             document.forms[0].submit();
 202         }
 203
 204         // Called to switch to the specified encounter having the specified DOS.
 205         function toEncounter(newpid, enc) {
 206             top.restoreSession();
 207             top.RTop.location = "<?php echo $GLOBALS['webroot']; ?>/interface/patient_file/summary/demographics.php?set_pid=" + encodeURIComponent(newpid) + "&set_encounterid=" + encodeURIComponent(enc);
 208         }
 209
 210     </script>
 211 </head>
 212 <body class="body_top">
 213 <!-- Required for the popup date selectors -->
 214 <div id="overDiv" style="position:absolute; visibility:hidden; z-index:1000;"></div>
 215
 216 <span class='title'><?php echo xlt('Report'); ?> - <?php echo xlt('Encounters'); ?></span>
 217
 218 <div id="report_parameters_daterange">
 219 <?php echo text(oeFormatShortDate($form_from_date)) . " &nbsp; " . xlt('to{{Range}}') . " &nbsp; " . text(oeFormatShortDate($form_to_date)); ?>
 220 </div>
 221
 222 <form method='post' name='theform' id='theform' action='encounters_report.php' onsubmit='return top.restoreSession()'>
 223 <input type="hidden" name="csrf_token_form" value="<?php echo attr(CsrfUtils::collectCsrfToken()); ?>" />
 224
 225 <div id="report_parameters">
 226 <table>
 227  <tr>
 228   <td width='550px'>
 229     <div style='float:left'>
 230
 231     <table class='text'>
 232         <tr>
 233             <td class='col-form-label'>
 234                 <?php echo xlt('Facility'); ?>:
 235             </td>
 236             <td>
 237             <?php dropdown_facility($form_facility, 'form_facility', true); ?>
 238             </td>
 239             <td class='col-form-label'>
 240                 <?php echo xlt('Provider'); ?>:
 241             </td>
 242             <td>
 243                 <?php
 244
 245                  // Build a drop-down list of providers.
 246                  //
 247
 248                  $query = "SELECT id, lname, fname FROM users WHERE " .
 249                   "authorized = 1 ORDER BY lname, fname"; //(CHEMED) facility filter
 250
 251                  $ures = sqlStatement($query);
 252
 253                  echo "   <select name='form_provider' class='form-control'>\n";
 254                  echo "    <option value=''>-- " . xlt('All') . " --\n";
 255
 256                 while ($urow = sqlFetchArray($ures)) {
 257                     $provid = $urow['id'];
 258                     echo "    <option value='" . attr($provid) . "'";
 259                     if (!empty($_POST['form_provider']) && ($provid == $_POST['form_provider'])) {
 260                         echo " selected";
 261                     }
 262
 263                     echo ">" . text($urow['lname']) . ", " . text($urow['fname']) . "\n";
 264                 }
 265
 266                  echo "   </select>\n";
 267
 268                 ?>
 269             </td>
 270         </tr>
 271         <tr>
 272             <td class='col-form-label'>
 273                 <?php echo xlt('From'); ?>:
 274             </td>
 275             <td>
 276                <input type='text' class='datepicker form-control' name='form_from_date' id="form_from_date" size='10' value='<?php echo attr(oeFormatShortDate($form_from_date)); ?>'>
 277             </td>
 278             <td class='col-form-label'>
 279                 <?php echo xlt('To{{Range}}'); ?>:
 280             </td>
 281             <td>
 282                <input type='text' class='datepicker form-control' name='form_to_date' id="form_to_date" size='10' value='<?php echo attr(oeFormatShortDate($form_to_date)); ?>'>
 283             </td>
 284         </tr>
 285     <tr>
 286       <td></td>
 287       <td>
 288         <div class="checkbox">
 289           <label><input type='checkbox' name='form_details'<?php echo ($form_details) ? ' checked' : ''; ?>>
 290             <?php echo xlt('Details'); ?></label>
 291         </div>
 292         <div class="checkbox">
 293           <label><input type='checkbox' name='form_new_patients' title='<?php echo xla('First-time visits only'); ?>'<?php echo ($form_new_patients) ? ' checked' : ''; ?>>
 294             <?php  echo xlt('New'); ?></label>
 295         </div>
 296       </td>
 297       <td></td>
 298       <td>
 299         <div class="checkbox">
 300           <label><input type='checkbox' name='form_esigned'<?php echo ($form_esigned) ? ' checked' : ''; ?>>
 301             <?php  echo xlt('Forms Esigned'); ?></label>
 302         </div>
 303         <div class="checkbox">
 304           <label><input type='checkbox' name='form_encounter_esigned'<?php echo ($form_encounter_esigned) ? ' checked' : ''; ?>>
 305             <?php  echo xlt('Encounter Esigned'); ?></label>
 306         </div>
 307         <div class="checkbox">
 308           <label><input type='checkbox' name='form_not_esigned'<?php echo ($form_not_esigned) ? ' checked' : ''; ?>>
 309             <?php echo xlt('Not Esigned'); ?></label>
 310         </div>
 311       </td>
 312     </tr>
 313   </table>
 314
 315     </div>
 316
 317   </td>
 318   <td class='h-100' align='left' valign='middle'>
 319     <table class='w-100 h-100' style='border-left:1px solid;'>
 320         <tr>
 321             <td>
 322                 <div class="text-center">
 323           <div class="btn-group" role="group">
 324                       <a href='#' class='btn btn-secondary btn-save' onclick='$("#form_refresh").attr("value","true"); $("#theform").submit();'>
 325                             <?php echo xlt('Submit'); ?>
 326                       </a>
 327                         <?php if (!empty($_POST['form_refresh']) || !empty($_POST['form_orderby'])) { ?>
 328               <a href='#' class='btn btn-secondary btn-print' id='printbutton'>
 329                                 <?php echo xlt('Print'); ?>
 330                         </a>
 331                         <?php } ?>
 332           </div>
 333                 </div>
 334             </td>
 335         </tr>
 336     </table>
 337   </td>
 338  </tr>
 339 </table>
 340
 341 </div> <!-- end report_parameters -->
 342
 343 <?php
 344 if (!empty($_POST['form_refresh']) || !empty($_POST['form_orderby'])) {
 345     ?>
 346 <div id="report_results">
 347 <table class='table' id='mymaintable'>
 348 <thead class='thead-light'>
 349     <?php if ($form_details) { ?>
 350   <th>
 351    <a href="nojs.php" onclick="return dosort('doctor')"
 352         <?php echo ($form_orderby == "doctor") ? " style=\"color: var(--success)\"" : ""; ?>><?php echo xlt('Provider'); ?> </a>
 353   </th>
 354   <th>
 355    <a href="nojs.php" onclick="return dosort('time')"
 356         <?php echo ($form_orderby == "time") ? " style=\"color: var(--success)\"" : ""; ?>><?php echo xlt('Date'); ?></a>
 357   </th>
 358   <th>
 359    <a href="nojs.php" onclick="return dosort('patient')"
 360         <?php echo ($form_orderby == "patient") ? " style=\"color: var(--success)\"" : ""; ?>><?php echo xlt('Patient'); ?></a>
 361   </th>
 362   <th>
 363    <a href="nojs.php" onclick="return dosort('pubpid')"
 364         <?php echo ($form_orderby == "pubpid") ? " style=\"color: var(--success)\"" : ""; ?>><?php echo xlt('ID'); ?></a>
 365   </th>
 366   <th>
 367         <?php echo xlt('Status'); ?>
 368   </th>
 369   <th>
 370         <?php echo xlt('Encounter'); ?>
 371   </th>
 372   <th>
 373    <a href="nojs.php" onclick="return dosort('encounter')"
 374         <?php echo ($form_orderby == "encounter") ? " style=\"color: var(--success)\"" : ""; ?>><?php echo xlt('Encounter Number'); ?></a>
 375   </th>
 376   <th>
 377         <?php echo xlt('Form'); ?>
 378   </th>
 379   <th>
 380         <?php echo xlt('Coding'); ?>
 381   </th>
 382 <?php } else { ?>
 383   <th><?php echo xlt('Provider'); ?></td>
 384   <th><?php echo xlt('Encounters'); ?></td>
 385 <?php } ?>
 386 </thead>
 387 <tbody>
 388     <?php
 389     if ($res) {
 390         $lastdocname = "";
 391         $doc_encounters = 0;
 392         while ($row = sqlFetchArray($res)) {
 393             $patient_id = $row['pid'];
 394
 395             $docname = '';
 396             if (!empty($row['ulname']) || !empty($row['ufname'])) {
 397                 $docname = $row['ulname'];
 398                 if (!empty($row['ufname']) || !empty($row['umname'])) {
 399                     $docname .= ', ' . $row['ufname'] . ' ' . $row['umname'];
 400                 }
 401             }
 402
 403             $errmsg  = "";
 404             if ($form_details) {
 405                 // Fetch all other forms for this encounter.
 406                 $encnames = '';
 407                 $encarr = getFormByEncounter(
 408                     $patient_id,
 409                     $row['encounter'],
 410                     "formdir, user, form_name, form_id"
 411                 );
 412                 if ($encarr != '') {
 413                     foreach ($encarr as $enc) {
 414                         if ($enc['formdir'] == 'newpatient') {
 415                             continue;
 416                         }
 417
 418                         if ($encnames) {
 419                             $encnames .= '<br />';
 420                         }
 421
 422                         $encnames .= text($enc['form_name']); // need to html escape it here for output below
 423                     }
 424                 }
 425
 426                 // Fetch coding and compute billing status.
 427                 $coded = "";
 428                 $billed_count = 0;
 429                 $unbilled_count = 0;
 430                 if (
 431                     $billres = BillingUtilities::getBillingByEncounter(
 432                         $row['pid'],
 433                         $row['encounter'],
 434                         "code_type, code, code_text, billed"
 435                     )
 436                 ) {
 437                     foreach ($billres as $billrow) {
 438                         // $title = addslashes($billrow['code_text']);
 439                         if ($billrow['code_type'] != 'COPAY' && $billrow['code_type'] != 'TAX') {
 440                             $coded .= $billrow['code'] . ', ';
 441                             if ($billrow['billed']) {
 442                                 ++$billed_count;
 443                             } else {
 444                                 ++$unbilled_count;
 445                             }
 446                         }
 447                     }
 448
 449                     $coded = substr($coded, 0, strlen($coded) - 2);
 450                 }
 451
 452                 // Figure product sales into billing status.
 453                 $sres = sqlStatement("SELECT billed FROM drug_sales " .
 454                 "WHERE pid = ? AND encounter = ?", array($row['pid'], $row['encounter']));
 455                 while ($srow = sqlFetchArray($sres)) {
 456                     if ($srow['billed']) {
 457                         ++$billed_count;
 458                     } else {
 459                         ++$unbilled_count;
 460                     }
 461                 }
 462
 463                 // Compute billing status.
 464                 if ($billed_count && $unbilled_count) {
 465                     $status = xl('Mixed');
 466                 } elseif ($billed_count) {
 467                     $status = xl('Closed');
 468                 } elseif ($unbilled_count) {
 469                     $status = xl('Open');
 470                 } else {
 471                     $status = xl('Empty');
 472                 }
 473                 ?>
 474        <tr bgcolor='<?php echo attr($bgcolor ?? ''); ?>'>
 475   <td>
 476                 <?php echo ($docname == $lastdocname) ? "" : text($docname) ?>&nbsp;
 477   </td>
 478   <td>
 479                 <?php echo text(oeFormatShortDate(substr($row['date'], 0, 10))) ?>&nbsp;
 480   </td>
 481   <td>
 482                 <?php echo text($row['lname'] . ', ' . $row['fname'] . ' ' . $row['mname']); ?>&nbsp;
 483   </td>
 484   <td>
 485                 <?php echo text($row['pubpid']); ?>&nbsp;
 486   </td>
 487   <td>
 488                 <?php echo text($status); ?>&nbsp;
 489   </td>
 490   <td>
 491                 <?php echo text($row['reason']); ?>&nbsp;
 492   </td>
 493    <td>
 494                 <?php echo "<input type='button' class='btn btn-sm btn-secondary' value='" .
 495                           attr($row['encounter']) . "-" . attr($row['pid']) .
 496                           "' onClick='toEncounter(" . attr_js($row['pid']) . ", " . attr_js($row['encounter']) .
 497                           "); ' />" ?> &nbsp;
 498   </td>
 499   <td>
 500                 <?php echo $encnames; //since this variable contains html, have already html escaped it above ?>&nbsp;
 501   </td>
 502   <td>
 503                 <?php echo text($coded); ?>
 504   </td>
 505  </tr>
 506                 <?php
 507             } else {
 508                 if ($docname != $lastdocname) {
 509                     show_doc_total($lastdocname, $doc_encounters);
 510                     $doc_encounters = 0;
 511                 }
 512
 513                   ++$doc_encounters;
 514             }
 515
 516             $lastdocname = $docname;
 517         }
 518
 519         if (!$form_details) {
 520             show_doc_total($lastdocname, $doc_encounters);
 521         }
 522     }
 523     ?>
 524 </tbody>
 525 </table>
 526 </div>  <!-- end encresults -->
 527 <?php } else { ?>
 528 <div class='text'>
 529     <?php echo xlt('Please input search criteria above, and click Submit to view results.'); ?>
 530 </div>
 531 <?php } ?>
 532
 533 <input type="hidden" name="form_orderby" value="<?php echo attr($form_orderby) ?>" />
 534 <input type='hidden' name='form_refresh' id='form_refresh' value=''/>
 535
 536 </form>
 537 </body>
 538
 539 <script>
 540 <?php if ($alertmsg) {
 541     echo " alert(" . js_escape($alertmsg) . ");\n";
 542 } ?>
 543 </script>
 544 </html>