UTF8 encoding support
[openemr.git] / contrib / forms / routine_screening_record / printable.php
blobb8a37398d494869c66883b66a5adfff6ba5b064f
1 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
3 "http://www.w3.org/TR/html4/loose.dtd">
5 <?php
7 include_once("../../globals.php");
9 include_once("$srcdir/api.inc");
11 include_once("$srcdir/forms.inc");
13 include_once("$srcdir/calendar.inc");formHeader("Form: Routine screening record");
19 <html>
21 <head>
22 <? html_header_show();?>
24 <title>Form: Routine screening record</title>
26 <? include("../../acog_printable_h.css"); ?>
28 </head>
32 <?
34 $fres=sqlStatement("select * from patient_data where pid='".$pid."'");
36 if ($fres){
38 $patient = sqlFetchArray($fres);
42 $fres=sqlStatement("select * from form_routine_screening_record where id=$id");
44 if ($fres){
46 $fdata = sqlFetchArray($fres);
52 <body <?echo $top_bg_line;?>>
54 <div class="srvChapter">Routine screening record </div>
56 <div style="border: solid 2px black; background-color:#FFFFFF;">
58 <table border="0" cellpadding="2" cellspacing="0">
60 <tr align="left" valign="bottom">
62 <td colspan="4" class="fibody2" id="bordR">Patient name: <? echo $patient{'fname'}.' '.$patient{'mname'}.' '.$patient{'lname'}; ?></td>
64 <td colspan="4" class="fibody2" id="bordR">Birth date: <? echo $patient{'DOB'}; ?></td>
66 <td colspan="3" class="fibody2">ID No: <? echo $patient{'id'}; ?></td>
68 </tr>
70 <tr align="center" valign="middle">
72 <td class="ficaption2" id="bordR">age</td>
74 <td width="9%" class="ficaption2" id="bordR">Cervical cytology </td>
76 <td width="9%" class="ficaption2" id="bordR">Lipid profile assessment<sup>*</sup></td>
78 <td width="9%" class="ficaption2" id="bordR">Mammo-<br>
80 graphy<sup>*</sup></td>
82 <td width="9%" class="ficaption2" id="bordR">Colorectal cancer screening <sup>*</sup></td>
84 <td width="9%" class="ficaption2" id="bordR">Bone density screening<sup>*</sup> </td>
86 <td width="9%" class="ficaption2" id="bordR">Chlamydia screening<sup>*</sup> </td>
88 <td width="9%" class="ficaption2" id="bordR">Gonor-<br>
90 rhea screening <sup>*</sup> </td>
92 <td width="9%" class="ficaption2" id="bordR">Urinalysis</td>
94 <td width="9%" class="ficaption2" id="bordR">Fasting glucose test<sup>*</sup> </td>
96 <td width="9%" class="ficaption2">Thyroid stimulating hormone screening </td>
98 </tr>
100 <tr align="center" valign="middle">
102 <td class="fibody2" id="bordR">13-18</td>
104 <td class="fibody2" id="bordR">ANNUALLY BEGINNING
106 APPROXIMATELY 3 YEARS
108 AFTER INITIATION OF
110 SEXUAL INTERCOURSE</td>
112 <td class="fibody2" id="bordR">&nbsp; </td>
114 <td class="fibody2" id="bordR">&nbsp; </td>
116 <td class="fibody2" id="bordR">&nbsp; </td>
118 <td class="fibody2" id="bordR">&nbsp; </td>
120 <td class="fibody2" id="bordR"> SEXUALLY ACTIVE WOMEN
122 UNDER AGE 25</td>
124 <td class="fibody2" id="bordR">SEXUALLY ACTIVE
126 ADOLES-<br>
128 CENTS</td>
130 <td class="fibody2" id="bordR">&nbsp;</td>
132 <td class="fibody2" id="bordR">&nbsp;</td>
134 <td class="fibody2">&nbsp;</td>
136 </tr>
138 <tr align="center" valign="middle">
140 <td class="fibody2" id="bordR">19-39</td>
142 <td class="fibody2" id="bordR">ANNUALLY BEGINNING NO LATER THAN AGE 21 YEARS</td>
144 <td class="fibody2" id="bordR">&nbsp; </td>
146 <td class="fibody2" id="bordR">&nbsp; </td>
148 <td class="fibody2" id="bordR">&nbsp; </td>
150 <td class="fibody2" id="bordR">&nbsp; </td>
152 <td class="fibody2" id="bordR"> SEXUALLY ACTIVE WOMEN<br>
154 UNDER AGE 25</td>
156 <td class="fibody2" id="bordR">&nbsp; </td>
158 <td class="fibody2" id="bordR">&nbsp;</td>
160 <td class="fibody2" id="bordR">&nbsp;</td>
162 <td class="fibody2">&nbsp;</td>
164 </tr>
166 <tr align="center" valign="middle">
168 <td class="fibody2" id="bordR">40-64</td>
170 <td class="fibody2" id="bordR">EVERY 23 YEARS AFTER 3
172 CONSECuTIVE NEGATIVE TEST
174 RESULTS IF NO HISTORY OF
176 CIN 2 OR 3,
178 IMMUNOSUP-<br>
180 PRESSION,
182 HIV INFECTION, OR DES
184 EXPOSURE IN UTERO</td>
186 <td class="fibody2" id="bordR">EVERY 5 YEARS
188 BEGINNING
190 AT AGE 45</td>
192 <td class="fibody2" id="bordR">EVERY 12 YEARS UNTIL
194 AGE 50; YEARLY
196 BEGINNING AT AGE 50</td>
198 <td class="fibody2" id="bordR"> BEGINNING AT AGE 50
200 YEARLY FOBT OR FLEXIBLE
202 SIGMOIDOSCOPY EVERY
204 5 YEARS OR YEARLY FOBT
206 PLUS FLEXIBLE
208 SIGMOIDOSCOPY EVERY 5
210 YEARS OR DCBE EVERY 5
212 YEARS OR COLONOSCOPY
214 EVERY 10 YEARS</td>
216 <td class="fibody2" id="bordR">&nbsp; </td>
218 <td class="fibody2" id="bordR">&nbsp; </td>
220 <td class="fibody2" id="bordR">&nbsp; </td>
222 <td class="fibody2" id="bordR">&nbsp;</td>
224 <td class="fibody2" id="bordR">EVERY 3 YEARS
226 AFTER AGE 45</td>
228 <td class="fibody2">EVERY 5 YEARS
230 BEGINNING AT AGE 50</td>
232 </tr>
234 <tr align="center" valign="middle">
236 <td class="fibody2" id="bordR">65 and older </td>
238 <td class="fibody2" id="bordR">EVERY 23 YEARS AFTER 3<br>
240 CONSECUTIVE NEGATIVE TEST
242 RESULTS IF NO HISTORY OF
244 CIN 2 OR 3,
246 IMMUNOSUP-<br>
248 PRESSION,
250 HIV INFECTION, OR DES
252 EXPOSURE IN UTERO</td>
254 <td class="fibody2" id="bordR">EVERY 5 YEARS</td>
256 <td class="fibody2" id="bordR">YEARLY OR AS
258 APPROPRIATE</td>
260 <td class="fibody2" id="bordR"> YEARLY FOBT OR FLEXIBLE
262 SIGMOIDOSCOPY EVERY
264 5 YEARS OR YEARLY FOBT
266 PLUS FLEXIBLE
268 SIGMOIDOSCOPY EVERY
270 YEARS OR DCBE EVERY
272 YEARS OR COLONOSCOPY
274 EVERY 10 YEARS</td>
276 <td class="fibody2" id="bordR"> IN THE ABSENCE OF
278 NEW RISK FACTORS,
280 SUBSEQUENT SCREENING
282 NOT MORE FREQUENTLY
284 THAN EVERY 2 YEARS</td>
286 <td class="fibody2" id="bordR">&nbsp; </td>
288 <td class="fibody2" id="bordR">&nbsp; </td>
290 <td class="fibody2" id="bordR">YEARLY OR AS
292 APPROPRIATE</td>
294 <td class="fibody2" id="bordR">EVERY 3 YEARS</td>
296 <td class="fibody2">EVERY 5 YEARS</td>
298 </tr>
300 <tr align="left" valign="bottom">
302 <td colspan="11" class="fibody2" style="border-bottom: 2px solid black;">&nbsp;</td>
304 </tr>
308 $factors = array("cervical", "lipid", "mammo", "colorectal",
310 "bone", "chlamyd", "gonor", "urinal", "glucose", "thyroid");
312 $rsi = 1;
314 while ($rsi < 9){
316 $chunks = explode("|~", $fdata["record_$rsi"]);
318 list($cervical_date, $cervical_res) = explode('|', $chunks[0]);
320 list($lipid_date, $lipid_res) = explode('|', $chunks[1]);
322 list($mammo_date,$mammo_res) = explode('|', $chunks[2]);
324 list($colorectal_date,$colorectal_res) = explode('|', $chunks[3]);
326 list($bone_date,$bone_res) = explode('|', $chunks[4]);
328 list($chlamyd_date,$chlamyd_res) = explode('|', $chunks[5]);
330 list($gonor_date,$gonor_res) = explode('|', $chunks[6]);
332 list($urinal_date,$urinal_res) = explode('|', $chunks[7]);
334 list($glucose_date,$glucose_res) = explode('|', $chunks[8]);
336 list($thyroid_date,$thyroid_res) = explode('|', $chunks[9]);
342 print <<<EOL
344 <tr align="left" valign="bottom">
346 <td class="fibody2" id="bordR">Date</td>
348 <td class="fibody3" id="bordR">${cervical_date} &nbsp;</td>
350 <td class="fibody3" id="bordR">${lipid_date} &nbsp;</td>
352 <td class="fibody3" id="bordR">${mammo_date} &nbsp;</td>
354 <td class="fibody3" id="bordR">${colorectal_date} &nbsp;</td>
356 <td class="fibody3" id="bordR">${bone_date} &nbsp;</td>
358 <td class="fibody3" id="bordR">${chlamyd_date} &nbsp;</td>
360 <td class="fibody3" id="bordR">${gonor_date} &nbsp;</td>
362 <td class="fibody3" id="bordR">${urinal_date} &nbsp;</td>
364 <td class="fibody3" id="bordR">${glucose_date} &nbsp;</td>
366 <td class="fibody3">${thyroid_date} &nbsp;</td>
368 </tr>
370 <tr align="left" valign="bottom">
372 <td class="fibody2" id="bordR">result</td>
374 <td class="fibody5" id="bordR">${cervical_res} &nbsp;</td>
376 <td class="fibody5" id="bordR">${lipid_res} &nbsp;</td>
378 <td class="fibody5" id="bordR">${mammo_res} &nbsp;</td>
380 <td class="fibody5" id="bordR">${colorectal_res} &nbsp;</td>
382 <td class="fibody5" id="bordR">${bone_res} &nbsp;</td>
384 <td class="fibody5" id="bordR">${chlamyd_res} &nbsp;</td>
386 <td class="fibody5" id="bordR">${gonor_res} &nbsp;</td>
388 <td class="fibody5" id="bordR">${urinal_res} &nbsp;</td>
390 <td class="fibody5" id="bordR">${glucose_res} &nbsp;</td>
392 <td class="fibody5">${thyroid_res} &nbsp;</td>
394 </tr>
396 EOL;
398 $rsi++;
404 </table>
406 </div>
408 <p><sup>*</sup>This test may be appropriate for other patients based on risk (see High-Risk Laboratory Record and Table of High-Risk Factors)</p>
410 </body>
412 </html>