} } } } ****/ if (stristr($key, "include_")) { //print "include: $val<br>\n"; if ($val == "demographics") { print "<br><font class=bold>" . xl('Patient Data') . ":</font><br>"; printRecDataOne($patient_data_array, getRecPatientData($pid), $N); } elseif ($val == "history") { print "<br><font class=bold>" . xl('History Data') . ":</font><br>"; printRecDataOne($history_data_array, getRecHistoryData($pid), $N); } elseif ($val == "employer") { print "<br><font class=bold>" . xl('Employer Data') . ":</font><br>"; printRecDataOne($employer_data_array, getRecEmployerData($pid), $N); } elseif ($val == "insurance") { print "<br><font class=bold>" . xl('Primary Insurance Data') . ":</font><br>"; printRecDataOne($insurance_data_array, getRecInsuranceData($pid, "primary"), $N); print "<font class=bold>" . xl('Secondary Insurance Data') . ":</font><br>"; printRecDataOne($insurance_data_array, getRecInsuranceData($pid, "secondary"), $N); print "<font class=bold>" . xl('Tertiary Insurance Data') . ":</font><br>"; printRecDataOne($insurance_data_array, getRecInsuranceData($pid, "tertiary"), $N); } elseif ($val == "billing") { print "<br><font class=bold>" . xl('Billing Information') . ":</font><br>"; if (count($ar['newpatient']) > 0) { $billings = array(); echo "<table>"; echo "<tr><td width=\"400\" class=bold>Code</td><td class=bold>" . xl('Fee') . "</td></tr>\n"; $total = 0.0; $copays = 0.0;
if (!$first_time) { print "</tr></table>\n"; print "</td><td>"; print "<table border=0><tr>\n"; // small table } else { print "<table border=0><tr>\n"; // small table $first_time = 0; } print "<tr><td colspan=5><hr><span class=bold>" . text($name["fname"]) . " " . text($name["lname"]) . "</span><br><br>\n"; //================================== print "<font class=bold>" . xlt("Patient Data") . ":</font><br>"; printRecDataOne($patient_data_array, getRecPatientData($iter["pid"]), $COLS); print "<font class=bold>" . xlt("Employer Data") . ":</font><br>"; printRecDataOne($employer_data_array, getRecEmployerData($iter["pid"]), $COLS); print "<font class=bold>" . xlt("Primary Insurance Data") . ":</font><br>"; printRecDataOne($insurance_data_array, getRecInsuranceData($iter["pid"], "primary"), $COLS); print "<font class=bold>" . xlt("Secondary Insurance Data") . ":</font><br>"; printRecDataOne($insurance_data_array, getRecInsuranceData($iter["pid"], "secondary"), $COLS); print "<font class=bold>" . xlt("Tertiary Insurance Data") . ":</font><br>"; printRecDataOne($insurance_data_array, getRecInsuranceData($iter["pid"], "tertiary"), $COLS); //================================== print "</td></tr><tr>\n"; $old_pid = $iter["pid"]; } print "<td width=100><span class=text>" . text($iter["code_type"]) . ": </span></td><td width=100><span class=text>" . text($iter["code"]) . "</span></td><td width=100><span class=small>(" . text(date("Y-m-d", strtotime($iter["date"]))) . ")</span></td>\n"; $res_count++; if ($res_count == $N) { print "</tr><tr>\n"; $res_count = 0;