 			<cfquery name="d" datasource="user_login" username="#session.dbuser#" password="#decrypt(session.epw,session.sessionKey)#">
 				delete from ctspecimen_part_list_order
 			</cfquery>
+			<cfset rord=1>
 			<cfloop from="1" to="#listlen(partRowOrder)#" index="listpos">
 				<cfset x=listgetat(partRowOrder,listpos)>
 				<cfset i=listlast(x,"_")>

		<cfset did=rereplace(Attribute_type,"[^A-Za-z]","_","all")>

	<cfelseif tbl is "ctspecimen_part_list_order">
<cfoutput>
	<cfloop from="1" to="#listlen(partRowOrder)#" index="listpos">
				<cfset x=listgetat(partRowOrder,listpos)>
				<cfset i=listlast(x,"_")>
				<cfset thisterm=evaluate("partname_" & i)>
					<br>insert into ctspecimen_part_list_order (
						PARTNAME,
						LIST_ORDER
					) values (
						'#thisterm#',
						#i#
					)
			</cfloop>

			</cfoutput>
		<cfabort>


		<!--- wipe everything --->

						LIST_ORDER
					) values (
						'#thisterm#',
						#rord#
					)
				</cfquery>
				<cfset rord=rord+1>
			</cfloop>
		</cftransaction>
	<cfelse>
