% function DumpImage(I)
{
if (I==null) return;
%>
Image
|
Name | Value
|
---|
AsHREF: |
<%= I.AsHREF %>
|
<%
}
%>
<% function DumpValueListItem(V)
{
%>
|
---|
<%= V.ValueName %>
| <%= V.Value %>
<%
}
%>
<% function DumpValuesList(L)
{
if (L==null) return;
%>
|
Values:
|
Name
| Value
<%
var e = new Enumerator(L.Records)
for (; !e.atEnd(); e.moveNext())
{
DumpValueListItem(e.item())
}
%>
|
---|
<%
}
%>
<% function DumpField(F)
{
%>
<%=F.Name%>
|
---|
|
Value: | <%= F.Value + ' '%>
|
---|
DisplayText: | <%= F.DisplayText%>
|
---|
EditText: | <%= F.EditText%>
|
---|
DisplayWidth: | <%= F.DisplayWidth%>
|
---|
DisplayLabel: | <%= F.DisplayLabel%>
|
---|
InputName: | <%= F.InputName%>
|
---|
InputStyle: | <%= F.InputStyle%>
|
---|
DisplayStyle: | <%= F.DisplayStyle%>
|
---|
CanModify: | <%= F.CanModify%>
|
---|
CanView: | <%= F.CanView%>
<%
DumpValuesList(F.ValuesList)
DumpImage(F.Image);
%>
|
---|
|
<%
}
%>
<% function DumpAction(A)
{
%>
<%=A.Name%>
|
---|
|
AsFieldValue: | <%= A.AsFieldValue %>
|
---|
AsHREF: | <%= A.AsHREF %>
|
---|
DisplayLabel: | <%= A.DisplayLabel %>
|
---|
Enabled: | <%= A.Enabled %>
|
---|
CanExecute: | <%= A.CanExecute %>
|
---|
|
<%
}
%>
<% function DumpActions(A)
{
if (A==null) return;
%>
<%
var e = new Enumerator(A)
for (; !e.atEnd(); e.moveNext())
{
DumpAction(e.item())
}
%>
<%
}
%>
<% function DumpFields(F)
{
if (F==null) return;
%>
<%
var e = new Enumerator(F)
for (; !e.atEnd(); e.moveNext())
{
DumpField(e.item())
}
%>
<%
}
%>
<% function DumpObject(O)
{
%>
<%=O.Name_%>
|
---|
|
Fields
|
---|
|
<% DumpFields(O.Fields) %>
|
| |
Actions
|
---|
|
<% DumpActions(O.Actions) %>
|
|
<% } %>
<% function DumpModules()
{
var e = new Enumerator(Modules)
%>
Modules
<%
for (; !e.atEnd(); e.moveNext())
{
%>
<%=e.item().Name_%>
<%
var e2 = new Enumerator(e.item().Objects);
for (; !e2.atEnd(); e2.moveNext())
{
%>
|
---|
|
<%
DumpObject(e2.item());
}
}
%>
| |
---|
<%
}
%>
<% DumpModules() %>
|
---|