<%'	IF Request.Form.Item("FUNCTION") = "Menu" THEN
'		Response.Redirect "Frame.asp"
'	END IF
'	IF Request.Form.Item("FUNCTION") = "Back" THEN
'		Response.Redirect Session("Search_Page")
'	END IF
'	IF Request.Form.Item("FUNCTION") = "Exit" THEN
'		Response.Redirect Session("Search_Page")
'	END IF
'	IF Request.Form.Item("FUNCTION") = "Linked Docs." THEN
'		Response.Redirect "Documents2.asp"
'	END IF

	Session("ID")	=	CINT(Request.Form("KEY"))	'Update & Delete, will change if New
	
	select case CInt(Request.Form("TRANSACTION"))
		case 1
			'<!-- #include file = "I_sp_Add.asp" -->
			transaction = 1		'1 = add, 2 = update, 3 = delete
			Call Update
		case 2
			transaction = 2
			Call Update
		case 3
		transaction = 3
		Call Update
		'<!-- #include file = "I_sp_Delete.asp" -->
	end select
%>