4 * interface/billing/print_daysheet_report.php Genetating an end of day report.
6 * Program for Generating an End of Day report
10 * @link http://www.open-emr.org
11 * @author Terry Hill <terry@lillysystems.com>
12 * @copyright Copyright (c) 2014 Terry Hill <terry@lillysystems.com>
13 * @license https://github.com/openemr/openemr/blob/master/LICENSE GNU General Public License 3
17 require_once("../globals.php");
18 require_once("$srcdir/patient.inc.php");
19 require_once("$srcdir/daysheet.inc.php");
21 use OpenEMR\Billing\BillingReport
;
22 use OpenEMR\Common\Acl\AclMain
;
23 use OpenEMR\Common\Twig\TwigContainer
;
24 use OpenEMR\Core\Header
;
26 //ensure user has proper access
27 if (!AclMain
::aclCheckCore('acct', 'eob', '', 'write') && !AclMain
::aclCheckCore('acct', 'bill', '', 'write')) {
28 echo (new TwigContainer(null, $GLOBALS['kernel']))->getTwig()->render('core/unauthorized.html.twig', ['pageTitle' => xl("Billing Manager")]);
33 if (!isset($_GET["mode"])) {
34 if (!isset($_GET["from_date"])) {
35 $from_date = date("Y-m-d");
37 $from_date = $_GET["from_date"];
40 if (!isset($_GET["to_date"])) {
41 $to_date = date("Y-m-d");
43 $to_date = $_GET["to_date"];
46 if (!isset($_GET["code_type"])) {
49 $code_type = $_GET["code_type"];
52 if (!isset($_GET["unbilled"])) {
55 $unbilled = $_GET["unbilled"];
58 if (!isset($_GET["authorized"])) {
59 $my_authorized = "on";
61 $my_authorized = $_GET["authorized"];
64 $from_date = $_GET["from_date"];
65 $to_date = $_GET["to_date"];
66 $code_type = $_GET["code_type"];
67 $unbilled = $_GET["unbilled"];
68 $my_authorized = $_GET["authorized"];
76 <?php Header
::setupHeader(); ?
>
80 <div
class="container">
82 <a href
="javascript:window.close();" target
="Main"><p
class="title"><?php
echo xlt('Day Sheet Report')?
></p
></a
>
86 if ($my_authorized === 'on') {
87 $my_authorized = true;
92 if ($unbilled === 'on') {
98 if ($code_type === 'all') {
102 if (!isset($_GET["mode"])) {
103 if (!isset($_GET["from_date"])) {
104 $from_date = date("Y-m-d");
106 $from_date = $_GET["from_date"];
109 if (!isset($_GET["to_date"])) {
110 $to_date = date("Y-m-d");
112 $to_date = $_GET["to_date"];
115 if (!isset($_GET["code_type"])) {
118 $code_type = $_GET["code_type"];
121 if (!isset($_GET["unbilled"])) {
124 $unbilled = $_GET["unbilled"];
127 if (!isset($_GET["authorized"])) {
128 $my_authorized = "on";
130 $my_authorized = $_GET["authorized"];
133 $from_date = $_GET["from_date"];
134 $to_date = $_GET["to_date"];
135 $code_type = $_GET["code_type"];
136 $unbilled = $_GET["unbilled"];
137 $my_authorized = $_GET["authorized"];
140 if ($my_authorized === 'on') {
141 $my_authorized = true;
143 $my_authorized = '%';
146 if ($unbilled === 'on') {
152 if ($code_type === 'all') {
156 if (isset($_GET["mode"]) && $_GET["mode"] === 'bill') {
157 billCodesList($list);
167 if ($ret = getBillsBetweendayReport($code_type)) {
168 // checking to see if there is any information in the array if not display a message (located after this if statment)
169 $anypats = count($ret);
175 // $iter has encounter information
177 // this loop gathers the user and provider numbers
178 foreach ($ret as $iter) {
179 $catch_user[] = $iter['user'];
180 $catch_provider[] = $iter['provider_id'];
183 //This statment uniques the arrays removing duplicates
185 $user_list = array_unique($catch_user);
186 $provider_list = array_unique($catch_provider);
188 // reorder the list starting with array element zero
189 $user_final_list = array_values($user_list);
190 $provider_final_list = array_values($provider_list);
191 // sort array in assending order
192 sort($user_final_list);
193 sort($provider_final_list);
194 $all4 = array_natsort($ret, 'pid', 'fulname', 'asc');
196 if ($_POST['end_of_day_provider_only'] == 1) {
200 if ($_POST['end_of_day_totals_only'] == 1) {
204 foreach ($all4 as $iter) {
205 // Case statment to tally information by user
206 switch ($iter['user']) {
207 case $iter['user'] = $user_final_list[0]:
208 $us0_user = $iter['user'];
209 $us0_fee = $us0_fee +
$iter['fee'];
210 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
211 $us0_inspay = $us0_inspay +
$iter['ins_code'];
214 $us0_insadj = $us0_insadj +
$iter['ins_adjust_dollar'];
215 $us0_patadj = $us0_patadj +
$iter['pat_adjust_dollar'];
216 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
217 $us0_patpay = $us0_patpay +
$iter['pat_code'];
220 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
221 $us0_insref = $us0_insref +
$iter['ins_code'];
224 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
225 $us0_patref = $us0_patref +
$iter['pat_code'];
228 case $iter['user'] = $user_final_list[1]:
229 $us1_user = $iter['user'];
230 $us1_fee = $us1_fee +
$iter['fee'];
231 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
232 $us1_inspay = $us1_inspay +
$iter['ins_code'];
235 $us1_insadj = $us1_insadj +
$iter['ins_adjust_dollar'];
236 $us1_patadj = $us1_patadj +
$iter['pat_adjust_dollar'];
237 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
238 $us1_patpay = $us1_patpay +
$iter['pat_code'];
241 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
242 $us1_insref = $us1_insref +
$iter['ins_code'];
245 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
246 $us1_patref = $us1_patref +
$iter['pat_code'];
249 case $iter['user'] = $user_final_list[2]:
250 $us2_user = $iter['user'];
251 $us2_fee = $us2_fee +
$iter['fee'];
252 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
253 $us2_inspay = $us2_inspay +
$iter['ins_code'];
256 $us2_insadj = $us2_insadj +
$iter['ins_adjust_dollar'];
257 $us2_patadj = $us2_patadj +
$iter['pat_adjust_dollar'];
258 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
259 $us2_patpay = $us2_patpay +
$iter['pat_code'];
262 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
263 $us2_insref = $us2_insref +
$iter['ins_code'];
266 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
267 $us2_patref = $us2_patref +
$iter['pat_code'];
270 case $iter['user'] = $user_final_list[3]:
271 $us3_user = $iter['user'];
272 $us3_fee = $us3_fee +
$iter['fee'];
273 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
274 $us3_inspay = $us3_inspay +
$iter['ins_code'];
277 $us3_insadj = $us3_insadj +
$iter['ins_adjust_dollar'];
278 $us3_patadj = $us3_patadj +
$iter['pat_adjust_dollar'];
279 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
280 $us3_patpay = $us3_patpay +
$iter['pat_code'];
283 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
284 $us3_insref = $us3_insref +
$iter['ins_code'];
287 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
288 $us3_patref = $us3_patref +
$iter['pat_code'];
291 case $iter['user'] = $user_final_list[4]:
292 $us4_user = $iter['user'];
293 $us4_fee = $us4_fee +
$iter['fee'];
294 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
295 $us4_inspay = $us4_inspay +
$iter['ins_code'];
298 $us4_insadj = $us4_insadj +
$iter['ins_adjust_dollar'];
299 $us4_patadj = $us4_patadj +
$iter['pat_adjust_dollar'];
300 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
301 $us4_patpay = $us4_patpay +
$iter['pat_code'];
304 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
305 $us4_insref = $us4_insref +
$iter['ins_code'];
308 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
309 $us4_patref = $us4_patref +
$iter['pat_code'];
312 case $iter['user'] = $user_final_list[5]:
313 $us5_user = $iter['user'];
314 $us5_fee = $us5_fee +
$iter['fee'];
315 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
316 $us5_inspay = $us5_inspay +
$iter['ins_code'];
319 $us5_insadj = $us5_insadj +
$iter['ins_adjust_dollar'];
320 $us5_patadj = $us5_patadj +
$iter['pat_adjust_dollar'];
321 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
322 $us5_patpay = $us5_patpay +
$iter['pat_code'];
325 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
326 $us5_insref = $us5_insref +
$iter['ins_code'];
329 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
330 $us5_patref = $us5_patref +
$iter['pat_code'];
333 case $iter['user'] = $user_final_list[6]:
334 $us6_user = $iter['user'];
335 $us6_fee = $us6_fee +
$iter['fee'];
336 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
337 $us6_inspay = $us6_inspay +
$iter['ins_code'];
340 $us6_insadj = $us6_insadj +
$iter['ins_adjust_dollar'];
341 $us6_patadj = $us6_patadj +
$iter['pat_adjust_dollar'];
342 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
343 $us6_patpay = $us6_patpay +
$iter['pat_code'];
346 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
347 $us6_insref = $us6_insref +
$iter['ins_code'];
350 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
351 $us6_patref = $us6_patref +
$iter['pat_code'];
354 case $iter['user'] = $user_final_list[7]:
355 $us7_user = $iter['user'];
356 $us7_fee = $us7_fee +
$iter['fee'];
357 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
358 $us7_inspay = $us7_inspay +
$iter['ins_code'];
361 $us7_insadj = $us7_insadj +
$iter['ins_adjust_dollar'];
362 $us7_patadj = $us7_patadj +
$iter['pat_adjust_dollar'];
363 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
364 $us7_patpay = $us7_patpay +
$iter['pat_code'];
367 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
368 $us7_insref = $us7_insref +
$iter['ins_code'];
371 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
372 $us7_patref = $us7_patref +
$iter['pat_code'];
375 case $iter['user'] = $user_final_list[8]:
376 $us8_user = $iter['user'];
377 $us8_fee = $us8_fee +
$iter['fee'];
378 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
379 $us8_inspay = $us8_inspay +
$iter['ins_code'];
382 $us8_insadj = $us8_insadj +
$iter['ins_adjust_dollar'];
383 $us8_patadj = $us8_patadj +
$iter['pat_adjust_dollar'];
384 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
385 $us8_patpay = $us8_patpay +
$iter['pat_code'];
388 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
389 $us8_insref = $us8_insref +
$iter['ins_code'];
392 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
393 $us8_patref = $us8_patref +
$iter['pat_code'];
396 case $iter['user'] = $user_final_list[9]:
397 $us9_user = $iter['user'];
398 $us9_fee = $us9_fee +
$iter['fee'];
399 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
400 $us9_inspay = $us9_inspay +
$iter['ins_code'];
403 $us9_insadj = $us9_insadj +
$iter['ins_adjust_dollar'];
404 $us9_patadj = $us9_patadj +
$iter['pat_adjust_dollar'];
405 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
406 $us9_patpay = $us9_patpay +
$iter['pat_code'];
409 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
410 $us9_insref = $us9_insref +
$iter['ins_code'];
413 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
414 $us9_patref = $us9_patref +
$iter['pat_code'];
417 case $iter['user'] = $user_final_list[10]:
418 $us10_user = $iter['user'];
419 $us10_fee = $us10_fee +
$iter['fee'];
420 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
421 $us10_inspay = $us10_inspay +
$iter['ins_code'];
424 $us10_insadj = $us10_insadj +
$iter['ins_adjust_dollar'];
425 $us10_patadj = $us10_patadj +
$iter['pat_adjust_dollar'];
426 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
427 $us10_patpay = $us10_patpay +
$iter['pat_code'];
430 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
431 $us10_insref = $us10_insref +
$iter['ins_code'];
434 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
435 $us10_patref = $us10_patref +
$iter['pat_code'];
438 case $iter['user'] = $user_final_list[11]:
439 $us11_user = $iter['user'];
440 $us11_fee = $us11_fee +
$iter['fee'];
441 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
442 $us11_inspay = $us11_inspay +
$iter['ins_code'];
445 $us11_insadj = $us11_insadj +
$iter['ins_adjust_dollar'];
446 $us11_patadj = $us11_patadj +
$iter['pat_adjust_dollar'];
447 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
448 $us11_patpay = $us11_patpay +
$iter['pat_code'];
451 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
452 $us11_insref = $us11_insref +
$iter['ins_code'];
455 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
456 $us11_patref = $us11_patref +
$iter['pat_code'];
459 case $iter['user'] = $user_final_list[12]:
460 $us12_user = $iter['user'];
461 $us12_fee = $us12_fee +
$iter['fee'];
462 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
463 $us12_inspay = $us12_inspay +
$iter['ins_code'];
466 $us12_insadj = $us12_insadj +
$iter['ins_adjust_dollar'];
467 $us12_patadj = $us12_patadj +
$iter['pat_adjust_dollar'];
468 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
469 $us12_patpay = $us12_patpay +
$iter['pat_code'];
472 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
473 $us12_insref = $us12_insref +
$iter['ins_code'];
476 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
477 $us12_patref = $us12_patref +
$iter['pat_code'];
480 case $iter['user'] = $user_final_list[13]:
481 $us13_user = $iter['user'];
482 $us13_fee = $us13_fee +
$iter['fee'];
483 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
484 $us13_inspay = $us13_inspay +
$iter['ins_code'];
487 $us13_insadj = $us13_insadj +
$iter['ins_adjust_dollar'];
488 $us13_patadj = $us13_patadj +
$iter['pat_adjust_dollar'];
489 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
490 $us13_patpay = $us13_patpay +
$iter['pat_code'];
493 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
494 $us13_insref = $us13_insref +
$iter['ins_code'];
497 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
498 $us13_patref = $us13_patref +
$iter['pat_code'];
501 case $iter['user'] = $user_final_list[14]:
502 $us14_user = $iter['user'];
503 $us14_fee = $us14_fee +
$iter['fee'];
504 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
505 $us14_inspay = $us14_inspay +
$iter['ins_code'];
508 $us14_insadj = $us14_insadj +
$iter['ins_adjust_dollar'];
509 $us14_patadj = $us14_patadj +
$iter['pat_adjust_dollar'];
510 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
511 $us14_patpay = $us14_patpay +
$iter['pat_code'];
514 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
515 $us14_insref = $us14_insref +
$iter['ins_code'];
518 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
519 $us14_patref = $us14_patref +
$iter['pat_code'];
522 case $iter['user'] = $user_final_list[15]:
523 $us15_user = $iter['user'];
524 $us15_fee = $us15_fee +
$iter['fee'];
525 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
526 $us15_inspay = $us15_inspay +
$iter['ins_code'];
529 $us15_insadj = $us15_insadj +
$iter['ins_adjust_dollar'];
530 $us15_patadj = $us15_patadj +
$iter['pat_adjust_dollar'];
531 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
532 $us15_patpay = $us15_patpay +
$iter['pat_code'];
535 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
536 $us15_insref = $us15_insref +
$iter['ins_code'];
539 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
540 $us15_patref = $us15_patref +
$iter['pat_code'];
543 case $iter['user'] = $user_final_list[16]:
544 $us16_user = $iter['user'];
545 $us16_fee = $us16_fee +
$iter['fee'];
546 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
547 $us16_inspay = $us16_inspay +
$iter['ins_code'];
550 $us16_insadj = $us16_insadj +
$iter['ins_adjust_dollar'];
551 $us16_patadj = $us16_patadj +
$iter['pat_adjust_dollar'];
552 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
553 $us16_patpay = $us16_patpay +
$iter['pat_code'];
556 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
557 $us16_insref = $us16_insref +
$iter['ins_code'];
560 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
561 $us16_patref = $us16_patref +
$iter['pat_code'];
564 case $iter['user'] = $user_final_list[17]:
565 $us17_user = $iter['user'];
566 $us17_fee = $us17_fee +
$iter['fee'];
567 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
568 $us17_inspay = $us17_inspay +
$iter['ins_code'];
571 $us17_insadj = $us17_insadj +
$iter['ins_adjust_dollar'];
572 $us17_patadj = $us17_patadj +
$iter['pat_adjust_dollar'];
573 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
574 $us17_patpay = $us17_patpay +
$iter['pat_code'];
577 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
578 $us17_insref = $us17_insref +
$iter['ins_code'];
581 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
582 $us17_patref = $us17_patref +
$iter['pat_code'];
585 case $iter['user'] = $user_final_list[18]:
586 $us18_user = $iter['user'];
587 $us18_fee = $us18_fee +
$iter['fee'];
588 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
589 $us18_inspay = $us18_inspay +
$iter['ins_code'];
592 $us18_insadj = $us18_insadj +
$iter['ins_adjust_dollar'];
593 $us18_patadj = $us18_patadj +
$iter['pat_adjust_dollar'];
594 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
595 $us18_patpay = $us18_patpay +
$iter['pat_code'];
598 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
599 $us18_insref = $us18_insref +
$iter['ins_code'];
602 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
603 $us18_patref = $us18_patref +
$iter['pat_code'];
606 case $iter['user'] = $fuser_final_list[19]:
607 $us19_user = $iter['user'];
608 $us19_fee = $us19_fee +
$iter['fee'];
609 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
610 $us19_inspay = $us19_inspay +
$iter['ins_code'];
613 $us19_insadj = $us19_insadj +
$iter['ins_adjust_dollar'];
614 $us19_patadj = $us19_patadj +
$iter['pat_adjust_dollar'];
615 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
616 $us19_patpay = $us19_patpay +
$iter['pat_code'];
619 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
620 $us19_insref = $us19_insref +
$iter['ins_code'];
623 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
624 $us19_patref = $us19_patref +
$iter['pat_code'];
629 // Case statment to tally information by Provider
630 switch ($iter['provider_id']) {
631 case $iter['provider_id'] = $provider_final_list[0]:
632 $pro0_user = $iter['provider_id'];
633 $pro0_fee = $pro0_fee +
$iter['fee'];
634 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
635 $pro0_inspay = $pro0_inspay +
$iter['ins_code'];
638 $pro0_insadj = $pro0_insadj +
$iter['ins_adjust_dollar'];
639 $pro0_patadj = $pro0_patadj +
$iter['pat_adjust_dollar'];
640 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
641 $pro0_patpay = $pro0_patpay +
$iter['pat_code'];
644 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
645 $pro0_insref = $pro0_insref +
$iter['ins_code'];
648 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
649 $pro0_patref = $pro0_patref +
$iter['pat_code'];
652 case $iter['provider_id'] = $provider_final_list[1]:
653 $pro1_user = $iter['provider_id'];
654 $pro1_fee = $pro1_fee +
$iter['fee'];
655 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
656 $pro1_inspay = $pro1_inspay +
$iter['ins_code'];
659 $pro1_insadj = $pro1_insadj +
$iter['ins_adjust_dollar'];
660 $pro1_patadj = $pro1_patadj +
$iter['pat_adjust_dollar'];
661 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
662 $pro1_patpay = $pro1_patpay +
$iter['pat_code'];
665 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
666 $pro1_insref = $pro1_insref +
$iter['ins_code'];
669 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
670 $pro1_patref = $pro1_patref +
$iter['pat_code'];
673 case $iter['provider_id'] = $provider_final_list[2]:
674 $pro2_user = $iter['provider_id'];
675 $pro2_fee = $pro2_fee +
$iter['fee'];
676 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
677 $pro2_inspay = $pro2_inspay +
$iter['ins_code'];
680 $pro2_insadj = $pro2_insadj +
$iter['ins_adjust_dollar'];
681 $pro2_patadj = $pro2_patadj +
$iter['pat_adjust_dollar'];
682 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
683 $pro2_patpay = $pro2_patpay +
$iter['pat_code'];
686 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
687 $pro2_insref = $pro2_insref +
$iter['ins_code'];
690 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
691 $pro2_patref = $pro2_patref +
$iter['pat_code'];
694 case $iter['provider_id'] = $provider_final_list[3]:
695 $pro3_user = $iter['provider_id'];
696 $pro3_fee = $pro3_fee +
$iter['fee'];
697 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
698 $pro3_inspay = $pro3_inspay +
$iter['ins_code'];
701 $pro3_insadj = $pro3_insadj +
$iter['ins_adjust_dollar'];
702 $pro3_patadj = $pro3_patadj +
$iter['pat_adjust_dollar'];
703 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
704 $pro3_patpay = $pro3_patpay +
$iter['pat_code'];
707 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
708 $pro3_insref = $pro3_insref +
$iter['ins_code'];
711 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
712 $pro3_patref = $pro3_patref +
$iter['pat_code'];
715 case $iter['provider_id'] = $provider_final_list[4]:
716 $pro4_user = $iter['provider_id'];
717 $pro4_fee = $pro4_fee +
$iter['fee'];
718 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
719 $pro4_inspay = $pro4_inspay +
$iter['ins_code'];
722 $pro4_insadj = $pro4_insadj +
$iter['ins_adjust_dollar'];
723 $pro4_patadj = $pro4_patadj +
$iter['pat_adjust_dollar'];
724 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
725 $pro4_patpay = $pro4_patpay +
$iter['pat_code'];
728 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
729 $pro4_insref = $pro4_insref +
$iter['ins_code'];
732 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
733 $pro4_patref = $pro4_patref +
$iter['pat_code'];
736 case $iter['provider_id'] = $provider_final_list[5]:
737 $pro5_user = $iter['provider_id'];
738 $pro5_fee = $pro5_fee +
$iter['fee'];
739 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
740 $pro5_inspay = $pro5_inspay +
$iter['ins_code'];
743 $pro5_insadj = $pro5_insadj +
$iter['ins_adjust_dollar'];
744 $pro5_patadj = $pro5_patadj +
$iter['pat_adjust_dollar'];
745 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
746 $pro5_patpay = $pro5_patpay +
$iter['pat_code'];
749 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
750 $pro5_insref = $pro5_insref +
$iter['ins_code'];
753 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
754 $pro5_patref = $pro5_patref +
$iter['pat_code'];
757 case $iter['provider_id'] = $provider_final_list[6]:
758 $pro6_user = $iter['provider_id'];
759 $pro6_fee = $pro6_fee +
$iter['fee'];
760 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
761 $pro6_inspay = $pro6_inspay +
$iter['ins_code'];
764 $pro6_insadj = $pro6_insadj +
$iter['ins_adjust_dollar'];
765 $pro6_patadj = $pro6_patadj +
$iter['pat_adjust_dollar'];
766 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
767 $pro6_patpay = $pro6_patpay +
$iter['pat_code'];
770 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
771 $pro6_insref = $pro6_insref +
$iter['ins_code'];
774 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
775 $pro6_patref = $pro6_patref +
$iter['pat_code'];
778 case $iter['provider_id'] = $provider_final_list[7]:
779 $pro7_user = $iter['provider_id'];
780 $pro7_fee = $pro7_fee +
$iter['fee'];
781 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
782 $pro7_inspay = $pro7_inspay +
$iter['ins_code'];
785 $pro7_insadj = $pro7_insadj +
$iter['ins_adjust_dollar'];
786 $pro7_patadj = $pro7_patadj +
$iter['pat_adjust_dollar'];
787 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
788 $pro7_patpay = $pro7_patpay +
$iter['pat_code'];
791 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
792 $pro7_insref = $pro7_insref +
$iter['ins_code'];
795 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
796 $pro7_patref = $pro7_patref +
$iter['pat_code'];
799 case $iter['provider_id'] = $provider_final_list[8]:
800 $pro8_user = $iter['provider_id'];
801 $pro8_fee = $pro8_fee +
$iter['fee'];
802 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
803 $pro8_inspay = $pro8_inspay +
$iter['ins_code'];
806 $pro8_insadj = $pro8_insadj +
$iter['ins_adjust_dollar'];
807 $pro8_patadj = $pro8_patadj +
$iter['pat_adjust_dollar'];
808 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
809 $pro8_patpay = $pro8_patpay +
$iter['pat_code'];
812 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
813 $pro8_insref = $pro8_insref +
$iter['ins_code'];
816 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
817 $pro8_patref = $pro8_patref +
$iter['pat_code'];
820 case $iter['provider_id'] = $provider_final_list[9]:
821 $pro9_user = $iter['provider_id'];
822 $pro9_fee = $pro9_fee +
$iter['fee'];
823 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
824 $pro9_inspay = $pro9_inspay +
$iter['ins_code'];
827 $pro9_insadj = $pro9_insadj +
$iter['ins_adjust_dollar'];
828 $pro9_patadj = $pro9_patadj +
$iter['pat_adjust_dollar'];
829 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
830 $pro9_patpay = $pro9_patpay +
$iter['pat_code'];
833 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
834 $pro9_insref = $pro9_insref +
$iter['ins_code'];
837 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
838 $pro9_patref = $pro9_patref +
$iter['pat_code'];
841 case $iter['provider_id'] = $provider_final_list[10]:
842 $pro10_user = $iter['provider_id'];
843 $pro10_fee = $pro10_fee +
$iter['fee'];
844 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
845 $pro10_inspay = $pro0_inspay +
$iter['ins_code'];
848 $pro10_insadj = $pro10_insadj +
$iter['ins_adjust_dollar'];
849 $pro10_patadj = $pro10_patadj +
$iter['pat_adjust_dollar'];
850 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
851 $pro10_patpay = $pro10_patpay +
$iter['pat_code'];
854 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
855 $pro10_insref = $pro10_insref +
$iter['ins_code'];
858 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
859 $pro10_patref = $pro10_patref +
$iter['pat_code'];
862 case $iter['provider_id'] = $provider_final_list[11]:
863 $pro11_user = $iter['provider_id'];
864 $pro11_fee = $pro11_fee +
$iter['fee'];
865 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
866 $pro11_inspay = $pro11_inspay +
$iter['ins_code'];
869 $pro11_insadj = $pro11_insadj +
$iter['ins_adjust_dollar'];
870 $pro11_patadj = $pro11_patadj +
$iter['pat_adjust_dollar'];
871 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
872 $pro11_patpay = $pro11_patpay +
$iter['pat_code'];
875 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
876 $pro11_insref = $pro11_insref +
$iter['ins_code'];
879 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
880 $pro11_patref = $pro11_patref +
$iter['pat_code'];
883 case $iter['provider_id'] = $provider_final_list[12]:
884 $pro12_user = $iter['provider_id'];
885 $pro12_fee = $pro12_fee +
$iter['fee'];
886 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
887 $pro12_inspay = $pro12_inspay +
$iter['ins_code'];
890 $pro12_insadj = $pro12_insadj +
$iter['ins_adjust_dollar'];
891 $pro12_patadj = $pro12_patadj +
$iter['pat_adjust_dollar'];
892 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
893 $pro12_patpay = $pro12_patpay +
$iter['pat_code'];
896 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
897 $pro12_insref = $pro12_insref +
$iter['ins_code'];
900 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
901 $pro12_patref = $pro12_patref +
$iter['pat_code'];
904 case $iter['provider_id'] = $provider_final_list[13]:
905 $pro13_user = $iter['provider_id'];
906 $pro13_fee = $pro13_fee +
$iter['fee'];
907 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
908 $pro13_inspay = $pro13_inspay +
$iter['ins_code'];
911 $pro13_insadj = $pro13_insadj +
$iter['ins_adjust_dollar'];
912 $pro13_patadj = $pro13_patadj +
$iter['pat_adjust_dollar'];
913 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
914 $pro13_patpay = $pro13_patpay +
$iter['pat_code'];
917 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
918 $pro13_insref = $pro13_insref +
$iter['ins_code'];
921 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
922 $pro13_patref = $pro13_patref +
$iter['pat_code'];
925 case $iter['provider_id'] = $provider_final_list[14]:
926 $pro14_user = $iter['provider_id'];
927 $pro14_fee = $pro14_fee +
$iter['fee'];
928 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
929 $pro14_inspay = $pro14_inspay +
$iter['ins_code'];
932 $pro14_insadj = $pro14_insadj +
$iter['ins_adjust_dollar'];
933 $pro14_patadj = $pro14_patadj +
$iter['pat_adjust_dollar'];
934 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
935 $pro14_patpay = $pro14_patpay +
$iter['pat_code'];
938 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
939 $pro14_insref = $pro14_insref +
$iter['ins_code'];
942 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
943 $pro14_patref = $pro14_patref +
$iter['pat_code'];
946 case $iter['provider_id'] = $provider_final_list[15]:
947 $pro15_user = $iter['provider_id'];
948 $pro15_fee = $pro15_fee +
$iter['fee'];
949 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
950 $pro15_inspay = $pro15_inspay +
$iter['ins_code'];
953 $pro15_insadj = $pro15_insadj +
$iter['ins_adjust_dollar'];
954 $pro15_patadj = $pro15_patadj +
$iter['pat_adjust_dollar'];
955 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
956 $pro15_patpay = $pro15_patpay +
$iter['pat_code'];
959 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
960 $pro15_insref = $pro15_insref +
$iter['ins_code'];
963 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
964 $pro15_patref = $pro15_patref +
$iter['pat_code'];
967 case $iter['provider_id'] = $provider_final_list[16]:
968 $pro16_user = $iter['provider_id'];
969 $pro16_fee = $pro16_fee +
$iter['fee'];
970 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
971 $pro16_inspay = $pro16_inspay +
$iter['ins_code'];
974 $pro16_insadj = $pro16_insadj +
$iter['ins_adjust_dollar'];
975 $pro16_patadj = $pro16_patadj +
$iter['pat_adjust_dollar'];
976 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
977 $pro16_patpay = $pro16_patpay +
$iter['pat_code'];
980 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
981 $pro16_insref = $pro16_insref +
$iter['ins_code'];
984 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
985 $pro16_patref = $pro16_patref +
$iter['pat_code'];
988 case $iter['provider_id'] = $provider_final_list[17]:
989 $pro17_user = $iter['provider_id'];
990 $pro17_fee = $pro17_fee +
$iter['fee'];
991 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
992 $pro17_inspay = $pro17_inspay +
$iter['ins_code'];
995 $pro17_insadj = $pro17_insadj +
$iter['ins_adjust_dollar'];
996 $pro17_patadj = $pro17_patadj +
$iter['pat_adjust_dollar'];
997 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
998 $pro17_patpay = $pro17_patpay +
$iter['pat_code'];
1001 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
1002 $pro17_insref = $pro17_insref +
$iter['ins_code'];
1005 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
1006 $pro17_patref = $pro17_patref +
$iter['pat_code'];
1009 case $iter['provider_id'] = $provider_final_list[18]:
1010 $pro18_user = $iter['provider_id'];
1011 $pro18_fee = $pro18_fee +
$iter['fee'];
1012 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
1013 $pro18_inspay = $pro18_inspay +
$iter['ins_code'];
1016 $pro18_insadj = $pro18_insadj +
$iter['ins_adjust_dollar'];
1017 $pro18_patadj = $pro18_patadj +
$iter['pat_adjust_dollar'];
1018 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
1019 $pro18_patpay = $pro18_patpay +
$iter['pat_code'];
1022 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
1023 $pro18_insref = $pro18_insref +
$iter['ins_code'];
1026 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
1027 $pro18_patref = $pro18_patref +
$iter['pat_code'];
1030 case $iter['provider_id'] = $provider_final_list[19]:
1031 $pro19_user = $iter['provider_id'];
1032 $pro19_fee = $pro19_fee +
$iter['fee'];
1033 if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') {
1034 $pro19_inspay = $pro19_inspay +
$iter['ins_code'];
1037 $pro19_insadj = $pro19_insadj +
$iter['ins_adjust_dollar'];
1038 $pro19_patadj = $pro19_patadj +
$iter['pat_adjust_dollar'];
1039 if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment') {
1040 $pro19_patpay = $pro19_patpay +
$iter['pat_code'];
1043 if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') {
1044 $pro19_insref = $pro19_insref +
$iter['ins_code'];
1047 if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') {
1048 $pro19_patref = $pro19_patref +
$iter['pat_code'];
1053 if ($the_first_time === 1) {
1054 $user = $iter['user'];
1055 $new_old_pid = $iter['pid'];
1056 $the_first_time = 0;
1059 if ($totals_only != 1) {
1060 if ($old_pid != $iter['pid'] and ($iter['code_type'] != 'payment_info')) {
1061 if ($old_pid === $new_old_pid) {
1063 $line_total_pay = 0;
1067 print "<div class='table-responsive'><table class='table'>"; // small table
1071 <!-- TODO
: Further replace with classes
-->
1073 <td
class='text text-center font-weight-bold' width
='70'>
1074 <?php
echo xlt("Date"); ?
>
1076 <td
class='text text-center font-weight-bold' width
='50'>
1077 <?php
echo xlt("Acct"); ?
>#
1079 <td
class='text text-center font-weight-bold' width
='100'>
1080 <?php
echo xlt("Name"); ?
>
1082 <td
class='text text-center font-weight-bold' width
='100'>
1083 <?php
echo xlt("Source"); ?
>
1085 <td
class='text text-center font-weight-bold' width
='100'>
1086 <?php
echo xlt("CPT"); ?
>
1088 <td
class='small text-center font-weight-bold' width
='100'>
1089 <?php
echo xlt("ICD"); ?
>
1091 <td
class='small text-center font-weight-bold' width
='100'>
1092 <?php
echo xlt("Charges"); ?
>
1094 <td
class='small text-center font-weight-bold' width
='100'>
1095 <?php
echo xlt("Payments") . '/' . xlt("Adj"); ?
>.
1100 $old_pid = $iter['pid'];
1103 // get dollar amounts to appear on pat,ins payments and copays
1105 if ($iter['code_type'] != 'payment_info') {
1106 if ($iter['code_type'] === 'COPAY' ||
$iter['code_type'] === 'Patient Payment' ||
$iter['code_type'] === 'Insurance Payment') { ?
>
1108 <td
class='text text-center' width
='70'>
1109 <?php
echo text(date("Y-m-d", strtotime($iter['date']))); ?
>
1111 <td
class='text text-center' width
='50'>
1112 <?php
echo text($iter['pid']); ?
>
1114 <td
class='text text-center' width
='180'>
1115 <?php
echo text($iter['last']) . ", " . text($iter['first']) ?
>
1118 <?php
if (($iter['ins_adjust_dollar']) != 0 and ($iter['code_type']) === 'Insurance Payment') { ?
>
1119 <td
class='text' width
='180'>
1120 <?php
echo xlt('Insurance Adjustment'); ?
>
1125 if (($iter['pat_adjust_dollar']) != 0 and ($iter['code_type']) === 'Patient Payment') { ?
>
1126 <td
class='text' width
='180'>
1127 <?php
echo xlt('Patient Adjustment'); ?
>
1131 <?php
if (($iter['ins_code']) > 0 and ($iter['code_type']) === 'Insurance Payment') { ?
>
1132 <td
class='text' width
='180'>
1133 <?php
echo xlt('Insurance Payment'); ?
>
1137 <?php
if (($iter['pat_code']) > 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') { ?
>
1138 <td
class='text' width
='180'>
1139 <?php
echo xlt('Patient Payment'); ?
>
1143 <?php
if (($iter['ins_code']) < 0 and ($iter['code_type']) === 'Insurance Payment') { ?
>
1144 <td
class='text' width
='180'>
1145 <?php
echo xlt('Insurance Credit'); ?
>
1149 <?php
if (($iter['pat_code']) < 0 and ($iter['code_type']) === 'Patient Payment' and $iter['paytype'] != 'PCP') { ?
>
1150 <td
class='text' width
='180'>
1151 <?php
echo xlt('Patient Credit'); ?
>
1155 <?php
if ($iter['paytype'] === 'PCP') { ?
>
1156 <td
class='text' width
='180'>
1157 <?php
echo xlt('COPAY'); ?
>
1161 <td
class='text' width
='100'>
1163 <td
class='text' width
='100'>
1165 <td
class='text' width
='100'>
1168 <?php
if (($iter['ins_adjust_dollar']) != 0 and ($iter['code_type']) === 'Insurance Payment') {
1169 $line_total_pay = $line_total_pay +
$iter['ins_adjust_dollar']; ?
>
1170 <td
class='text' width
='100'>
1171 <?php
echo text($iter['ins_adjust_dollar']) ?
>
1175 <?php
if (($iter['ins_code']) != 0 and ($iter['code_type']) === 'Insurance Payment') {
1176 $line_total_pay = $line_total_pay +
$iter['ins_code']; ?
>
1177 <td
class='text' width
='100'>
1178 <?php
echo text($iter['ins_code']); ?
>
1182 <?php
if (($iter['code_type']) != 'Patient Payment' and ($iter['code_type']) != 'Insurance Payment') {
1183 $line_total_pay = $line_total_pay +
$iter['code']; ?
>
1184 <td
class='text' width
='100'>
1185 <?php
echo text($iter['code']); ?
>
1189 <?php
if (($iter['pat_adjust_dollar']) != 0 and ($iter['code_type']) === 'Patient Payment') {
1190 $line_total_pay = $line_total_pay +
$iter['pat_adjust_dollar']; ?
>
1191 <td
class='text' width
='100'>
1192 <?php
echo text($iter['pat_adjust_dollar']); ?
>
1196 <?php
if (($iter['pat_code']) != 0 and ($iter['code_type']) === 'Patient Payment') {
1197 $line_total_pay = $line_total_pay +
$iter['pat_code']; ?
>
1198 <td
class='text' width
='100'>
1199 <?php
echo text($iter['pat_code']); ?
>
1203 <?php
if (($iter['code_type']) != 'Insurance Payment' and ($iter['code_type']) != 'Patient Payment' and $iter['paytype'] != 'PCP') { ?
>
1204 <td
class='text' width
='100'>
1205 <?php
echo text($iter['code_type']); ?
>
1209 <td
class='text' width
='100'>
1213 <?php
if ($iter['fee'] != 0) {
1214 $line_total = $line_total +
$iter['fee']; ?
>
1215 <td
class='text' width
='70'>
1216 <?php
echo text(date("Y-m-d", strtotime($iter['date']))); ?
>
1218 <td
class='text' width
='50'>
1219 <?php
echo text($iter['pid']); ?
>
1221 <td
class='text' width
='180'>
1222 <?php
echo text($iter['last']) . ", " . text($iter['first']); ?
>
1225 <?php
if ($GLOBALS['language_default'] === 'English (Standard)') { ?
>
1226 <td
class='text' width
='100'>
1227 <?php
echo text(ucwords(strtolower(substr($iter['code_text'], 0, 25)))); ?
>
1230 <td
class='text' width
='100'>
1231 <?php
echo text(substr($iter['code_text'], 0, 25)); ?
>
1235 <td
class='text' width
='100'>
1236 <?php
echo text($iter['code']); ?
>
1238 <td
class='small' width
='100'>
1239 <?php
echo text(substr($iter['justify'], 5, 3)); ?
>
1241 <td
class='small' width
='100'>
1242 <?php
echo text($iter['fee']); ?
>
1248 if ($iter['code_type'] === 'COPAY' ||
$iter['code_type'] === 'Patient Payment' ||
$iter['code_type'] === 'Insurance Payment' ||
$iter['fee'] != 0) {
1252 if ($res_count === $N) {
1253 print "</tr><tr>\n";
1259 if ($old_pid != $new_old_pid and ($iter['code_type'] != 'payment_info')) {
1260 $new_old_pid = $old_pid;
1272 if ($anypats === 0) {
1273 ?
><p
><?php
echo xlt('No Data to Process')?
></p
><?php
1276 // TEST TO SEE IF THERE IS INFORMATION IN THE VARAIBLES THEN ADD TO AN ARRAY FOR PRINTING
1277 if ($run_provider != 1) {
1278 if ($us0_fee != 0 ||
$us0_inspay != 0 ||
$us0_insadj != 0 ||
$us0_patadj != 0 ||
$us0_patpay != 0 ||
$us0_insref != 0 ||
$us0_patref != 0) {
1279 $user_info['user'][$k] = $us0_user;
1280 $user_info['fee'][$k] = $us0_fee;
1281 $user_info['inspay'][$k] = $us0_inspay;
1282 $user_info['insadj'][$k] = $us0_insadj;
1283 $user_info['insref'][$k] = $us0_insref;
1284 $user_info['patadj'][$k] = $us0_patadj;
1285 $user_info['patpay'][$k] = $us0_patpay;
1286 $user_info['patref'][$k] = $us0_patref;
1290 if ($us1_fee != 0 ||
$us1_inspay != 0 ||
$us1_insadj != 0 ||
$us1_patadj != 0 ||
$us1_patpay != 0 ||
$us1_insref != 0 ||
$us1_patref != 0) {
1291 $user_info['user'][$k] = $us1_user;
1292 $user_info['fee'][$k] = $us1_fee;
1293 $user_info['inspay'][$k] = $us1_inspay;
1294 $user_info['insadj'][$k] = $us1_insadj;
1295 $user_info['insref'][$k] = $us1_insref;
1296 $user_info['patadj'][$k] = $us1_patadj;
1297 $user_info['patpay'][$k] = $us1_patpay;
1298 $user_info['patref'][$k] = $us1_patref;
1302 if ($us2_fee != 0 ||
$us2_inspay != 0 ||
$us2_insadj != 0 ||
$us2_patadj != 0 ||
$us2_patpay != 0 ||
$us2_insref != 0 ||
$us2_patref != 0) {
1303 $user_info['user'][$k] = $us2_user;
1304 $user_info['fee'][$k] = $us2_fee;
1305 $user_info['inspay'][$k] = $us2_inspay;
1306 $user_info['insadj'][$k] = $us2_insadj;
1307 $user_info['insref'][$k] = $us2_insref;
1308 $user_info['patadj'][$k] = $us2_patadj;
1309 $user_info['patpay'][$k] = $us2_patpay;
1310 $user_info['patref'][$k] = $us2_patref;
1314 if ($us3_fee != 0 ||
$us3_inspay != 0 ||
$us3_insadj != 0 ||
$us3_patadj != 0 ||
$us3_patpay != 0 ||
$us3_insref != 0 ||
$us3_patref != 0) {
1315 $user_info['user'][$k] = $us3_user;
1316 $user_info['fee'][$k] = $us3_fee;
1317 $user_info['inspay'][$k] = $us3_inspay;
1318 $user_info['insadj'][$k] = $us3_insadj;
1319 $user_info['insref'][$k] = $us3_insref;
1320 $user_info['patadj'][$k] = $us3_patadj;
1321 $user_info['patpay'][$k] = $us3_patpay;
1322 $user_info['patref'][$k] = $us3_patref;
1326 if ($us4_fee != 0 ||
$us4_inspay != 0 ||
$us4_insadj != 0 ||
$us4_patadj != 0 ||
$us4_patpay != 0 ||
$us4_insref != 0 ||
$us4_patref != 0) {
1327 $user_info['user'][$k] = $us4_user;
1328 $user_info['fee'][$k] = $us4_fee;
1329 $user_info['inspay'][$k] = $us4_inspay;
1330 $user_info['insadj'][$k] = $us4_insadj;
1331 $user_info['insref'][$k] = $us4_insref;
1332 $user_info['patadj'][$k] = $us4_patadj;
1333 $user_info['patpay'][$k] = $us4_patpay;
1334 $user_info['patref'][$k] = $us4_patref;
1338 if ($us5_fee != 0 ||
$us5_inspay != 0 ||
$us5_insadj != 0 ||
$us5_patadj != 0 ||
$us5_patpay != 0 ||
$us5_insref != 0 ||
$us5_patref != 0) {
1339 $user_info['user'][$k] = $us5_user;
1340 $user_info['fee'][$k] = $us5_fee;
1341 $user_info['inspay'][$k] = $us5_inspay;
1342 $user_info['insadj'][$k] = $us5_insadj;
1343 $user_info['insref'][$k] = $us5_insref;
1344 $user_info['patadj'][$k] = $us5_patadj;
1345 $user_info['patpay'][$k] = $us5_patpay;
1346 $user_info['patref'][$k] = $us5_patref;
1350 if ($us6_fee != 0 ||
$us6_inspay != 0 ||
$us6_insadj != 0 ||
$us6_patadj != 0 ||
$us6_patpay != 0 ||
$us6_insref != 0 ||
$us6_patref != 0) {
1351 $user_info['user'][$k] = $us6_user;
1352 $user_info['fee'][$k] = $us6_fee;
1353 $user_info['inspay'][$k] = $us6_inspay;
1354 $user_info['insadj'][$k] = $us6_insadj;
1355 $user_info['insref'][$k] = $us6_insref;
1356 $user_info['patadj'][$k] = $us6_patadj;
1357 $user_info['patpay'][$k] = $us6_patpay;
1358 $user_info['patref'][$k] = $us6_patref;
1362 if ($us7_fee != 0 ||
$us7_inspay != 0 ||
$us7_insadj != 0 ||
$us7_patadj != 0 ||
$us7_patpay != 0 ||
$us7_insref != 0 ||
$us7_patref != 0) {
1363 $user_info['user'][$k] = $us7_user;
1364 $user_info['fee'][$k] = $us7_fee;
1365 $user_info['inspay'][$k] = $us7_inspay;
1366 $user_info['insadj'][$k] = $us7_insadj;
1367 $user_info['insref'][$k] = $us7_insref;
1368 $user_info['patadj'][$k] = $us7_patadj;
1369 $user_info['patpay'][$k] = $us7_patpay;
1370 $user_info['patref'][$k] = $us7_patref;
1374 if ($us8_fee != 0 ||
$us8_inspay != 0 ||
$us8_insadj != 0 ||
$us8_patadj != 0 ||
$us8_patpay != 0 ||
$us8_insref != 0 ||
$us8_patref != 0) {
1375 $user_info['user'][$k] = $us8_user;
1376 $user_info['fee'][$k] = $us8_fee;
1377 $user_info['inspay'][$k] = $us8_inspay;
1378 $user_info['insadj'][$k] = $us8_insadj;
1379 $user_info['insref'][$k] = $us8_insref;
1380 $user_info['patadj'][$k] = $us8_patadj;
1381 $user_info['patpay'][$k] = $us8_patpay;
1382 $user_info['patref'][$k] = $us8_patref;
1386 if ($us9_fee != 0 ||
$us9_inspay != 0 ||
$us9_insadj != 0 ||
$us9_patadj != 0 ||
$us9_patpay != 0 ||
$us9_insref != 0 ||
$us9_patref != 0) {
1387 $user_info['user'][$k] = $us9_user;
1388 $user_info['fee'][$k] = $us9_fee;
1389 $user_info['inspay'][$k] = $us9_inspay;
1390 $user_info['insadj'][$k] = $us9_insadj;
1391 $user_info['insref'][$k] = $us9_insref;
1392 $user_info['patadj'][$k] = $us9_patadj;
1393 $user_info['patpay'][$k] = $us9_patpay;
1394 $user_info['patref'][$k] = $us9_patref;
1398 if ($us10_fee != 0 ||
$us10_inspay != 0 ||
$us10_insadj != 0 ||
$us10_patadj != 0 ||
$us10_patpay != 0 ||
$us10_insref != 0 ||
$us10_patref != 0) {
1399 $user_info['user'][$k] = $us10_user;
1400 $user_info['fee'][$k] = $us10_fee;
1401 $user_info['inspay'][$k] = $us10_inspay;
1402 $user_info['insadj'][$k] = $us10_insadj;
1403 $user_info['insref'][$k] = $us10_insref;
1404 $user_info['patadj'][$k] = $us10_patadj;
1405 $user_info['patpay'][$k] = $us10_patpay;
1406 $user_info['patref'][$k] = $us10_patref;
1410 if ($us11_fee != 0 ||
$us11_inspay != 0 ||
$us11_insadj != 0 ||
$us11_patadj != 0 ||
$us11_patpay != 0 ||
$us11_insref != 0 ||
$us11_patref != 0) {
1411 $user_info['user'][$k] = $us11_user;
1412 $user_info['fee'][$k] = $us11_fee;
1413 $user_info['inspay'][$k] = $us11_inspay;
1414 $user_info['insadj'][$k] = $us11_insadj;
1415 $user_info['insref'][$k] = $us11_insref;
1416 $user_info['patadj'][$k] = $us11_patadj;
1417 $user_info['patpay'][$k] = $us11_patpay;
1418 $user_info['patref'][$k] = $us11_patref;
1422 if ($us12_fee != 0 ||
$us12_inspay != 0 ||
$us12_insadj != 0 ||
$us12_patadj != 0 ||
$us12_patpay != 0 ||
$us12_insref != 0 ||
$us12_patref != 0) {
1423 $user_info['user'][$k] = $us12_user;
1424 $user_info['fee'][$k] = $us12_fee;
1425 $user_info['inspay'][$k] = $us12_inspay;
1426 $user_info['insadj'][$k] = $us12_insadj;
1427 $user_info['insref'][$k] = $us12_insref;
1428 $user_info['patadj'][$k] = $us12_patadj;
1429 $user_info['patpay'][$k] = $us12_patpay;
1430 $user_info['patref'][$k] = $us12_patref;
1434 if ($us13_fee != 0 ||
$us13_inspay != 0 ||
$us13_insadj != 0 ||
$us13_patadj != 0 ||
$us13_patpay != 0 ||
$us13_insref != 0 ||
$us13_patref != 0) {
1435 $user_info['user'][$k] = $us13_user;
1436 $user_info['fee'][$k] = $us13_fee;
1437 $user_info['inspay'][$k] = $us13_inspay;
1438 $user_info['insadj'][$k] = $us13_insadj;
1439 $user_info['insref'][$k] = $us13_insref;
1440 $user_info['patadj'][$k] = $us13_patadj;
1441 $user_info['patpay'][$k] = $us13_patpay;
1442 $user_info['patref'][$k] = $us13_patref;
1446 if ($us14_fee != 0 ||
$us14_inspay != 0 ||
$us14_insadj != 0 ||
$us14_patadj != 0 ||
$us14_patpay != 0 ||
$us14_insref != 0 ||
$us14_patref != 0) {
1447 $user_info['user'][$k] = $us14_user;
1448 $user_info['fee'][$k] = $us14_fee;
1449 $user_info['inspay'][$k] = $us14_inspay;
1450 $user_info['insadj'][$k] = $us14_insadj;
1451 $user_info['insref'][$k] = $us14_insref;
1452 $user_info['patadj'][$k] = $us14_patadj;
1453 $user_info['patpay'][$k] = $us14_patpay;
1454 $user_info['patref'][$k] = $us14_patref;
1458 if ($us15_fee != 0 ||
$us15_inspay != 0 ||
$us15_insadj != 0 ||
$us15_patadj != 0 ||
$us15_patpay != 0 ||
$us15_insref != 0 ||
$us15_patref != 0) {
1459 $user_info['user'][$k] = $us15_user;
1460 $user_info['fee'][$k] = $us15_fee;
1461 $user_info['inspay'][$k] = $us15_inspay;
1462 $user_info['insadj'][$k] = $us15_insadj;
1463 $user_info['insref'][$k] = $us15_insref;
1464 $user_info['patadj'][$k] = $us15_patadj;
1465 $user_info['patpay'][$k] = $us15_patpay;
1466 $user_info['patref'][$k] = $us15_patref;
1470 if ($us16_fee != 0 ||
$us16_inspay != 0 ||
$us16_insadj != 0 ||
$us16_patadj != 0 ||
$us16_patpay != 0 ||
$us16_insref != 0 ||
$us16_patref != 0) {
1471 $user_info['user'][$k] = $us16_user;
1472 $user_info['fee'][$k] = $us16_fee;
1473 $user_info['inspay'][$k] = $us16_inspay;
1474 $user_info['insadj'][$k] = $us16_insadj;
1475 $user_info['insref'][$k] = $us16_insref;
1476 $user_info['patadj'][$k] = $us16_patadj;
1477 $user_info['patpay'][$k] = $us16_patpay;
1478 $user_info['patref'][$k] = $us16_patref;
1482 if ($us17_fee != 0 ||
$us17_inspay != 0 ||
$us17_insadj != 0 ||
$us17_patadj != 0 ||
$us17_patpay != 0 ||
$us17_insref != 0 ||
$us17_patref != 0) {
1483 $user_info['user'][$k] = $us17_user;
1484 $user_info['fee'][$k] = $us17_fee;
1485 $user_info['inspay'][$k] = $us17_inspay;
1486 $user_info['insadj'][$k] = $us17_insadj;
1487 $user_info['insref'][$k] = $us17_insref;
1488 $user_info['patadj'][$k] = $us17_patadj;
1489 $user_info['patpay'][$k] = $us17_patpay;
1490 $user_info['patref'][$k] = $us17_patref;
1494 if ($us18_fee != 0 ||
$us18_inspay != 0 ||
$us18_insadj != 0 ||
$us18_patadj != 0 ||
$us18_patpay != 0 ||
$us18_insref != 0 ||
$us18_patref != 0) {
1495 $user_info['user'][$k] = $us18_user;
1496 $user_info['fee'][$k] = $us18_fee;
1497 $user_info['inspay'][$k] = $us18_inspay;
1498 $user_info['insadj'][$k] = $us18_insadj;
1499 $user_info['insref'][$k] = $us18_insref;
1500 $user_info['patadj'][$k] = $us18_patadj;
1501 $user_info['patpay'][$k] = $us18_patpay;
1502 $user_info['patref'][$k] = $us18_patref;
1506 if ($us19_fee != 0 ||
$us19_inspay != 0 ||
$us19_insadj != 0 ||
$us19_patadj != 0 ||
$us19_patpay != 0 ||
$us19_insref != 0 ||
$us19_patref != 0) {
1507 $user_info['user'][$k] = $us19_user;
1508 $user_info['fee'][$k] = $us19_fee;
1509 $user_info['inspay'][$k] = $us19_inspay;
1510 $user_info['insadj'][$k] = $us19_insadj;
1511 $user_info['insref'][$k] = $us19_insref;
1512 $user_info['patadj'][$k] = $us19_patadj;
1513 $user_info['patpay'][$k] = $us19_patpay;
1514 $user_info['patref'][$k] = $us19_patref;
1519 if ($run_provider === 1) {
1520 if ($pro0_fee != 0 ||
$pro0_inspay != 0 ||
$pro0_insadj != 0 ||
$pro0_patadj != 0 ||
$pro0_patpay != 0 ||
$pro0_insref != 0 ||
$pro0_patref != 0) {
1521 $provider_info['user'][$k] = $pro0_user;
1522 $provider_info['fee'][$k] = $pro0_fee;
1523 $provider_info['inspay'][$k] = $pro0_inspay;
1524 $provider_info['insadj'][$k] = $pro0_insadj;
1525 $provider_info['insref'][$k] = $pro0_insref;
1526 $provider_info['patadj'][$k] = $pro0_patadj;
1527 $provider_info['patpay'][$k] = $pro0_patpay;
1528 $provider_info['patref'][$k] = $pro0_patref;
1532 if ($pro1_fee != 0 ||
$pro1_inspay != 0 ||
$pro1_insadj != 0 ||
$pro1_patadj != 0 ||
$pro1_patpay != 0 ||
$pro1_insref != 0 ||
$pro1_patref != 0) {
1533 $provider_info['user'][$k] = $pro1_user;
1534 $provider_info['fee'][$k] = $pro1_fee;
1535 $provider_info['inspay'][$k] = $pro1_inspay;
1536 $provider_info['insadj'][$k] = $pro1_insadj;
1537 $provider_info['insref'][$k] = $pro1_insref;
1538 $provider_info['patadj'][$k] = $pro1_patadj;
1539 $provider_info['patpay'][$k] = $pro1_patpay;
1540 $provider_info['patref'][$k] = $pro1_patref;
1544 if ($pro2_fee != 0 ||
$pro2_inspay != 0 ||
$pro2_insadj != 0 ||
$pro2_patadj != 0 ||
$pro2_patpay != 0 ||
$pro2_insref != 0 ||
$pro2_patref != 0) {
1545 $provider_info['user'][$k] = $pro2_user;
1546 $provider_info['fee'][$k] = $pro2_fee;
1547 $provider_info['inspay'][$k] = $pro2_inspay;
1548 $provider_info['insadj'][$k] = $pro2_insadj;
1549 $provider_info['insref'][$k] = $pro2_insref;
1550 $provider_info['patadj'][$k] = $pro2_patadj;
1551 $provider_info['patpay'][$k] = $pro2_patpay;
1552 $provider_info['patref'][$k] = $pro2_patref;
1556 if ($pro3_fee != 0 ||
$pro3_inspay != 0 ||
$pro3_insadj != 0 ||
$pro3_patadj != 0 ||
$pro3_patpay != 0 ||
$pro3_insref != 0 ||
$pro3_patref != 0) {
1557 $provider_info['user'][$k] = $pro3_user;
1558 $provider_info['fee'][$k] = $pro3_fee;
1559 $provider_info['inspay'][$k] = $pro3_inspay;
1560 $provider_info['insadj'][$k] = $pro3_insadj;
1561 $provider_info['insref'][$k] = $pro3_insref;
1562 $provider_info['patadj'][$k] = $pro3_patadj;
1563 $provider_info['patpay'][$k] = $pro3_patpay;
1564 $provider_info['patref'][$k] = $pro3_patref;
1568 if ($pro4_fee != 0 ||
$pro4_inspay != 0 ||
$pro4_insadj != 0 ||
$pro4_patadj != 0 ||
$pro4_patpay != 0 ||
$pro4_insref != 0 ||
$pro4_patref != 0) {
1569 $provider_info['user'][$k] = $pro4_user;
1570 $provider_info['fee'][$k] = $pro4_fee;
1571 $provider_info['inspay'][$k] = $pro4_inspay;
1572 $provider_info['insadj'][$k] = $pro4_insadj;
1573 $provider_info['insref'][$k] = $pro4_insref;
1574 $provider_info['patadj'][$k] = $pro4_patadj;
1575 $provider_info['patpay'][$k] = $pro4_patpay;
1576 $provider_info['patref'][$k] = $pro4_patref;
1580 if ($pro5_fee != 0 ||
$pro5_inspay != 0 ||
$pro5_insadj != 0 ||
$pro5_patadj != 0 ||
$pro5_patpay != 0 ||
$pro5_insref != 0 ||
$pro5_patref != 0) {
1581 $provider_info['user'][$k] = $pro5_user;
1582 $provider_info['fee'][$k] = $pro5_fee;
1583 $provider_info['inspay'][$k] = $pro5_inspay;
1584 $provider_info['insadj'][$k] = $pro5_insadj;
1585 $provider_info['insref'][$k] = $pro5_insref;
1586 $provider_info['patadj'][$k] = $pro5_patadj;
1587 $provider_info['patpay'][$k] = $pro5_patpay;
1588 $provider_info['patref'][$k] = $pro5_patref;
1592 if ($pro6_fee != 0 ||
$pro6_inspay != 0 ||
$pro6_insadj != 0 ||
$pro6_patadj != 0 ||
$pro6_patpay != 0 ||
$pro6_insref != 0 ||
$pro6_patref != 0) {
1593 $provider_info['user'][$k] = $pro6_user;
1594 $provider_info['fee'][$k] = $pro6_fee;
1595 $provider_info['inspay'][$k] = $pro6_inspay;
1596 $provider_info['insadj'][$k] = $pro6_insadj;
1597 $provider_info['insref'][$k] = $pro6_insref;
1598 $provider_info['patadj'][$k] = $pro6_patadj;
1599 $provider_info['patpay'][$k] = $pro6_patpay;
1600 $provider_info['patref'][$k] = $pro6_patref;
1604 if ($pro7_fee != 0 ||
$pro7_inspay != 0 ||
$pro7_insadj != 0 ||
$pro7_patadj != 0 ||
$pro7_patpay != 0 ||
$pro7_insref != 0 ||
$pro7_patref != 0) {
1605 $provider_info['user'][$k] = $pro7_user;
1606 $provider_info['fee'][$k] = $pro7_fee;
1607 $provider_info['inspay'][$k] = $pro7_inspay;
1608 $provider_info['insadj'][$k] = $pro7_insadj;
1609 $provider_info['insref'][$k] = $pro7_insref;
1610 $provider_info['patadj'][$k] = $pro7_patadj;
1611 $provider_info['patpay'][$k] = $pro7_patpay;
1612 $provider_info['patref'][$k] = $pro7_patref;
1616 if ($pro8_fee != 0 ||
$pro8_inspay != 0 ||
$pro8_insadj != 0 ||
$pro8_patadj != 0 ||
$pro8_patpay != 0 ||
$pro8_insref != 0 ||
$pro8_patref != 0) {
1617 $provider_info['user'][$k] = $pro8_user;
1618 $provider_info['fee'][$k] = $pro8_fee;
1619 $provider_info['inspay'][$k] = $pro8_inspay;
1620 $provider_info['insadj'][$k] = $pro8_insadj;
1621 $provider_info['insref'][$k] = $pro8_insref;
1622 $provider_info['patadj'][$k] = $pro8_patadj;
1623 $provider_info['patpay'][$k] = $pro8_patpay;
1624 $provider_info['patref'][$k] = $pro8_patref;
1628 if ($pro9_fee != 0 ||
$pro9_inspay != 0 ||
$pro9_insadj != 0 ||
$pro9_patadj != 0 ||
$pro9_patpay != 0 ||
$pro9_insref != 0 ||
$pro9_patref != 0) {
1629 $provider_info['user'][$k] = $pro9_user;
1630 $provider_info['fee'][$k] = $pro9_fee;
1631 $provider_info['inspay'][$k] = $pro9_inspay;
1632 $provider_info['insadj'][$k] = $pro9_insadj;
1633 $provider_info['insref'][$k] = $pro9_insref;
1634 $provider_info['patadj'][$k] = $pro9_patadj;
1635 $provider_info['patpay'][$k] = $pro9_patpay;
1636 $provider_info['patref'][$k] = $pro9_patref;
1640 if ($pro10_fee != 0 ||
$pro10_inspay != 0 ||
$pro10_insadj != 0 ||
$pro10_patadj != 0 ||
$pro10_patpay != 0 ||
$pro10_insref != 0 ||
$pro10_patref != 0) {
1641 $provider_info['user'][$k] = $pro10_user;
1642 $provider_info['fee'][$k] = $pro10_fee;
1643 $provider_info['inspay'][$k] = $pro10_inspay;
1644 $provider_info['insadj'][$k] = $pro10_insadj;
1645 $provider_info['insref'][$k] = $pro10_insref;
1646 $provider_info['patadj'][$k] = $pro10_patadj;
1647 $provider_info['patpay'][$k] = $pro10_patpay;
1648 $provider_info['patref'][$k] = $pro10_patref;
1652 if ($pro11_fee != 0 ||
$pro11_inspay != 0 ||
$pro11_insadj != 0 ||
$pro11_patadj != 0 ||
$pro11_patpay != 0 ||
$pro11_insref != 0 ||
$pro11_patref != 0) {
1653 $provider_info['user'][$k] = $pro11_user;
1654 $provider_info['fee'][$k] = $pro11_fee;
1655 $provider_info['inspay'][$k] = $pro11_inspay;
1656 $provider_info['insadj'][$k] = $pro11_insadj;
1657 $provider_info['insref'][$k] = $pro11_insref;
1658 $provider_info['patadj'][$k] = $pro11_patadj;
1659 $provider_info['patpay'][$k] = $pro11_patpay;
1660 $provider_info['patref'][$k] = $pro11_patref;
1664 if ($pro12_fee != 0 ||
$pro12_inspay != 0 ||
$pro12_insadj != 0 ||
$pro12_patadj != 0 ||
$pro12_patpay != 0 ||
$pro12_insref != 0 ||
$pro12_patref != 0) {
1665 $provider_info['user'][$k] = $pro12_user;
1666 $provider_info['fee'][$k] = $pro12_fee;
1667 $provider_info['inspay'][$k] = $pro12_inspay;
1668 $provider_info['insadj'][$k] = $pro12_insadj;
1669 $provider_info['insref'][$k] = $pro12_insref;
1670 $provider_info['patadj'][$k] = $pro12_patadj;
1671 $provider_info['patpay'][$k] = $pro12_patpay;
1672 $provider_info['patref'][$k] = $pro12_patref;
1676 if ($pro13_fee != 0 ||
$pro13_inspay != 0 ||
$pro13_insadj != 0 ||
$pro13_patadj != 0 ||
$pro13_patpay != 0 ||
$pro13_insref != 0 ||
$pro13_patref != 0) {
1677 $provider_info['user'][$k] = $pro13_user;
1678 $provider_info['fee'][$k] = $pro13_fee;
1679 $provider_info['inspay'][$k] = $pro13_inspay;
1680 $provider_info['insadj'][$k] = $pro13_insadj;
1681 $provider_info['insref'][$k] = $pro13_insref;
1682 $provider_info['patadj'][$k] = $pro13_patadj;
1683 $provider_info['patpay'][$k] = $pro13_patpay;
1684 $provider_info['patref'][$k] = $pro13_patref;
1688 if ($pro14_fee != 0 ||
$pro14_inspay != 0 ||
$pro14_insadj != 0 ||
$pro14_patadj != 0 ||
$pro14_patpay != 0 ||
$pro14_insref != 0 ||
$pro14_patref != 0) {
1689 $provider_info['user'][$k] = $pro14_user;
1690 $provider_info['fee'][$k] = $pro14_fee;
1691 $provider_info['inspay'][$k] = $pro14_inspay;
1692 $provider_info['insadj'][$k] = $pro14_insadj;
1693 $provider_info['insref'][$k] = $pro14_insref;
1694 $provider_info['patadj'][$k] = $pro14_patadj;
1695 $provider_info['patpay'][$k] = $pro14_patpay;
1696 $provider_info['patref'][$k] = $pro14_patref;
1700 if ($pro15_fee != 0 ||
$pro15_inspay != 0 ||
$pro15_insadj != 0 ||
$pro15_patadj != 0 ||
$pro15_patpay != 0 ||
$pro15_insref != 0 ||
$pro15_patref != 0) {
1701 $provider_info['user'][$k] = $pro15_user;
1702 $provider_info['fee'][$k] = $pro15_fee;
1703 $provider_info['inspay'][$k] = $pro15_inspay;
1704 $provider_info['insadj'][$k] = $pro15_insadj;
1705 $provider_info['insref'][$k] = $pro15_insref;
1706 $provider_info['patadj'][$k] = $pro15_patadj;
1707 $provider_info['patpay'][$k] = $pro15_patpay;
1708 $provider_info['patref'][$k] = $pro15_patref;
1712 if ($pro16_fee != 0 ||
$pro16_inspay != 0 ||
$pro16_insadj != 0 ||
$pro16_patadj != 0 ||
$pro16_patpay != 0 ||
$pro16_insref != 0 ||
$pro16_patref != 0) {
1713 $provider_info['user'][$k] = $pro16_user;
1714 $provider_info['fee'][$k] = $pro16_fee;
1715 $provider_info['inspay'][$k] = $pro16_inspay;
1716 $provider_info['insadj'][$k] = $pro16_insadj;
1717 $provider_info['insref'][$k] = $pro16_insref;
1718 $provider_info['patadj'][$k] = $pro16_patadj;
1719 $provider_info['patpay'][$k] = $pro16_patpay;
1720 $provider_info['patref'][$k] = $pro16_patref;
1724 if ($pro17_fee != 0 ||
$pro17_inspay != 0 ||
$pro17_insadj != 0 ||
$pro17_patadj != 0 ||
$pro17_patpay != 0 ||
$pro17_insref != 0 ||
$pro17_patref != 0) {
1725 $provider_info['user'][$k] = $pro17_user;
1726 $provider_info['fee'][$k] = $pro17_fee;
1727 $provider_info['inspay'][$k] = $pro17_inspay;
1728 $provider_info['insadj'][$k] = $pro17_insadj;
1729 $provider_info['insref'][$k] = $pro17_insref;
1730 $provider_info['patadj'][$k] = $pro17_patadj;
1731 $provider_info['patpay'][$k] = $pro17_patpay;
1732 $provider_info['patref'][$k] = $pro17_patref;
1736 if ($pro18_fee != 0 ||
$pro18_inspay != 0 ||
$pro18_insadj != 0 ||
$pro18_patadj != 0 ||
$pro18_patpay != 0 ||
$pro18_insref != 0 ||
$pro18_patref != 0) {
1737 $provider_info['user'][$k] = $pro18_user;
1738 $provider_info['fee'][$k] = $pro18_fee;
1739 $provider_info['inspay'][$k] = $pro18_inspay;
1740 $provider_info['insadj'][$k] = $pro18_insadj;
1741 $provider_info['insref'][$k] = $pro18_insref;
1742 $provider_info['patadj'][$k] = $pro18_patadj;
1743 $provider_info['patpay'][$k] = $pro18_patpay;
1744 $provider_info['patref'][$k] = $pro18_patref;
1748 if ($pro19_fee != 0 ||
$pro19_inspay != 0 ||
$pro19_insadj != 0 ||
$pro19_patadj != 0 ||
$pro19_patpay != 0 ||
$pro19_insref != 0 ||
$pro19_patref != 0) {
1749 $provider_info['user'][$k] = $pro19_user;
1750 $provider_info['fee'][$k] = $pro19_fee;
1751 $provider_info['inspay'][$k] = $pro19_inspay;
1752 $provider_info['insadj'][$k] = $pro19_insadj;
1753 $provider_info['insref'][$k] = $pro19_insref;
1754 $provider_info['patadj'][$k] = $pro19_patadj;
1755 $provider_info['patpay'][$k] = $pro19_patpay;
1756 $provider_info['patref'][$k] = $pro19_patref;
1761 if ($totals_only === 1) {
1762 $from_date = oeFormatShortDate(substr($query_part_day, 37, 10));
1763 $to_date = oeFormatShortDate(substr($query_part_day, 63, 10));?
>
1766 <p
><?php
echo xlt('Totals for ') . text($from_date) . ' ' . xlt('To{{Range}}') . ' ' . text($to_date) ?
></p
>
1770 <?php
if ($run_provider != 1) { ?
>
1771 <table
class='table table-borderless'>
1775 <td
class='text' width
='25'>
1777 <td
class='text text-center font-weight-bold' width
='250'>
1778 <?php
echo xlt("User"); ?
>
1780 <td
class='text' width
='125'>
1782 <td
class='text text-center font-weight-bold' width
='250'>
1783 <?php
echo xlt("Charges"); ?
>
1785 <td
class='text' width
='125'>
1787 <td
class='text text-center font-weight-bold' width
='250'>
1788 <?php
echo xlt("Payments"); ?
>
1790 <td
class='text' width
='25'>
1792 <?php
for ($i = 1; $i < $k;) { ?
>
1795 <table
class='table table-borderless'>
1797 <td
class='text' width
='25'>
1799 <td
class='text' width
='250'>
1800 <?php
echo text($user_info['user'][$i]); ?
>
1802 <td
class='text' width
='125'>
1804 <td
class='text font-weight-bold' width
='250'>
1805 <?php
printf(xlt("Total Charges") . ': ' . "%1\$.2f", text($user_info['fee'][$i])); ?
>
1807 <td
class='text' width
='125'>
1809 <td
class='text font-weight-bold' width
='250'>
1810 <?php
printf(xlt("Total Payments") . ': ' . "(%1\$.2f)", text($user_info['inspay'][$i] +
$user_info['patpay'][$i])); ?
>
1812 <td
class='text' width
='25'>
1816 <table
class='table table-borderless'>
1818 <td
class='text' width
='25'>
1820 <td
class='text' width
='250'>
1822 <td
class='text' width
='125'>
1824 <td
class='text font-weight-bold' width
='250'>
1825 <?php
printf(xlt("Total Adj") . '.: ' . "(%1\$.2f)", text($user_info['patadj'][$i] +
$user_info['insadj'][$i])); ?
>
1827 <td width
='125'><span
class='text'></span
></td
>
1828 <td
class='text font-weight-bold' width
='250'>
1829 <?php
printf(xlt("Refund") . ': ' . "(%1\$.2f)", text($user_info['patref'][$i] +
$user_info['insref'][$i])); ?
>
1831 <td
class='text' width
='25'>
1834 <table
class='table table-borderless'>
1836 <td
class='text' width
='25'>
1838 <td
class='text' width
='250'>
1840 <td
class='text' width
='125'>
1842 <td
class='text' width
='250'>
1844 <td
class='text' width
='125'>
1846 <td
class='text font-weight-bold' width
='175' height
='5'>
1849 <td
class='text' width
='25'>
1853 <table
class='table table-borderless'>
1855 <td
class='text' width
='25'>
1857 <td
class='text' width
='250'>
1859 <td
class='text' width
='125'>
1861 <td
class='text' width
='250'>
1863 <td
class='text' width
='125'>
1865 <td
class='text font-weight-bold' width
='250'>
1866 <?php
printf(xlt("Actual Receipts") . ': ' . "(%1\$.2f)", text($user_info['patref'][$i] +
$user_info['insref'][$i] +
$user_info['inspay'][$i] +
$user_info['patpay'][$i])); ?
>
1868 <td
class='text' width
='25'>
1872 <table
class='table table-borderless'>
1874 <td
class='text' width
='25'>
1876 <td
class='text' width
='250'>
1878 <td
class='text' width
='125'>
1880 <td
class='text' width
='250'>
1882 <td
class='text' width
='125'>
1884 <td
class='text' width
='125'>
1886 <td
class='text' width
='25'>
1889 $gtotal_fee = $gtotal_fee +
$user_info['fee'][$i];
1890 $gtotal_insadj = $gtotal_insadj +
$user_info['insadj'][$i];
1891 $gtotal_inspay = $gtotal_inspay +
$user_info['inspay'][$i];
1892 $gtotal_patadj = $gtotal_patadj +
$user_info['patadj'][$i];
1893 $gtotal_patpay = $gtotal_patpay +
$user_info['patpay'][$i];
1897 print "<br /></td></tr>";
1905 <table
class='table table-borderless'>
1909 <td
class='text' width
='25'>
1911 <td
class='text text-center' width
='250'>
1912 <?php
echo xlt("Provider"); ?
>
1914 <td
class='text' width
='125'></td
>
1915 <td
class='text text-center' width
='250'>
1916 <?php
echo xlt("Charges"); ?
>
1918 <td
class='text' width
='125'>
1920 <td
class='text text-center' width
='250'>
1921 <?php
echo xlt("Payments"); ?
>
1923 <td
class='text' width
='25'>
1925 <?php
for ($i = 1; $i < $k;) { ?
>
1928 <table
class='table table-borderless'>
1930 <td
class='text' width
='25'>
1932 <td
class='text text-center' width
='250'>
1933 <?php
echo text($provider_info['user'][$i]); ?
>
1935 <td
class='text' width
='125'>
1937 <td
class='text font-weight-bold' width
='250'>
1938 <?php
printf(xlt("Total Charges") . ': ' . " %1\$.2f ", text($provider_info['fee'][$i])); ?
>
1940 <td
class='text' width
='125'>
1942 <td
class='text font-weight-bold' width
='250'>
1943 <?php
printf(xlt("Total Payments") . ': ' . "(%1\$.2f)", text($provider_info['inspay'][$i] +
$provider_info['patpay'][$i])); ?
>
1945 <td
class='text' width
='25'>
1949 <table
class='table table-borderless'>
1951 <td
class='text' width
='25'>
1953 <td
class='text' width
='250'>
1955 <td
class='text' width
='125'>
1957 <td
class='text font-weight-bold' width
='250'>
1958 <?php
printf(xlt("Total Adj") . '.: ' . "(%1\$.2f)", text($provider_info['patadj'][$i] +
$provider_info['insadj'][$i])); ?
>
1960 <td
class='text' width
='125'>
1962 <td
class='text font-weight-bold' width
='250'>
1963 <?php
printf(xlt("Refund") . ': ' . "(%1\$.2f)", text($provider_info['patref'][$i] +
$provider_info['insref'][$i])); ?
>
1965 <td
class='text' width
='25'>
1969 <table
class='table table-borderless'>
1971 <td
class='text' width
='25'>
1973 <td
class='text' width
='250'>
1975 <td
class='text' width
='125'>
1977 <td
class='text' width
='250'>
1979 <td
class='text' width
='125'>
1981 <td
class='text' width
='175' height
='5'>
1984 <td
class='text' width
='25'>
1988 <table
class='table table-borderless'>
1990 <td
class='text' width
='25'>
1992 <td
class='text' width
='250'>
1994 <td
class='text' width
='125'>
1996 <td
class='text' width
='250'>
1998 <td
class='text' width
='125'>
2000 <td
class='text font-weight-bold' width
='250'>
2001 <?php
printf(xlt("Actual Receipts") . ': ' . "(%1\$.2f)", text($provider_info['patref'][$i] +
$provider_info['insref'][$i] +
$provider_info['inspay'][$i] +
$provider_info['patpay'][$i])); ?
>
2003 <td
class='text' width
='25'>
2006 <table
class='table table-borderless'>
2008 <td
class='text' width
='25'>
2010 <td
class='text' width
='250'>
2012 <td
class='text' width
='125'>
2014 <td
class='text' width
='250'>
2016 <td
class='text' width
='125'>
2018 <td
class='text' width
='125'>
2020 <td
class='text' width
='25'>
2023 $gtotal_fee = $gtotal_fee +
$provider_info['fee'][$i];
2024 $gtotal_insadj = $gtotal_insadj +
$provider_info['insadj'][$i];
2025 $gtotal_inspay = $gtotal_inspay +
$provider_info['inspay'][$i];
2026 $gtotal_insref = $gtotal_insref +
$provider_info['insref'][$i];
2027 $gtotal_patadj = $gtotal_patadj +
$provider_info['patadj'][$i];
2028 $gtotal_patpay = $gtotal_patpay +
$provider_info['patpay'][$i];
2029 $gtotal_patref = $gtotal_patref +
$provider_info['patref'][$i];
2033 print "<br /></td></tr>";
2036 print "<br /></td>";