Re: [mv] $0.00 Shipping Charges Problem

[hutch@cix.compulink.co.uk (Robert Hutchinson)]

In-Reply-To: <001001bf12d2$fe70ca20$0201a8c0@compaq>
In article <001001bf12d2$fe70ca20$0201a8c0@compaq>, 
princecb@inetexpertsinc.com (Cameron B. Prince) wrote:

> ******    message to minivend-users from "Cameron B. Prince" 
> <princecb@inetexpertsinc.com    ******
> 
> Hello everyone,
> 
> I have gotten a few orders with $0.00 shipping charges due to customers
> incorrectly entering their zip code. I am trying to use this code to
> eliminate the problem:
> 
> [if value shipping=$0.00]
> [then]
> 
> ERROR - SHIPPING CALCULATION PROBLEM
> 
> Please go back and check your state and postal code and resubmit your 
> order
> 
> [/then]
> [else]
> 
> Normal final checkout page with "Submit Order" button
> 
> [/else]
> [/if]
> 
> 
> For some reason, this code isn't working. The normal checkout page is 
> shown
> no matter if the shipping is $0.00 or not. Could someone please tell me 
> if I
> am using the proper syntax for the tags? Could this also be caused by 
> the
> inability to calculate shipping? I am getting an error in error.log, but
> regardless of that, the value is still $0.00. I can't understand why the
> string is not being matched so the error would be shown to the customer
> instead of the normal page.
> 
> Thanks for any help you can provide,
> 
> Cameron B. Prince
> 
> Internet Experts Inc.
> Phone:        (256) 227-1238
> FAX:  (256) 227-1438
> 
> 
> -
> To unsubscribe from the list, DO NOT REPLY to this message.  Instead, 
> send
> email with 'UNSUBSCRIBE minivend-users' in the body to 
> Majordomo@minivend.com.
> Archive of past messages: http://www.minivend.com/minivend/minivend-list
> 
> 
here is my two bits worth
in checkout.html
<SELECT MV=loop
        MV.ARG="[data
        table=country
        key='[default country UK]'
        sf=selector
        col=shipmodes
        ]"
        MV.OPTION="mv_shipmode"
        onChange="this.form.submit()"
        NAME="mv_shipmode">
[perl interpolate=1]
        $myvar='[shipping [loop-code]]';
        if ($myvar !~ /\b0\b|\b0.00\b|(.*\D)(0.00)|(0.00)(.*\D)/){
                return "<OPTION VALUE='[loop-code]'> [shipping-desc 
[loop-code]] [shipping [loop-code]] ";
        }
[/perl]
</SELECT>


Bye :-)=
hutch@cix.co.uk