DEBUGVAR "Section: chg_price_event"

; init-vars
Var enableDiscount50 = "false"





; check-profiles
STRCONTAIN "Discount50" XMLProfile enableDiscount50


; act-by-prof
If enableDiscount50 = "true" Then

    DEBUGVAR "pre-discount50"
    DEBUGVAR toppingID2price1
	DEBUGVAR toppingID2price2
	DEBUGVAR toppingID2price3
	DEBUGVAR toppingID3price2
	DEBUGVAR toppingID6price2

    Var toppingID2price1 = toppingID2price1 / 2
	Var toppingID2price2 = toppingID2price2 / 2
	Var toppingID2price3 = toppingID2price3 / 2

	Var toppingID3price2 = toppingID3price2 / 2

	Var toppingID6price2 = toppingID6price2 / 2

	DEBUGVAR "after-discount50"
    DEBUGVAR toppingID2price1
	DEBUGVAR toppingID2price2
	DEBUGVAR toppingID2price3
	DEBUGVAR toppingID3price2
	DEBUGVAR toppingID6price2

EndIf

DEBUGVAR "Section: chg_price_event end!"