From b802504e41cccda64b8f903973d01897bbec7451 Mon Sep 17 00:00:00 2001
From: Ted Trask <ttrask01@yahoo.com>
Date: Mon, 10 Oct 2011 18:25:19 +0000
Subject: Change viewclassparams to getclassvalues

---
 provisioning-getclassvalues-html.lsp | 27 +++++++++++++++++++++++++++
 1 file changed, 27 insertions(+)
 create mode 100644 provisioning-getclassvalues-html.lsp

(limited to 'provisioning-getclassvalues-html.lsp')

diff --git a/provisioning-getclassvalues-html.lsp b/provisioning-getclassvalues-html.lsp
new file mode 100644
index 0000000..4f07db1
--- /dev/null
+++ b/provisioning-getclassvalues-html.lsp
@@ -0,0 +1,27 @@
+<% local form, viewlibrary, page_info = ... 
+require("viewfunctions")
+%>
+
+<% if form.value.values then %>
+<H1>Class</H1>
+	<DL>
+<% if form.errtxt then io.write("<P CLASS='error'>" .. string.gsub(html.html_escape(form.errtxt), "\n", "<BR>") .. "</P>\n") end %>
+	<% displayitem(form.value.class_id) %>
+	<% displayitem(form.value.label) %>
+<H2>Parameter Values</H2>
+<%
+	require("session")
+	val = session.serialize("values", form.value.values.value)
+	val = string.gsub(val, "[^\n]*%{%}\n", "")
+	print("<pre>"..val.."</pre>")
+	form.value.values = nil
+%>
+	</DL>
+<% end %>
+
+<H1><%= html.html_escape(form.label) %></H1>
+<%
+	form.value.values = nil
+	form.value.label = nil
+	displayform(form, nil, nil, page_info, 2)
+%>
-- 
cgit v1.2.3