Add title to all appointment sql queries (#7311)
[openemr.git] / interface / billing / print_daysheet_report_num1.php
blob03045533c2c4f61838da68d655767caf52879ce6
1 <?php
3 /*
4 * interface/billing/print_daysheet_report.php Genetating an end of day report.
6 * Program for Generating an End of Day report
9 * @package OpenEMR
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")]);
29 exit;
32 //global variables:
33 if (!isset($_GET["mode"])) {
34 if (!isset($_GET["from_date"])) {
35 $from_date = date("Y-m-d");
36 } else {
37 $from_date = $_GET["from_date"];
40 if (!isset($_GET["to_date"])) {
41 $to_date = date("Y-m-d");
42 } else {
43 $to_date = $_GET["to_date"];
46 if (!isset($_GET["code_type"])) {
47 $code_type = "all";
48 } else {
49 $code_type = $_GET["code_type"];
52 if (!isset($_GET["unbilled"])) {
53 $unbilled = "on";
54 } else {
55 $unbilled = $_GET["unbilled"];
58 if (!isset($_GET["authorized"])) {
59 $my_authorized = "on";
60 } else {
61 $my_authorized = $_GET["authorized"];
63 } else {
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"];
73 <html>
74 <head>
76 <?php Header::setupHeader(); ?>
78 </head>
79 <body>
80 <div class="container">
81 <div class="row">
82 <a href="javascript:window.close();" target="Main"><p class="title"><?php echo xlt('Day Sheet Report')?></p></a>
83 <br />
85 <?php
86 if ($my_authorized === 'on') {
87 $my_authorized = true;
88 } else {
89 $my_authorized = '%';
92 if ($unbilled === 'on') {
93 $unbilled = '0';
94 } else {
95 $unbilled = '%';
98 if ($code_type === 'all') {
99 $code_type = '%';
102 if (!isset($_GET["mode"])) {
103 if (!isset($_GET["from_date"])) {
104 $from_date = date("Y-m-d");
105 } else {
106 $from_date = $_GET["from_date"];
109 if (!isset($_GET["to_date"])) {
110 $to_date = date("Y-m-d");
111 } else {
112 $to_date = $_GET["to_date"];
115 if (!isset($_GET["code_type"])) {
116 $code_type = "all";
117 } else {
118 $code_type = $_GET["code_type"];
121 if (!isset($_GET["unbilled"])) {
122 $unbilled = "on";
123 } else {
124 $unbilled = $_GET["unbilled"];
127 if (!isset($_GET["authorized"])) {
128 $my_authorized = "on";
129 } else {
130 $my_authorized = $_GET["authorized"];
132 } else {
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;
142 } else {
143 $my_authorized = '%';
146 if ($unbilled === 'on') {
147 $unbilled = '0';
148 } else {
149 $unbilled = '%';
152 if ($code_type === 'all') {
153 $code_type = '%';
156 if (isset($_GET["mode"]) && $_GET["mode"] === 'bill') {
157 billCodesList($list);
160 $res_count = 0;
161 $N = 1;
162 $k = 1;
163 $anypats = 0;
164 $the_first_time = 1;
165 $itero = array();
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);
170 $run_provider = 0;
171 $old_pid = -1;
172 $first_time = 1;
173 $new_old_pid = -1;
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) {
197 $run_provider = 1;
200 if ($_POST['end_of_day_totals_only'] == 1) {
201 $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'];
227 break;
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'];
248 break;
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'];
269 break;
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'];
290 break;
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'];
311 break;
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'];
332 break;
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'];
353 break;
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'];
374 break;
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'];
395 break;
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'];
416 break;
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'];
437 break;
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'];
458 break;
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'];
479 break;
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'];
500 break;
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'];
521 break;
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'];
542 break;
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'];
563 break;
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'];
584 break;
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'];
605 break;
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'];
626 break;
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'];
651 break;
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'];
672 break;
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'];
693 break;
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'];
714 break;
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'];
735 break;
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'];
756 break;
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'];
777 break;
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'];
798 break;
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'];
819 break;
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'];
840 break;
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'];
861 break;
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'];
882 break;
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'];
903 break;
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'];
924 break;
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'];
945 break;
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'];
966 break;
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'];
987 break;
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'];
1008 break;
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'];
1029 break;
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'];
1050 break;
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) {
1062 $line_total = 0;
1063 $line_total_pay = 0;
1066 if ($first_time) {
1067 print "<div class='table-responsive'><table class='table'>"; // small table
1068 $first_time = 0;
1069 } ?>
1071 <!-- TODO: Further replace with classes -->
1072 <tr>
1073 <td class='text text-center font-weight-bold' width='70'>
1074 <?php echo xlt("Date"); ?>
1075 </td>
1076 <td class='text text-center font-weight-bold' width='50'>
1077 <?php echo xlt("Acct"); ?>#
1078 </td>
1079 <td class='text text-center font-weight-bold' width='100'>
1080 <?php echo xlt("Name"); ?>
1081 </td>
1082 <td class='text text-center font-weight-bold' width='100'>
1083 <?php echo xlt("Source"); ?>
1084 </td>
1085 <td class='text text-center font-weight-bold' width='100'>
1086 <?php echo xlt("CPT"); ?>
1087 </td>
1088 <td class='small text-center font-weight-bold' width='100'>
1089 <?php echo xlt("ICD"); ?>
1090 </td>
1091 <td class='small text-center font-weight-bold' width='100'>
1092 <?php echo xlt("Charges"); ?>
1093 </td>
1094 <td class='small text-center font-weight-bold' width='100'>
1095 <?php echo xlt("Payments") . '/' . xlt("Adj"); ?>.
1096 </td>
1097 </tr>
1098 <?php
1099 //Next patient
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') { ?>
1107 <tr>
1108 <td class='text text-center' width='70'>
1109 <?php echo text(date("Y-m-d", strtotime($iter['date']))); ?>
1110 </td>
1111 <td class='text text-center' width='50'>
1112 <?php echo text($iter['pid']); ?>
1113 </td>
1114 <td class='text text-center' width='180'>
1115 <?php echo text($iter['last']) . ", " . text($iter['first']) ?>
1116 </td>
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'); ?>
1121 </td>
1122 <?php } ?>
1124 <?php
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'); ?>
1128 </td>
1129 <?php } ?>
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'); ?>
1134 </td>
1135 <?php } ?>
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'); ?>
1140 </td>
1141 <?php } ?>
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'); ?>
1146 </td>
1147 <?php } ?>
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'); ?>
1152 </td>
1153 <?php } ?>
1155 <?php if ($iter['paytype'] === 'PCP') { ?>
1156 <td class='text' width='180'>
1157 <?php echo xlt('COPAY'); ?>
1158 </td>
1159 <?php } ?>
1161 <td class='text' width='100'>
1162 </td>
1163 <td class='text' width='100'>
1164 </td>
1165 <td class='text' width='100'>
1166 </td>
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']) ?>
1172 </td>
1173 <?php } ?>
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']); ?>
1179 </td>
1180 <?php } ?>
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']); ?>
1186 </td>
1187 <?php } ?>
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']); ?>
1193 </td>
1194 <?php } ?>
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']); ?>
1200 </td>
1201 <?php } ?>
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']); ?>
1206 </td>
1207 <?php } ?>
1209 <td class='text' width='100'>
1210 </td>
1212 <?php } else { ?>
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']))); ?>
1217 </td>
1218 <td class='text' width='50'>
1219 <?php echo text($iter['pid']); ?>
1220 </td>
1221 <td class='text' width='180'>
1222 <?php echo text($iter['last']) . ", " . text($iter['first']); ?>
1223 </td>
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)))); ?>
1228 </td>
1229 <?php } else { ?>
1230 <td class='text' width='100'>
1231 <?php echo text(substr($iter['code_text'], 0, 25)); ?>
1232 </td>
1233 <?php } ?>
1235 <td class='text' width='100'>
1236 <?php echo text($iter['code']); ?>
1237 </td>
1238 <td class='small' width='100'>
1239 <?php echo text(substr($iter['justify'], 5, 3)); ?>
1240 </td>
1241 <td class='small' width='100'>
1242 <?php echo text($iter['fee']); ?>
1243 </td>
1244 <?php
1248 if ($iter['code_type'] === 'COPAY' || $iter['code_type'] === 'Patient Payment' || $iter['code_type'] === 'Insurance Payment' || $iter['fee'] != 0) {
1249 $res_count++;
1252 if ($res_count === $N) {
1253 print "</tr><tr>\n";
1254 $res_count = 0;
1257 $itero = $iter;
1259 if ($old_pid != $new_old_pid and ($iter['code_type'] != 'payment_info')) {
1260 $new_old_pid = $old_pid;
1265 // end totals only
1268 // end for
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;
1287 ++$k;
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;
1299 ++$k;
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;
1311 ++$k;
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;
1323 ++$k;
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;
1335 ++$k;
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;
1347 ++$k;
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;
1359 ++$k;
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;
1371 ++$k;
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;
1383 ++$k;
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;
1395 ++$k;
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;
1407 ++$k;
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;
1419 ++$k;
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;
1431 ++$k;
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;
1443 ++$k;
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;
1455 ++$k;
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;
1467 ++$k;
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;
1479 ++$k;
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;
1491 ++$k;
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;
1503 ++$k;
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;
1515 ++$k;
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;
1529 ++$k;
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;
1541 ++$k;
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;
1553 ++$k;
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;
1565 ++$k;
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;
1577 ++$k;
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;
1589 ++$k;
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;
1601 ++$k;
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;
1613 ++$k;
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;
1625 ++$k;
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;
1637 ++$k;
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;
1649 ++$k;
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;
1661 ++$k;
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;
1673 ++$k;
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;
1685 ++$k;
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;
1697 ++$k;
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;
1709 ++$k;
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;
1721 ++$k;
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;
1733 ++$k;
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;
1745 ++$k;
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;
1757 ++$k;
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));?>
1764 <br />
1765 <br />
1766 <p><?php echo xlt('Totals for ') . text($from_date) . ' ' . xlt('To{{Range}}') . ' ' . text($to_date) ?></p>
1767 <?php } ?>
1770 <?php if ($run_provider != 1) { ?>
1771 <table class='table table-borderless'>
1772 <tr>
1773 <br />
1774 <br />
1775 <td class='text' width='25'>
1776 </td>
1777 <td class='text text-center font-weight-bold' width='250'>
1778 <?php echo xlt("User"); ?>
1779 </td>
1780 <td class='text' width='125'>
1781 </td>
1782 <td class='text text-center font-weight-bold' width='250'>
1783 <?php echo xlt("Charges"); ?>
1784 </td>
1785 <td class='text' width='125'>
1786 </td>
1787 <td class='text text-center font-weight-bold' width='250'>
1788 <?php echo xlt("Payments"); ?>
1789 </td>
1790 <td class='text' width='25'>
1792 <?php for ($i = 1; $i < $k;) { ?>
1793 <br />
1794 </td>
1795 <table class='table table-borderless'>
1796 <tr>
1797 <td class='text' width='25'>
1798 </td>
1799 <td class='text' width='250'>
1800 <?php echo text($user_info['user'][$i]); ?>
1801 </td>
1802 <td class='text' width='125'>
1803 </td>
1804 <td class='text font-weight-bold' width='250'>
1805 <?php printf(xlt("Total Charges") . ': ' . "%1\$.2f", text($user_info['fee'][$i])); ?>
1806 </td>
1807 <td class='text' width='125'>
1808 </td>
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])); ?>
1811 </td>
1812 <td class='text' width='25'>
1813 <br />
1814 </td>
1816 <table class='table table-borderless'>
1817 <tr>
1818 <td class='text' width='25'>
1819 </td>
1820 <td class='text' width='250'>
1821 </td>
1822 <td class='text' width='125'>
1823 </td>
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])); ?>
1826 </td>
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])); ?>
1830 </td>
1831 <td class='text' width='25'>
1832 <br />
1833 </td>
1834 <table class='table table-borderless'>
1835 <tr>
1836 <td class='text' width='25'>
1837 </td>
1838 <td class='text' width='250'>
1839 </td>
1840 <td class='text' width='125'>
1841 </td>
1842 <td class='text' width='250'>
1843 </td>
1844 <td class='text' width='125'>
1845 </td>
1846 <td class='text font-weight-bold' width='175' height='5'>
1847 <hr />
1848 </td>
1849 <td class='text' width='25'>
1850 <br />
1851 </td>
1853 <table class='table table-borderless'>
1854 <tr>
1855 <td class='text' width='25'>
1856 </td>
1857 <td class='text' width='250'>
1858 </td>
1859 <td class='text' width='125'>
1860 </td>
1861 <td class='text' width='250'>
1862 </td>
1863 <td class='text' width='125'>
1864 </td>
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])); ?>
1867 </td>
1868 <td class='text' width='25'>
1869 <br />
1870 </td>
1872 <table class='table table-borderless'>
1873 <tr>
1874 <td class='text' width='25'>
1875 </td>
1876 <td class='text' width='250'>
1877 </td>
1878 <td class='text' width='125'>
1879 </td>
1880 <td class='text' width='250'>
1881 </td>
1882 <td class='text' width='125'>
1883 </td>
1884 <td class='text' width='125'>
1885 </td>
1886 <td class='text' width='25'>
1888 <?php
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];
1895 ++$i;
1897 print "<br /></td></tr>";
1898 } ?>
1900 <br />
1901 </td>
1902 </table>
1903 </div>
1904 <?php } else { ?>
1905 <table class='table table-borderless'>
1906 <tr>
1907 <br />
1908 <br />
1909 <td class='text' width='25'>
1910 </td>
1911 <td class='text text-center' width='250'>
1912 <?php echo xlt("Provider"); ?>
1913 </td>
1914 <td class='text' width='125'></td>
1915 <td class='text text-center' width='250'>
1916 <?php echo xlt("Charges"); ?>
1917 </td>
1918 <td class='text' width='125'>
1919 </td>
1920 <td class='text text-center' width='250'>
1921 <?php echo xlt("Payments"); ?>
1922 </td>
1923 <td class='text' width='25'>
1925 <?php for ($i = 1; $i < $k;) { ?>
1926 <br />
1927 </td>
1928 <table class='table table-borderless'>
1929 <tr>
1930 <td class='text' width='25'>
1931 </td>
1932 <td class='text text-center' width='250'>
1933 <?php echo text($provider_info['user'][$i]); ?>
1934 </td>
1935 <td class='text' width='125'>
1936 </td>
1937 <td class='text font-weight-bold' width='250'>
1938 <?php printf(xlt("Total Charges") . ': ' . " %1\$.2f ", text($provider_info['fee'][$i])); ?>
1939 </td>
1940 <td class='text' width='125'>
1941 </td>
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])); ?>
1944 </td>
1945 <td class='text' width='25'>
1946 <br />
1947 </td>
1949 <table class='table table-borderless'>
1950 <tr>
1951 <td class='text' width='25'>
1952 </td>
1953 <td class='text' width='250'>
1954 </td>
1955 <td class='text' width='125'>
1956 </td>
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])); ?>
1959 </td>
1960 <td class='text' width='125'>
1961 </td>
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])); ?>
1964 </td>
1965 <td class='text' width='25'>
1966 <br />
1967 </td>
1969 <table class='table table-borderless'>
1970 <tr>
1971 <td class='text' width='25'>
1972 </td>
1973 <td class='text' width='250'>
1974 </td>
1975 <td class='text' width='125'>
1976 </td>
1977 <td class='text' width='250'>
1978 </td>
1979 <td class='text' width='125'>
1980 </td>
1981 <td class='text' width='175' height='5'>
1982 <hr />
1983 </td>
1984 <td class='text' width='25'>
1985 <br />
1986 </td>
1988 <table class='table table-borderless'>
1989 <tr>
1990 <td class='text' width='25'>
1991 </td>
1992 <td class='text' width='250'>
1993 </td>
1994 <td class='text' width='125'>
1995 </td>
1996 <td class='text' width='250'>
1997 </td>
1998 <td class='text' width='125'>
1999 </td>
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])); ?>
2002 </td>
2003 <td class='text' width='25'>
2004 </td>
2006 <table class='table table-borderless'>
2007 <tr>
2008 <td class='text' width='25'>
2009 </td>
2010 <td class='text' width='250'>
2011 </td>
2012 <td class='text' width='125'>
2013 </td>
2014 <td class='text' width='250'>
2015 </td>
2016 <td class='text' width='125'>
2017 </td>
2018 <td class='text' width='125'>
2019 </td>
2020 <td class='text' width='25'>
2022 <?php
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];
2031 ++$i;
2033 print "<br /></td></tr>";
2036 print "<br /></td>";
2037 print "</table>";
2040 </div>
2041 </div>
2042 </body>
2043 </html>