summaryrefslogtreecommitdiffstats
path: root/db-listtables-html.lsp
blob: fec3ac42902cdb70ec8745b0f9e7af9b69660d9c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
<% local form, viewlibrary, page_info, session = ... %>
<% require("htmlviewfunctions") %>
<% html = require("acf.html") %>

<% htmlviewfunctions.displaycommandresults({"createdatabase"}, session) %>

<H1><%= html.html_escape(form.label) %></H1>
<DL>
<% for i,table in ipairs(form.value) do %>
	<li>
	<% if viewlibrary.check_permission("viewtable") then %>
		<%= html.link{value = "viewtable?table=" .. table, label=table} %>
	<% else %>
		<%= html.html_escape(table) %>
	<% end %>
<% end %>
<% if #form.value == 0 and viewlibrary.check_permission("createdatabase") then %>
<DT>Create Database</DT><DD>
<form action="<%= html.html_escape(page_info.script .. page_info.prefix .. page_info.controller .. "/createdatabase") %>">
<input class="submit" type="submit" name="submit" value="Create"></DD>
</form>
</DD>
<% end %>
</DL>