2 //------------Forms generated from formsWiz
3 include_once(dirname(__FILE__
).'/../../globals.php');
4 include_once($GLOBALS["srcdir"]."/api.inc");
6 function ros_report($pid, $encounter, $cols, $id)
11 $data = formFetch("form_ros", $id);
23 // This maps a label to custom text. For example "glaucoma_history" should be
24 // displayed as "Glaucoma Family History". If this wasn't specified, the code
25 // will display it as "Glaucoma History" due to some clever string manipulation.
26 // Acronyms are handled in this map as well.
27 "glaucoma_history" => "Glaucoma Family History",
28 "irritation" => "Eye Irritation",
29 "redness" => "Eye Redness",
30 "discharge" => "ENT Discharge",
32 "biopsy" => "Breast Biopsy",
33 "hemoptsyis" => "Hemoptysis",
37 "peripheal" => "Peripheral",
38 "legpain_cramping" => "Leg Pain/Cramping",
39 "frequency" => "Urine Frequency",
40 "urgency" => "Urine Urgency",
42 "hesitancy" => "Urine Hesitancy",
43 "dribbling" => "Urine Dribbling",
44 "stream" => "Urine Stream",
49 "mearche" => "Menarche",
51 "f_frequency" => "Menstrual Frequency",
52 "f_flow" => "Menstrual Flow",
53 "f_symptoms" => "Female Symptoms",
54 "f_hirsutism" => "Hirsutism/Striae",
55 "swelling" => "Musc Swelling",
56 "m_redness" => "Musc Redness",
57 "m_warm" => "Musc Warm",
58 "m_stiffness" => "Musc Stiffness",
59 "m_aches" => "Musc Aches",
63 "n_numbness" => "Neuro Numbness",
64 "n_weakness" => "Neuro Weakness",
65 "n_headache" => "Headache",
66 "s_cancer" => "Skin Cancer",
68 "s_other" => "Skin Other",
69 "s_disease" => "Skin Disease",
70 "p_diagnosis" => "Psych Diagnosis",
71 "p_medication" => "Psych Medication",
72 "abnormal_blood" => "Endo Abnormal Blood",
73 "fh_blood_problems" => "FH Blood Problems",
75 "hai_status" => "HAI Status",
78 print "<div id='form_ros_values'><table class='report_results'><tr>";
80 foreach ($data as $key => $value) {
81 if (isset($cmap[$key])) {
82 if ($cmap[$key] == '') {
88 $key = ucwords(str_replace("_", " ", $key));
91 // skip the N/A values -- cfapress, Jan 2009 OR blank or zero date values
92 if ($value == "N/A" ||
$value == "" ||
93 $value == "0000-00-00" ||
$value == "0000-00-00 00:00:00") {
101 printf("<td><span class=bold>%s: </span><span class=text>%s</span></td>", xl($key), xl($value));
104 if ($count == $cols) {
111 print "</tr></table></div>";