 				<cfset thisPartID=listlast(f,"_")>
 				<br>deleting #thisPartID#
 				<br>delete from ctspecimen_part_name where CTSPNID=#thisPartID#
+				<cfquery name="del" datasource="user_login" username="#session.dbuser#" password="#decrypt(session.epw,session.sessionKey)#">
+					delete from ctspecimen_part_name where CTSPNID=#thisPartID#
+				</cfquery>
+
 			</cfif>
 		</cfif>
 	</cfloop>

		If we've deleted everything this will just do nothing
	---->
		<p>
			update ctspecimen_part_name set DESCRIPTION='#escapeQuotes(DESCRIPTION)#',IS_TISSUE='#IS_TISSUE#' where part_name='#part_name#'

		</p>

	<!--- last, insert new if there's one provided ---->

			insert into ctspecimen_part_name (PART_NAME,COLLECTION_CDE,DESCRIPTION,IS_TISSUE) values (
			'#part_name#','#COLLECTION_CDE_NEW#','#escapeQuotes(DESCRIPTION)#','#IS_TISSUE#')
		</p>
		<cfquery name="ins" datasource="user_login" username="#session.dbuser#" password="#decrypt(session.epw,session.sessionKey)#">
			insert into ctspecimen_part_name (PART_NAME,COLLECTION_CDE,DESCRIPTION,IS_TISSUE) values (
			'#part_name#','#COLLECTION_CDE_NEW#','#escapeQuotes(DESCRIPTION)#','#IS_TISSUE#')
		</cfquery>
	</cfif>

</cftransaction>
done
</cfoutput>
</cfif>
