[ic] UPSE Online, special handling charge, adder

Steve Graham icdev at mrlock.com
Thu Nov 20 17:14:59 UTC 2008


>
> # A perly true value in 'products.oversized' field adds UPS fee.
> AutoModifier oversized
>
> Variable UPS_OVERSIZED_FEE 25.00
>
> Sub custom_shipping <<EOS
> sub {
>    my ($final, $mode, $opt, $o) = @_;
>
>    $final += $Variable->{UPS_OVERSIZED_FEE}
>        if grep {$_->{oversized}} @$Items;
>
>    return $final;
> }
> EOS
>
> SpecialSub shipping_callout custom_shipping
>

I put this at the bottom of catalog.cfg, and just tried adding a .01 value 
to shipping for testing purposes -restarted catalog, and does not change the 
shipping rate, and ideas? Must be missing something simple. I checked the 
session, and oversize_box is listed in the session, although not needed in 
this simple test. IC 5.4 catalog.

## test for oversized box required flag
## products database field oversize_box  0/1

AutoModifier oversize_box

Variable UPS_OVERSIZED_FEE 5.00

SpecialSub shipping_callout custom_shipping

Sub custom_shipping <<EOS
sub {
    my ($final, $mode, $opt, $o) = @_;

    $final +=0.01;
## $Variable->{UPS_OVERSIZED_FEE}
##        if grep {$_->{oversize_box}} @$Items;

    return $final;
}
EOS


Steve
 




More information about the interchange-users mailing list