/contrib/forms/progressnotes/view.php

https://github.com/md-tech/openemr · PHP · 1083 lines · 530 code · 549 blank · 4 comment · 38 complexity · 3766be01cc5edda888d90513fbd64562 MD5 · raw file

  1. <?php
  2. #######################################################
  3. # Progress Notes Form created by Kam Sharifi #
  4. # kam@sharmen.com #
  5. #######################################################
  6. include_once("../../globals.php");
  7. ?>
  8. <html><head>
  9. <?php html_header_show();?>
  10. <link rel="stylesheet" href="<?php echo $css_header;?>" type="text/css">
  11. </head>
  12. <body class="body_top">
  13. <?php
  14. include_once("$srcdir/api.inc");
  15. $obj = formFetch("form_progressnotes", $_GET["id"]);
  16. ?>
  17. <form method=post action="<?php echo $rootdir?>/forms/progressnotes/save.php?mode=update&id=<?php echo $_GET["id"];?>" name="my_form">
  18. <span class="title">Progress Notes</span><Br><br>
  19. <table width=100%>
  20. <b>
  21. <span class=text>P: </span><input size=3 type=entry name="prog_p" value="<?php echo $obj{"prog_p"};?>" >
  22. <span class=text>R: </span><input size=3 type=entry name="prog_r" value="<?php echo $obj{"prog_r"};?>" >
  23. <span class=text>BP: </span><input size=3 type=entry name="prog_bp" value="<?php echo $obj{"prog_bp"};?>" >
  24. <span class=text>HT: </span><input size=3 type=entry name="prog_ht" value="<?php echo $obj{"prog_ht"};?>" >
  25. <span class=text>WT: </span><input size=3 type=entry name="prog_wt" value="<?php echo $obj{"prog_wt"};?>" >
  26. <span class=text>TEMP: </span><input size=3 type=entry name="prog_temp" value="<?php echo $obj{"prog_temp"};?>" >
  27. <span class=text>LMP: </span><input size=3 type=entry name="prog_lmp" value="<?php echo $obj{"prog_lmp"};?>" >
  28. <br><span class=text>Last Pap Smear: </span><input size=3 type=entry name="prog_last_pap_smear" value="<?php echo $obj{"prog_last_pap_smear"};?>" >
  29. <span class=text>Last Td. Booster: </span><input size=3 type=entry name="prog_last_td_booster" value="<?php echo $obj{"prog_last_td_booster"};?>" >
  30. <span class=text>Allergies: </span><input size=3 type=entry name="prog_allergies" value="<?php echo $obj{"prog_allergies"};?>" >
  31. <span class=text>Last Mammogram: </span><input size=3 type=entry name="prog_last_mammogram" value="<?php echo $obj{"prog_last_mammogram"};?>" >
  32. </b>
  33. </table>
  34. <br>
  35. <span class=text><b>Present Complaint*:</b> </span><br><textarea cols=40 rows=8 wrap=virtual name="prog_present_complaint" ><?php echo $obj{"prog_present_complaint"};?></textarea>
  36. <br><br>
  37. <b>Past Medical History</b>
  38. <TABLE ID="Table1" BORDER=1 CELLSPACING=2 CELLPADDING=1 WIDTH="100%" >
  39. <TR>
  40. <TD WIDTH=53>
  41. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif">&nbsp;</FONT></P>
  42. </TD>
  43. <TD WIDTH=40>
  44. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"><B>ABN</B></FONT><B></B></P>
  45. </TD>
  46. <TD WIDTH=34>
  47. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"><B>NE</B></FONT><B></B></P>
  48. </TD>
  49. <TD WIDTH=324>
  50. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"><B>PHYSICAL EXAMINATION -Comments</B></FONT><B></B></P>
  51. </TD>
  52. </TR>
  53. <TR>
  54. <TD HEIGHT=14>
  55. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif">&nbsp;</FONT></P>
  56. </TD>
  57. <TD WIDTH=40>
  58. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  59. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  60. <TR>
  61. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox2" TYPE=CHECKBOX NAME="prog_skin_abn" <?if ($obj{"prog_skin_abn"} == "on") {echo "checked";};?>></TD>
  62. </TR>
  63. </TABLE>
  64. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  65. <TD WIDTH=34>
  66. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  67. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  68. <TR>
  69. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox8" TYPE=CHECKBOX NAME="prog_skin_ne" <?if ($obj{"prog_skin_ne"} == "on") {echo "checked";};?>></TD>
  70. </TR>
  71. </TABLE>
  72. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  73. <TD WIDTH=324>
  74. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"><B>SKIN: no significant lesions</B></FONT><B></B></P>
  75. </TD>
  76. </TR>
  77. <TR>
  78. <TD HEIGHT=14>
  79. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif">&nbsp;</FONT></P>
  80. </TD>
  81. <TD WIDTH=40>
  82. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  83. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  84. <TR>
  85. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox7" TYPE=CHECKBOX NAME="prog_head_abn" <?if ($obj{"prog_head_abn"} == "on") {echo "checked";};?>></TD>
  86. </TR>
  87. </TABLE>
  88. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  89. <TD WIDTH=34>
  90. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  91. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  92. <TR>
  93. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox9" TYPE=CHECKBOX NAME="prog_head_ne" <?if ($obj{"prog_head_ne"} == "on") {echo "checked";};?>></TD>
  94. </TR>
  95. </TABLE>
  96. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  97. <TD WIDTH=324>
  98. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"><B>HEAD: normocephalic. no headache</B></FONT><B></B></P>
  99. </TD>
  100. </TR>
  101. <TR>
  102. <TD HEIGHT=11>
  103. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif">&nbsp;</FONT></P>
  104. </TD>
  105. <TD WIDTH=40>
  106. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  107. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  108. <TR>
  109. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox10" TYPE=CHECKBOX NAME="prog_eyes_abn" <?if ($obj{"prog_eyes_abn"} == "on") {echo "checked";};?>></TD>
  110. </TR>
  111. </TABLE>
  112. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  113. <TD WIDTH=34>
  114. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  115. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  116. <TR>
  117. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox11" TYPE=CHECKBOX NAME="prog_eyes_ne" <?if ($obj{"prog_eyes_ne"} == "on") {echo "checked";};?>></TD>
  118. </TR>
  119. </TABLE>
  120. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  121. <TD WIDTH=324>
  122. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"><B>EYES: perla. eom satisfactory</B></FONT><B></B></P>
  123. </TD>
  124. </TR>
  125. <TR>
  126. <TD>
  127. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif">&nbsp;</FONT></P>
  128. </TD>
  129. <TD WIDTH=40>
  130. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  131. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  132. <TR>
  133. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox12" TYPE=CHECKBOX NAME="prog_ears_abn" <?if ($obj{"prog_ears_abn"} == "on") {echo "checked";};?>></TD>
  134. </TR>
  135. </TABLE>
  136. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  137. <TD WIDTH=34>
  138. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  139. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  140. <TR>
  141. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox13" TYPE=CHECKBOX NAME="prog_ears_ne" <?if ($obj{"prog_ears_ne"} == "on") {echo "checked";};?>></TD>
  142. </TR>
  143. </TABLE>
  144. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  145. <TD WIDTH=324>
  146. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"><B>EARS: drums intact</B></FONT><B></B></P>
  147. </TD>
  148. </TR>
  149. <TR>
  150. <TD HEIGHT=19>
  151. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif">&nbsp;</FONT></P>
  152. </TD>
  153. <TD WIDTH=40>
  154. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  155. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  156. <TR>
  157. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox14" TYPE=CHECKBOX NAME="prog_nose_abn" <?if ($obj{"prog_nose_abn"} == "on") {echo "checked";};?>></TD>
  158. </TR>
  159. </TABLE>
  160. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  161. <TD WIDTH=34>
  162. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  163. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  164. <TR>
  165. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox16" TYPE=CHECKBOX NAME="prog_nose_ne" <?if ($obj{"prog_nose_ne"} == "on") {echo "checked";};?>></TD>
  166. </TR>
  167. </TABLE>
  168. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  169. <TD WIDTH=324>
  170. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"><B>NOSE: no abnormality</B></FONT><B></B></P>
  171. </TD>
  172. </TR>
  173. <TR>
  174. <TD>
  175. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif">&nbsp;</FONT></P>
  176. </TD>
  177. <TD WIDTH=40>
  178. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  179. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  180. <TR>
  181. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox17" TYPE=CHECKBOX NAME="prog_throat_abn" <?if ($obj{"prog_throat_abn"} == "on") {echo "checked";};?>></TD>
  182. </TR>
  183. </TABLE>
  184. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  185. <TD WIDTH=34>
  186. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  187. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  188. <TR>
  189. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox15" TYPE=CHECKBOX NAME="prog_throat_ne" <?if ($obj{"prog_throat_ne"} == "on") {echo "checked";};?>></TD>
  190. </TR>
  191. </TABLE>
  192. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  193. <TD WIDTH=324>
  194. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"><B>THROAT: dear, no infection</B></FONT><B></B></P>
  195. </TD>
  196. </TR>
  197. <TR>
  198. <TD HEIGHT=18>
  199. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif">&nbsp;</FONT></P>
  200. </TD>
  201. <TD WIDTH=40>
  202. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  203. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  204. <TR>
  205. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox19" TYPE=CHECKBOX NAME="prog_teeth_abn" <?if ($obj{"prog_teeth_abn"} == "on") {echo "checked";};?>></TD>
  206. </TR>
  207. </TABLE>
  208. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  209. <TD WIDTH=34>
  210. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  211. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  212. <TR>
  213. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox20" TYPE=CHECKBOX NAME="prog_teeth_ne" <?if ($obj{"prog_teeth_ne"} == "on") {echo "checked";};?>></TD>
  214. </TR>
  215. </TABLE>
  216. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  217. <TD WIDTH=324>
  218. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"><B>TEETH: good repair, no dentures</B></FONT><B></B></P>
  219. </TD>
  220. </TR>
  221. <TR>
  222. <TD>
  223. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif">&nbsp;</FONT></P>
  224. </TD>
  225. <TD WIDTH=40>
  226. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  227. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  228. <TR>
  229. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox18" TYPE=CHECKBOX NAME="prog_neck_abn" <?if ($obj{"prog_neck_abn"} == "on") {echo "checked";};?>></TD>
  230. </TR>
  231. </TABLE>
  232. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  233. <TD WIDTH=34>
  234. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  235. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  236. <TR>
  237. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox21" TYPE=CHECKBOX NAME="prog_neck_ne" <?if ($obj{"prog_neck_ne"} == "on") {echo "checked";};?>></TD>
  238. </TR>
  239. </TABLE>
  240. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  241. <TD WIDTH=324>
  242. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"><B>NECK: supple, no adenopathy</B></FONT><B></B></P>
  243. </TD>
  244. </TR>
  245. <TR>
  246. <TD>
  247. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif">&nbsp;</FONT></P>
  248. </TD>
  249. <TD WIDTH=40>
  250. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  251. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  252. <TR>
  253. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox22" TYPE=CHECKBOX NAME="prog_chest_abn" <?if ($obj{"prog_chest_abn"} == "on") {echo "checked";};?>></TD>
  254. </TR>
  255. </TABLE>
  256. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  257. <TD WIDTH=34>
  258. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  259. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  260. <TR>
  261. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox23" TYPE=CHECKBOX NAME="prog_chest_ne" <?if ($obj{"prog_chest_ne"} == "on") {echo "checked";};?>></TD>
  262. </TR>
  263. </TABLE>
  264. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  265. <TD WIDTH=324>
  266. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"><B>CHEST: symmetrical, no pain</B></FONT><B></B></P>
  267. </TD>
  268. </TR>
  269. <TR>
  270. <TD>
  271. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif">&nbsp;</FONT></P>
  272. </TD>
  273. <TD WIDTH=40>
  274. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  275. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  276. <TR>
  277. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox24" TYPE=CHECKBOX NAME="prog_breast_abn" <?if ($obj{"prog_breast_abn"} == "on") {echo "checked";};?>></TD>
  278. </TR>
  279. </TABLE>
  280. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  281. <TD WIDTH=34>
  282. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  283. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  284. <TR>
  285. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox25" TYPE=CHECKBOX NAME="prog_breast_ne" <?if ($obj{"prog_breast_ne"} == "on") {echo "checked";};?>></TD>
  286. </TR>
  287. </TABLE>
  288. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  289. <TD WIDTH=324>
  290. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"><B>BREAST: no masses</B></FONT><B></B></P>
  291. </TD>
  292. </TR>
  293. <TR>
  294. <TD>
  295. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif">&nbsp;</FONT></P>
  296. </TD>
  297. <TD WIDTH=40>
  298. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  299. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  300. <TR>
  301. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox26" TYPE=CHECKBOX NAME="prog_lungs_abn" <?if ($obj{"prog_lungs_abn"} == "on") {echo "checked";};?>></TD>
  302. </TR>
  303. </TABLE>
  304. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  305. <TD WIDTH=34>
  306. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  307. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  308. <TR>
  309. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox27" TYPE=CHECKBOX NAME="prog_lungs_ne" <?if ($obj{"prog_lungs_ne"} == "on") {echo "checked";};?>></TD>
  310. </TR>
  311. </TABLE>
  312. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  313. <TD WIDTH=324>
  314. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"><B>LUNGS: dear to P&amp;a. no mono, no rales</B></FONT><B></B></P>
  315. </TD>
  316. </TR>
  317. <TR>
  318. <TD>
  319. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif">&nbsp;</FONT></P>
  320. </TD>
  321. <TD WIDTH=40>
  322. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  323. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  324. <TR>
  325. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox28" TYPE=CHECKBOX NAME="prog_heart_abn" <?if ($obj{"prog_heart_abn"} == "on") {echo "checked";};?>></TD>
  326. </TR>
  327. </TABLE>
  328. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  329. <TD WIDTH=34>
  330. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  331. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  332. <TR>
  333. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox29" TYPE=CHECKBOX NAME="prog_heart_ne" <?if ($obj{"prog_heart_ne"} == "on") {echo "checked";};?>></TD>
  334. </TR>
  335. </TABLE>
  336. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  337. <TD WIDTH=324>
  338. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"><B>HEART: rsr. no cardiomegaly</B></FONT><B></B></P>
  339. </TD>
  340. </TR>
  341. <TR>
  342. <TD>
  343. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif">&nbsp;</FONT></P>
  344. </TD>
  345. <TD WIDTH=40>
  346. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  347. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  348. <TR>
  349. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox30" TYPE=CHECKBOX NAME="prog_abdomen_abn" <?if ($obj{"prog_abdomen_abn"} == "on") {echo "checked";};?>></TD>
  350. </TR>
  351. </TABLE>
  352. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  353. <TD WIDTH=34>
  354. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  355. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  356. <TR>
  357. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox31" TYPE=CHECKBOX NAME="prog_abdomen_ne" <?if ($obj{"prog_abdomen_ne"} == "on") {echo "checked";};?>></TD>
  358. </TR>
  359. </TABLE>
  360. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  361. <TD WIDTH=324>
  362. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"><B>ABDOMEN: non-tender, soft, no masses</B></FONT><B></B></P>
  363. </TD>
  364. </TR>
  365. <TR>
  366. <TD>
  367. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif">&nbsp;</FONT></P>
  368. </TD>
  369. <TD WIDTH=40>
  370. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  371. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  372. <TR>
  373. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox32" TYPE=CHECKBOX NAME="prog_spine_abn" <?if ($obj{"prog_spine_abn"} == "on") {echo "checked";};?>></TD>
  374. </TR>
  375. </TABLE>
  376. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  377. <TD WIDTH=34>
  378. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  379. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  380. <TR>
  381. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox33" TYPE=CHECKBOX NAME="prog_spine_ne" <?if ($obj{"prog_spine_ne"} == "on") {echo "checked";};?>></TD>
  382. </TR>
  383. </TABLE>
  384. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  385. <TD WIDTH=324>
  386. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"><B>SPINE: no abnormalities</B></FONT><B></B></P>
  387. </TD>
  388. </TR>
  389. <TR>
  390. <TD>
  391. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif">&nbsp;</FONT></P>
  392. </TD>
  393. <TD WIDTH=40>
  394. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  395. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  396. <TR>
  397. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox34" TYPE=CHECKBOX NAME="prog_extremeities_abn" <?if ($obj{"prog_extremeities_abn"} == "on") {echo "checked";};?>></TD>
  398. </TR>
  399. </TABLE>
  400. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  401. <TD WIDTH=34>
  402. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  403. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  404. <TR>
  405. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox35" TYPE=CHECKBOX NAME="prog_extremeities_ne" <?if ($obj{"prog_extremeities_ne"} == "on") {echo "checked";};?>></TD>
  406. </TR>
  407. </TABLE>
  408. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  409. <TD WIDTH=324>
  410. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"><B>EXTREMEITIES: no abnormalities</B></FONT><B></B></P>
  411. </TD>
  412. </TR>
  413. <TR>
  414. <TD>
  415. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif">&nbsp;</FONT></P>
  416. </TD>
  417. <TD WIDTH=40>
  418. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  419. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  420. <TR>
  421. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox36" TYPE=CHECKBOX NAME="prog_lowback_abn" <?if ($obj{"prog_lowback_abn"} == "on") {echo "checked";};?>></TD>
  422. </TR>
  423. </TABLE>
  424. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  425. <TD WIDTH=34>
  426. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  427. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  428. <TR>
  429. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox37" TYPE=CHECKBOX NAME="prog_lowback_ne" <?if ($obj{"prog_lowback_ne"} == "on") {echo "checked";};?>></TD>
  430. </TR>
  431. </TABLE>
  432. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  433. <TD WIDTH=324>
  434. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"><B>LOW BACK: rom normal</B></FONT><B></B></P>
  435. </TD>
  436. </TR>
  437. <TR>
  438. <TD>
  439. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif">&nbsp;</FONT></P>
  440. </TD>
  441. <TD WIDTH=40>
  442. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  443. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  444. <TR>
  445. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox38" TYPE=CHECKBOX NAME="prog_neuro_abn" <?if ($obj{"prog_neuro_abn"} == "on") {echo "checked";};?>></TD>
  446. </TR>
  447. </TABLE>
  448. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  449. <TD WIDTH=34>
  450. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  451. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  452. <TR>
  453. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox39" TYPE=CHECKBOX NAME="prog_neuro_ne" <?if ($obj{"prog_neuro_ne"} == "on") {echo "checked";};?>></TD>
  454. </TR>
  455. </TABLE>
  456. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  457. <TD WIDTH=324>
  458. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"><B>NEURO: d(r&gt;&gt;2&gt;&gt;. no abnormal findings</B></FONT><B></B></P>
  459. </TD>
  460. </TR>
  461. <TR>
  462. <TD>
  463. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif">&nbsp;</FONT></P>
  464. </TD>
  465. <TD WIDTH=40>
  466. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  467. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  468. <TR>
  469. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox40" TYPE=CHECKBOX NAME="prog_rectal_abn" <?if ($obj{"prog_rectal_abn"} == "on") {echo "checked";};?>></TD>
  470. </TR>
  471. </TABLE>
  472. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  473. <TD WIDTH=34>
  474. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  475. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  476. <TR>
  477. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox41" TYPE=CHECKBOX NAME="prog_rectal_ne" <?if ($obj{"prog_rectal_ne"} == "on") {echo "checked";};?>></TD>
  478. </TR>
  479. </TABLE>
  480. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  481. <TD WIDTH=324>
  482. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"><B>RECTAL: no abnormalities</B></FONT><B></B></P>
  483. </TD>
  484. </TR>
  485. <TR>
  486. <TD>
  487. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif">&nbsp;</FONT></P>
  488. </TD>
  489. <TD WIDTH=40>
  490. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  491. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  492. <TR>
  493. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox42" TYPE=CHECKBOX NAME="prog_pelvic_abn" <?if ($obj{"prog_pelvic_abn"} == "on") {echo "checked";};?>></TD>
  494. </TR>
  495. </TABLE>
  496. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  497. <TD WIDTH=34>
  498. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT>
  499. <TABLE WIDTH="100%" BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF=TE>
  500. <TR>
  501. <TD ALIGN="CENTER"><INPUT ID="Forms Checkbox43" TYPE=CHECKBOX NAME="prog_pelvic_ne" <?if ($obj{"prog_pelvic_ne"} == "on") {echo "checked";};?>></TD>
  502. </TR>
  503. </TABLE>
  504. <FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"></FONT></TD>
  505. <TD WIDTH=324>
  506. <P><FONT FACE="Arial,Helvetica,Geneva,Sans-serif,sans-serif"><B>PELVIC:</B></FONT><B></B></P>
  507. </TD>
  508. </TR>
  509. </TABLE>
  510. <br>
  511. <span class=text><b>HEALTH EDUCATION PROVIDED<br>ASSESSMENT:</b></span><br><textarea cols=40 rows=8 wrap=virtual name="prog_assessment" ><?php echo $obj{"prog_assessment"};?></textarea>
  512. <br><br>
  513. <span class=text><b>Plan:</b></span><br><textarea cols=40 rows=8 wrap=virtual name="prog_plan" ><?php echo $obj{"prog_plan"};?></textarea>
  514. <br><br>
  515. <td><input size=3 type=entry name="prog_breast_se" value="<?php echo $obj{"prog_breast_se"};?>" >&nbsp;<span class=text><b>Breast Self Examination </span></td><br></b>
  516. <td><input size=3 type=entry name="prog_dental_h" value="<?php echo $obj{"prog_dental_h"};?>" >&nbsp;<span class=text><b>Dental Health </span></td><br></b>
  517. <td><input size=3 type=entry name="prog_diagnosis" value="<?php echo $obj{"prog_diagnosis"};?>" >&nbsp;<span class=text><b>Diagnosis/Prognosis </span></td><br></b>
  518. <td><input size=3 type:entry name="prog_injur_p" value="<?php echo $obj{"prog_injur_p"};?>" >&nbsp;<span class=text><b>Injury Prevention </span></td><br></b>
  519. <td><input size=3 type=entry name="prog_new_treat" value="<?php echo $obj{"prog_new_treat"};?>" >&nbsp;<span class=text><b>New Treatment/Medication </span></td><br></b>
  520. <td><input size=3 type=entry name="prog_nutrition_e" value="<?php echo $obj{"prog_nutrition_e"};?>" >&nbsp;<span class=text><b>Nutrition/Exercise </span></td><br></b>
  521. <td><input size=3 type=entry name="prog_sexual_p" value="<?php echo $obj{"prog_sexual_p"};?>" >&nbsp;<span class=text><b>Sexual Practice </span></td><br></b>
  522. <td><input size=3 type=entry name="prog_substance_a" value="<?php echo $obj{"prog_substance_a"};?>" >&nbsp;<span class=text><b>Substance Abuse </span></td><br></b>
  523. <a href="javascript:top.restoreSession();document.my_form.submit();" class="link_submit">[Save]</a>
  524. <br>
  525. <a href="<?php echo $GLOBALS['form_exit_url']; ?>" class="link" onclick="top.restoreSession()">[Don't Save]</a>
  526. </form>
  527. <?php
  528. formFooter();
  529. ?>