<!--#include file="../../owFunctions/I_GeneralFunctions.asp"-->
<%
	'************************************************************************************
	'*																					*
	'*	MODIFICATION TO THIS SCRIPT OR ANY FILES INCLUDED WITH 							*
	'*		ONEWORLDSTORE IS DONE AT YOUR OWN RISK!										*
	'*	Product  : OneWorldStore														*
	'*	Version  : 9.0000																*
	'*	Modified : June 2004															*
	'*	Copyright:	Copyright (C) 2004 OneWorldStore.Com								*
	'*				Registration Number: 1024507										*
	'*				http://strategis.ic.gc.ca/											*
	'*																					*
	'************************************************************************************

	sIDShipment			= CONVERSION_SQLEncode2(Request("idshipment"),10)
	sShipmentDesc		= CONVERSION_SQLEncode2(Request("shipmentDesc"),100)
	sPriceToAdd			= CONVERSION_SQLEncode2(Request("priceToAdd"),20)
	sPercentageToAdd	= CONVERSION_SQLEncode2(Request("percentageToAdd"),20)
	sHandlingFix		= CONVERSION_SQLEncode2(Request("handlingFix"),20)
	sHandlingPercentage	= CONVERSION_SQLEncode2(Request("handlingPercentage"),20)
	sShipmentTime		= CONVERSION_SQLEncode2(Request("shipmentTime"),20)
	sQuantityFrom 		= CONVERSION_SQLEncode2(Request("quantityFrom"),20)
	sQuantityUntil		= CONVERSION_SQLEncode2(Request("quantityUntil"),20)
	sWeightFrom			= CONVERSION_SQLEncode2(Request("WeightFrom"),20)
	sWeightUntil		= CONVERSION_SQLEncode2(Request("WeightUntil"),20)
	sPriceFrom			= CONVERSION_SQLEncode2(Request("priceFrom"),20)
	sPriceUntil			= CONVERSION_SQLEncode2(Request("priceUntil"),20)
	sZip				= CONVERSION_SQLEncode2(Request("zip"),20)
	sZipEq	 			= CONVERSION_SQLEncode2(Request("zipEq"),10)
	sStateCode			= CONVERSION_SQLEncode2(Request("stateCode"),20)
	sStateCodeEq 		= CONVERSION_SQLEncode2(Request("stateCodeEq"),10)
	sCountryCode		= CONVERSION_SQLEncode2(Request("countryCode"),20)
	sCountryCodeEq		= CONVERSION_SQLEncode2(Request("countryCodeEq"),10)
	sIDCustomerType		= CONVERSION_SQLEncode2(Request("customerType"),10)
	sSort				= Trim(Request("sSort"))
	sSearchText			= Trim(Request("sSearchText"))
	sSearch				= Trim(Request("sSearch"))
	
	if sZipEq="" then
		sZipEq="0"
	end if
	if sStateCodeEq="" then
		sStateCodeEq="0"
	end if
	if sCountryCodeEq="" then
		sCountryCodeEq="0"
	end if

	sSQLText = "UPDATE shipments set shipmentDesc='" &sShipmentDesc& "', priceToAdd=" &sPriceToAdd& ", percentageToAdd=" &sPercentageToAdd& ",shipmentTime='" &sShipmentTime& "', quantityFrom=" &sQuantityFrom& ", quantityUntil=" &sQuantityUntil& ", WeightFrom=" &sWeightFrom& ",WeightUntil=" &sWeightUntil& ", priceFrom=" &sPriceFrom& ", priceUntil=" &sPriceUntil& ", zip='" &sZip& "', zipEq=" &sZipEq& ", stateCode='" &sStateCode& "', stateCodeEq=" &sStateCodeEq& ", countryCode='" &sCountryCode& "', countryCodeEq=" &sCountryCodeEq& ", IDCustomerType = " &sIDCustomerType& ", handlingFix=" &sHandlingFix& ", handlingPercentage=" &sHandlingPercentage& " WHERE idShipment="&sIDShipment
	Call DB_updateDatabase(sSQLText)
	%>
	<script language = "javascript">
		parent.owBodyTopNav.location="owBodyTopNav.asp?sMessage=<%=Server.URLEncode(LANG_DT( "CHANGES_SAVED", "** Changes saved **" ))%>";
		location="owShipmentModifyForm.asp?sSort=<%=sSort%>&sSearch=<%=sSearch%>&sSearchText=<%=sSearchText%>&Idshipment=<%=sIDShipment%>";
	</script>