[ic] Shipping Problem: 1DA Missing: consigneecountry

[Stefan Hornburg Racke]

--=-=-=

"Kat Turner" <ronzokat@hotmail.com> writes:

> Thanks, I am new to IC. Could you give me a pointer on where to find the tag 
> how edit it? Can I edit it inside the IC admin interface or do I do it 
> through FTP? Thanks for helping a newbie!

I think you need to use FTP. The file in question is located in the
directory usertag in your Interchange installation.

I attached the fixed file (it is really small).

Ciao
        Racke

-- 
Racke happily hacks Interchange and maintains Debian packages like Courier.

For projects and other business stuff please refer to COBOLT NetServices
(URL: http://www.cobolt.net; Email: info@cobolt.net; Phone: 0041-1-3884400)

--=-=-=
Content-Type: application/octet-stream
Content-Disposition: attachment; filename=ups_query.tag

UserTag  ups-query  Order  mode origin zip weight country
UserTag  ups-query  Routine <<EOR
sub {
 	my( $mode, $origin, $zip, $weight, $country) = @_;
	BEGIN {
		eval {
			require Business::UPS;
			import Business::UPS;
		};
	};
	$origin		= $::Variable->{UPS_ORIGIN}
					if ! $origin;
	$country	= $::Values->{$::Variable->{UPS_COUNTRY_FIELD}}
					if ! $country;
	$zip		= $::Values->{$::Variable->{UPS_POSTCODE_FIELD}}
					if ! $zip;
	$country = uc $country;
#::logGlobal("calling with: " . join("|", $mode, $origin, $zip, $weight, $country));
	my ($shipping, $zone, $error) =
		getUPS( $mode, $origin, $zip, $weight, $country);
#::logGlobal("received back: " . join("|", $shipping, $zone, $error));
	if($error) {
		$Vend::Session->{ship_message} .= " $mode: $error";
		return 0;
	}
	return $shipping;
}
EOR


--=-=-=--