2 //these are the functions used to access the forms registry database
6 function registerForm($directory, $sql_run = 0, $unpackaged = 1, $state = 0)
8 $check = sqlQuery("select state from registry where directory='$directory'");
10 $lines = @file($GLOBALS['srcdir']."/../interface/forms/$directory/info.txt");
17 return sqlInsert("insert into registry set
20 directory='".add_escape_custom($directory)."',
22 unpackaged='$unpackaged',
30 function updateRegistered($id, $mod)
32 return sqlInsert("update registry set
40 function getRegistered($state = "1", $limit = "unlimited", $offset = "0")
42 $sql = "select * from registry where state like \"$state\" order by priority, name";
43 if ($limit != "unlimited") {
44 $sql .= " limit $limit, $offset";
47 $res = sqlStatement($sql);
49 for ($iter=0; $row=sqlFetchArray($res); $iter++) {
59 function getRegistryEntry($id, $cols = "*")
61 $sql = "select $cols from registry where id='$id'";
62 return sqlQuery($sql);
65 function getRegistryEntryByDirectory($directory, $cols = "*")
67 $sql = "select $cols from registry where directory = ?";
68 return sqlQuery($sql, $directory);
71 function installSQL($dir)
73 $sqltext = $dir."/table.sql";
74 if ($sqlarray = @file($sqltext)) {
75 $sql = implode("", $sqlarray);
76 //echo "<br>$sql<br><br>";
77 $sqla = explode(";", $sql);
78 foreach ($sqla as $sqlq) {
79 if (strlen($sqlq) > 5) {
80 sqlStatement(rtrim("$sqlq"));
92 * is a form registered
93 * (optional - and active)
96 * NOTE - sometimes the Name of a form has a line-break at the end, thus this function might be better
98 * INPUT = directory => form directory
99 * state => 0=inactive / 1=active
100 * OUTPUT = true or false
102 function isRegistered($directory, $state = 1)
104 $sql = "select id from registry where ".
105 "directory='".$directory.
106 "' and state=".$state;
107 $result = sqlQuery($sql);
108 if ($result['id'] != '') {
115 function getTherapyGroupCategories()