home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2000 April
/
Chip_2000-04_cd.bin
/
zkuste
/
Tango
/
data1.cab
/
Tango_Demos_TCFs
/
FormBuilder.tcf
< prev
next >
Wrap
Extensible Markup Language
|
1999-09-21
|
100KB
|
2,347 lines
<?xml version="1.0" encoding="ISO-8859-1" ?>
<!DOCTYPE TAF SYSTEM "tango.dtd" >
<TCF Version="0x02000002">
<Comments />
<!--Defined Classes-->
<Classes>
<ClassDef>
<Name>FormBuilder</Name>
<!--Class constructor-->
<On_Create>
<Implementation>
<ActionRef Ref="FormBuilder.On_Create.Comments" />
</Implementation>
</On_Create>
<!--Class destructor-->
<On_Destroy>
<Implementation />
</On_Destroy>
<!--Methods of this class-->
<Methods>
<MethodDef>
<Name>addRadioButtons</Name>
<MethodParameterList>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Name</Name>
<Comments>Name of a set of Radio Buttons.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Label</Name>
<Comments>Label Describing Purpose of Field. HTML accepted.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Array" Direction="In">
<Name>Options</Name>
<Comments>(n x 2) <![CDATA[
First Column = Value of Button
Second Column = Desc of Button]]></Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>DefaultValue</Name>
<Comments>Value to be checked (if any)</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Required</Name>
<Comments>Input should be <![CDATA["TRUE" or "FALSE".
If field is required,
client side JavaScript Form verification will ensue.]]></Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>NumCols</Name>
<Comments>Number of Radio Buttons per row.</Comments>
</MethodParameterItem>
</MethodParameterList>
<Implementation>
<ActionRef Ref="FormBuilder.addRadioButtons.Append_RadioButtons" />
</Implementation>
</MethodDef>
<MethodDef>
<Name>addTextField</Name>
<MethodParameterList>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Name</Name>
<Comments>Name of a Text Field</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Label</Name>
<Comments>Label Describing Purpose of Field. HTML accepted.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>DefaultValue</Name>
<Comments>Value to be displayed.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>DisplayLength</Name>
<Comments>Length of the field, in characters, displayed on the form.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>MaxLength</Name>
<Comments>Length of the input, in characters, that will be accepted by the form.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Required</Name>
<Comments>Input should be <![CDATA["TRUE" or "FALSE".
If field is required,
client side JavaScript Form verification will ensue.]]></Comments>
</MethodParameterItem>
</MethodParameterList>
<Implementation>
<ActionRef Ref="FormBuilder.addTextField.Append_TextField" />
</Implementation>
</MethodDef>
<MethodDef>
<Name>addCheckbox</Name>
<MethodParameterList>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Name</Name>
<Comments>Name of a Check Box.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Label</Name>
<Comments>Label Describing Purpose of Field. HTML accepted.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Value</Name>
<Comments>Value associated with the Check Box.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Checked</Name>
<Comments>TRUE or FALSE</Comments>
</MethodParameterItem>
</MethodParameterList>
<Implementation>
<ActionRef Ref="FormBuilder.addCheckbox.Append_Checkbox" />
</Implementation>
</MethodDef>
<MethodDef>
<Name>outputForm</Name>
<MethodParameterList>
<MethodParameterItem DataType="Text" Direction="In">
<Name>SubmitText</Name>
<Comments>Text displayed on the <![CDATA["Submit Button" of the Form.]]></Comments>
</MethodParameterItem>
</MethodParameterList>
<Implementation>
<ActionRef Ref="FormBuilder.outputForm.If_Required_Elements_Found">
<ActionRef Ref="FormBuilder.outputForm.Output_Javascript_Into_Form" />
</ActionRef>
<ActionRef Ref="FormBuilder.outputForm.Output_form" />
</Implementation>
<UseReturnValue>TRUE</UseReturnValue>
</MethodDef>
<MethodDef>
<Name>openForm</Name>
<MethodParameterList>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Name</Name>
<Comments>Name of Form.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Action</Name>
<Comments>Path to the file that will receive the results of this form.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>RequiredColor</Name>
<Comments>Color of the asterisk that denotes a required field.<![CDATA[
Defaults to Maroon.]]></Comments>
</MethodParameterItem>
</MethodParameterList>
<Implementation>
<ActionRef Ref="FormBuilder.openForm.Initialize_Form" />
</Implementation>
</MethodDef>
<MethodDef>
<Name>addFileField</Name>
<MethodParameterList>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Name</Name>
<Comments>Name of a File Field.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Label</Name>
<Comments>Label Describing Purpose of Field. HTML accepted.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>DefaultValue</Name>
<Comments>Value to be displayed. <![CDATA[
If there is a default value, this acts as a Text Field.
Otherwise, as a file field, with a browse button.]]></Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>MaxLength</Name>
<Comments>Length of the input, in characters, that will be accepted by the form.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>DisplayLength</Name>
<Comments>Length of the field, in characters, displayed on the form.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Required</Name>
<Comments>Input should be <![CDATA["TRUE" or "FALSE".
If field is required,
client side JavaScript Form verification will ensue.]]></Comments>
</MethodParameterItem>
</MethodParameterList>
<Implementation>
<ActionRef Ref="FormBuilder.addFileField.Append_FileField" />
</Implementation>
</MethodDef>
<MethodDef>
<Name>addCheckboxes</Name>
<MethodParameterList>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Name</Name>
<Comments>Name of a set of Check Boxes.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Label</Name>
<Comments>Label Describing Purpose of Field. HTML accepted.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Array" Direction="In">
<Name>Options</Name>
<Comments>(n x 2) <![CDATA[
First Column = Value of Check Box
Second Column = Desc of Check Box]]></Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>NumCols</Name>
<Comments>Number of Check Boxes per row.</Comments>
</MethodParameterItem>
</MethodParameterList>
<Implementation>
<ActionRef Ref="FormBuilder.addCheckboxes.Append_Checkboxes" />
</Implementation>
</MethodDef>
<MethodDef>
<Name>addDropdown</Name>
<MethodParameterList>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Name</Name>
<Comments>Name of a Drop Down List.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Label</Name>
<Comments>Label Describing Purpose of Field. HTML accepted.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Array" Direction="In">
<Name>Options</Name>
<Comments>(n x 2) <![CDATA[
First Column = Value of List Item
Second Column = Desc of List Item]]></Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>DefaultValue</Name>
<Comments>Value to be selected (if any)</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>MultipleSize</Name>
<Comments>If desiring a multiple select list box, <![CDATA[
enter an integer to denote the size.]]></Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Required</Name>
<Comments>Input should be <![CDATA["TRUE" or "FALSE".
If field is required,
client side JavaScript Form verification will ensue.]]></Comments>
</MethodParameterItem>
</MethodParameterList>
<Implementation>
<ActionRef Ref="FormBuilder.addDropdown.Append_Dropdown" />
</Implementation>
</MethodDef>
<MethodDef>
<Name>addDateField</Name>
<MethodParameterList>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Name</Name>
<Comments>Name of a Date Field.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Label</Name>
<Comments>Label Describing Purpose of Field. HTML accepted.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>DefaultValue</Name>
<Comments>Default value displayed in field.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Required</Name>
<Comments>Input should be <![CDATA["TRUE" or "FALSE".
If field is required,
client side JavaScript Form verification will ensue.]]></Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>PopupCalendar</Name>
<Comments>Input <![CDATA["TRUE" or "FALSE".
If True, Pop up Calendar will be used.
Enter Path in PopupCalendarPath.]]></Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>PopupCalendarPath</Name>
<Comments>Enter a path to the popup <![CDATA["calendar.taf", and "calendar.gif".
Inherently these need to be in the same directory.]]></Comments>
</MethodParameterItem>
</MethodParameterList>
<Implementation>
<ActionRef Ref="FormBuilder.addDateField.Append_DateField" />
</Implementation>
</MethodDef>
<MethodDef>
<Name>addDateRange</Name>
<MethodParameterList>
<MethodParameterItem DataType="Text" Direction="In">
<Name>LowerName</Name>
<Comments>Name of the Lower Date Field.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>UpperName</Name>
<Comments>Name of the Upper Date Field.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Label</Name>
<Comments>Label Describing Purpose of Field. HTML accepted.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>LowerDefaultValue</Name>
<Comments>Default value displayed in lower field.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>UpperDefaultValue</Name>
<Comments>Default value displayed in upper field.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Required</Name>
<Comments>Input should be <![CDATA["TRUE" or "FALSE".
If field is required,
client side JavaScript Form verification will ensue.]]></Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>PopupCalendar</Name>
<Comments>Enter a path to the popup <![CDATA["calendar.taf", and "calendar.gif".
Inherently these need to be in the same directory.]]></Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>PopupCalendarPath</Name>
<Comments>Enter a path to the popup <![CDATA["calendar.html", and "calendar.gif".
Inherently these need to be in the same directory.]]></Comments>
</MethodParameterItem>
</MethodParameterList>
<Implementation>
<ActionRef Ref="FormBuilder.addDateRange.Append_DateRangeFields" />
</Implementation>
</MethodDef>
<MethodDef>
<Name>addPassword</Name>
<MethodParameterList>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Name</Name>
<Comments>Name of a Password Field.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Label</Name>
<Comments>Label Describing Purpose of Field. HTML accepted.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>DefaultValue</Name>
<Comments>Default value displayed in field.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>DisplayLength</Name>
<Comments>Length of the field, in characters, displayed on the form.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>MaxLength</Name>
<Comments>Length of the input, in characters, that will be accepted by the form.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Required</Name>
<Comments>Input should be <![CDATA["TRUE" or "FALSE".
If field is required,
client side JavaScript Form verification will ensue.]]></Comments>
</MethodParameterItem>
</MethodParameterList>
<Implementation>
<ActionRef Ref="FormBuilder.addPassword.Append_PasswordField" />
</Implementation>
</MethodDef>
<MethodDef>
<Name>addIntegerField</Name>
<MethodParameterList>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Name</Name>
<Comments>Name of an Integer Field.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Label</Name>
<Comments>Label Describing Purpose of Field. HTML accepted.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>DefaultValue</Name>
<Comments>Default value displayed in field.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>MinValue</Name>
<Comments>Min Value that will be accepted in this field.<![CDATA[
Java Script will be enabled to handle this.]]></Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>MaxValue</Name>
<Comments>Max Value that will be accepted in this field.<![CDATA[
Java Script will be enabled to handle this.]]></Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Required</Name>
<Comments>Input should be <![CDATA["TRUE" or "FALSE".
If field is required,
client side JavaScript Form verification will ensue.]]></Comments>
</MethodParameterItem>
</MethodParameterList>
<Implementation>
<ActionRef Ref="FormBuilder.addIntegerField.Append_IntegerField" />
</Implementation>
</MethodDef>
<MethodDef>
<Name>addFloatField</Name>
<MethodParameterList>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Name</Name>
<Comments>Name of a Float Field</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Label</Name>
<Comments>Label Describing Purpose of Field. HTML accepted.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>DefaultValue</Name>
<Comments>Default value displayed in field.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>MinValue</Name>
<Comments>Min Value that will be accepted in this field.<![CDATA[
Java Script will be enabled to handle this.]]></Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>MaxValue</Name>
<Comments>Max Value that will be accepted in this field.<![CDATA[
Java Script will be enabled to handle this.]]></Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Required</Name>
<Comments>Input should be <![CDATA["TRUE" or "FALSE".
If field is required,
client side JavaScript Form verification will ensue.]]></Comments>
</MethodParameterItem>
</MethodParameterList>
<Implementation>
<ActionRef Ref="FormBuilder.addFloatField.Append_FloatField" />
</Implementation>
</MethodDef>
<MethodDef>
<Name>addDivider</Name>
<MethodParameterList>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Label</Name>
<Comments>Label To be Displayed in Divider. HTML accepted.<![CDATA[
Enter to ensure background color fill.]]></Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>BackgroundColor</Name>
<Comments>Color of Divider.</Comments>
</MethodParameterItem>
</MethodParameterList>
<Implementation>
<ActionRef Ref="FormBuilder.addDivider.Append_Divider" />
</Implementation>
</MethodDef>
<MethodDef>
<Name>addBlankLine</Name>
<MethodParameterList />
<Implementation>
<ActionRef Ref="FormBuilder.addBlankLine.Append_Blank" />
</Implementation>
</MethodDef>
<MethodDef>
<Name>addReadOnly</Name>
<MethodParameterList>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Label</Name>
<Comments>Label Describing Purpose of Field. HTML accepted.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Value</Name>
<Comments>Value displayed. HTML accepted.</Comments>
</MethodParameterItem>
</MethodParameterList>
<Implementation>
<ActionRef Ref="FormBuilder.addReadOnly.Append_ReadOnly" />
</Implementation>
</MethodDef>
<MethodDef>
<Name>addTextArea</Name>
<MethodParameterList>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Name</Name>
<Comments>Name of a Text Area.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Label</Name>
<Comments>Label Describing Purpose of Field. HTML accepted.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>DefaultValue</Name>
<Comments>Default value displayed in field.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Rows</Name>
<Comments>Height of Text Area, in rows.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Columns</Name>
<Comments>Length of Text Area, in columns.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>BackgroundColor</Name>
<Comments>Color of Text Area.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Required</Name>
<Comments>Input should be <![CDATA["TRUE" or "FALSE".
If field is required,
client side JavaScript Form verification will ensue.]]></Comments>
</MethodParameterItem>
</MethodParameterList>
<Implementation>
<ActionRef Ref="FormBuilder.addTextArea.Append_TextArea" />
</Implementation>
</MethodDef>
<MethodDef>
<Name>addHidden</Name>
<MethodParameterList>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Name</Name>
<Comments>Name of a Hidden Field.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Value</Name>
<Comments>Value of Hidden Field.</Comments>
</MethodParameterItem>
</MethodParameterList>
<Implementation>
<ActionRef Ref="FormBuilder.addHidden.Append_Hidden" />
</Implementation>
</MethodDef>
<MethodDef>
<Name>addDynamicRadioButtons</Name>
<MethodParameterList>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Name</Name>
<Comments>Name of a set of Radio Buttons.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Label</Name>
<Comments>Label Describing Purpose of Field. HTML accepted.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>ArrayName</Name>
<Comments>Name of local array of size (n x 2) <![CDATA[
This name will be inserted appropriately so that
this field will fill dynamically dependant on the array
name, and its contents.
First Column = Value of Button
Second Column = Desc of Button]]></Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>DefaultValue</Name>
<Comments>Value to be checked (if any)</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Required</Name>
<Comments>Input should be <![CDATA["TRUE" or "FALSE".
If field is required,
client side JavaScript Form verification will ensue.]]></Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>NumCols</Name>
<Comments>Number of Radio Buttons per row.</Comments>
</MethodParameterItem>
</MethodParameterList>
<Implementation>
<ActionRef Ref="FormBuilder.addDynamicRadioButtons.Append_DynamicRadioButtons" />
</Implementation>
</MethodDef>
<MethodDef>
<Name>addDynamicDropdown</Name>
<MethodParameterList>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Name</Name>
<Comments>Name of a Drop Down List.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Label</Name>
<Comments>Label Describing Purpose of Field. HTML accepted.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>ArrayName</Name>
<Comments>Name of local array of size (n x 2) <![CDATA[
This name will be inserted appropriately so that
this field will fill dynamically dependant on the array
name, and its contents.
First Column = Value of List Item
Second Column = Desc of List Item]]></Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>DefaultValue</Name>
<Comments>Value to be selected (if any)</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>MultipleSize</Name>
<Comments>If desiring a multiple select list box, <![CDATA[
enter an integer to denote the size.]]></Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Required</Name>
<Comments>Input should be <![CDATA["TRUE" or "FALSE".
If field is required,
client side JavaScript Form verification will ensue.]]></Comments>
</MethodParameterItem>
</MethodParameterList>
<Implementation>
<ActionRef Ref="FormBuilder.addDynamicDropdown.Append_DynamicDropdown" />
</Implementation>
</MethodDef>
<MethodDef>
<Name>addDynamicCheckboxes</Name>
<MethodParameterList>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Name</Name>
<Comments>Name of a set of Check Boxes.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Label</Name>
<Comments>Label Describing Purpose of Field. HTML accepted.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>ArrayName</Name>
<Comments>Name of local array of size (n x 2) <![CDATA[
This name will be inserted appropriately so that
this field will fill dynamically dependant on the array
name, and its contents.
First Column = Value of Check Box
Second Column = Desc of Check Box]]></Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>NumCols</Name>
<Comments>Number of Radio Buttons per row.</Comments>
</MethodParameterItem>
</MethodParameterList>
<Implementation>
<ActionRef Ref="FormBuilder.addDynamicCheckboxes.Append_DynamicCheckboxes" />
</Implementation>
</MethodDef>
<MethodDef>
<Name>addCustomRow</Name>
<MethodParameterList>
<MethodParameterItem DataType="Text" Direction="In">
<Name>MetaHTML</Name>
<Comments>Custom row! Accepts HTML. Can be any valid HTML.</Comments>
</MethodParameterItem>
</MethodParameterList>
<Implementation>
<ActionRef Ref="FormBuilder.addCustomRow.Append_CustomRow" />
</Implementation>
</MethodDef>
<MethodDef>
<Name>addIntegerRange</Name>
<MethodParameterList>
<MethodParameterItem DataType="Text" Direction="In">
<Name>LowerName</Name>
<Comments>Name of the Lower Integer Field.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>UpperName</Name>
<Comments>Name of the Upper Integer Field.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Label</Name>
<Comments>Label Describing Purpose of Field. HTML accepted.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>LowerDefaultValue</Name>
<Comments>Default value displayed in lower field.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>UpperDefaultValue</Name>
<Comments>Default value displayed in upper field.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>MinValue</Name>
<Comments>Min Value that will be accepted in this field.<![CDATA[
Java Script will be enabled to handle this.]]></Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>MaxValue</Name>
<Comments>Max Value that will be accepted in this field.<![CDATA[
Java Script will be enabled to handle this.]]></Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Required</Name>
<Comments>Input should be <![CDATA["TRUE" or "FALSE".
If field is required,
client side JavaScript Form verification will ensue.]]></Comments>
</MethodParameterItem>
</MethodParameterList>
<Implementation>
<ActionRef Ref="FormBuilder.addIntegerRange.Append_IntegerRangeFields" />
</Implementation>
</MethodDef>
<MethodDef>
<Name>addFloatRange</Name>
<MethodParameterList>
<MethodParameterItem DataType="Text" Direction="In">
<Name>LowerName</Name>
<Comments>Name of the Lower Float Field.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>UpperName</Name>
<Comments>Name of the Lower Float Field.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Label</Name>
<Comments>Label Describing Purpose of Field. HTML accepted.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>LowerDefaultValue</Name>
<Comments>Default value displayed in lower field.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>UpperDefaultValue</Name>
<Comments>Default value displayed in upper field.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>MinValue</Name>
<Comments>Min Value that will be accepted in this field.<![CDATA[
Java Script will be enabled to handle this.]]></Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>MaxValue</Name>
<Comments>Max Value that will be accepted in this field.<![CDATA[
Java Script will be enabled to handle this.]]></Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Required</Name>
<Comments>Input should be <![CDATA["TRUE" or "FALSE".
If field is required,
client side JavaScript Form verification will ensue.]]></Comments>
</MethodParameterItem>
</MethodParameterList>
<Implementation>
<ActionRef Ref="FormBuilder.addFloatRange.Append_FloatRangeFields" />
</Implementation>
</MethodDef>
<MethodDef>
<Name>addDynamicFileField</Name>
<MethodParameterList>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Name</Name>
<Comments>Name of a File Field.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Label</Name>
<Comments>Label Describing Purpose of Field. HTML accepted.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>DefaultValue</Name>
<Comments>Default value displayed in field.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>MaxLength</Name>
<Comments>Length of the input, in characters, that will be accepted by the form.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>DisplayLength</Name>
<Comments>Length of the field, in characters, displayed on the form.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Required</Name>
<Comments>Input should be <![CDATA["TRUE" or "FALSE".
If field is required,
client side JavaScript Form verification will ensue.]]></Comments>
</MethodParameterItem>
</MethodParameterList>
<Implementation>
<ActionRef Ref="FormBuilder.addDynamicFileField.Append_DynamicFileField" />
</Implementation>
</MethodDef>
<MethodDef>
<Name>addDynamicCheckbox</Name>
<MethodParameterList>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Name</Name>
<Comments>Name of a Check Box.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Label</Name>
<Comments>Label Describing Purpose of Field. HTML accepted.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>Value</Name>
<Comments>Value associated with the Check Box.</Comments>
</MethodParameterItem>
<MethodParameterItem DataType="Text" Direction="In">
<Name>DefaultValue</Name>
<Comments>Value to be checked (if any)</Comments>
</MethodParameterItem>
</MethodParameterList>
<Implementation>
<ActionRef Ref="FormBuilder.addDynamicCheckbox.Append_DynamicCheckbox" />
</Implementation>
</MethodDef>
</Methods>
<!--Instance variables for this class-->
<Variables />
</ClassDef>
</Classes>
<!--Program actions-->
<Actions>
<ResultAction ID="FormBuilder.On_Create.Comments" Sig="null">
<ResultsOutput Ref="FormBuilder.On_Create.Comments.Results" />
</ResultAction>
<ResultAction ID="FormBuilder.addRadioButtons.Append_RadioButtons" Sig="null">
<ResultsOutput Ref="FormBuilder.addRadioButtons.Append_RadioButtons.Results" />
</ResultAction>
<ResultAction ID="FormBuilder.addTextField.Append_TextField" Sig="null">
<ResultsOutput Ref="FormBuilder.addTextField.Append_TextField.Results" />
</ResultAction>
<ResultAction ID="FormBuilder.addCheckbox.Append_Checkbox" Sig="null">
<ResultsOutput Ref="FormBuilder.addCheckbox.Append_Checkbox.Results" />
</ResultAction>
<IfAction ID="FormBuilder.outputForm.If_Required_Elements_Found" Sig="if " Expanded="True">
<Expression>(<![CDATA['@@instance$RequiredFlag'='TRUE')]]></Expression>
<ExpressionInfo>
<ExpLeft>@@instance$RequiredFlag</ExpLeft>
<ExpRight>TRUE</ExpRight>
<Operator>iseq</Operator>
</ExpressionInfo>
</IfAction>
<ResultAction ID="FormBuilder.outputForm.Output_Javascript_Into_Form" Sig="null">
<ResultsOutput Ref="FormBuilder.outputForm.Output_Javascript_Into_Form.Results" />
</ResultAction>
<ResultAction ID="FormBuilder.outputForm.Output_form" Sig="null">
<ResultsOutput Ref="FormBuilder.outputForm.Output_form.Results" />
</ResultAction>
<ResultAction ID="FormBuilder.openForm.Initialize_Form" Sig="null">
<ResultsOutput Ref="FormBuilder.openForm.Initialize_Form.Results" />
</ResultAction>
<ResultAction ID="FormBuilder.addFileField.Append_FileField" Sig="null">
<ResultsOutput Ref="FormBuilder.addFileField.Append_FileField.Results" />
</ResultAction>
<ResultAction ID="FormBuilder.addCheckboxes.Append_Checkboxes" Sig="null">
<ResultsOutput Ref="FormBuilder.addCheckboxes.Append_Checkboxes.Results" />
</ResultAction>
<ResultAction ID="FormBuilder.addDropdown.Append_Dropdown" Sig="null">
<ResultsOutput Ref="FormBuilder.addDropdown.Append_Dropdown.Results" />
</ResultAction>
<ResultAction ID="FormBuilder.addDateField.Append_DateField" Sig="null">
<ResultsOutput Ref="FormBuilder.addDateField.Append_DateField.Results" />
</ResultAction>
<ResultAction ID="FormBuilder.addDateRange.Append_DateRangeFields" Sig="null">
<ResultsOutput Ref="FormBuilder.addDateRange.Append_DateRangeFields.Results" />
</ResultAction>
<ResultAction ID="FormBuilder.addPassword.Append_PasswordField" Sig="null">
<ResultsOutput Ref="FormBuilder.addPassword.Append_PasswordField.Results" />
</ResultAction>
<ResultAction ID="FormBuilder.addIntegerField.Append_IntegerField" Sig="null">
<ResultsOutput Ref="FormBuilder.addIntegerField.Append_IntegerField.Results" />
</ResultAction>
<ResultAction ID="FormBuilder.addFloatField.Append_FloatField" Sig="null">
<ResultsOutput Ref="FormBuilder.addFloatField.Append_FloatField.Results" />
</ResultAction>
<ResultAction ID="FormBuilder.addDivider.Append_Divider" Sig="null">
<ResultsOutput Ref="FormBuilder.addDivider.Append_Divider.Results" />
</ResultAction>
<ResultAction ID="FormBuilder.addBlankLine.Append_Blank" Sig="null">
<ResultsOutput Ref="FormBuilder.addBlankLine.Append_Blank.Results" />
</ResultAction>
<ResultAction ID="FormBuilder.addReadOnly.Append_ReadOnly" Sig="null">
<ResultsOutput Ref="FormBuilder.addReadOnly.Append_ReadOnly.Results" />
</ResultAction>
<ResultAction ID="FormBuilder.addTextArea.Append_TextArea" Sig="null">
<ResultsOutput Ref="FormBuilder.addTextArea.Append_TextArea.Results" />
</ResultAction>
<ResultAction ID="FormBuilder.addHidden.Append_Hidden" Sig="null">
<ResultsOutput Ref="FormBuilder.addHidden.Append_Hidden.Results" />
</ResultAction>
<ResultAction ID="FormBuilder.addDynamicRadioButtons.Append_DynamicRadioButtons" Sig="null">
<ResultsOutput Ref="FormBuilder.addDynamicRadioButtons.Append_DynamicRadioButtons.Results" />
</ResultAction>
<ResultAction ID="FormBuilder.addDynamicDropdown.Append_DynamicDropdown" Sig="null">
<ResultsOutput Ref="FormBuilder.addDynamicDropdown.Append_DynamicDropdown.Results" />
</ResultAction>
<ResultAction ID="FormBuilder.addDynamicCheckboxes.Append_DynamicCheckboxes" Sig="null">
<ResultsOutput Ref="FormBuilder.addDynamicCheckboxes.Append_DynamicCheckboxes.Results" />
</ResultAction>
<ResultAction ID="FormBuilder.addCustomRow.Append_CustomRow" Sig="null">
<ResultsOutput Ref="FormBuilder.addCustomRow.Append_CustomRow.Results" />
</ResultAction>
<ResultAction ID="FormBuilder.addIntegerRange.Append_IntegerRangeFields" Sig="null">
<ResultsOutput Ref="FormBuilder.addIntegerRange.Append_IntegerRangeFields.Results" />
</ResultAction>
<ResultAction ID="FormBuilder.addFloatRange.Append_FloatRangeFields" Sig="null">
<ResultsOutput Ref="FormBuilder.addFloatRange.Append_FloatRangeFields.Results" />
</ResultAction>
<ResultAction ID="FormBuilder.addDynamicFileField.Append_DynamicFileField" Sig="null">
<ResultsOutput Ref="FormBuilder.addDynamicFileField.Append_DynamicFileField.Results" />
</ResultAction>
<ResultAction ID="FormBuilder.addDynamicCheckbox.Append_DynamicCheckbox" Sig="null">
<ResultsOutput Ref="FormBuilder.addDynamicCheckbox.Append_DynamicCheckbox.Results" />
</ResultAction>
</Actions>
<!--Data sources-->
<DataSources />
<!--Output blocks-->
<Outputs>
<Output ID="FormBuilder.On_Create.Comments.Results" Type="HTML"><![CDATA[
<@COMMENT>
This Tango Class File generates complex HTML forms complete with JavaScript
form verification and a Tango popup calendar for selecting dates.
Matt Matoushek, Matt.Matoushek@pervasive.com
Kevin Hurwitz, Kevin.Hurwitz@pervasive.com
Dimple Patel, Dimple.Patel@pervasive.com
Developer Solutions, Pervasive Software
</@COMMENT>]]></Output>
<Output ID="FormBuilder.addRadioButtons.Append_RadioButtons.Results" Type="HTML"><![CDATA[<@ASSIGN instance$FormHtml '<@VAR instance$FormHtml ENCODING=NONE>
<@IF "LEN(@@method$NumCols)">
<TR>
<TD VALIGN=TOP><@VAR method$Label ENCODING=NONE><@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE"><FONT COLOR=<@VAR instance$RequiredColor ENCODING=NONE>>*</FONT> </@IF></TD>
<TD>
<TABLE>
<TR>
<@ROWS ARRAY="method$Options">
<TD><INPUT TYPE=RADIO<@IF "LEN(<@VAR method$Name ENCODING=NONE>)"> NAME="<@VAR method$Name ENCODING=NONE>"</@IF> VALUE="<@COL 1>"<@IFEQUAL "<@VAR method$DefaultValue ENCODING=NONE>" "<@COL 1>"> CHECKED</@IF>><@COL 2></INPUT> </TD>
<@IFEQUAL "<@CALC '<@CURROW>%@@method$NumCols'>" "0">
</TR>
<TR>
</@IF>
</@ROWS>
</TR>
</TABLE>
</TD>
</TR>
<@ELSE>
<TR>
<TD VALIGN=TOP><@VAR method$Label ENCODING=NONE><@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE"><FONT COLOR=<@VAR instance$RequiredColor ENCODING=NONE>>*</FONT> </@IF></TD>
<TD>
<@ROWS ARRAY="method$Options">
<INPUT TYPE=RADIO<@IF "LEN(<@VAR method$Name ENCODING=NONE>)"> NAME="<@VAR method$Name ENCODING=NONE>"</@IF> VALUE="<@COL 1>"<@IFEQUAL "<@VAR method$DefaultValue ENCODING=NONE>" "<@COL 1>"> CHECKED</@IF>><@COL 2></INPUT>
</@ROWS>
</TD>
</TR>
</@IF>
'>
<@COMMENT> If the field is required, augment form verification clause.</@COMMENT>
<@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE">
<@ASSIGN instance$RequiredFlag "TRUE">
<@ASSIGN instance$IncludeCheckRadioNotBlank "TRUE">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckRadioNotBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$Name ENCODING=NONE>) && ">
</@IF>
]]></Output>
<Output ID="FormBuilder.addTextField.Append_TextField.Results" Type="HTML"><![CDATA[<@ASSIGN instance$FormHtml '<@VAR instance$FormHtml ENCODING=NONE>
<TR>
<TD><@VAR method$Label ENCODING=NONE><@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE"><FONT COLOR=<@VAR instance$RequiredColor ENCODING=NONE>>*</FONT> </@IF></TD>
<TD>
<INPUT TYPE=TEXT<@IF "LEN(<@VAR method$Name ENCODING=NONE>)"> NAME="<@VAR method$Name ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$DefaultValue ENCODING=NONE>)"> VALUE="<@VAR method$DefaultValue ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$DisplayLength ENCODING=NONE>)"> SIZE="<@VAR method$DisplayLength ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$MaxLength ENCODING=NONE>)"> MAXLENGTH="<@VAR method$MaxLength ENCODING=NONE>"</@IF>>
</TD>
</TR>
'>
<@COMMENT> If the field is required, augment form verification clause.</@COMMENT>
<@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE">
<@ASSIGN instance$RequiredFlag "TRUE">
<@ASSIGN instance$IncludeCheckNotBlank "TRUE">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckNotBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$Name ENCODING=NONE>) && ">
</@IF>]]></Output>
<Output ID="FormBuilder.addCheckbox.Append_Checkbox.Results" Type="HTML"><![CDATA[<@ASSIGN instance$FormHtml '<@VAR instance$FormHtml ENCODING=NONE>
<TR>
<TD><@VAR method$Label ENCODING=NONE></TD>
<TD>
<INPUT TYPE=CHECKBOX<@IF "LEN(<@VAR method$Name ENCODING=NONE>)"> NAME="<@VAR method$Name ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$Value ENCODING=NONE>)"> VALUE="<@VAR method$Value ENCODING=NONE>"</@IF><@IFEQUAL "<@VAR method$Checked ENCODING=NONE>" "TRUE"> CHECKED</@IF>>
</TD>
</TR>
'>]]></Output>
<Output ID="FormBuilder.outputForm.Output_Javascript_Into_Form.Results" Type="HTML"><![CDATA[<SCRIPT>
<!--Begin JavaScript
// Portions Copyright (c)1996-1999 Pervasive Software
// Home Page: http://www.Pervasive.com/
// Edited : Matt Matoushek, Developer Solutions, Pervasive
// -- End JavaScript -->
</SCRIPT>
<@IF '("<@VAR instance$IncludeCheckInteger>"="TRUE") OR ("<@VAR instance$IncludeCheckIntegerOrBlank>"="TRUE")
OR ("<@VAR instance$IncludeCheckIntegerGreater>"="TRUE") OR ("<@VAR instance$IncludeCheckIntegerLess>"="TRUE")
OR ("<@VAR instance$IncludeCheckIntegerGreaterOrBlank>"="TRUE") OR ("<@VAR instance$IncludeCheckIntegerLessOrBlank>"="TRUE")
OR ("<@VAR instance$IncludeCheckFloat>"="TRUE") OR ("<@VAR instance$IncludeCheckFloatOrBlank>"="TRUE")
OR ("<@VAR instance$IncludeCheckFloatGreater>"="TRUE") OR ("<@VAR instance$IncludeCheckFloatLess>"="TRUE")
OR ("<@VAR instance$IncludeCheckFloatGreaterOrBlank>"="TRUE") OR ("<@VAR instance$IncludeCheckFloatLessOrBlank>"="TRUE")
OR ("<@VAR instance$IncludeCheckDate>"="TRUE") OR ("<@VAR instance$IncludeCheckDateOrBlank>"="TRUE")'>
<SCRIPT>
<!--Begin JavaScript
function StringOfDigits( theString )
// To use, set the onChange or onBlur attribute of a form field
// element to "StringOfDigits(this)"
{
var validDigits = "0123456789";
var i = 0;
if ( theString.length == 0 )
return false; // blank entry is not a string of digits
for( i = 0; i < theString.length; i++ ) {
var thisChar = theString.charAt(i);
if ( validDigits.indexOf( thisChar ) == -1 ) {
return false;
} // end if
} // end for
return true;
} // StringOfDigits()
// -- End JavaScript -->
</SCRIPT>
</@IF>
<@IF '("<@VAR instance$IncludeCheckNotBlank>"="TRUE") OR ("<@VAR instance$IncludeCheckIntegerOrBlank>"="TRUE")
OR ("<@VAR instance$IncludeCheckIntegerGreaterOrBlank>"="TRUE") OR ("<@VAR instance$IncludeCheckIntegerLessOrBlank>"="TRUE")
OR ("<@VAR instance$IncludeCheckSelectNotBlank>"="TRUE") OR ("<@VAR instance$IncludeCheckFloatOrBlank>"="TRUE")
OR ("<@VAR instance$IncludeCheckFloatGreaterOrBlank>"="TRUE") OR ("<@VAR instance$IncludeCheckFloatLessOrBlank>"="TRUE")
OR ("<@VAR instance$IncludeCheckDateOrBlank>"="TRUE")'>
<SCRIPT>
<!--Begin JavaScript
function ValidateBlank( theElement ) {
if ( theElement.value == "" )
return true;
else
return false;
} // ValidateBlank()
// -- End JavaScript -->
</SCRIPT>
</@IF>
<@IF '("<@VAR instance$IncludeCheckInteger>"="TRUE") OR ("<@VAR instance$IncludeCheckIntegerOrBlank>"="TRUE")
OR ("<@VAR instance$IncludeCheckIntegerGreater>"="TRUE") OR ("<@VAR instance$IncludeCheckIntegerLess>"="TRUE")
OR ("<@VAR instance$IncludeCheckIntegerGreaterOrBlank>"="TRUE") OR ("<@VAR instance$IncludeCheckIntegerLessOrBlank>"="TRUE")'>
<SCRIPT>
<!--Begin JavaScript
function ValidateInteger( theElement ) {
if ( theElement.value.length == 0 )
return false; // blank entry is not a valid integer
if ( theElement.value.charAt(0) == '-' ) {
return StringOfDigits( theElement.value.substring( 1, theElement.value.length - 1 ) );
} else {
return StringOfDigits( theElement.value );
} // end if
} // ValidateInteger()
// -- End JavaScript -->
</SCRIPT>
</@IF>
<@IF '("<@VAR instance$IncludeCheckIntegerGreater>"="TRUE") OR ("<@VAR instance$IncludeCheckIntegerGreaterOrBlank>"="TRUE")'>
<SCRIPT>
<!--Begin JavaScript
function ValidateIntegerGreater( theElement, lowerBound ) {
if ( ValidateInteger( theElement ) ) {
if ( parseInt( theElement.value, 10 ) > lowerBound ) {
return true;
} else {
return false;
} // end if
} else {
return false;
} // end if
} // ValidateIntegerGreater()
// -- End JavaScript -->
</SCRIPT>
</@IF>
<@IF '("<@VAR instance$IncludeCheckIntegerLess>"="TRUE") OR ("<@VAR instance$IncludeCheckIntegerLessOrBlank>"="TRUE")'>
<SCRIPT>
<!--Begin JavaScript
function ValidateIntegerLess( theElement, upperBound ) {
if ( ValidateInteger( theElement ) ) {
if ( parseInt( theElement.value, 10 ) < upperBound ) {
return true;
} else {
return false;
} // end if
} else {
return false;
} // end if
} // ValidateIntegerLess()
// -- End JavaScript -->
</SCRIPT>
</@IF>
<@IF '("<@VAR instance$IncludeCheckFloat>"="TRUE") OR ("<@VAR instance$IncludeCheckFloatOrBlank>"="TRUE")
OR ("<@VAR instance$IncludeCheckFloatGreater>"="TRUE") OR ("<@VAR instance$IncludeCheckFloatLess>"="TRUE")
OR ("<@VAR instance$IncludeCheckFloatGreaterOrBlank>"="TRUE") OR ("<@VAR instance$IncludeCheckFloatLessOrBlank>"="TRUE")'>
<SCRIPT>
<!--Begin JavaScript
function ValidateFloat( theElement ) {
var i = 0;
var j = 0;
var k = 0;
var l = 0;
var thePart = "";
if ( theElement.value.length == 0 )
return false; // blank entry is not a number
if ( theElement.value.charAt(i) == '-' ) {
i = 1;
} // end if
if ( (j = theElement.value.indexOf(".")) == -1 ) {
j = theElement.value.length;
} // end if
thePart = theElement.value.toUpperCase();
if ( (k = thePart.indexOf("E")) == -1 ) {
k = theElement.value.length;
} // end if
l = ( j < k ) ? j : k;
if ( l > i ) {
thePart = theElement.value.substring( i, l );
if ( !StringOfDigits( thePart ) ) return false;
} // end if
if ( j < theElement.value.length ) {
thePart = theElement.value.substring( j+1, k );
if ( !StringOfDigits( thePart ) ) return false;
} // end if
if ( k < theElement.value.length ) {
thePart = theElement.value.substring( k+1, k+2 );
if ( (thePart == "+") || (thePart == "-") ) {
k++;
} // end if
thePart = theElement.value.substring( k+1, theElement.value.length );
if ( !StringOfDigits( thePart ) ) return false;
} // end if
return true;
} // ValidateFloat()
// -- End JavaScript -->
</SCRIPT>
</@IF>
<@IF '("<@VAR instance$IncludeCheckFloatGreater>"="TRUE") OR ("<@VAR instance$IncludeCheckFloatGreaterOrBlank>"="TRUE")'>
<SCRIPT>
<!--Begin JavaScript
function ValidateFloatGreater( theElement, lowerBound ) {
if ( ValidateFloat( theElement ) ) {
if ( parseFloat( theElement.value ) > lowerBound ) {
return true;
} else {
return false;
} // end if
} else {
return false;
} // end if
} // ValidateFloatGreater()
// -- End JavaScript -->
</SCRIPT>
</@IF>
<@IF '("<@VAR instance$IncludeCheckFloatLess>"="TRUE") OR ("<@VAR instance$IncludeCheckFloatLessOrBlank>"="TRUE")'>
<SCRIPT>
<!--Begin JavaScript
function ValidateFloatLess( theElement, upperBound ) {
if ( ValidateFloat( theElement ) ) {
if ( parseFloat( theElement.value ) < upperBound ) {
return true;
} else {
return false;
} // end if
} else {
return false;
} // end if
} // ValidateFloatLess()
// -- End JavaScript -->
</SCRIPT>
</@IF>
<@IF '("<@VAR instance$IncludeCheckDate>"="TRUE") OR ("<@VAR instance$IncludeCheckDateOrBlank>"="TRUE")'>
<SCRIPT>
<!--Begin JavaScript
function MakeMonthNames( ) {
this.length = 12;
this[1] = "January";
this[2] = "February";
this[3] = "March";
this[4] = "April";
this[5] = "May";
this[6] = "June";
this[7] = "July";
this[8] = "August";
this[9] = "September";
this[10] = "October";
this[11] = "November";
this[12] = "December";
return this;
} // MakeMonthNames()
function ValidateDate( theElement, dateFormat ) {
var month = 0;
var day = 0;
var year = 0;
var offset = 0;
var thePart = "";
var testStr = "";
var monthNames;
if ( theElement.value.length == 0 )
return false; // blank entry is not a date
if ( dateFormat == "" ) {
dateFormat = "MM/DD/YYYY"; // default date format
} // end if
monthNames = new MakeMonthNames();
thePart = theElement.value;
offset = thePart.indexOf("/");
if ( offset < 1 )
return false;
testStr = thePart.substring(0,offset);
if ( !StringOfDigits( testStr ) )
return false;
month = parseInt( testStr, 10 );
if ( (month < 1) || (month > 12 ) )
return false;
thePart = thePart.substring( offset+1, thePart.length );
offset = thePart.indexOf("/");
if ( offset < 1 )
return false;
testStr = thePart.substring(0,offset);
if ( !StringOfDigits( testStr ) )
return false;
day = parseInt( testStr, 10 );
if ( (day < 1) || (day > 31 ) )
return false;
testStr = thePart.substring( offset+1, thePart.length );
if ( !StringOfDigits( testStr ) )
return false;
year = parseInt( testStr, 10 );
if ( month == 2 ) {
if ( (4 * Math.floor( year / 4 )) == year ) {
if ( day > 29 )
return false;
} else {
if ( day > 28 )
return false;
} // end if
} else if ( (month == 4) || (month == 6) || (month == 9) || (month == 11) ) {
if ( day > 30 )
return false;
} // end if
return true;
} // ValidateDate()
// -- End JavaScript -->
</SCRIPT>
</@IF>
<@IF '("<@VAR instance$IncludeCheckNotBlank>"="TRUE")' >
<SCRIPT>
<!--Begin JavaScript
function CheckNotBlank( theElement ) {
if ( ValidateBlank( theElement ) ) {
alert( "Field '" + theElement.name + "' is blank." );
theElement.focus();
theElement.select();
return false;
} else {
return true;
} // end if
} // CheckNotBlank()
// -- End JavaScript -->
</SCRIPT>
</@IF>
<@IF '("<@VAR instance$IncludeCheckInteger>"="TRUE")' >
<SCRIPT>
<!--Begin JavaScript
function CheckInteger( theElement ) {
if ( !ValidateInteger( theElement ) ) {
alert( "Field '" + theElement.name + "' is not a valid integer." );
theElement.focus();
theElement.select();
return false;
} else {
return true;
} // end if
} // CheckInteger()
// -- End JavaScript -->
</SCRIPT>
</@IF>
<@IF '("<@VAR instance$IncludeCheckIntegerOrBlank>"="TRUE")' >
<SCRIPT>
<!--Begin JavaScript
function CheckIntegerOrBlank( theElement ) {
if ( !ValidateBlank( theElement) && !ValidateInteger( theElement ) ) {
alert( "Field '" + theElement.name + "' is neither a valid integer nor a blank entry." );
theElement.focus();
theElement.select();
return false;
} else {
return true;
} // end if
} // CheckIntegerOrBlank()
// -- End JavaScript -->
</SCRIPT>
</@IF>
<@IF '("<@VAR instance$IncludeCheckIntegerGreater>"="TRUE")' >
<SCRIPT>
<!--Begin JavaScript
function CheckIntegerGreater( theElement, lowerBound ) {
if ( !ValidateIntegerGreater( theElement, lowerBound ) ) {
alert( "Field '" + theElement.name + "' is not an integer greater than " + lowerBound + "." );
theElement.focus();
theElement.select();
return false;
} else {
return true;
} // end if
} // CheckIntegerGreater()
// -- End JavaScript -->
</SCRIPT>
</@IF>
<@IF '("<@VAR instance$IncludeCheckIntegerLess>"="TRUE")' >
<SCRIPT>
<!--Begin JavaScript
function CheckIntegerLess( theElement, upperBound ) {
if ( !ValidateIntegerLess( theElement, upperBound ) ) {
alert( "Field '" + theElement.name + "' is not an integer less than " + upperBound + "." );
theElement.focus();
theElement.select();
return false;
} else {
return true;
} // end if
} // CheckIntegerLess()
// -- End JavaScript -->
</SCRIPT>
</@IF>
<@IF '("<@VAR instance$IncludeCheckIntegerGreaterOrBlank>"="TRUE")' >
<SCRIPT>
<!--Begin JavaScript
function CheckIntegerGreaterOrBlank( theElement, lowerBound ) {
if ( !ValidateBlank( theElement) && !ValidateIntegerGreater( theElement, lowerBound ) ) {
alert( "Field '" + theElement.name + "' is not an integer greater than " + lowerBound + " nor a blank entry." );
theElement.focus();
theElement.select();
return false;
} else {
return true;
} // end if
} // CheckIntegerGreaterOrBlank()
// -- End JavaScript -->
</SCRIPT>
</@IF>
<@IF '("<@VAR instance$IncludeCheckIntegerLessOrBlank>"="TRUE")' >
<SCRIPT>
<!--Begin JavaScript
function CheckIntegerLessOrBlank( theElement, upperBound ) {
if ( !ValidateBlank( theElement) && !ValidateIntegerLess( theElement, upperBound ) ) {
alert( "Field '" + theElement.name + "' is not an integer less than " + upperBound + " nor a blank entry." );
theElement.focus();
theElement.select();
return false;
} else {
return true;
} // end if
} // CheckIntegerLessOrBlank()
// -- End JavaScript -->
</SCRIPT>
</@IF>
<@IF '("<@VAR instance$IncludeCheckSelectNotBlank>"="TRUE")' >
<SCRIPT>
<!--Begin JavaScript
function CheckSelectNotBlank ( theElement ) {
//Purpose : Check to see if Select List Box is Blank
//Source : Developer Solutions, Prevasive Software
if ( ValidateBlank( theElement.options[theElement.selectedIndex] ) ) {
alert( "Field '" + theElement.name + "' is blank." );
return false;
}
else {
return true;
}
}
// -- End JavaScript -->
</SCRIPT>
</@IF>
<@IF '("<@VAR instance$IncludeCheckRadioNotBlank>"="TRUE")' >
<SCRIPT>
<!--Begin JavaScript
function CheckRadioNotBlank( theElement) {
// Purpose: Check to see if an option is selected in a radio button group
// Source: Developer Solution, Pervasive Software
// Date: June 10, 1999
// Assume all buttons will be unchecked
blnFilled = false;
// If a checked radio is found, set blnFilled to true
for (var i = 0; i < theElement.length; i++) if (theElement[i].checked) blnFilled=true;
// Return result
if (blnFilled) {
return true;
}
else {
alert( "Field '" + theElement[0].name + "' is blank." );
return false;
}
}
// -- End JavaScript -->
</SCRIPT>
</@IF>
<@IF '("<@VAR instance$IncludeCheckFloat>"="TRUE")' >
<SCRIPT>
<!--Begin JavaScript
function CheckFloat( theElement ) {
if ( !ValidateFloat( theElement ) ) {
alert( "Field '" + theElement.name + "' is not a valid real number." );
theElement.focus();
theElement.select();
return false;
} else {
return true;
} // end if
} // CheckFloat()
// -- End JavaScript -->
</SCRIPT>
</@IF>
<@IF '("<@VAR instance$IncludeCheckFloatOrBlank>"="TRUE")' >
<SCRIPT>
<!--Begin JavaScript
function CheckFloatOrBlank( theElement ) {
if ( !ValidateBlank( theElement) && !ValidateFloat( theElement ) ) {
alert( "Field '" + theElement.name + "' is neither a valid real number nor a blank entry." );
theElement.focus();
theElement.select();
return false;
} else {
return true;
} // end if
} // CheckFloatOrBlank()
// -- End JavaScript -->
</SCRIPT>
</@IF>
<@IF '("<@VAR instance$IncludeCheckFloatGreater>"="TRUE")' >
<SCRIPT>
<!--Begin JavaScript
function CheckFloatGreater( theElement, lowerBound ) {
if ( !ValidateFloatGreater( theElement, lowerBound ) ) {
alert( "Field '" + theElement.name + "' is not a real number greater than " + lowerBound + "." );
theElement.focus();
theElement.select();
return false;
} else {
return true;
} // end if
} // CheckFloatGreater()
// -- End JavaScript -->
</SCRIPT>
</@IF>
<@IF '("<@VAR instance$IncludeCheckFloatLess>"="TRUE")' >
<SCRIPT>
<!--Begin JavaScript
function CheckFloatLess( theElement, upperBound ) {
if ( !ValidateFloatLess( theElement, upperBound ) ) {
alert( "Field '" + theElement.name + "' is not a real number less than " + upperBound + "." );
theElement.focus();
theElement.select();
return false;
} else {
return true;
} // end if
} // CheckFloatLess()
// -- End JavaScript -->
</SCRIPT>
</@IF>
<@IF '("<@VAR instance$IncludeCheckFloatGreaterOrBlank>"="TRUE")' >
<SCRIPT>
<!--Begin JavaScript
function CheckFloatGreaterOrBlank( theElement, lowerBound ) {
if ( !ValidateBlank( theElement) && !ValidateFloatGreater( theElement, lowerBound ) ) {
alert( "Field '" + theElement.name + "' is not a real number greater than " + lowerBound + " nor a blank entry." );
theElement.focus();
theElement.select();
return false;
} else {
return true;
} // end if
} // CheckFloatGreaterOrBlank()
// -- End JavaScript -->
</SCRIPT>
</@IF>
<@IF '("<@VAR instance$IncludeCheckFloatLessOrBlank>"="TRUE")' >
<SCRIPT>
<!--Begin JavaScript
function CheckFloatLessOrBlank( theElement, upperBound ) {
if ( !ValidateBlank( theElement) && !ValidateFloatLess( theElement, upperBound ) ) {
alert( "Field '" + theElement.name + "' is not a real number less than " + upperBound + " nor a blank entry." );
theElement.focus();
theElement.select();
return false;
} else {
return true;
} // end if
} // CheckFloatLessOrBlank()
// -- End JavaScript -->
</SCRIPT>
</@IF>
<@IF '("<@VAR instance$IncludeCheckDate>"="TRUE")' >
<SCRIPT>
<!--Begin JavaScript
function CheckDate( theElement ) {
if ( !ValidateDate( theElement, "" ) ) {
alert( "Field '" + theElement.name + "' is not a valid date of the form 'MM/DD/YY'." );
theElement.focus();
theElement.select();
return false;
} else {
return true;
} // end if
} // CheckDate()
// -- End JavaScript -->
</SCRIPT>
</@IF>
<@IF '("<@VAR instance$IncludeCheckDateOrBlank>"="TRUE")' >
<SCRIPT>
<!--Begin JavaScript
function CheckDateOrBlank( theElement ) {
if ( !ValidateBlank( theElement) && !ValidateDate( theElement, "" ) ) {
alert( "Field '" + theElement.name + "' is not a valid date of the form 'MM/DD/YY' nor a blank entry." );
theElement.focus();
theElement.select();
return false;
} else {
return true;
} // end if
} // CheckDate()
// -- End JavaScript -->
</SCRIPT>
</@IF>
]]></Output>
<Output ID="FormBuilder.outputForm.Output_form.Results" Type="HTML"><![CDATA[<FORM METHOD=POST NAME="<@VAR instance$FormName ENCODING=NONE>" onSubmit="return <@VAR instance$RequiredFields ENCODING=NONE>true;"<@IF 'LEN(<@VAR instance$FormAction ENCODING=NONE>)'> ACTION="<@VAR instance$FormAction ENCODING=NONE>"</@IF>>
<TABLE>
<@VAR instance$FormHtml ENCODING=NONE>
<TR><TD><BR></TD></TR>
<TR>
<TD COLSPAN=2 ALIGN=CENTER><INPUT TYPE=SUBMIT VALUE=<@IF 'LEN(@@method$SubmitText)'>"<@VAR method$SubmitText ENCODING=NONE>"<@ELSE>Submit</@IF>> <INPUT TYPE=RESET VALUE=Reset></TD>
</TR>
<TR><TD><BR></TD></TR>
<TR>
<TD COLSPAN=2 ALIGN=CENTER><FONT COLOR=<@VAR instance$RequiredColor ENCODING=NONE>>*</FONT> Indicates Required Field</TD>
</TR>
</TABLE>
</FORM>]]></Output>
<Output ID="FormBuilder.openForm.Initialize_Form.Results" Type="HTML"><![CDATA[<@COMMENT> purge all form variables. </@COMMENT>
<@PURGE instance$FormHtml>
<@PURGE instance$RequiredFields>
<@COMMENT> determine if any javascript is going to be needed. </@COMMENT>
<@ASSIGN instance$RequiredFlag "FALSE">
<@COMMENT> color of asterisk for required fields. </@COMMENT>
<@IF 'LEN(@@instance$RequiredColor)'>
<@ASSIGN instance$RequiredColor "<@VAR method$RequiredColor ENCODING=NONE>">
<@ELSE>
<@ASSIGN instance$RequiredColor "maroon">
</@IF>
<@COMMENT> form information. </@COMMENT>
<@ASSIGN instance$FormAction "<@VAR method$Action ENCODING=NONE>">
<@ASSIGN instance$FormName "<@IFEMPTY '<@VAR method$Name ENCODING=NONE>'>inputForm<@ELSE><@VAR method$Name ENCODING=NONE></@IF>">
<@COMMENT> * only javascript functions that are used
are inserted
* Include variables initialized to "FALSE"
-thus not including javascript functions </@COMMENT>
<@ASSIGN instance$IncludeCheckNotBlank "FALSE">
<@ASSIGN instance$IncludeCheckInteger "FALSE">
<@ASSIGN instance$IncludeCheckIntegerOrBlank "FALSE">
<@ASSIGN instance$IncludeCheckIntegerGreater "FALSE">
<@ASSIGN instance$IncludeCheckIntegerLess "FALSE">
<@ASSIGN instance$IncludeCheckIntegerGreaterOrBlank "FALSE">
<@ASSIGN instance$IncludeCheckIntegerLessOrBlank "FALSE">
<@ASSIGN instance$IncludeCheckFloat "FALSE">
<@ASSIGN instance$IncludeCheckFloatOrBlank "FALSE">
<@ASSIGN instance$IncludeCheckFloatGreater "FALSE">
<@ASSIGN instance$IncludeCheckFloatLess "FALSE">
<@ASSIGN instance$IncludeCheckFloatGreaterOrBlank "FALSE">
<@ASSIGN instance$IncludeCheckFloatLessOrBlank "FALSE">
<@ASSIGN instance$IncludeCheckSelectNotBlank "FALSE">
<@ASSIGN instance$IncludeCheckRadioNotBlank "FALSE">
<@ASSIGN instance$IncludeCheckDate "FALSE">
<@ASSIGN instance$IncludeCheckDateOrBlank "FALSE"> ]]></Output>
<Output ID="FormBuilder.addFileField.Append_FileField.Results" Type="HTML"><![CDATA[<@ASSIGN instance$FormHtml '<@VAR instance$FormHtml ENCODING=NONE>
<TR>
<TD><@VAR method$Label ENCODING=NONE><@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE"><FONT COLOR=<@VAR instance$RequiredColor ENCODING=NONE>>*</FONT> </@IF></TD>
<TD>
<@IFEMPTY "<@VAR method$DefaultValue ENCODING=NONE>">
<INPUT TYPE=FILE<@IF "LEN(<@VAR method$Name ENCODING=NONE>)"> NAME="<@VAR method$Name ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$DisplayLength ENCODING=NONE>)"> SIZE="<@VAR method$DisplayLength ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$MaxLength ENCODING=NONE>)"> MAXLENGTH="<@VAR method$MaxLength ENCODING=NONE>"</@IF>>
<@ELSE>
<INPUT TYPE=TEXT<@IF "LEN(<@VAR method$Name ENCODING=NONE>)"> NAME="<@VAR method$Name ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$DisplayLength ENCODING=NONE>)"> SIZE="<@VAR method$DisplayLength ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$DefaultValue ENCODING=NONE>)"> VALUE="<@VAR method$DefaultValue ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$MaxLength ENCODING=NONE>)"> MAXLENGTH="<@VAR method$MaxLength ENCODING=NONE>"</@IF>>
</@IF>
</TD>
</TR>
'>
<@COMMENT> If the field is required, augment form verification clause.</@COMMENT>
<@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE">
<@ASSIGN instance$RequiredFlag "TRUE">
<@ASSIGN instance$IncludeCheckNotBlank "TRUE">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckNotBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$Name ENCODING=NONE>) && ">
</@IF>]]></Output>
<Output ID="FormBuilder.addCheckboxes.Append_Checkboxes.Results" Type="HTML"><![CDATA[<@ASSIGN instance$FormHtml '<@VAR instance$FormHtml ENCODING=NONE>
<@IF "LEN(@@method$NumCols)">
<TR>
<TD VALIGN=TOP><@VAR method$Label ENCODING=NONE></TD>
<TD>
<TABLE>
<TR>
<@ROWS ARRAY="method$Options">
<TD><INPUT TYPE=CHECKBOX<@IF "LEN(<@VAR method$Name ENCODING=NONE>)"> NAME="<@VAR method$Name ENCODING=NONE>"</@IF> VALUE="<@COL 1>"<@IFEQUAL "<@COL 3>" "TRUE"> CHECKED</@IF>><@COL 2></INPUT> </TD>
<@IFEQUAL "<@CALC '<@CURROW>%@@method$NumCols'>" "0">
</TR>
<TR>
</@IF>
</@ROWS>
</TR>
</TABLE>
</TD>
</TR>
<@ELSE>
<TR>
<TD VALIGN=TOP><@VAR method$Label ENCODING=NONE></TD>
<TD>
<@ROWS ARRAY="method$Options">
<INPUT TYPE=CHECKBOX<@IF "LEN(<@VAR method$Name ENCODING=NONE>)"> NAME="<@VAR method$Name ENCODING=NONE>"</@IF> VALUE="<@COL 1>"<@IFEQUAL "<@COL 3>" "TRUE"> CHECKED</@IF>><@COL 2></INPUT>
</@ROWS>
</TD>
</TR>
</@IF>
'>
]]></Output>
<Output ID="FormBuilder.addDropdown.Append_Dropdown.Results" Type="HTML"><![CDATA[<@ASSIGN instance$FormHtml '<@VAR instance$FormHtml ENCODING=NONE>
<TR>
<TD><@VAR method$Label ENCODING=NONE><@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE"><FONT COLOR=<@VAR instance$RequiredColor ENCODING=NONE>>*</FONT> </@IF></TD>
<TD>
<SELECT<@IF "LEN(<@VAR method$Name ENCODING=NONE>)"> NAME="<@VAR method$Name ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$MultipleSize ENCODING=NONE>)"> SIZE="<@VAR method$MultipleSize ENCODING=NONE>" MULTIPLE</@IF>>
<OPTION></OPTION>
<@ROWS ARRAY="method$Options">
<OPTION<@IF "LEN(<@COL 1>)"> VALUE="<@COL 1>"</@IF><@IFEQUAL "<@COL 1>" "<@VAR method$DefaultValue ENCODING=NONE>"> SELECTED</@IF>><@COL 2></OPTION>
</@ROWS>
</SELECT>
</TD>
</TR>
'>
<@COMMENT> If the field is required, augment form verification clause.</@COMMENT>
<@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE">
<@ASSIGN instance$RequiredFlag "TRUE">
<@ASSIGN instance$IncludeCheckSelectNotBlank "TRUE">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckSelectNotBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$Name ENCODING=NONE>) && ">
</@IF>]]></Output>
<Output ID="FormBuilder.addDateField.Append_DateField.Results" Type="HTML"><![CDATA[<@IF "LEN(<@VAR method$PopupCalendarPath>)">
<@ASSIGN instance$PopupCalendarPath "@@method$PopupCalendarPath">
</@IF>
<@ASSIGN instance$FormHtml '<@VAR instance$FormHtml ENCODING=NONE>
<TR>
<TD><@VAR method$Label ENCODING=NONE><@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE"><FONT COLOR=<@VAR instance$RequiredColor ENCODING=NONE>>*</FONT> </@IF></TD>
<TD>
<INPUT TYPE=TEXT MAXLENGTH=10 SIZE=10 <@IF "LEN(<@VAR method$Name ENCODING=NONE>)"> NAME="<@VAR method$Name ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$DefaultValue ENCODING=NONE>)"> VALUE="<@VAR method$DefaultValue ENCODING=NONE>"</@IF>>
<@IFEQUAL "<@VAR method$PopupCalendar ENCODING=NONE>" "TRUE">
<A HREF="#" onClick="window.dateField=<@VAR instance$FormName ENCODING=NONE>.<@VAR method$Name ENCODING=NONE>; window.open('<@IF "LEN(<@VAR instance$PopupCalendarPath>)"><@CHAR 60>@CGI<@CHAR 62><@VAR instance$PopupCalendarPath>calendar.taf<@ELSE><@CHAR 60>@CGI<@CHAR 62><@CLASSFILEPATH>calendar.taf</@IF>','cal','WIDTH=200,HEIGHT=250')"><IMG SRC="<@IF "LEN(<@VAR instance$PopupCalendarPath>)"><@VAR instance$PopupCalendarPath>calendar.gif<@ELSE><@CLASSFILEPATH>calendar.gif</@IF>" BORDER=0></A>
</@IF>
</TD>
</TR>
'>
<@COMMENT> If the field is required, augment form verification clause.</@COMMENT>
<@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE">
<@ASSIGN instance$RequiredFlag "TRUE">
<@ASSIGN instance$IncludeCheckNotBlank "TRUE">
<@ASSIGN instance$IncludeCheckDate "TRUE">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckNotBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$Name ENCODING=NONE>) && ">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckDate(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$Name ENCODING=NONE>) && ">
<@ELSE>
<@ASSIGN instance$RequiredFlag "TRUE">
<@ASSIGN instance$IncludeCheckDateOrBlank "TRUE">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckDateOrBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$Name ENCODING=NONE>) && ">
</@IF>
]]></Output>
<Output ID="FormBuilder.addDateRange.Append_DateRangeFields.Results" Type="HTML"><![CDATA[<@IF "LEN(<@VAR method$PopupCalendarPath>)">
<@ASSIGN instance$PopupCalendarPath "@@method$PopupCalendarPath">
</@IF>
<@ASSIGN instance$FormHtml '<@VAR instance$FormHtml ENCODING=NONE>
<TR>
<TD><@VAR method$Label ENCODING=NONE><@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE"><FONT COLOR=<@VAR instance$RequiredColor ENCODING=NONE>>*</FONT> </@IF></TD>
<TD>
From
<INPUT TYPE=TEXT MAXLENGTH=10 SIZE=10 <@IF "LEN(<@VAR method$LowerName ENCODING=NONE>)"> NAME="<@VAR method$LowerName ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$LowerDefaultValue ENCODING=NONE>)"> VALUE="<@VAR method$LowerDefaultValue ENCODING=NONE>"</@IF>>
<@IFEQUAL "<@VAR method$PopupCalendar ENCODING=NONE>" "TRUE">
<A HREF="#" onClick="window.dateField=<@VAR instance$FormName ENCODING=NONE>.<@VAR method$LowerName ENCODING=NONE>; window.open('<@IF "LEN(<@VAR instance$PopupCalendarPath>)"><@CHAR 60>@CGI<@CHAR 62><@VAR instance$PopupCalendarPath>calendar.taf<@ELSE><@CHAR 60>@CGI<@CHAR 62><@CLASSFILEPATH>calendar.taf</@IF>','cal','WIDTH=200,HEIGHT=250')"><IMG SRC="<@IF "LEN(<@VAR instance$PopupCalendarPath>)"><@VAR instance$PopupCalendarPath>calendar.gif<@ELSE><@CLASSFILEPATH>calendar.gif</@IF>" BORDER=0></A>
</@IF>
To
<INPUT TYPE=TEXT MAXLENGTH=10 SIZE=10 <@IF "LEN(<@VAR method$UpperName ENCODING=NONE>)"> NAME="<@VAR method$UpperName ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$UpperDefaultValue ENCODING=NONE>)"> VALUE="<@VAR method$UpperDefaultValue ENCODING=NONE>"</@IF>>
<@IFEQUAL "<@VAR method$PopupCalendar ENCODING=NONE>" "TRUE">
<A HREF="#" onClick="window.dateField=<@VAR instance$FormName ENCODING=NONE>.<@VAR method$UpperName ENCODING=NONE>; window.open('<@IF "LEN(<@VAR instance$PopupCalendarPath>)"><@CHAR 60>@CGI<@CHAR 62><@VAR instance$PopupCalendarPath>calendar.taf<@ELSE><@CHAR 60>@CGI<@CHAR 62><@CLASSFILEPATH>calendar.taf</@IF>','cal','WIDTH=200,HEIGHT=250')"><IMG SRC="<@IF "LEN(<@VAR instance$PopupCalendarPath>)"><@VAR instance$PopupCalendarPath>calendar.gif<@ELSE><@CLASSFILEPATH>calendar.gif</@IF>" BORDER=0></A>
</@IF>
</TD>
</TR>
'>
<@IFEQUAL "<@VAR method$PopupCalendar ENCODING=NONE>" "TRUE">
<@ASSIGN instance$RequiredFlag "TRUE">
<@ASSIGN instance$IncludepopupCal "TRUE">
</@IF>
<@COMMENT> If the fields are required, augment form verification clause.</@COMMENT>
<@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE">
<@ASSIGN instance$RequiredFlag "TRUE">
<@ASSIGN instance$IncludeCheckNotBlank "TRUE">
<@ASSIGN instance$IncludeCheckDate "TRUE">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckNotBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$LowerName ENCODING=NONE>) && ">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckDate(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$LowerName ENCODING=NONE>) && ">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckNotBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$UpperName ENCODING=NONE>) && ">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckDate(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$UpperName ENCODING=NONE>) && ">
<@ELSE>
<@ASSIGN instance$RequiredFlag "TRUE">
<@ASSIGN instance$IncludeCheckDateOrBlank "TRUE">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckDateOrBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$LowerName ENCODING=NONE>) && ">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckDateOrBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$UpperName ENCODING=NONE>) && ">
</@IF>]]></Output>
<Output ID="FormBuilder.addPassword.Append_PasswordField.Results" Type="HTML"><![CDATA[<@ASSIGN instance$FormHtml '<@VAR instance$FormHtml ENCODING=NONE>
<TR>
<TD><@VAR method$Label ENCODING=NONE><@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE"><FONT COLOR=<@VAR instance$RequiredColor ENCODING=NONE>>*</FONT> </@IF></TD>
<TD>
<INPUT TYPE=PASSWORD <@IF "LEN(<@VAR method$Name ENCODING=NONE>)"> NAME="<@VAR method$Name ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$DefaultValue ENCODING=NONE>)"> VALUE="<@VAR method$DefaultValue ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$DisplayLength ENCODING=NONE>)"> SIZE="<@VAR method$DisplayLength ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$MaxLength ENCODING=NONE>)"> MAXLENGTH="<@VAR method$MaxLength ENCODING=NONE>"</@IF>>
</TD>
</TR>
'>
<@COMMENT> If the field is required, augment form verification clause.</@COMMENT>
<@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE">
<@ASSIGN instance$RequiredFlag "TRUE">
<@ASSIGN instance$IncludeCheckNotBlank "TRUE">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckNotBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$Name ENCODING=NONE>) && ">
</@IF>]]></Output>
<Output ID="FormBuilder.addIntegerField.Append_IntegerField.Results" Type="HTML"><![CDATA[<@ASSIGN instance$FormHtml '<@VAR instance$FormHtml ENCODING=NONE>
<TR>
<TD><@VAR method$Label ENCODING=NONE><@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE"><FONT COLOR=<@VAR instance$RequiredColor ENCODING=NONE>>*</FONT> </@IF></TD>
<TD>
<INPUT TYPE=TEXT<@IF "LEN(<@VAR method$Name ENCODING=NONE>)"> NAME="<@VAR method$Name ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$DefaultValue ENCODING=NONE>)"> VALUE="<@VAR method$DefaultValue ENCODING=NONE>"</@IF>>
</TD>
</TR>
'>
<@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE">
<@COMMENT> If the field is required, augment form verification clause.</@COMMENT>
<@ASSIGN instance$RequiredFlag "TRUE">
<@IF "LEN(<@VAR method$MaxValue ENCODING=NONE>)">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckIntegerLess(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$Name ENCODING=NONE>,<@VAR method$MaxValue ENCODING=NONE>) && ">
<@ASSIGN instance$IncludeCheckIntegerLess "TRUE">
</@IF>
<@IF "LEN(<@VAR method$MinValue ENCODING=NONE>)">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckIntegerGreater(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$Name ENCODING=NONE>,<@VAR method$MinValue ENCODING=NONE>) && ">
<@ASSIGN instance$IncludeCheckIntegerGreater "TRUE">
</@IF>
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckInteger(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$Name ENCODING=NONE>) && ">
<@ASSIGN instance$IncludeCheckInteger "TRUE">
<@ELSE>
<@COMMENT> Always check the range to assure proper data fill when the form verification is performed.</@COMMENT>
<@IF "LEN(<@VAR method$MaxValue ENCODING=NONE>)">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckIntegerLessOrBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$Name ENCODING=NONE>,<@VAR method$MaxValue ENCODING=NONE>) && ">
<@ASSIGN instance$IncludeCheckIntegerLessOrBlank "TRUE">
<@ASSIGN instance$RequiredFlag "TRUE">
</@IF>
<@IF "LEN(<@VAR method$MinValue ENCODING=NONE>)">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckIntegerGreaterOrBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$Name ENCODING=NONE>,<@VAR method$MinValue ENCODING=NONE>) && ">
<@ASSIGN instance$IncludeCheckIntegerGreaterOrBlank "TRUE">
<@ASSIGN instance$RequiredFlag "TRUE">
</@IF>
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckIntegerOrBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$Name ENCODING=NONE>) && ">
<@ASSIGN instance$IncludeCheckIntegerOrBlank "TRUE">
<@ASSIGN instance$RequiredFlag "TRUE">
</@IF>
]]></Output>
<Output ID="FormBuilder.addFloatField.Append_FloatField.Results" Type="HTML"><![CDATA[<@ASSIGN instance$FormHtml '<@VAR instance$FormHtml ENCODING=NONE>
<TR>
<TD><@VAR method$Label ENCODING=NONE><@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE"><FONT COLOR=<@VAR instance$RequiredColor ENCODING=NONE>>*</FONT> </@IF></TD>
<TD>
<INPUT TYPE=TEXT <@IF "LEN(<@VAR method$Name ENCODING=NONE>)"> NAME="<@VAR method$Name ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$DefaultValue ENCODING=NONE>)"> VALUE="<@VAR method$DefaultValue ENCODING=NONE>"</@IF>>
</TD>
</TR>
'>
<@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE">
<@COMMENT> If the field is required, augment form verification clause.</@COMMENT>
<@ASSIGN instance$RequiredFlag "TRUE">
<@IF "LEN(<@VAR method$MaxValue ENCODING=NONE>)">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckFloatLess(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$Name ENCODING=NONE>,<@VAR method$MaxValue ENCODING=NONE>) && ">
<@ASSIGN instance$IncludeCheckFloatLess "TRUE">
</@IF>
<@IF "LEN(<@VAR method$MinValue ENCODING=NONE>)">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckFloatGreater(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$Name ENCODING=NONE>,<@VAR method$MinValue ENCODING=NONE>) && ">
<@ASSIGN instance$IncludeCheckFloatGreater "TRUE">
</@IF>
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckFloat(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$Name ENCODING=NONE>) && ">
<@ASSIGN instance$IncludeCheckFloat "TRUE">
<@ELSE>
<@COMMENT> Always check the range to assure proper data fill when the form verification is performed.</@COMMENT>
<@IF "LEN(<@VAR method$MaxValue ENCODING=NONE>)">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckFloatLessOrBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$Name ENCODING=NONE>,<@VAR method$MaxValue ENCODING=NONE>) && ">
<@ASSIGN instance$IncludeCheckFloatLessOrBlank "TRUE">
<@ASSIGN instance$RequiredFlag "TRUE">
</@IF>
<@IF "LEN(<@VAR method$MinValue ENCODING=NONE>)">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckFloatGreaterOrBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$Name ENCODING=NONE>,<@VAR method$MinValue ENCODING=NONE>) && ">
<@ASSIGN instance$IncludeCheckFloatGreaterOrBlank "TRUE">
<@ASSIGN instance$RequiredFlag "TRUE">
</@IF>
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckFloatOrBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$Name ENCODING=NONE>) && ">
<@ASSIGN instance$IncludeCheckFloatOrBlank "TRUE">
<@ASSIGN instance$RequiredFlag "TRUE">
</@IF>
]]></Output>
<Output ID="FormBuilder.addDivider.Append_Divider.Results" Type="HTML"><![CDATA[<@ASSIGN instance$FormHtml '<@VAR instance$FormHtml ENCODING=NONE>
<TR>
<TD COLSPAN=2<@IF "LEN(<@VAR method$BackgroundColor ENCODING=NONE>)"> BGCOLOR="<@VAR method$BackgroundColor ENCODING=NONE>"</@IF>><@VAR method$Label ENCODING=NONE></TD>
</TR>
'>]]></Output>
<Output ID="FormBuilder.addBlankLine.Append_Blank.Results" Type="HTML"><![CDATA[<@ASSIGN instance$FormHtml '<@VAR instance$FormHtml ENCODING=NONE>
<TR><TD COLSPAN=2> </TD></TR>
'>]]></Output>
<Output ID="FormBuilder.addReadOnly.Append_ReadOnly.Results" Type="HTML"><![CDATA[<@ASSIGN instance$FormHtml '<@VAR instance$FormHtml ENCODING=NONE>
<TR>
<TD><@VAR method$Label ENCODING=NONE></TD>
<TD><@VAR method$Value ENCODING=NONE></TD>
</TR>
'>]]></Output>
<Output ID="FormBuilder.addTextArea.Append_TextArea.Results" Type="HTML"><![CDATA[<@ASSIGN instance$FormHtml '<@VAR instance$FormHtml ENCODING=NONE>
<@IF "LEN(<@VAR method$Label ENCODING=NONE>)">
<TR>
<TD COLSPAN=2<@IF "LEN(<@VAR method$BackgroundColor ENCODING=NONE>)"> BGCOLOR="<@VAR method$BackgroundColor ENCODING=NONE>"</@IF>><@VAR method$Label ENCODING=NONE><@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE"><FONT COLOR=<@VAR instance$RequiredColor ENCODING=NONE>>*</FONT></@IF></TD>
</TR>
</@IF>
<TR>
<TD COLSPAN=2>
<TEXTAREA WRAP=VIRTUAL<@IF "LEN(<@VAR method$Name ENCODING=NONE>)"> NAME="<@VAR method$Name ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$Rows ENCODING=NONE>)"> ROWS="<@VAR method$Rows ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$Columns ENCODING=NONE>)"> COLS="<@VAR method$Columns ENCODING=NONE>"</@IF>><@VAR method$DefaultValue ENCODING=NONE></TEXTAREA>
</TD>
</TR>
'>
<@COMMENT> If the field is required, augment form verification clause.</@COMMENT>
<@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE">
<@ASSIGN instance$IncludeCheckNotBlank "TRUE">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckNotBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$Name ENCODING=NONE>) && ">
</@IF>]]></Output>
<Output ID="FormBuilder.addHidden.Append_Hidden.Results" Type="HTML"><![CDATA[<@ASSIGN instance$FormHtml '<@VAR instance$FormHtml ENCODING=NONE>
<INPUT TYPE=HIDDEN<@IF "LEN(<@VAR method$Name ENCODING=NONE>)"> NAME="<@VAR method$Name ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$Value ENCODING=NONE>)"> VALUE="<@VAR method$Value ENCODING=NONE>"</@IF>>
'>]]></Output>
<Output ID="FormBuilder.addDynamicRadioButtons.Append_DynamicRadioButtons.Results" Type="HTML"><![CDATA[<@ASSIGN instance$FormHtml '<@VAR instance$FormHtml ENCODING=NONE>
<@IF "LEN(<@VAR method$NumCols ENCODING=NONE>)">
<TR>
<TD VALIGN=TOP><@VAR method$Label ENCODING=NONE><@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE"><FONT COLOR=<@VAR instance$RequiredColor ENCODING=NONE>>*</FONT> </@IF></TD>
<TD>
<TABLE>
<TR>
<@CHAR 60>@ROWS ARRAY="<@VAR method$ArrayName ENCODING=NONE>"<@CHAR 62>
<TD><INPUT TYPE=RADIO VALUE="<@CHAR 60>@COL 1<@CHAR 62>"<@IF "LEN(<@VAR method$Name ENCODING=NONE>)"> NAME="<@VAR method$Name ENCODING=NONE>"</@IF><@CHAR 60>@IFEQUAL "<@VAR method$DefaultValue ENCODING=NONE>" "<@CHAR 60>@COL 1<@CHAR 62>"<@CHAR 62> CHECKED<@CHAR 60>/@IF<@CHAR 62>><@CHAR 60>@COL 2<@CHAR 62></INPUT> </TD>
<@CHAR 60>@IFEQUAL "<@CHAR 60>@CALC '<@CHAR 60>@CURROW<@CHAR 62>%@@method$NumCols'<@CHAR 62>" "0"<@CHAR 62>
</TR>
<TR>
<@CHAR 60>/@IF<@CHAR 62>
<@CHAR 60>/@ROWS<@CHAR 62>
</TR>
</TABLE>
</TD>
</TR>
<@ELSE>
<TR>
<TD VALIGN=TOP><@VAR method$Label ENCODING=NONE><@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE"><FONT COLOR=<@VAR instance$RequiredColor ENCODING=NONE>>*</FONT> </@IF></TD>
<TD>
<@CHAR 60>@ROWS ARRAY="<@VAR method$ArrayName ENCODING=NONE>"<@CHAR 62>
<INPUT TYPE=RADIO VALUE="<@CHAR 60>@COL 1<@CHAR 62>"<@IF "LEN(<@VAR method$Name ENCODING=NONE>)"> NAME="<@VAR method$Name ENCODING=NONE>"</@IF><@CHAR 60>@IFEQUAL "<@VAR method$DefaultValue ENCODING=NONE>" "<@CHAR 60>@COL 1<@CHAR 62>"<@CHAR 62> CHECKED<@CHAR 60>/@IF<@CHAR 62>><@CHAR 60>@COL 2<@CHAR 62></INPUT>
<@CHAR 60>/@ROWS<@CHAR 62>
</TD>
</TR>
</@IF>
'>
<@COMMENT> If the field is required, augment form verification clause.</@COMMENT>
<@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckRadioNotBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$Name ENCODING=NONE>) && ">
<@ASSIGN instance$RequiredFlag "TRUE">
<@ASSIGN instance$IncludeCheckRadioNotBlank "TRUE">
</@IF>]]></Output>
<Output ID="FormBuilder.addDynamicDropdown.Append_DynamicDropdown.Results" Type="HTML"><![CDATA[<@ASSIGN instance$FormHtml '<@VAR instance$FormHtml ENCODING=NONE>
<TR>
<TD><@VAR method$Label ENCODING=NONE><@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE"><FONT COLOR=<@VAR instance$RequiredColor ENCODING=NONE>>*</FONT> </@IF></TD>
<TD>
<SELECT<@IF "LEN(<@VAR method$Name ENCODING=NONE>)"> NAME="<@VAR method$Name ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$MultipleSize ENCODING=NONE>)"> SIZE="<@VAR method$MultipleSize ENCODING=NONE> MULTIPLE"</@IF>>
<OPTION></OPTION>
<@CHAR 60><@CHAR 64>ROWS ARRAY="<@VAR method$ArrayName ENCODING=NONE>"<@CHAR 62>
<OPTION<@CHAR 60>@IF "LEN(<@LITERAL '<@COL 1>'>)"<@CHAR 62> VALUE="<@LITERAL '<@COL 1>'>"<@CHAR 60>/@IF<@CHAR 62><@CHAR 60>@IFEQUAL "<@LITERAL '<@COL 1>'>" "<@VAR method$DefaultValue ENCODING=NONE>"<@CHAR 62> SELECTED<@CHAR 60>/@IF<@CHAR 62>><@LITERAL "<@COL 2>"></OPTION>
<@LITERAL "</@ROWS>">
</SELECT>
</TD>
</TR>
'>
<@COMMENT> If the field is required, augment form verification clause.</@COMMENT>
<@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckSelectNotBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$Name ENCODING=NONE>) && ">
<@ASSIGN instance$IncludeCheckSelectNotBlank "TRUE">
<@ASSIGN instance$RequiredFlag "TRUE">
</@IF>]]></Output>
<Output ID="FormBuilder.addDynamicCheckboxes.Append_DynamicCheckboxes.Results" Type="HTML"><![CDATA[<@ASSIGN instance$FormHtml '<@VAR instance$FormHtml ENCODING=NONE>
<@IF "LEN(<@VAR method$NumCols ENCODING=NONE>)">
<TR>
<TD VALIGN=TOP><@VAR method$Label ENCODING=NONE></TD>
<TD>
<TABLE>
<TR>
<@CHAR 60><@CHAR 64>ROWS ARRAY="<@VAR method$ArrayName ENCODING=NONE>"<@CHAR 62>
<TD><INPUT TYPE=CHECKBOX<@IF "LEN(<@VAR method$Name ENCODING=NONE>)"> NAME="<@VAR method$Name ENCODING=NONE>"</@IF> VALUE="<@LITERAL '<@COL 1>'>"<@CHAR 60>@IFEQUAL "<@CHAR 60>@COL 3<@CHAR 62>" "TRUE"<@CHAR 62> CHECKED<@CHAR 60>/@IF<@CHAR 62>><@LITERAL "<@COL 2>"></INPUT> </TD>
<@CHAR 60>@IFEQUAL "<@CHAR 60>@CALC '<@CHAR 60>@CURROW<@CHAR 62>%@@method$NumCols'<@CHAR 62>" "0"<@CHAR 62>
</TR>
<TR>
<@CHAR 60>/@IF<@CHAR 62>
<@LITERAL "</@ROWS>">
</TR>
</TABLE>
</TD>
</TR>
<@ELSE>
<TR>
<TD VALIGN=TOP><@VAR method$Label ENCODING=NONE></TD>
<TD>
<@CHAR 60><@CHAR 64>ROWS ARRAY="<@VAR method$ArrayName ENCODING=NONE>"<@CHAR 62>
<INPUT TYPE=CHECKBOX<@IF "LEN(<@VAR method$Name ENCODING=NONE>)"> NAME="<@VAR method$Name ENCODING=NONE>"</@IF> VALUE="<@LITERAL '<@COL 1>'>"<@CHAR 60>@IFEQUAL "<@CHAR 60>@COL 3<@CHAR 62>" "TRUE"<@CHAR 62> CHECKED<@CHAR 60>/@IF<@CHAR 62>><@LITERAL "<@COL 2>"></INPUT>
<@LITERAL "</@ROWS>">
</TD>
</TR>
</@IF>
'>]]></Output>
<Output ID="FormBuilder.addCustomRow.Append_CustomRow.Results" Type="HTML"><![CDATA[<@ASSIGN instance$FormHtml '<@VAR instance$FormHtml ENCODING=NONE>
<TR>
<TD COLSPAN=2><@VAR method$MetaHTML ENCODING=NONE></TD>
</TR>
'>]]></Output>
<Output ID="FormBuilder.addIntegerRange.Append_IntegerRangeFields.Results" Type="HTML"><![CDATA[<@ASSIGN instance$FormHtml '<@VAR instance$FormHtml ENCODING=NONE>
<TR>
<TD><@VAR method$Label ENCODING=NONE><@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE"><FONT COLOR=<@VAR instance$RequiredColor ENCODING=NONE>>*</FONT> </@IF></TD>
<TD>
From
<INPUT TYPE=TEXT <@IF "LEN(<@VAR method$LowerName ENCODING=NONE>)"> NAME="<@VAR method$LowerName ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$LowerDefaultValue ENCODING=NONE>)"> VALUE="<@VAR method$LowerDefaultValue ENCODING=NONE>"</@IF>>
To
<INPUT TYPE=TEXT <@IF "LEN(<@VAR method$UpperName ENCODING=NONE>)"> NAME="<@VAR method$UpperName ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$UpperDefaultValue ENCODING=NONE>)"> VALUE="<@VAR method$UpperDefaultValue ENCODING=NONE>"</@IF>>
</TD>
</TR>
'>
<@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE">
<@COMMENT> If the field is required, augment form verification clause.</@COMMENT>
<@ASSIGN instance$RequiredFlag "TRUE">
<@IF "LEN(<@VAR method$MaxValue ENCODING=NONE>)">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckIntegerLess(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$LowerName ENCODING=NONE>,<@VAR method$MaxValue ENCODING=NONE>) && ">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckIntegerLess(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$UpperName ENCODING=NONE>,<@VAR method$MaxValue ENCODING=NONE>) && ">
<@ASSIGN instance$IncludeCheckIntegerLess "TRUE">
</@IF>
<@IF "LEN(<@VAR method$MinValue ENCODING=NONE>)">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckIntegerGreater(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$LowerName ENCODING=NONE>,<@VAR method$MinValue ENCODING=NONE>) && ">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckIntegerGreater(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$UpperName ENCODING=NONE>,<@VAR method$MinValue ENCODING=NONE>) && ">
<@ASSIGN instance$IncludeCheckIntegerGreater "TRUE">
</@IF>
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckInteger(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$LowerName ENCODING=NONE>) && ">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckInteger(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$UpperName ENCODING=NONE>) && ">
<@ASSIGN instance$IncludeCheckInteger "TRUE">
<@ELSE>
<@COMMENT> Always check the range to assure proper data fill when the form verification is performed.</@COMMENT>
<@IF "LEN(<@VAR method$MaxValue ENCODING=NONE>)">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckIntegerLessOrBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$LowerName ENCODING=NONE>,<@VAR method$MaxValue ENCODING=NONE>) && ">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckIntegerLessOrBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$UpperName ENCODING=NONE>,<@VAR method$MaxValue ENCODING=NONE>) && ">
<@ASSIGN instance$RequiredFlag "TRUE">
<@ASSIGN instance$IncludeCheckIntegerLessOrBlank "TRUE">
</@IF>
<@IF "LEN(<@VAR method$MinValue ENCODING=NONE>)">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckIntegerGreaterOrBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$LowerName ENCODING=NONE>,<@VAR method$MinValue ENCODING=NONE>) && ">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckIntegerGreaterOrBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$UpperName ENCODING=NONE>,<@VAR method$MinValue ENCODING=NONE>) && ">
<@ASSIGN instance$RequiredFlag "TRUE">
<@ASSIGN instance$IncludeCheckIntegerGreaterOrBlank "TRUE">
</@IF>
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckIntegerOrBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$LowerName ENCODING=NONE>) && ">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckIntegerOrBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$UpperName ENCODING=NONE>) && ">
<@ASSIGN instance$IncludeCheckIntegerOrBlank "TRUE">
<@ASSIGN instance$RequiredFlag "TRUE">
</@IF>
]]></Output>
<Output ID="FormBuilder.addFloatRange.Append_FloatRangeFields.Results" Type="HTML"><![CDATA[<@ASSIGN instance$FormHtml '<@VAR instance$FormHtml ENCODING=NONE>
<TR>
<TD><@VAR method$Label ENCODING=NONE><@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE"><FONT COLOR=<@VAR instance$RequiredColor ENCODING=NONE>>*</FONT> </@IF></TD>
<TD>
From
<INPUT TYPE=TEXT <@IF "LEN(<@VAR method$LowerName ENCODING=NONE>)"> NAME="<@VAR method$LowerName ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$LowerDefaultValue ENCODING=NONE>)"> VALUE="<@VAR method$LowerDefaultValue ENCODING=NONE>"</@IF>>
To
<INPUT TYPE=TEXT <@IF "LEN(<@VAR method$UpperName ENCODING=NONE>)"> NAME="<@VAR method$UpperName ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$UpperDefaultValue ENCODING=NONE>)"> VALUE="<@VAR method$UpperDefaultValue ENCODING=NONE>"</@IF>>
</TD>
</TR>
'>
<@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE">
<@COMMENT> If the field is required, augment form verification clause.</@COMMENT>
<@ASSIGN instance$RequiredFlag "TRUE">
<@IF "LEN(<@VAR method$MaxValue ENCODING=NONE>)">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckFloatLess(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$LowerName ENCODING=NONE>,<@VAR method$MaxValue ENCODING=NONE>) && ">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckFloatLess(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$UpperName ENCODING=NONE>,<@VAR method$MaxValue ENCODING=NONE>) && ">
<@ASSIGN instance$IncludeCheckFloatLess "TRUE">
</@IF>
<@IF "LEN(<@VAR method$MinValue ENCODING=NONE>)">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckFloatGreater(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$LowerName ENCODING=NONE>,<@VAR method$MinValue ENCODING=NONE>) && ">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckFloatGreater(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$UpperName ENCODING=NONE>,<@VAR method$MinValue ENCODING=NONE>) && ">
<@ASSIGN instance$IncludeCheckFloatGreater "TRUE">
</@IF>
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckFloat(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$LowerName ENCODING=NONE>) && ">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckFloat(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$UpperName ENCODING=NONE>) && ">
<@ASSIGN instance$IncludeCheckFloat "TRUE">
<@ELSE>
<@COMMENT> Always check the range to assure proper data fill when the form verification is performed.</@COMMENT>
<@IF "LEN(<@VAR method$MaxValue ENCODING=NONE>)">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckFloatLessOrBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$LowerName ENCODING=NONE>,<@VAR method$MaxValue ENCODING=NONE>) && ">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckFloatLessOrBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$UpperName ENCODING=NONE>,<@VAR method$MaxValue ENCODING=NONE>) && ">
<@ASSIGN instance$RequiredFlag "TRUE">
<@ASSIGN instance$IncludeCheckFloatLessOrBlank "TRUE">
</@IF>
<@IF "LEN(<@VAR method$MinValue ENCODING=NONE>)">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckFloatGreaterOrBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$LowerName ENCODING=NONE>,<@VAR method$MinValue ENCODING=NONE>) && ">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckFloatGreaterOrBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$UpperName ENCODING=NONE>,<@VAR method$MinValue ENCODING=NONE>) && ">
<@ASSIGN instance$RequiredFlag "TRUE">
<@ASSIGN instance$IncludeCheckFloatGreaterOrBlank "TRUE">
</@IF>
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckFloatOrBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$LowerName ENCODING=NONE>) && ">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckFloatOrBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$UpperName ENCODING=NONE>) && ">
<@ASSIGN instance$IncludeCheckFloatOrBlank "TRUE">
<@ASSIGN instance$RequiredFlag "TRUE">
</@IF>
]]></Output>
<Output ID="FormBuilder.addDynamicFileField.Append_DynamicFileField.Results" Type="HTML"><![CDATA[<@ASSIGN instance$FormHtml '<@VAR instance$FormHtml ENCODING=NONE>
<TR>
<TD><@VAR method$Label ENCODING=NONE><@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE"><FONT COLOR=<@VAR instance$RequiredColor ENCODING=NONE>>*</FONT> </@IF></TD>
<TD>
<@CHAR 60>@IFEMPTY "<@VAR method$DefaultValue ENCODING=NONE>"<@CHAR 62>
<INPUT TYPE=FILE<@IF "LEN(<@VAR method$Name ENCODING=NONE>)"> NAME="<@VAR method$Name ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$DisplayLength ENCODING=NONE>)"> SIZE="<@VAR method$DisplayLength ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$MaxLength ENCODING=NONE>)"> MAXLENGTH="<@VAR method$MaxLength ENCODING=NONE>"</@IF>>
<@CHAR 60>@ELSE<@CHAR 62>
<INPUT TYPE=TEXT<@IF "LEN(<@VAR method$Name ENCODING=NONE>)"> NAME="<@VAR method$Name ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$DisplayLength ENCODING=NONE>)"> SIZE="<@VAR method$DisplayLength ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$DefaultValue ENCODING=NONE>)"> VALUE="<@VAR method$DefaultValue ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$MaxLength ENCODING=NONE>)"> MAXLENGTH="<@VAR method$MaxLength ENCODING=NONE>"</@IF>>
<@CHAR 60>/@IF<@CHAR 62>
</TD>
</TR>
'>
<@COMMENT> If the field is required, augment form verification clause.</@COMMENT>
<@IFEQUAL "<@VAR method$Required ENCODING=NONE>" "TRUE">
<@ASSIGN instance$RequiredFlag "TRUE">
<@ASSIGN instance$IncludeCheckNotBlank "TRUE">
<@ASSIGN instance$RequiredFields "<@VAR instance$RequiredFields ENCODING=NONE>CheckNotBlank(<@VAR instance$FormName ENCODING=NONE>.<@VAR method$Name ENCODING=NONE>) && ">
</@IF>]]></Output>
<Output ID="FormBuilder.addDynamicCheckbox.Append_DynamicCheckbox.Results" Type="HTML"><![CDATA[<@ASSIGN instance$FormHtml '<@VAR instance$FormHtml ENCODING=NONE>
<TR>
<TD><@VAR method$Label ENCODING=NONE></TD>
<TD>
<INPUT TYPE=CHECKBOX<@IF "LEN(<@VAR method$Name ENCODING=NONE>)"> NAME="<@VAR method$Name ENCODING=NONE>"</@IF><@IF "LEN(<@VAR method$Value ENCODING=NONE>)"> VALUE="<@VAR method$Value ENCODING=NONE>"</@IF><@CHAR 60>@IFEQUAL "<@VAR method$DefaultValue ENCODING=NONE>" "1"<@CHAR 62> CHECKED<@CHAR 60>/@IF<@CHAR 62>>
</TD>
</TR>
'>]]></Output>
</Outputs>
</TCF>
