% local form = ... %>
<%
--[[ DEBUG INFORMATION
io.write("
DEBUGGING
DEBUG INFO: CFE
")
io.write(html.cfe_unpack(form))
io.write("")
--]]
%>
<%
function displayinfo(myform,tags,viewtype)
for k,v in pairs(tags) do
if (myform[v]) and (myform[v]["value"]) then
local val = myform[v]
io.write("\n\t
" .. html.html_escape(val.label) .. "
")
io.write("\n\t\t
")
if (viewtype == "viewonly") then
if (val.value == "") then val.value = " " end
io.write(html.html_escape(val.value))
elseif (val.type == "radio") and (type(val.option) == "table") and (#val.option > 0) then
io.write("")
for k1,v1 in pairs(val.option) do
io.write("\n\t\t\t"..html.html_escape(tostring(v1)) .. ":")
io.write("")
end
io.write("\n\t\t\t")
else
io.write(html.form[val.type](val))
end
if (val.descr) and (#val.descr > 0) then io.write("\n\t\t