header code
same field/index (replace <FIELDID> and <FORM>)
NF[<FIELDID>]=new NFD(<X-FC-FIELD <FORM>.<FIELDID>.21 DEFAULT=0 NUMBER>,<X-FC-FIELD <FORM>.<FIELDID>.22 DEFAULT=0 NUMBER>,<X-FC-FIELD <FORM>.<FIELDID>.23 DEFAULT=0 NUMBER>,<X-FC-FIELD <FORM>.<FIELDID>.20 DEFAULT=0 NUMBER>,<!--#set var="FMT" value="<X-FC-FIELD FORM.<FIELDID>.27 LITERALSTRING>"--><!--#set var="TEMP" expr="@split($FMT, '/%[l]?[DUXdux]/')"--><!--#set var="PREFIX" value=""--><!--#while expr="@indexof($TEMP,'%%') != -1"--><!--#set var="NEXT" expr="@split($TEMP,'%%')"--><!--#set var="PREFIX" value="${PREFIX}${NEXT}%"--><!--#endwhile--><!--#set var="PREFIX" value="${PREFIX}${TEMP}"--><!--#set var="SUFFIX" value=""--><!--#while expr="@indexof($FMT,'%%') != -1"--><!--#set var="NEXT" expr="@split($FMT,'%%')"--><!--#set var="SUFFIX" value="${SUFFIX}${NEXT}%"--><!--#endwhile--><!--#set var="SUFFIX" value="${SUFFIX}${FMT}"-->"<!--#echo expr="@escape($PREFIX)"-->","<!--#echo expr="@escape($SUFFIX)"-->");
NFO[<FIELDID>]=new Array();
CO=NFO[<FIELDID>];<!--#set var="LISTSTRING" value="<X-FC-FIELD <FORM>.<FIELDID>.10 LITERALSTRING>"--><!--#set var="CURVAL" value="-1"--><!--#while expr="$LISTSTRING"--><!--#set var="LISTVAL" expr="@split($LISTSTRING,';')"--><!--#set var="CAPTION" expr="@split($LISTVAL,'=')"--><!--#if expr="$LISTVAL"--><!--#set var="CURVAL"
value="$LISTVAL"--><!--#else--><!--#set var="CURVAL" expr="$CURVAL + 1"--><!--#endif-->
CO[CO.length]="<!--#echo expr="@escape($CAPTION)"-->";
CO[CO.length]=<!--#echo var="CURVAL"-->;<!--#endwhile-->
independent indeces (replace <FIELDID>, <INDEX> and <FORM>):
NF[<FIELDID>]=new Array();
NF[<FIELDID>][<INDEX>]=new NFD(<X-FC-FIELD <FORM>.<FIELDID>.21 DEFAULT=0 NUMBER>,<X-FC-FIELD <FORM>.<FIELDID>.22 DEFAULT=0 NUMBER>,<X-FC-FIELD <FORM>.<FIELDID>.23 DEFAULT=0 NUMBER>,<X-FC-FIELD <FORM>.<FIELDID>.20 DEFAULT=0 NUMBER>,<!--#set var="FMT" value="<X-FC-FIELD <FORM>.<FIELDID>.27 LITERALSTRING>"--><!--#set var="TEMP" expr="@split($FMT, '/%[l]?[DUXdux]/')"--><!--#set var="PREFIX" value=""--><!--#while expr="@indexof($TEMP,'%%') !=
-1"--><!--#set var="NEXT" expr="@split($TEMP,'%%')"--><!--#set var="PREFIX" value="${PREFIX}${NEXT}%"--><!--#endwhile--><!--#set var="PREFIX" value="${PREFIX}${TEMP}"--><!--#set var="SUFFIX" value=""--><!--#while expr="@indexof($FMT,'%%') != -1"--><!--#set var="NEXT" expr="@split($FMT,'%%')"--><!--#set var="SUFFIX" value="${SUFFIX}${NEXT}%"--><!--#endwhile--><!--#set var="SUFFIX" value="${SUFFIX}${FMT}"-->"<!--#echo var="PREFIX"-->","<!--#echo var="SUFFIX"-->");
NFO[<FIELDID>][<INDEX>]=new Array();
CO=NFO[<FIELDID>][<INDEX>];<!--#set var="LISTSTRING" value="<X-FC-FIELD <FORM>.<FIELDID>.10 LITERALSTRING>"--><!--#set var="CURVAL" value="-1"--><!--#while expr="$LISTSTRING"--><!--#set var="LISTVAL" expr="@split($LISTSTRING,';')"--><!--#set var="CAPTION" expr="@split($LISTVAL,'=')"--><!--#if expr="$LISTVAL"--><!--#set var="CURVAL" value="$LISTVAL"--><!--#else--><!--#set var="CURVAL" expr="$CURVAL + 1"--><!--#endif-->
CO[CO.length]="<!--#echo expr="@escape($CAPTION)"-->";
CO[CO.length]=<!--#echo var="CURVAL"-->;<!--#endwhile-->
Body code for the actual control
replacement placeholders:
<FIELDID>: FieldID of the control. Both tab embedded and plain text, so if using an IS Script var, hand replacement will be necessary.
<LOADINDEX>: Index to load the data for the contol from (Embedded in X-FC-FIELD).
<SAVEINDEX>: Index to save the data into (Plain text).
<FORM>: Form to load the control data from.
<NUMFIELD>: Can be used to override the default form for display (usually unecessary). If not blank, first char must be '.'.
<WIDTH>: Size of the text input box (browser "size" argument, not pixels).
<input type="hidden" name="FieldID:<FIELD>.<SAVEINDEX>=LONG" value="<X-FC-FIELD <FIELD>.`<LOADINDEX>` DEFAULT=PROP.11 NUMBER>"/><map id="PMMAP:<FIELD>.<SAVEINDEX>" name="PMMAP:<FIELD>.<SAVEINDEX>">
<area shape="rect" coords="0,0,11,7" href="JavaScript://" alt="<X-FC-FIELD LANG.7535.5 STRING>" title="<X-FC-FIELD LANG.7535.5 STRING>" onclick="return INF(<FIELD>,<SAVEINDEX>,1);"/>
<area shape="rect" coords="0,8,11,13" href="JavaScript://" alt="<X-FC-FIELD LANG.7535.6 STRING>" title="<X-FC-FIELD LANG.7535.6 STRING>" onclick="return INF(<FIELD>,<SAVEINDEX>,-1);"/>
</map><!--#if expr="<X-FC-FIELD <FORM>.<FIELD>.10 LENGTH>"-->
<map id="LMAP:<FIELD>.<SAVEINDEX>" name="LMAP:<FIELD>.<SAVEINDEX>">
<area shape="rect" coords="0,0,11,7" href="JavaScript://" alt="<X-FC-FIELD LANG.7535.3 STRING>" title="<X-FC-FIELD LANG.7535.3 STRING>" onclick="return CNL(<FIELD>,<SAVEINDEX>,1);"/>
<area shape="rect" coords="0,8,11,13" href="JavaScript://" alt="<X-FC-FIELD LANG.7535.4 STRING>" title="<X-FC-FIELD LANG.7535.4 STRING>" onclick="return CNL(<FIELD>,<SAVEINDEX>,-1);"/>
</map><!--#endif--><table class="ocb" bgcolor="#C0C0C0" cellpadding="0" cellspacing="0" border="0">
<tr>
<td class="ict" bgcolor="#FFFFFF"><input class="formsNum" type="text" name="Input:<FIELD>.<SAVEINDEX>" value="<X-FC-FIELD <FIELD>.`<LOADINDEX>` DEFAULT=<FORM>.<FIELD>.11 NUMFIELD>" size="<WIDTH>" onkeypress="return VNKS(event);"
onblur="VNF(<FIELD>,<SAVEINDEX>,this);" onfocus="this.select();"/></td>
<td class="icb"><img src="<X-FC-LOGIN>Icons/10746" usemap="#PMMAP:<FIELD>.<SAVEINDEX>" alt="" width="<X-FC-RESOURCE ICON.10746 WIDTH>" height="<X-FC-RESOURCE ICON.10746 HEIGHT>" hspace="1" vspace="1" border="0" /></td><!--#if expr="<X-FC-FIELD <FORM>.<FIELD>.10 LENGTH>"-->
<td class="icb"><img src="<X-FC-LOGIN>Icons/9160" usemap="#LMAP:<FIELD>.<SAVEINDEX>" alt="" width="<X-FC-RESOURCE ICON.9160 WIDTH>" height="<X-FC-RESOURCE ICON.9160 HEIGHT>" hspace="1" vspace="1" border="0" /></td><!--#endif-->
</tr>
</table>
Really simple header code
NF[<FIELDID>]=new NFD(<X-FC-FIELD FORM.<FIELDID>.21 DEFAULT=0 NUMBER>,<X-FC-FIELD FORM.<FIELDID>.22 DEFAULT=0 NUMBER>,<X-FC-FIELD FORM.<FIELDID>.23 DEFAULT=0 NUMBER>,<X-FC-FIELD FORM.<FIELDID>.20 DEFAULT=0 NUMBER>,<!--#set var="FMT" value="<X-FC-FIELD FORM.<FIELDID>.27 LITERALSTRING>"-->"<!--#echo
expr="@split($FMT, '/%[l]?[DUXdux]/')"-->","<!--#echo var="FMT"-->");
NFO[<FIELDID>]=new Array();
CO=NFO[<FIELDID>];<!--#set var="LISTSTRING" value="<X-FC-FIELD FORM.<FIELDID>.10 LITERALSTRING>"--><!--#set var="CURVAL" value="-1"--><!--#while expr="$LISTSTRING"--><!--#set var="LISTVAL" expr="@split($LISTSTRING,';')"--><!--#set var="CAPTION" expr="@split($LISTVAL,'=')"--><!--#if expr="$LISTVAL"--><!--#set var="CURVAL"
value="$LISTVAL"--><!--#else--><!--#set var="CURVAL" expr="$CURVAL + 1"--><!--#endif-->
CO[CO.length]="<!--#echo var="CAPTION"-->";
CO[CO.length]=<!--#echo var="CURVAL"-->;<!--#endwhile-->
Really simple body code (just <FIELDID>)
<td><input name="FieldID:<FIELDID>.0=LONG" type="hidden" value="<X-FC-FIELD <FIELDID> DEFAULT=PROP.11 NUMBER>"/><map name="PMMAP:<FIELDID>.0">
<area shape="rect" coords="0,0,11,7" href="JavaScript://" alt="<X-FC-FIELD LANG.7535.5 STRING>" title="<X-FC-FIELD LANG.7535.5 STRING>" onclick="return INF(<FIELDID>,0,1);"/>
<area shape="rect" coords="0,8,11,13" href="JavaScript://" alt="<X-FC-FIELD LANG.7535.6 STRING>" title="<X-FC-FIELD LANG.7535.6 STRING>" onclick="return INF(<FIELDID>,0,-1);"/>
</map><!--#if expr="<X-FC-FIELD FORM.<FIELDID>.10 LENGTH>"-->
<map name="LMAP:<FIELDID>.0">
<area shape="rect" coords="0,0,11,7" href="JavaScript://" alt="<X-FC-FIELD LANG.7535.3 STRING>" title="<X-FC-FIELD LANG.7535.3 STRING>" onclick="return CNL(<FIELDID>,0,1);"/>
<area shape="rect" coords="0,8,11,13" href="JavaScript://" alt="<X-FC-FIELD LANG.7535.4 STRING>" title="<X-FC-FIELD LANG.7535.4 STRING>" onclick="return CNL(<FIELDID>,0,-1);"/>
</map><!--#endif--><table class="ocb" bgcolor="#C0C0C0" cellpadding="0" cellspacing="0" border="0">
<tr>
<td class="ict" bgcolor="#FFFFFF"><input class="nb" type="text" name="Input:<FIELDID>.0" value="<X-FC-FIELD <FIELDID> DEFAULT=PROP.11 NUMFIELD>" size="10" onkeypress="return VNKS(event);" onblur="VNF(<FIELDID>,0,this);" onfocus="this.select();"/></td>
<td class="icb"><img src="<X-FC-LOGIN>Icons/10746" usemap="#PMMAP:<FIELDID>.0" alt="" width="<X-FC-RESOURCE ICON.10746 WIDTH>" height="<X-FC-RESOURCE ICON.10746 HEIGHT>" hspace="1" vspace="1" border="0"/></td><!--#if expr="<X-FC-FIELD FORM.<FIELDID>.10 LENGTH>"-->
<td class="icb"><img src="<X-FC-LOGIN>Icons/9160" usemap="#LMAP:<FIELDID>.0" alt="" width="<X-FC-RESOURCE ICON.9160 WIDTH>" height="<X-FC-RESOURCE ICON.9160 HEIGHT>" hspace="1" vspace="1" border="0"/></td><!--#endif-->
</tr>
</table></td>
| ||