Re: [mv] FATAL Error ....

[jojo@buchonline.net]

On 17 Dec, AGRE Enterprises Limited wrote:
> ******    message to minivend-users from AGRE Enterprises Limited <agree@godzone.net.nz>     ******
> 
> So much for my dissappearing prices - :-( At sometime over the last few
> days, I must have commented out the CommonAdjust line in catalog.cfg,
> so that one is fixed.
> 
> I now have my discount total appearing in basket.html, checkout.html
> and receipt.html but when I add the same code to report, I get
> 
> FATAL error
> glob trapped by operation mask at (eval 77) line 1.
> 
> The code is
> [column width=59 align=right]NEW RELEASE DISCOUNT[/column]
> [column width=10 align=right gutter=0][currency][calc][subtotal noformat=1] - $\MySubTotal[/calc][/currency][/column]

I am not sure! Maybe the part " - $\MySubTotal" is not right! Maybe this
should be as " - \$MySubTotal"?

Try this....(see down...)
 
> further up the file I have the following
> [calc]
>    $MySubTotal = 0;
>    [item-list]
>       $NewReleaseCD += [item-quantity]
>         if ( "[item-code]" =~ /^VMD(9310|9282|9305|9316|9300|93019304|9728)$/ )\;
>       $NewReleaseTape += [item-quantity]
>          if ( "[item-code]" =~ /^VMC(9310|9282|9305|9316|9300|93019304|9728)$/ \);
>       $MySubTotal += [item-price noformat=1] * [item-quantity];
>    [/item-list]

[perl arg=scratch]
$Safe{'scratch'}{'mysubtotal'} = $MySubTotal; 
[/perl]

>    return( '' );
> [/calc]
> [discount ENTIRE_ORDER]
>    my( $d ) = 0;
>    $d += 10.00 if ( $NewReleaseCD > 3 );
>    $d +=  5.00 if ( $NewReleaseTape > 3 );
>    return( $s - $d );
> [/discount]
> 


and try this

[column width=10 align=right gutter=0][currency][calc][subtotal noformat=1] - [srcatch mysubtotal][/calc][/currency][/column]


Regards,

Joachim

-- 
Hans-Joachim Leidinger
buch online                 jojo@buchonline.net
Munscheidstr. 14            FAX: +49 209 1971449
45886 Gelsenkirchen         FAX: 0209 1671449