connect minivend to ecommerce server(again)

[Shao Zhang <shao@cia.com.au>]

Hi Bas,
	Really really appreciated your help. I am nearly there.

	I have modified your geturl to a cheaper version for easy
	debugging, it looks like this now:

	GlobalSub <<EndOfSub
	sub geturl {
	  my($url) = @_;
	  require LWP::Simple;
	  my $content = get($url);
	  print $content if $Global::DEBUG;
	  return $content
	}
	EndOfSub

	
	Then as suggested by you, I have the following in my
	checkout.html(checkout_profile):

[if config CreditCardAuto]
[set name=paymentok interpolate=1][perl arge="sub" interpolate=1]
geturl("http://shaoz.dhs.org/~shao/cgi-bin/minivend.cgi?&card_number=[httpencode
interpolate=1][value mv_credit_card_number][/httpencode]&expiry_date=[httpencode
interpolate=1][value mv_credit_card_exp_month][/httpencode]&amount=[total-cost noformat=1]")[/perl][/set]

[if type=scratch term=paymentok op=ne compare=1]
&return 0 nopayment
[/if]
[/if]



	At the moment, I don't think the geturl perl function is get
	called. How can I turn on the debug to find out what is going
	on.

	And in additon, I would like to print out the transaction
	details if it is failed, how can I use the scratch variable
	paymentok to do that?

	Thanks again for your valueable help in the past.

Shao.

-- 
____________________________________________________________________________
Shao Zhang - Running Debian 2.1  ___ _               _____
Department of Communications    / __| |_  __ _ ___  |_  / |_  __ _ _ _  __ _ 
University of New South Wales   \__ \ ' \/ _` / _ \  / /| ' \/ _` | ' \/ _` |
Sydney, Australia               |___/_||_\__,_\___/ /___|_||_\__,_|_||_\__, |
Email: shao@cia.com.au                                                  |___/ 
_____________________________________________________________________________