Another fix to upgrade clickoptions in windows
[openemr.git] / contrib / forms / pfsh / report.php
blobbb2e015d573fe4781cf6854d5cf063bffdaabefc
1 <?php
2 // Copyright (C) 2009 Aron Racho <aron@mi-squared.com>
3 //
4 // This program is free software; you can redistribute it and/or
5 // modify it under the terms of the GNU General Public License
6 // as published by the Free Software Foundation; either version 2
7 //------------Forms generated from formsWiz
8 include_once("../../globals.php");
9 include_once($GLOBALS["srcdir"] . "/api.inc");
10 function pfsh_report( $pid, $encounter, $cols, $id) {
11 $count = 0;
12 $data = formFetch("form_pfsh", $id);
13 $width = 100/$cols;
14 if ($data) {
15 print "<table><tr>";
16 foreach($data as $key => $value) {
17 if ($key == "id" || $key == "pid" || $key == "user" ||
18 $key == "groupname" || $key == "authorized" || $key == "activity" ||
19 $key == "date" || $value == "" || $value == "0000-00-00 00:00:00")
21 continue;
23 if ($value == "on") {
24 $value = "yes";
26 $key=ucwords(str_replace("_"," ",$key));
27 print "<td width='${width}%' valign='top'><span class=bold>$key: </span><span class=text>$value</span></td>";
28 $count++;
29 if ($count == $cols) {
30 $count = 0;
31 print "</tr><tr>\n";
35 print "</tr></table>";