Fix CRLF
[openemr.git] / contrib / forms / immunization_record / report.php
blob33d4b324b753e3fe2042394abb02ac1899d683c3
1 <?
2 function immunization_record_report( $pid, $encounter, $cols, $id) {
4 include_once("../../globals.php");
5 include_once("$srcdir/api.inc");
6 $fres=sqlStatement("select * from patient_data where pid='".$pid."'");
7 if ($fres){
8 $patient = sqlFetchArray($fres);
10 $fres=sqlStatement("select * from form_immunization_record where id='".$id."'");
11 if ($fres){
12 $ir = sqlFetchArray($fres);
15 <div class="srvChapter">Immunization record<sup>*</sup></div>
16 <div style="border: solid 2pt black; background-color:#FFFFFF;">
17 <table width="100%" border="0" cellspacing="0" cellpadding="2">
18 <tr align="left" valign="bottom">
19 <td colspan="4" class="fibody2" id="bordR">Patient name: <? echo $patient{'fname'}.' '.$patient{'mname'}.' '.$patient{'lname'}; ?></td>
20 <td colspan="2" class="fibody2" id="bordR">Birth date: <? echo $patient{'DOB'}; ?></td>
21 <td colspan="2" class="fibody2">ID No: <? echo $patient{'id'}; ?></td>
22 </tr>
23 <tr align="center" valign="middle">
24 <td width="9%" class="ficaption2" id="bordR">age</td>
25 <td width="13%" class="ficaption2" id="bordR">Tetanus-Diphteria booster </td>
26 <td width="13%" class="ficaption2" id="bordR">Influenza vaccine </td>
27 <td width="13%" class="ficaption2" id="bordR">Pneumococcal vaccine </td>
28 <td width="13%" class="ficaption2" id="bordR">MMR Vaccine</td>
29 <td width="13%" class="ficaption2" id="bordR">Hepatitis B vaccine </td>
30 <td width="13%" class="ficaption2" id="bordR">Hepatitis A vaccine </td>
31 <td width="13%" class="ficaption2">Varicella vaccine </td>
32 </tr>
33 <tr align="center" valign="middle">
34 <td class="fibody2" id="bordR">13-18</td>
35 <td class="fibody2" id="bordR">Once between ages 11-16 </td>
36 <td class="fibody2" id="bordR">Based on risk </td>
37 <td class="fibody2" id="bordR">Based on risk</td>
38 <td class="fibody2" id="bordR">Based on risk</td>
39 <td class="fibody2" id="bordR">One series for those not previously immunized </td>
40 <td class="fibody2" id="bordR">Based on risk</td>
41 <td class="fibody2">Based on risk</td>
42 </tr>
43 <tr align="center" valign="middle">
44 <td class="fibody2" id="bordR">19-39</td>
45 <td class="fibody2" id="bordR">Every 10 years </td>
46 <td class="fibody2" id="bordR">Based on risk</td>
47 <td class="fibody2" id="bordR">Based on risk</td>
48 <td class="fibody2" id="bordR">Based on risk</td>
49 <td class="fibody2" id="bordR">Based on risk</td>
50 <td class="fibody2" id="bordR">Based on risk</td>
51 <td class="fibody2">Based on risk</td>
52 </tr>
53 <tr align="center" valign="middle">
54 <td class="fibody2" id="bordR">40-64</td>
55 <td class="fibody2" id="bordR">Every 10 years</td>
56 <td class="fibody2" id="bordR">Annually beginning at age 50 years </td>
57 <td class="fibody2" id="bordR">Based on risk</td>
58 <td class="fibody2" id="bordR">Based on risk</td>
59 <td class="fibody2" id="bordR">Based on risk</td>
60 <td class="fibody2" id="bordR">Based on risk</td>
61 <td class="fibody2">Based on risk</td>
62 </tr>
63 <tr align="center" valign="middle">
64 <td class="fibody2" id="bordR">65 and older </td>
65 <td class="fibody2" id="bordR">Every 10 years</td>
66 <td class="fibody2" id="bordR">Annually</td>
67 <td class="fibody2" id="bordR">Once</td>
68 <td class="fibody2" id="bordR">&nbsp;</td>
69 <td class="fibody2" id="bordR">Based on risk</td>
70 <td class="fibody2" id="bordR">Based on risk</td>
71 <td class="fibody2">Based on risk</td>
72 </tr>
73 </table>
74 </div>
75 <p>&nbsp;</p>
76 <div style="border: solid 2pt black; background-color:#FFFFFF;">
77 <table width="100%" border="0" cellspacing="0" cellpadding="2">
79 $vacci=0;
80 $vacc_tetanus = explode("|~", $ir["vacc_tetanus"]);
81 $vacc_influenza = explode("|~", $ir["vacc_influenza"]);
82 $vacc_pneumococcal = explode("|~", $ir["vacc_pneumococcal"]);
83 $vacc_mmr = explode("|~", $ir["vacc_mmr"]);
84 $vacc_hep_a = explode("|~", $ir["vacc_hep_a"]);
85 $vacc_hep_b = explode("|~", $ir["vacc_hep_b"]);
86 $vacc_varicella= explode("|~", $ir["vacc_varicella"]);
87 while ($vacci<20){
88 print <<<EOL
89 <tr align="left" valign="bottom">
90 <td width="9%" class="fibody5" id="bordR">Date</td>
91 <td width="13%" class="fibody5" id="bordR">${vacc_tetanus[$vacci]}&nbsp;</td>
92 <td width="13%" class="fibody5" id="bordR">${vacc_influenza[$vacci]}&nbsp;</td>
93 <td width="13%" class="fibody5" id="bordR">${vacc_pneumococcal[$vacci]}&nbsp;</td>
94 <td width="13%" class="fibody5" id="bordR">${vacc_mmr[$vacci]}&nbsp;</td>
95 <td width="13%" class="fibody5" id="bordR">${vacc_hep_b[$vacci]}&nbsp;</td>
96 <td width="13%" class="fibody5" id="bordR">${vacc_hep_a[$vacci]}&nbsp;</td>
97 <td width="13%" class="fibody5">${vacc_varicella[$vacci]}&nbsp;</td>
98 </tr>
99 EOL;
100 $vacci++;
103 </table>
104 </div>
105 <p><sup>*</sup>For immunizations based on risk refer to the Table of High-Risk Factors.</p>
106 <? } ?>