added support for the scanned_notes encounter form
[openemr.git] / interface / forms_admin / forms_admin.php
blobeb7600ce7603b4bf7a2ac0e7483d9d29efbd7e8c
1 <?php
2 //INCLUDES, DO ANY ACTIONS, THEN GET OUR DATA
3 include_once("../globals.php");
4 include_once("$srcdir/registry.inc");
5 include_once("$srcdir/sql.inc");
6 if ($_GET['method'] == "enable"){
7 updateRegistered ( $_GET['id'], "state=1" );
9 elseif ($_GET['method'] == "disable"){
10 updateRegistered ( $_GET['id'], "state=0" );
12 elseif ($_GET['method'] == "install_db"){
13 $dir = getRegistryEntry ( $_GET['id'], "directory" );
14 if (installSQL ("$srcdir/../interface/forms/{$dir['directory']}"))
15 updateRegistered ( $_GET['id'], "sql_run=1" );
16 else
17 $err = "ERR: could not open table.sql, broken form?";
19 elseif ($_GET['method'] == "register"){
20 registerForm ( $_GET['name'] ) or $err="err while registering form!";
22 $bigdata = getRegistered("%") or $bigdata = false;
24 $formtarget = $GLOBALS['concurrent_layout'] ? "" : " target='Main'";
26 //START OUT OUR PAGE....
28 <html>
29 <head>
30 <?php html_header_show();?>
31 <link rel="stylesheet" href="<?php echo $css_header;?>" type="text/css">
32 </head>
33 <body class="body_top">
34 <span class="title"><?php xl('Forms Administration','e');?></span>
35 <br><br>
36 <?php
37 foreach($_POST as $key=>$val) {
38 if (preg_match('/nickname_(\d+)/', $key, $matches)) {
39 $nickname_id = $matches[1];
40 sqlQuery("update registry set nickname='".$val."' where id=".$nickname_id);
42 if (preg_match('/category_(\d+)/', $key, $matches)) {
43 $category_id = $matches[1];
44 sqlQuery("update registry set category='".$val."' where id=".$category_id);
46 if (preg_match('/priority_(\d+)/', $key, $matches)) {
47 $priority_id = $matches[1];
48 sqlQuery("update registry set priority='".$val."' where id=".$priority_id);
54 <?php //ERROR REPORTING
55 if ($err)
56 echo "<span class=bold>$err</span><br><br>\n";
60 <?php //REGISTERED SECTION ?>
61 <span class=bold><?php xl('Registered','e');?></span><br>
62 <form method=POST action ='./forms_admin.php'<?php echo $formtarget; ?>>
63 <i><?php xl('click here to update priority, category and nickname settings','e'); ?></i>
64 <input type=submit name=update value='<?php xl('update','e'); ?>'><br>
65 <table border=0 cellpadding=1 cellspacing=2 width="500">
66 <tr>
67 <td> </td>
68 <td> </td>
69 <td> </td>
70 <td> </td>
71 <td> </td>
72 <td><?php xl('Priority ','e'); ?></td>
73 <td><?php xl('Category ','e'); ?></td>
74 <td><?php xl('Nickname','e'); ?></td>
75 </tr>
76 <?php
77 $color="#CCCCCC";
78 if ($bigdata != false)
79 foreach($bigdata as $registry)
81 $priority_category = sqlQuery("select priority, category, nickname from registry where id=".$registry['id']);
83 <tr>
84 <td bgcolor="<?php echo $color?>" width="2%">
85 <span class=text><?php echo $registry['id'];?></span>
86 </td>
87 <td bgcolor="<?php echo $color?>" width="30%">
88 <span class=bold><?php echo $registry['name'];?></span>
89 </td>
90 <?php
91 if ($registry['sql_run'] == 0)
92 echo "<td bgcolor='$color' width='10%'><span class='text'>".xl('registered')."</span>";
93 elseif ($registry['state'] == "0")
94 echo "<td bgcolor='#FFCCCC' width='10%'><a class=link_submit href='./forms_admin.php?id={$registry['id']}&method=enable'$formtarget>".xl('disabled')."</a>";
95 else
96 echo "<td bgcolor='#CCFFCC' width='10%'><a class=link_submit href='./forms_admin.php?id={$registry['id']}&method=disable'$formtarget>".xl('enabled')."</a>";
97 ?></td>
98 <td bgcolor="<?php $color?>" width="10%">
99 <span class=text><?php
101 if ($registry['unpackaged'])
102 echo xl('PHP extracted','e');
103 else
104 echo xl('PHP compressed','e');
106 ?></span>
107 </td>
108 <td bgcolor="<?php echo $color?>" width="10%">
109 <?php
110 if ($registry['sql_run'])
111 echo "<span class=text>".xl('DB installed')."</span>";
112 else
113 echo "<a class=link_submit href='./forms_admin.php?id={$registry['id']}&method=install_db'$formtarget>".xl('install DB')."</a>";
115 </td>
116 <?php
117 echo "<td><input type=text size=4 name=priority_".$registry['id']." value='".$priority_category['priority']."'></td>";
118 echo "<td><input type=text size=8 name=category_".$registry['id']." value='".$priority_category['category']."'></td>";
119 echo "<td><input type=text size=8 name=nickname_".$registry['id']." value='".$priority_category['nickname']."'></td>";
121 </tr>
122 <?php
123 if ($color=="#CCCCCC")
124 $color="#999999";
125 else
126 $color="#CCCCCC";
127 } //end of foreach
129 </table>
130 <hr>
133 <?php //UNREGISTERED SECTION ?>
134 <span class=bold><?php xl('Unregistered','e');?></span><br>
135 <table border=0 cellpadding=1 cellspacing=2 width="500">
136 <?php
137 $dpath = "$srcdir/../interface/forms/";
138 $dp = opendir($dpath);
139 $color="#CCCCCC";
140 for ($i=0; false != ($fname = readdir($dp)); $i++)
141 if ($fname != "." && $fname != ".." && $fname != "CVS" && (is_dir($dpath.$fname) || stristr($fname, ".tar.gz") || stristr($fname, ".tar") || stristr($fname, ".zip") || stristr($fname, ".gz")))
142 $inDir[$i] = $fname;
144 // ballards 11/05/2005 fixed bug in removing registered form from the list
145 if ($bigdata != false)
147 foreach ( $bigdata as $registry )
149 $key = array_search($registry['directory'], $inDir) ; /* returns integer or FALSE */
150 unset($inDir[$key]);
154 foreach ( $inDir as $fname )
156 if (stristr($fname, ".tar.gz") || stristr($fname, ".tar") || stristr($fname, ".zip") || stristr($fname, ".gz"))
157 $phpState = "PHP compressed";
158 else
159 $phpState = "PHP extracted";
161 <tr>
162 <td bgcolor="<?php echo $color?>" width="1%">
163 <span class=text> </span>
164 </td>
165 <td bgcolor="<?php echo $color?>" width="20%">
166 <span class=bold><?php echo $fname?></span>
167 </td>
168 <td bgcolor="<?php echo $color?>" width="10%"><?php
169 if ($phpState == "PHP extracted")
170 echo '<a class=link_submit href="./forms_admin.php?name=' . urlencode($fname) . '&method=register"' . $formtarget . '>register</a>';
171 else
172 echo '<span class=text>n/a</span>';
173 ?></td>
174 <td bgcolor="<?php echo $color?>" width="20%">
175 <span class=text><?php echo $phpState?></span>
176 </td>
177 <td bgcolor="<?php echo $color?>" width="10%">
178 <span class=text>n/a</span>
179 </td>
180 </tr>
181 <?php
182 if ($color=="#CCCCCC")
183 $color="#999999";
184 else
185 $color="#CCCCCC";
186 flush();
187 }//end of foreach
189 </table>
191 </body>
192 </html>