Example #1
0
<?php

Printf("Hola Mundo");
for ($i = 1; $i < $k;) {
    print "<table border=1><tr>\n";
    print "<br><br>";
    Printf("<td width=70><span class=text><b>" . xlt("User ") . "</center></b><center>" . text($user_info[user][$i])) . "</center>";
    Printf("<td width=140><span class=text><b><center>" . xlt("Charges") . ' ' . "</center></b><center>" . " %1\$.2f", text($user_info[fee][$i])) . "</center>";
    Printf("<td width=140><span class=text><b><center>" . xlt("Insurance Adj") . '. ' . "</center></b><center>" . "%1\$.2f", text($user_info[insadj][$i])) . "</center>";
    Printf("<td width=140><span class=text><b><center>" . xlt("Insurance Payments") . ' ' . "</center></b><center>" . "%1\$.2f", text($user_info[inspay][$i])) . "</center>";
    Printf("<td width=140><span class=text><b><center>" . xlt("Patient Adj") . '. ' . "</center></b><center>" . "%1\$.2f", text($user_info[patadj][$i])) . "</center>";
    Printf("<td width=140><span class=text><b><center>" . xlt("Patient Payments") . ' ' . "</center></b><center>" . "%1\$.2f", text($user_info[patpay][$i])) . "</center>";
    $gtotal_fee = $gtotal_fee + $user_info[fee][$i];
    $gtotal_insadj = $gtotal_insadj + $user_info[insadj][$i];
    $gtotal_inspay = $gtotal_inspay + $user_info[inspay][$i];
    $gtotal_patadj = $gtotal_patadj + $user_info[patadj][$i];
    $gtotal_patpay = $gtotal_patpay + $user_info[patpay][$i];
    ++$i;
    print "</br></td>";
}
print "<table border=1><tr>\n";
print "<br><br>";
Printf("<td width=70><span class=text><b><center>" . xlt("Grand Totals") . ' ');
Printf("<td width=140><span class=text><b><center>" . xlt("Total Charges") . ' ' . "</center></b><center>" . " %1\$.2f", text($gtotal_fee)) . "</center>";
Printf("<td width=140><span class=text><b><center>" . xlt("Insurance Adj") . '. ' . "</center></b><center>" . "%1\$.2f", text($gtotal_insadj)) . "</center>";
Printf("<td width=140><span class=text><b><center>" . xlt("Insurance Payments") . ' ' . "</center></b><center>" . "%1\$.2f", text($gtotal_inspay)) . "</center>";
Printf("<td width=140><span class=text><b><center>" . xlt("Patient Adj") . '. ' . "</center></b><center>" . "%1\$.2f", text($gtotal_patadj)) . "</center>";
Printf("<td width=140><span class=text><b><center>" . xlt("Patient Payments") . ' ' . "</center></b><center>" . "%1\$.2f", text($gtotal_patpay)) . "</center>";
print "</br></td>";
print "</table>";
?>
</body>
</html>
    print "</table>";
} else {
    print "<table border=0><tr>\n";
    print "<br><br>";
    print "<td width=25><span class=text>";
    print "</span></td><td width=250><span class=text><b><center>" . xlt("Provider") . "</center></b>";
    print "</span></td><td width=125><span class=text>";
    print "</span></td><td width=250><span class=text><b>" . xlt("Charges") . "</b>";
    print "</span></td><td width=125><span class=text>";
    print "</span></td><td width=250><span class=text><b>" . xlt("Payments") . "</b>";
    print "</span></td><td width=25><span class=text>";
    for ($i = 1; $i < $k;) {
        print "</br></td>";
        print "<table border=0><tr>\n";
        print "<td width=25><span class=text>";
        Printf("</span></td><td width=250><span class=text><center>" . text($provider_info[user][$i])) . "</center>";
        print "</span></td><td width=125><span class=text>";
        printf("</span></td><td width=250><span class=text><b>" . xlt("Total Charges") . ': ' . " %1\$.2f ", text($provider_info[fee][$i])) . "</b>";
        print "</span></td><td width=125><span class=text>";
        printf("</span></td><td width=250><span class=text><b>" . xlt("Total Payments") . ': ' . "(%1\$.2f)", text($provider_info[inspay][$i] + $provider_info[patpay][$i])) . "</b>";
        print "</span></td><td width=25><span class=text>";
        print "</br></td>";
        print "<table border=0><tr>\n";
        print "<td width=25><span class=text>";
        print "</span></td><td width=250><span class=text>";
        print "</span></td><td width=125><span class=text>";
        printf("</span></td><td width=250><span class=text><b>" . xlt("Total Adj") . '.: ' . "(%1\$.2f)", text($provider_info[patadj][$i] + $provider_info[insadj][$i])) . "</b>";
        print "</span></td><td width=125><span class=text>";
        printf("</span></td><td width=250><span class=text><b>" . xlt("Refund") . ': ' . "(%1\$.2f)", text($provider_info[patref][$i] + $provider_info[insref][$i])) . "</b>";
        print "</span></td><td width=25><span class=text>";
        print "</br></td>";