interface/billing/sl_receipts_report.php

   1 <?php
   2 /**
   3  * Report - Cash receipts by Provider
   4  *
   5  * This module was written for one of my clients to report on cash
   6  * receipts by practitioner.  It is not as complete as it should be
   7  * but I wanted to make the code available to the project because
   8  * many other practices have this same need. - rod@sunsetsystems.com
   9  *
  10  * @package   OpenEMR
  11  * @link      http://www.open-emr.org
  12  * @author    Rod Roark <rod@sunsetsystems.com>
  13  * @author    Terry Hill <terry@lillysystems.com>
  14  * @author    Brady Miller <brady.g.miller@gmail.com>
  15  * @copyright Copyright (c) 2006-2016 Rod Roark <rod@sunsetsystems.com>
  16  * @copyright Copyright (c) 2016 Terry Hill <terry@lillysystems.com>
  17  * @copyright Copyright (c) 2017 Brady Miller <brady.g.miller@gmail.com>
  18  * @license   https://github.com/openemr/openemr/blob/master/LICENSE GNU General Public License 3
  19  */
  20
  21
  22 require_once('../globals.php');
  23 require_once($GLOBALS['srcdir'].'/patient.inc');
  24 require_once($GLOBALS['srcdir'].'/acl.inc');
  25 require_once($GLOBALS['srcdir'].'/options.inc.php');
  26 require_once($GLOBALS['fileroot'].'/custom/code_types.inc.php');
  27 // This determines if a particular procedure code corresponds to receipts
  28 // for the "Clinic" column as opposed to receipts for the practitioner.  Each
  29 // practice will have its own policies in this regard, so you'll probably
  30 // have to customize this function.  If you use the "fee sheet" encounter
  31 // form then the code below may work for you.
  32 //
  33 require_once('../forms/fee_sheet/codes.php');
  34
  35 use OpenEMR\Core\Header;
  36
  37 function is_clinic($code)
  38 {
  39     global $bcodes;
  40     $i = strpos($code, ':');
  41     if ($i) {
  42         $code = substr($code, 0, $i);
  43     }
  44
  45     return ($bcodes['CPT4'][xl('Lab')][$code]     ||
  46     $bcodes['CPT4'][xl('Immunizations')][$code] ||
  47     $bcodes['HCPCS'][xl('Therapeutic Injections')][$code]);
  48 }
  49
  50 function bucks($amount)
  51 {
  52     if ($amount) {
  53         echo attr(oeFormatMoney($amount));
  54     }
  55 }
  56
  57 if (! acl_check('acct', 'rep')) {
  58     die(xlt("Unauthorized access."));
  59 }
  60
  61
  62 $form_use_edate  = $_POST['form_use_edate'];
  63
  64 $form_proc_codefull = trim($_POST['form_proc_codefull']);
  65 // Parse the code type and the code from <code_type>:<code>
  66 $tmp_code_array = explode(':', $form_proc_codefull);
  67 $form_proc_codetype = $tmp_code_array[0];
  68 $form_proc_code = $tmp_code_array[1];
  69
  70 $form_dx_codefull  = trim($_POST['form_dx_codefull']);
  71 // Parse the code type and the code from <code_type>:<code>
  72 $tmp_code_array = explode(':', $form_dx_codefull);
  73 $form_dx_codetype = $tmp_code_array[0];
  74 $form_dx_code = $tmp_code_array[1];
  75
  76 $form_procedures = empty($_POST['form_procedures']) ? 0 : 1;
  77 $form_from_date = (isset($_POST['form_from_date'])) ? DateToYYYYMMDD($_POST['form_from_date']) : date('Y-m-01');
  78 $form_to_date   = (isset($_POST['form_to_date'])) ? DateToYYYYMMDD($_POST['form_to_date']) : date('Y-m-d');
  79
  80 $form_facility   = $_POST['form_facility'];
  81 ?>
  82 <html>
  83 <head>
  84
  85     <title><?php echo xlt('Cash Receipts by Provider')?></title>
  86
  87     <?php Header::setupHeader(['datetime-picker', 'report-helper']); ?>
  88
  89     <style type="text/css">
  90         /* specifically include & exclude from printing */
  91         @media print {
  92             #report_parameters {
  93                 visibility: hidden;
  94                 display: none;
  95             }
  96             #report_parameters_daterange {
  97                 visibility: visible;
  98                 display: inline;
  99             }
 100             #report_results {
 101                margin-top: 30px;
 102             }
 103         }
 104
 105         /* specifically exclude some from the screen */
 106         @media screen {
 107             #report_parameters_daterange {
 108                 visibility: hidden;
 109                 display: none;
 110             }
 111         }
 112     </style>
 113
 114     <script language="JavaScript">
 115         $(document).ready(function() {
 116             oeFixedHeaderSetup(document.getElementById('mymaintable'));
 117             var win = top.printLogSetup ? top : opener.top;
 118             win.printLogSetup(document.getElementById('printbutton'));
 119
 120             $('.datepicker').datetimepicker({
 121                 <?php $datetimepicker_timepicker = false; ?>
 122                 <?php $datetimepicker_showseconds = false; ?>
 123                 <?php $datetimepicker_formatInput = true; ?>
 124                 <?php require($GLOBALS['srcdir'] . '/js/xl/jquery-datetimepicker-2-5-4.js.php'); ?>
 125                 <?php // can add any additional javascript settings to datetimepicker here; need to prepend first setting with a comma ?>
 126             });
 127         });
 128
 129         // This is for callback by the find-code popup.
 130         // Erases the current entry
 131         // The target element is set by the find-code popup
 132         //  (this allows use of this in multiple form elements on the same page)
 133         function set_related_target(codetype, code, selector, codedesc, target_element) {
 134             var f = document.forms[0];
 135             var s = f[target_element].value;
 136             if (code) {
 137                 s = codetype + ':' + code;
 138             } else {
 139                 s = '';
 140             }
 141             f[target_element].value = s;
 142         }
 143
 144         // This invokes the find-code (procedure/service codes) popup.
 145         function sel_procedure() {
 146             dlgopen('../patient_file/encounter/find_code_popup.php?target_element=form_proc_codefull&codetype=<?php echo attr(collect_codetypes("procedure", "csv")) ?>', '_blank', 500, 400);
 147         }
 148
 149         // This invokes the find-code (diagnosis codes) popup.
 150         function sel_diagnosis() {
 151             dlgopen('../patient_file/encounter/find_code_popup.php?target_element=form_dx_codefull&codetype=<?php echo attr(collect_codetypes("diagnosis", "csv")) ?>', '_blank', 500, 400);
 152         }
 153
 154     </script>
 155 </head>
 156
 157 <body class="body_top">
 158
 159 <span class='title'><?php echo xlt('Report'); ?> - <?php echo xlt('Cash Receipts by Provider'); ?></span>
 160
 161 <form method='post' action='sl_receipts_report.php' id='theform' onsubmit='return top.restoreSession()'>
 162
 163 <div id="report_parameters">
 164
 165 <input type='hidden' name='form_refresh' id='form_refresh' value=''/>
 166
 167 <table>
 168  <tr>
 169   <td width='660px'>
 170     <div style='float:left'>
 171
 172     <table class='text'>
 173         <tr>
 174             <td class='control-label'>
 175                 <?php echo xlt('Facility'); ?>:
 176             </td>
 177             <td>
 178             <?php dropdown_facility($form_facility, 'form_facility'); ?>
 179             </td>
 180             <td class='control-label'>
 181                 <?php echo xlt('Provider'); ?>:
 182             </td>
 183             <td>
 184                 <?php
 185                 if (acl_check('acct', 'rep_a')) {
 186                     // Build a drop-down list of providers.
 187                     //
 188                     $query = "select id, lname, fname from users where " .
 189                         "authorized = 1 order by lname, fname";
 190                     $res = sqlStatement($query);
 191                     echo "   &nbsp;<select name='form_doctor' class='form-control'>\n";
 192                     echo "    <option value=''>-- " . xlt('All Providers') . " --\n";
 193                     while ($row = sqlFetchArray($res)) {
 194                         $provid = $row['id'];
 195                         echo "    <option value='". attr($provid) ."'";
 196                         if ($provid == $_POST['form_doctor']) {
 197                             echo " selected";
 198                         }
 199
 200                         echo ">" . text($row['lname']) . ", " . text($row['fname']) . "\n";
 201                     }
 202
 203                     echo "   </select>\n";
 204                 } else {
 205                     echo "<input type='hidden' name='form_doctor' value='" . attr($_SESSION['authUserID']) . "'>";
 206                 }
 207             ?>
 208             </td>
 209             <td>
 210                <select name='form_use_edate' class='form-control'>
 211                 <option value='0'><?php echo xlt('Payment Date'); ?></option>
 212                 <option value='1'<?php echo ($form_use_edate) ? ' selected' : ''; ?>><?php echo xlt('Invoice Date'); ?></option>
 213                </select>
 214             </td>
 215         </tr>
 216         <tr>
 217             <td class='control-label'>
 218                 <?php echo xlt('From'); ?>:
 219             </td>
 220             <td>
 221                <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)); ?>'
 222                 title='<?php echo xla('Date of appointments'); ?>' >
 223             </td>
 224             <td class='control-label'>
 225                 <?php echo xlt('To'); ?>:
 226             </td>
 227             <td>
 228                <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)); ?>'
 229                 title='<?php echo xla('Optional end date'); ?>' >
 230             </td>
 231             <td>&nbsp;</td>
 232         </tr>
 233         <tr>
 234             <td class='control-label'>
 235                 <?php
 236                 if (!$GLOBALS['simplified_demographics']) {
 237                     echo '&nbsp;' . xlt('Procedure/Service') . ':';
 238                 } ?>
 239             </td>
 240             <td>
 241                <input type='text' class='form-control' name='form_proc_codefull' size='11' value='<?php echo attr($form_proc_codefull); ?>' onclick='sel_procedure()'
 242                 title='<?php echo xla('Optional procedure/service code'); ?>'
 243                 <?php
 244                 if ($GLOBALS['simplified_demographics']) {
 245                     echo "style='display:none'";
 246                 } ?>>
 247             </td>
 248
 249             <td class='control-label'>
 250                 <?php
 251                 if (!$GLOBALS['simplified_demographics']) {
 252                     echo '&nbsp;' . xlt('Diagnosis') . ':';
 253                 } ?>
 254             </td>
 255             <td>
 256                <input type='text' class='form-control' name='form_dx_codefull' size='11' value='<?php echo attr($form_dx_codefull); ?>' onclick='sel_diagnosis()'
 257                 title='<?php echo xla('Enter a diagnosis code to exclude all invoices not containing it'); ?>'
 258                 <?php
 259                 if ($GLOBALS['simplified_demographics']) {
 260                     echo "style='display:none'";
 261                 } ?>>
 262             </td>
 263
 264             <td>
 265         <div class='checkbox'>
 266                 <label><input type='checkbox' name='form_details' value='1'<?php echo ($_POST['form_details']) ? " checked" : ""; ?>><?php echo xlt('Details')?></label>
 267         </div>
 268         <div class='checkbox'>
 269                 <label><input type='checkbox' name='form_procedures' value='1'<?php echo ($form_procedures) ? " checked" : ""; ?>><?php echo xlt('Procedures')?></label>
 270         </div>
 271             </td>
 272         </tr>
 273
 274     </table>
 275
 276     </div>
 277
 278   </td>
 279
 280   <td align='left' valign='middle' height="100%">
 281
 282     <table style='border-left:1px solid; width:100%; height:100%' >
 283         <tr>
 284             <td>
 285                 <div class="text-center">
 286           <div class="btn-group" role="group">
 287                       <a href='#' class='btn btn-default btn-save' onclick='$("#form_refresh").attr("value","true"); $("#theform").submit();'>
 288                             <?php echo xlt('Submit'); ?>
 289                       </a>
 290                         <?php if ($_POST['form_refresh']) { ?>
 291                         <a href='#' class='btn btn-default btn-print' id='printbutton'>
 292                                 <?php echo xlt('Print'); ?>
 293                         </a>
 294                         <?php } ?>
 295           </div>
 296                 </div>
 297             </td>
 298         </tr>
 299     </table>
 300   </td>
 301  </tr>
 302 </table>
 303 </div>
 304
 305 <?php
 306 if ($_POST['form_refresh']) {
 307 ?>
 308 <div id="report_results">
 309 <table border='0' cellpadding='1' cellspacing='2' width='98%' id='mymaintable'>
 310 <thead>
 311  <th>
 312     <?php echo xlt('Practitioner') ?>
 313  </th>
 314  <th>
 315     <?php echo xlt('Date') ?>
 316  </th>
 317 <?php if ($form_procedures) { ?>
 318   <th>
 319     <?php
 320     if ($GLOBALS['cash_receipts_report_invoice'] == '0') {
 321         echo xlt('Invoice');
 322     } else {
 323         echo xlt('Name');
 324     }?>
 325   </th>
 326 <?php } ?>
 327 <?php if ($form_proc_codefull) { ?>
 328   <th align='right'>
 329     <?php echo xlt('InvAmt') ?>
 330   </th>
 331 <?php } ?>
 332 <?php if ($form_proc_codefull) { ?>
 333   <th>
 334     <?php echo xlt('Insurance') ?>
 335   </th>
 336 <?php } ?>
 337 <?php if ($form_procedures) { ?>
 338   <th>
 339     <?php echo xlt('Procedure') ?>
 340   </th>
 341   <th align="right">
 342     <?php echo xlt('Prof.') ?>
 343   </th>
 344   <th align="right">
 345     <?php echo xlt('Clinic') ?>
 346   </th>
 347 <?php } else { ?>
 348   <th align="right">
 349     <?php echo xlt('Received') ?>
 350   </th>
 351 <?php } ?>
 352  </thead>
 353 <?php
 354 if ($_POST['form_refresh']) {
 355     $form_doctor = $_POST['form_doctor'];
 356     $arows = array();
 357
 358     $ids_to_skip = array();
 359     $irow = 0;
 360
 361     // Get copays.  These will be ignored if a CPT code was specified.
 362     //
 363     if (!$form_proc_code || !$form_proc_codetype) {
 364         /*************************************************************
 365         $query = "SELECT b.fee, b.pid, b.encounter, b.code_type, b.code, b.modifier, " .
 366         "fe.date, fe.id AS trans_id, u.id AS docid " .
 367         "FROM billing AS b " .
 368         "JOIN form_encounter AS fe ON fe.pid = b.pid AND fe.encounter = b.encounter " .
 369         "JOIN forms AS f ON f.pid = b.pid AND f.encounter = b.encounter AND f.formdir = 'newpatient' " .
 370         "LEFT OUTER JOIN users AS u ON u.username = f.user " .
 371         "WHERE b.code_type = 'COPAY' AND b.activity = 1 AND " .
 372         "fe.date >= '$form_from_date 00:00:00' AND fe.date <= '$form_to_date 23:59:59'";
 373         // If a facility was specified.
 374         if ($form_facility) {
 375         $query .= " AND fe.facility_id = '$form_facility'";
 376         }
 377         // If a doctor was specified.
 378         if ($form_doctor) {
 379         $query .= " AND u.id = '$form_doctor'";
 380         }
 381         *************************************************************/
 382         $sqlBindArray = array();
 383         $query = "SELECT b.fee, b.pid, b.encounter, b.code_type, b.code, b.modifier, " .
 384         "fe.date, fe.id AS trans_id, fe.provider_id AS docid, fe.invoice_refno " .
 385         "FROM billing AS b " .
 386         "JOIN form_encounter AS fe ON fe.pid = b.pid AND fe.encounter = b.encounter " .
 387         "WHERE b.code_type = 'COPAY' AND b.activity = 1 AND " .
 388         "fe.date >= ? AND fe.date <= ?";
 389         array_push($sqlBindArray, $form_from_date . " 00:00:00", $form_to_date . " 23:59:59");
 390         // If a facility was specified.
 391         if ($form_facility) {
 392             $query .= " AND fe.facility_id = ?";
 393             array_push($sqlBindArray, $form_facility);
 394         }
 395
 396         // If a doctor was specified.
 397         if ($form_doctor) {
 398             $query .= " AND fe.provider_id = ?";
 399             array_push($sqlBindArray, $form_doctor);
 400         }
 401
 402         /************************************************************/
 403         //
 404         $res = sqlStatement($query, $sqlBindArray);
 405         while ($row = sqlFetchArray($res)) {
 406             $trans_id = $row['trans_id'];
 407             $thedate = substr($row['date'], 0, 10);
 408             $patient_id = $row['pid'];
 409             $encounter_id = $row['encounter'];
 410           //
 411             if (!empty($ids_to_skip[$trans_id])) {
 412                 continue;
 413             }
 414
 415           //
 416           // If a diagnosis code was given then skip any invoices without
 417           // that diagnosis.
 418             if ($form_dx_code && $form_dx_codetype) {
 419                 $tmp = sqlQuery("SELECT count(*) AS count FROM billing WHERE " .
 420                 "pid = ? AND encounter = ? AND " .
 421                 "code_type = ? AND code LIKE ? AND " .
 422                 "activity = 1", array($patient_id,$encounter_id,$form_dx_codetype,$form_dx_code));
 423                 if (empty($tmp['count'])) {
 424                       $ids_to_skip[$trans_id] = 1;
 425                       continue;
 426                 }
 427             }
 428
 429           //
 430             $key = sprintf(
 431                 "%08u%s%08u%08u%06u",
 432                 $row['docid'],
 433                 $thedate,
 434                 $patient_id,
 435                 $encounter_id,
 436                 ++$irow
 437             );
 438             $arows[$key] = array();
 439             $arows[$key]['transdate'] = $thedate;
 440             $arows[$key]['amount'] = $row['fee'];
 441             $arows[$key]['docid'] = $row['docid'];
 442             $arows[$key]['project_id'] = 0;
 443             $arows[$key]['memo'] = '';
 444             if ($GLOBALS['cash_receipts_report_invoice'] == '0') {
 445                 $arows[$key]['invnumber'] = "$patient_id.$encounter_id";
 446             } else {
 447                 $arows[$key]['invnumber'] = "$patient_name";
 448             }
 449
 450             $arows[$key]['irnumber'] = $row['invoice_refno'];
 451         } // end while
 452     } // end copays (not $form_proc_code)
 453
 454     // Get ar_activity (having payments), form_encounter, forms, users, optional ar_session
 455     /***************************************************************
 456     $query = "SELECT a.pid, a.encounter, a.post_time, a.code, a.modifier, a.pay_amount, " .
 457       "fe.date, fe.id AS trans_id, u.id AS docid, s.deposit_date, s.payer_id " .
 458       "FROM ar_activity AS a " .
 459       "JOIN form_encounter AS fe ON fe.pid = a.pid AND fe.encounter = a.encounter " .
 460       "JOIN forms AS f ON f.pid = a.pid AND f.encounter = a.encounter AND f.formdir = 'newpatient' " .
 461       "LEFT OUTER JOIN users AS u ON u.username = f.user " .
 462       "LEFT OUTER JOIN ar_session AS s ON s.session_id = a.session_id " .
 463       "WHERE a.pay_amount != 0 AND ( " .
 464       "a.post_time >= '$form_from_date 00:00:00' AND a.post_time <= '$form_to_date 23:59:59' " .
 465       "OR fe.date >= '$form_from_date 00:00:00' AND fe.date <= '$form_to_date 23:59:59' " .
 466       "OR s.deposit_date >= '$form_from_date' AND s.deposit_date <= '$form_to_date' )";
 467     // If a procedure code was specified.
 468     if ($form_proc_code) $query .= " AND a.code = '$form_proc_code'";
 469     // If a facility was specified.
 470     if ($form_facility) $query .= " AND fe.facility_id = '$form_facility'";
 471     // If a doctor was specified.
 472     if ($form_doctor) $query .= " AND u.id = '$form_doctor'";
 473     ***************************************************************/
 474     $sqlBindArray = array();
 475     $query = "SELECT a.pid, a.encounter, a.post_time, a.code, a.modifier, a.pay_amount, " .
 476      "fe.date, fe.id AS trans_id, fe.provider_id AS docid, fe.invoice_refno, s.deposit_date, s.payer_id, " .
 477      "b.provider_id, concat(p.lname, ' ', p.fname) as 'pat_fulname' " .
 478      "FROM ar_activity AS a " .
 479      "JOIN form_encounter AS fe ON fe.pid = a.pid AND fe.encounter = a.encounter " .
 480      "LEFT OUTER JOIN ar_session AS s ON s.session_id = a.session_id " .
 481      "LEFT OUTER JOIN patient_data AS p ON p.pid = a.pid " .
 482      "LEFT OUTER JOIN billing AS b ON b.pid = a.pid AND b.encounter = a.encounter AND " .
 483      "b.code = a.code AND b.modifier = a.modifier AND b.activity = 1 AND " .
 484      "b.code_type != 'COPAY' AND b.code_type != 'TAX' " .
 485      "WHERE a.pay_amount != 0 AND ( " .
 486      "a.post_time >= ? AND a.post_time <= ? " .
 487      "OR fe.date >= ? AND fe.date <= ? " .
 488      "OR s.deposit_date >= ? AND s.deposit_date <= ? )";
 489      array_push($sqlBindArray, $form_from_date . " 00:00:00", $form_to_date . " 23:59:59", $form_from_date . " 00:00:00", $form_to_date . " 23:59:59", $form_from_date, $form_to_date);
 490     // If a procedure code was specified.
 491     // Support code type if it is in the ar_activity table. Note it is not always included, so
 492     // also support a blank code type in ar_activity table.
 493     if ($form_proc_codetype && $form_proc_code) {
 494         $query .= " AND (a.code_type = ? OR a.code_type = '') AND a.code = ?";
 495         array_push($sqlBindArray, $form_proc_codetype, $form_proc_code);
 496     }
 497
 498     // If a facility was specified.
 499     if ($form_facility) {
 500         $query .= " AND fe.facility_id = ?";
 501         array_push($sqlBindArray, $form_facility);
 502     }
 503
 504     // If a doctor was specified.
 505     if ($form_doctor) {
 506         $query .= " AND ( b.provider_id = ? OR " .
 507         "( ( b.provider_id IS NULL OR b.provider_id = 0 ) AND " .
 508         "fe.provider_id = ? ) )";
 509         array_push($sqlBindArray, $form_doctor, $form_doctor);
 510     }
 511
 512     /**************************************************************/
 513     //
 514     $res = sqlStatement($query, $sqlBindArray);
 515     while ($row = sqlFetchArray($res)) {
 516         $trans_id = $row['trans_id'];
 517         $patient_id = $row['pid'];
 518         $encounter_id = $row['encounter'];
 519         $patient_name = $row['pat_fulname'];
 520         //
 521         if (!empty($ids_to_skip[$trans_id])) {
 522             continue;
 523         }
 524
 525         //
 526         if ($form_use_edate) {
 527             $thedate = substr($row['date'], 0, 10);
 528         } else {
 529             if (!empty($row['deposit_date'])) {
 530                 $thedate = $row['deposit_date'];
 531             } else {
 532                 $thedate = substr($row['post_time'], 0, 10);
 533             }
 534         }
 535
 536         if (strcmp($thedate, $form_from_date) < 0 || strcmp($thedate, $form_to_date) > 0) {
 537             continue;
 538         }
 539
 540         //
 541         // If a diagnosis code was given then skip any invoices without
 542         // that diagnosis.
 543         if ($form_dx_code && $form_dx_codetype) {
 544             $tmp = sqlQuery("SELECT count(*) AS count FROM billing WHERE " .
 545             "pid = ? AND encounter = ? AND " .
 546             "code_type = ? AND code LIKE ? AND " .
 547             "activity = 1", array($patient_id,$encounter_id,$form_dx_codetype,$form_dx_code));
 548             if (empty($tmp['count'])) {
 549                 $ids_to_skip[$trans_id] = 1;
 550                 continue;
 551             }
 552         }
 553
 554         //
 555         $docid = empty($row['encounter_id']) ? $row['docid'] : $row['encounter_id'];
 556         $key = sprintf(
 557             "%08u%s%08u%08u%06u",
 558             $docid,
 559             $thedate,
 560             $patient_id,
 561             $encounter_id,
 562             ++$irow
 563         );
 564         $arows[$key] = array();
 565         $arows[$key]['transdate'] = $thedate;
 566         $arows[$key]['amount'] = 0 - $row['pay_amount'];
 567         $arows[$key]['docid'] = $docid;
 568         $arows[$key]['project_id'] = empty($row['payer_id']) ? 0 : $row['payer_id'];
 569         $arows[$key]['memo'] = $row['code'];
 570         if ($GLOBALS['cash_receipts_report_invoice'] == '0') {
 571             $arows[$key]['invnumber'] = "$patient_id.$encounter_id";
 572         } else {
 573             $arows[$key]['invnumber'] = "$patient_name";
 574         }
 575
 576         $arows[$key]['irnumber'] = $row['invoice_refno'];
 577     } // end while
 578
 579     ksort($arows);
 580     $docid = 0;
 581
 582     foreach ($arows as $row) {
 583       // Get insurance company name
 584         $insconame = '';
 585         if ($form_proc_codefull  && $row['project_id']) {
 586             $tmp = sqlQuery("SELECT name FROM insurance_companies WHERE " .
 587             "id = ?", array($row['project_id']));
 588             $insconame = $tmp['name'];
 589         }
 590
 591         $amount1 = 0;
 592         $amount2 = 0;
 593         if ($form_procedures && is_clinic($row['memo'])) {
 594             $amount2 -= $row['amount'];
 595         } else {
 596             $amount1 -= $row['amount'];
 597         }
 598
 599       // if ($docid != $row['employee_id']) {
 600         if ($docid != $row['docid']) {
 601             if ($docid) {
 602                 // Print doc totals.
 603         ?>
 604
 605      <tr bgcolor="#ddddff">
 606         <td class="detail" colspan="<?php echo ($form_proc_codefull ? 4 : 2) + ($form_procedures ? 2 : 0); ?>">
 607         <?php echo xlt('Totals for ') . text($docname) ?>
 608   </td>
 609   <td align="right">
 610         <?php bucks($doctotal1) ?>
 611   </td>
 612     <?php if ($form_procedures) { ?>
 613   <td align="right">
 614         <?php bucks($doctotal2) ?>
 615   </td>
 616     <?php } ?>
 617  </tr>
 618 <?php
 619             }
 620
 621             $doctotal1 = 0;
 622             $doctotal2 = 0;
 623
 624             $docid = $row['docid'];
 625             $tmp = sqlQuery("SELECT lname, fname FROM users WHERE id = ?", array($docid));
 626             $docname = empty($tmp) ? xl('Unknown') : $tmp['fname'] . ' ' . $tmp['lname'];
 627
 628             $docnameleft = $docname;
 629         }
 630
 631         if ($_POST['form_details']) {
 632     ?>
 633
 634    <tr>
 635     <td class="detail">
 636         <?php echo text($docnameleft); $docnameleft = " " ?>
 637   </td>
 638   <td class="detail">
 639         <?php echo text(oeFormatShortDate($row['transdate'])); ?>
 640   </td>
 641     <?php if ($form_procedures) { ?>
 642   <td class="detail">
 643         <?php echo empty($row['irnumber']) ? text($row['invnumber']) : text($row['irnumber']); ?>
 644   </td>
 645     <?php } ?>
 646 <?php
 647 if ($form_proc_code && $form_proc_codetype) {
 648     echo "  <td class='detail' align='right'>";
 649     list($patient_id, $encounter_id) = explode(".", $row['invnumber']);
 650     $tmp = sqlQuery("SELECT SUM(fee) AS sum FROM billing WHERE " .
 651     "pid = ? AND encounter = ? AND " .
 652     "code_type = ? AND code = ? AND activity = 1", array($patient_id,$encounter_id,$form_proc_codetype,$form_proc_code));
 653     bucks($tmp['sum']);
 654     echo "  </td>\n";
 655 }
 656 ?>
 657 <?php
 658 if ($form_proc_codefull) { ?>
 659     <td class="detail">
 660     <?php echo text($insconame) ?>
 661     </td>
 662 <?php } ?>
 663 <?php if ($form_procedures) { ?>
 664   <td class="detail">
 665     <?php echo text($row['memo']) ?>
 666   </td>
 667 <?php } ?>
 668   <td class="detail" align="right">
 669     <?php bucks($amount1) ?>
 670   </td>
 671 <?php if ($form_procedures) { ?>
 672   <td class="detail" align="right">
 673     <?php bucks($amount2) ?>
 674   </td>
 675 <?php } ?>
 676  </tr>
 677 <?php
 678         } // end details
 679         $doctotal1   += $amount1;
 680         $doctotal2   += $amount2;
 681         $grandtotal1 += $amount1;
 682         $grandtotal2 += $amount2;
 683     }
 684 ?>
 685
 686 <tr bgcolor="#ddddff">
 687 <td class="detail" colspan="<?php echo ($form_proc_codefull ? 4 : 2) + ($form_procedures ? 2 : 0); ?>">
 688 <?php echo xlt('Totals for ') . text($docname) ?>
 689 </td>
 690 <td align="right">
 691 <?php bucks($doctotal1) ?>
 692 </td>
 693 <?php if ($form_procedures) { ?>
 694   <td align="right">
 695     <?php bucks($doctotal2) ?>
 696   </td>
 697 <?php } ?>
 698 </tr>
 699
 700 <tr bgcolor="#ffdddd">
 701 <td class="detail" colspan="<?php echo ($form_proc_codefull ? 4 : 2) + ($form_procedures ? 2 : 0); ?>">
 702 <?php echo xlt('Grand Totals') ?>
 703 </td>
 704 <td align="right">
 705 <?php bucks($grandtotal1) ?>
 706 </td>
 707 <?php if ($form_procedures) { ?>
 708   <td align="right">
 709     <?php bucks($grandtotal2) ?>
 710   </td>
 711 <?php } ?>
 712 </tr>
 713 <?php $report_from_date = oeFormatShortDate($form_from_date)  ;
 714     $report_to_date = oeFormatShortDate($form_to_date)  ;
 715 ?>
 716 <div align='right'><span class='title' ><?php echo xlt('Report Date'). ' '; ?><?php echo text($report_from_date);?> - <?php echo text($report_to_date);?></span></div>
 717
 718 <?php
 719 }
 720 ?>
 721
 722 </table>
 723 </div>
 724 <?php } else { ?>
 725 <div class='text'>
 726     <?php echo xlt('Please input search criteria above, and click Submit to view results.'); ?>
 727 </div>
 728 <?php } ?>
 729
 730 </form>
 731 </body>
 732
 733 </html>