Miva - Clear Stale Charges

miva-clear-stale-charges.xml

<mvt:if expr="l.settings:page:code IN 'BASK,OCST,OSEL'">
	<mvt:comment>
		Delete the charges
	</mvt:comment>
	<mvt:do file="g.Module_Library_DB" name="l.success" value="BasketCharge_Delete_All_Type( g.Basket:basket_id, 'SHIPPING' )" />
	<mvt:do file="g.Module_Library_DB" name="l.success" value="BasketCharge_Delete_All_Type( g.Basket:basket_id, 'TAX' )" />

	<mvt:comment>
		Reload the proper data
	</mvt:comment>
	<mvt:do file="g.Module_Library_DB" name="l.success" value="BasketChargeList_Load_Basket( g.Basket:basket_id, l.settings:basket:charges )" />
	<mvt:do file="g.Module_Library_DB" name="l.settings:basket:total" value="Basket_Total( g.Basket:basket_id )" />
	<mvt:do file="g.Module_Store_Module_Currency" name="l.settings:basket:formatted_total" value="CurrencyModule_AddFormatting( g.Store:currncy_mod, l.settings:basket:total )" />

	<mvt:comment>
		Also update the global_minibasket data
	</mvt:comment>	
	<mvt:assign name="l.settings:global_minibasket:charges" value="l.settings:basket:charges" />
	<mvt:assign name="l.settings:global_minibasket:total" value="l.settings:basket:total" />
	<mvt:assign name="l.settings:global_minibasket:formatted_total" value="l.settings:basket:formatted_total" />
</mvt:if>