From b38802fae54ceef5e11a968b8ca0d74d4c1300b0 Mon Sep 17 00:00:00 2001
From: Ted Trask <ttrask01@yahoo.com>
Date: Mon, 27 Oct 2014 19:37:12 +0000
Subject: Reworked the code to allow passing in connection parameters

---
 db-listtables-html.lsp | 26 +++++++++++++++++++-------
 1 file changed, 19 insertions(+), 7 deletions(-)

(limited to 'db-listtables-html.lsp')

diff --git a/db-listtables-html.lsp b/db-listtables-html.lsp
index 23ecfc4..f0db6b7 100644
--- a/db-listtables-html.lsp
+++ b/db-listtables-html.lsp
@@ -2,7 +2,7 @@
 <% htmlviewfunctions = require("htmlviewfunctions") %>
 <% html = require("acf.html") %>
 
-<% if #form.value>0 then %>
+<% if form.value.tables and #form.value.tables.value>0 then %>
 <script type="text/javascript">
 	if (typeof jQuery == 'undefined') {
 		document.write('<script type="text/javascript" src="<%= html.html_escape(page_info.wwwprefix) %>/js/jquery-latest.js"><\/script>');
@@ -25,21 +25,33 @@
 <% htmlviewfunctions.displaycommandresults({"createdatabase"}, session) %>
 
 <% local header_level = htmlviewfunctions.displaysectionstart(form, page_info) %>
-<% htmlviewfunctions.displayinfo(form) %>
-<% if #form.value>0 then %>
+<% if form.value.connection and next(form.value.connection.value) ~= nil then
+	htmlviewfunctions.displayformstart(form, page_info)
+	htmlviewfunctions.displayitem(form.value.connection, page_info, htmlviewfunctions.incrementheader(header_level), "connection")
+	form.option = "Update"
+	htmlviewfunctions.displayformend(form, htmlviewfunctions.incrementheader(header_level))
+end %>
+<% if form.value.tables and #form.value.tables.value>0 then %>
 <table id="listtables" class="tablesorter"><thead>
         <tr>
 		<th>Action</th>
 		<th>Table</th>
 	</tr>
 </thead><tbody>
-<% local table = cfe({ type="hidden" }) %>
-<% for i,tab in ipairs(form.value) do %>
-	<% table.value = tab %>
+<% -- We will reuse the form connection structure to pass key values to viewtable
+local formvalues = {}
+if form.value.connection then
+	formvalues.connection = form.value.connection
+	for n,v in pairs(form.value.connection.value) do v.type="hidden" end
+end
+formvalues.table = cfe({ type="hidden" })
+%>
+<% for i,tab in ipairs(form.value.tables.value) do %>
+	<% formvalues.table.value = tab %>
 	<tr>
 		<td>
 		<% if viewlibrary.check_permission("viewtable") then %>
-			<% htmlviewfunctions.displayitem(cfe({type="link", value={table=table}, label="", option="View", action="viewtable"}), page_info, -1) %>
+			<% htmlviewfunctions.displayitem(cfe({type="link", value=formvalues, label="", option="View", action="viewtable"}), page_info, -1) %>
 		<% end %>
 		</td>
 		<td><%= html.html_escape(tab) %></td>
-- 
cgit v1.2.3