increment v_js_includes for prior commit
[openemr.git] / interface / forms_admin / forms_admin.php
blob992678459114854ac289f245ce90783fe9389eaf
1 <?php
2 // This program is free software; you can redistribute it and/or
3 // modify it under the terms of the GNU General Public License
4 // as published by the Free Software Foundation; either version 2
5 // of the License, or (at your option) any later version.
7 //INCLUDES, DO ANY ACTIONS, THEN GET OUR DATA
8 include_once("../globals.php");
9 include_once("$srcdir/registry.inc");
10 include_once("$srcdir/sql.inc");
11 if ($_GET['method'] == "enable"){
12 updateRegistered ( $_GET['id'], "state=1" );
14 elseif ($_GET['method'] == "disable"){
15 updateRegistered ( $_GET['id'], "state=0" );
17 elseif ($_GET['method'] == "install_db"){
18 $dir = getRegistryEntry ( $_GET['id'], "directory" );
19 if (installSQL ("$srcdir/../interface/forms/{$dir['directory']}"))
20 updateRegistered ( $_GET['id'], "sql_run=1" );
21 else
22 $err = xl('ERROR: could not open table.sql, broken form?');
24 elseif ($_GET['method'] == "register"){
25 registerForm ( $_GET['name'] ) or $err=xl('error while registering form!');
27 $bigdata = getRegistered("%") or $bigdata = false;
30 //START OUT OUR PAGE....
32 <html>
33 <head>
34 <?php html_header_show();?>
35 <link rel="stylesheet" href="<?php echo $css_header;?>" type="text/css">
36 </head>
37 <body class="body_top">
38 <span class="title"><?php xl('Forms Administration','e');?></span>
39 <br><br>
40 <?php
41 foreach($_POST as $key=>$val) {
42 if (preg_match('/nickname_(\d+)/', $key, $matches)) {
43 $nickname_id = $matches[1];
44 sqlQuery("update registry set nickname='".$val."' where id=".$nickname_id);
46 if (preg_match('/category_(\d+)/', $key, $matches)) {
47 $category_id = $matches[1];
48 sqlQuery("update registry set category='".$val."' where id=".$category_id);
50 if (preg_match('/priority_(\d+)/', $key, $matches)) {
51 $priority_id = $matches[1];
52 sqlQuery("update registry set priority='".$val."' where id=".$priority_id);
58 <?php //ERROR REPORTING
59 if ($err)
60 echo "<span class=bold>$err</span><br><br>\n";
64 <?php //REGISTERED SECTION ?>
65 <span class=bold><?php xl('Registered','e');?></span><br>
66 <form method=POST action ='./forms_admin.php'>
67 <i><?php xl('click here to update priority, category and nickname settings','e'); ?></i>
68 <input type=submit name=update value='<?php xl('update','e'); ?>'><br>
69 <table border=0 cellpadding=1 cellspacing=2 width="500">
70 <tr>
71 <td> </td>
72 <td> </td>
73 <td> </td>
74 <td> </td>
75 <td> </td>
76 <td><?php xl('Priority ','e'); ?></td>
77 <td><?php xl('Category ','e'); ?></td>
78 <td><?php xl('Nickname','e'); ?></td>
79 </tr>
80 <?php
81 $color="#CCCCCC";
82 if ($bigdata != false)
83 foreach($bigdata as $registry)
85 $priority_category = sqlQuery("select priority, category, nickname from registry where id=".$registry['id']);
87 <tr>
88 <td bgcolor="<?php echo $color?>" width="2%">
89 <span class=text><?php echo $registry['id'];?></span>
90 </td>
91 <td bgcolor="<?php echo $color?>" width="30%">
92 <span class=bold><?php echo xl_form_title($registry['name']); ?></span>
93 </td>
94 <?php
95 if ($registry['sql_run'] == 0)
96 echo "<td bgcolor='$color' width='10%'><span class='text'>".xl('registered')."</span>";
97 elseif ($registry['state'] == "0")
98 echo "<td bgcolor='#FFCCCC' width='10%'><a class=link_submit href='./forms_admin.php?id={$registry['id']}&method=enable'>".xl('disabled')."</a>";
99 else
100 echo "<td bgcolor='#CCFFCC' width='10%'><a class=link_submit href='./forms_admin.php?id={$registry['id']}&method=disable'>".xl('enabled')."</a>";
101 ?></td>
102 <td bgcolor="<?php $color?>" width="10%">
103 <span class=text><?php
105 if ($registry['unpackaged'])
106 echo xl('PHP extracted','e');
107 else
108 echo xl('PHP compressed','e');
110 ?></span>
111 </td>
112 <td bgcolor="<?php echo $color?>" width="10%">
113 <?php
114 if ($registry['sql_run'])
115 echo "<span class=text>".xl('DB installed')."</span>";
116 else
117 echo "<a class=link_submit href='./forms_admin.php?id={$registry['id']}&method=install_db'>".xl('install DB')."</a>";
119 </td>
120 <?php
121 echo "<td><input type=text size=4 name=priority_".$registry['id']." value='".$priority_category['priority']."'></td>";
122 echo "<td><input type=text size=8 name=category_".$registry['id']." value='".$priority_category['category']."'></td>";
123 echo "<td><input type=text size=8 name=nickname_".$registry['id']." value='".$priority_category['nickname']."'></td>";
125 </tr>
126 <?php
127 if ($color=="#CCCCCC")
128 $color="#999999";
129 else
130 $color="#CCCCCC";
131 } //end of foreach
133 </table>
134 <hr>
136 <?php //UNREGISTERED SECTION ?>
137 <span class=bold><?php xl('Unregistered','e');?></span><br>
138 <table border=0 cellpadding=1 cellspacing=2 width="500">
139 <?php
140 $dpath = "$srcdir/../interface/forms/";
141 $dp = opendir($dpath);
142 $color="#CCCCCC";
143 for ($i=0; false != ($fname = readdir($dp)); $i++)
144 if ($fname != "." && $fname != ".." && $fname != "CVS" && $fname != "LBF" &&
145 (is_dir($dpath.$fname) || stristr($fname, ".tar.gz") ||
146 stristr($fname, ".tar") || stristr($fname, ".zip") ||
147 stristr($fname, ".gz")))
148 $inDir[$i] = $fname;
150 // ballards 11/05/2005 fixed bug in removing registered form from the list
151 if ($bigdata != false)
153 foreach ( $bigdata as $registry )
155 $key = array_search($registry['directory'], $inDir) ; /* returns integer or FALSE */
156 unset($inDir[$key]);
160 foreach ( $inDir as $fname )
162 // added 8-2009 by BM - do not show the metric vitals form as option since deprecated
163 // also added a toggle in globals.php in case user wants the option to add this deprecated form
164 if (($fname == "vitalsM") && ($GLOBALS['disable_deprecated_metrics_form'])) continue;
166 if (stristr($fname, ".tar.gz") || stristr($fname, ".tar") || stristr($fname, ".zip") || stristr($fname, ".gz"))
167 $phpState = "PHP compressed";
168 else
169 $phpState = "PHP extracted";
171 <tr>
172 <td bgcolor="<?php echo $color?>" width="1%">
173 <span class=text> </span>
174 </td>
175 <td bgcolor="<?php echo $color?>" width="20%">
176 <?php
177 $form_title_file = @file($GLOBALS['srcdir']."/../interface/forms/$fname/info.txt");
178 if ($form_title_file)
179 $form_title = $form_title_file[0];
180 else
181 $form_title = $fname;
183 <span class=bold><?php echo xl_form_title($form_title); ?></span>
184 </td>
185 <td bgcolor="<?php echo $color?>" width="10%"><?php
186 if ($phpState == "PHP extracted")
187 echo '<a class=link_submit href="./forms_admin.php?name=' . urlencode($fname) . '&method=register">' . xl('register') . '</a>';
188 else
189 echo '<span class=text>' . xl('n/a') . '</span>';
190 ?></td>
191 <td bgcolor="<?php echo $color?>" width="20%">
192 <span class=text><?php echo xl($phpState); ?></span>
193 </td>
194 <td bgcolor="<?php echo $color?>" width="10%">
195 <span class=text><?php xl('n/a','e'); ?></span>
196 </td>
197 </tr>
198 <?php
199 if ($color=="#CCCCCC")
200 $color="#999999";
201 else
202 $color="#CCCCCC";
203 flush();
204 }//end of foreach
206 </table>
208 </body>
209 </html>