[ic] $Tag->discount problem

Jeff jeff at badtz-maru.com
Thu Feb 19 13:59:01 EST 2004

On Thu, Feb 19, 2004 at 06:38:15PM +0000, Andy Mayer wrote:

> The following perl code is in my checkout page, just before listing the
> basket items. 
> I am wanting to apply the following discounts: Orders of ?20.00 or more:
> 5% discount,  ?50.00 or more: 10% discount,  ?100.00 or more: 15%
> discount.

	In ITL:

	[discount ENTIRE_ORDER][/discount]
	[set discountamt][/set]
	[assign clear=1]
	[tmp crap][subtotal noformat=1][/tmp]
	[if scratch crap >= 20]
	[and scratch crap < 100]
		[seti discountamt][scratch crap] * 0.05[/seti]
		[discount ENTIRE_ORDER]$s - $Scratch->{discountamt}[/discount]

	You can display discountamt somewhere so the user can see the 


More information about the interchange-users mailing list