[Mydatabasepilot-cvs] MyDatabasePilot/dbProcessInit AddField.cfm,1.25,1.26

[<nan...@us...>]

Update of /cvsroot/mydatabasepilot/MyDatabasePilot/dbProcessInit
In directory sc8-pr-cvs1:/tmp/cvs-serv10445/dbProcessInit

Modified Files:
	AddField.cfm 
Log Message:
Functionality Added:
[ 773748 ] Added Index Length to Varchar, Char, and Text Types

Index: AddField.cfm
===================================================================
RCS file: /cvsroot/mydatabasepilot/MyDatabasePilot/dbProcessInit/AddField.cfm,v
retrieving revision 1.25
retrieving revision 1.26
diff -C2 -d -r1.25 -r1.26
*** AddField.cfm	18 Jul 2003 14:53:25 -0000	1.25
--- AddField.cfm	18 Jul 2003 16:32:13 -0000	1.26
***************
*** 39,42 ****
--- 39,43 ----
  		<cfparam name="FORM.key#i#" default="None" />
  		<cfparam name="FORM.indexName#i#" default="" />
+ 		<cfparam name="FORM.indexLength#i#" default="" />
  		
  		<cfscript>
***************
*** 56,59 ****
--- 57,61 ----
  			alterSpec[i].key="#Evaluate("FORM.key#i#")#";									// Create Key "key"
  			alterSpec[i].indexName="#Trim(Evaluate("FORM.indexName#i#"))#";					// Create Key "indexName"
+ 			alterSpec[i].indexLength="#Trim(Evaluate("FORM.indexLength#i#"))#";				// Create Key "indexLength"
  		
  			// Create Key "binary"
***************
*** 107,110 ****
--- 109,113 ----
  				ArrayAppend(alterSpec, tempStruct); // Add the Temporary Sturcture to alterSpec
  			}
+ 			
  			/* Else If its a plain "Index" ... */
  			else if(alterSpec[i].key IS "Index"){
***************
*** 118,121 ****
--- 121,128 ----
  				tempStruct.index_col_names=ArrayNew(1);
  				tempStruct.index_col_names[1]=alterSpec[i].colName;
+ 				
+ 				// Create index length Array
+ 				tempStruct.indexLength=ArrayNew(1);
+ 				tempStruct.indexLength[1]=alterSpec[i].indexLength;
  				
  				ArrayAppend(alterSpec, tempStruct); // Add the Temporary Sturcture to alterSpec