change discount to init display at catalog

This commit is contained in:
Pakin 2023-11-01 10:39:31 +07:00
parent b0fb1c1f96
commit cdcbb550b9
2 changed files with 21 additions and 18 deletions

View file

@ -946,7 +946,10 @@
EndIf
If Discount50 = "true" Then
Var HalfPrice = "true"
;Var HalfPrice = "true"
Var InvokeDiscountCMD = "true"
DEBUGVAR InvokeDiscountCMD
__CMD "invoke-discount-50" "-" "-" "-"
EndIf
DEBUGVAR EnableLiveness
@ -1064,7 +1067,7 @@
DEBUGVAR NETCORE_EVENT_CNT_X
EndIf
If NETCORE_EVENT_CNT_X > 300 Then
If NETCORE_EVENT_CNT_X > 3600 Then
Var stop_now = "true"
Var stop_now_from_netcore_event = 1
Var MachineErrorDetailAll = "Netcore Lost"

View file

@ -395,15 +395,15 @@
Else
DEBUGVAR UserSelectProductCode.Price
DEBUGVAR HalfPrice
DEBUGVAR PriceDrink
;DEBUGVAR UserSelectProductCode.Price
;DEBUGVAR HalfPrice
;DEBUGVAR PriceDrink
If HalfPrice = "true" Then
;If HalfPrice = "true" Then
Var PriceDrinkTmp = UserSelectProductCode.Price
Var PriceDrink = PriceDrinkTmp
EndIf
; Var PriceDrinkTmp = UserSelectProductCode.Price
; Var PriceDrink = PriceDrinkTmp
;EndIf
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_blank.xml"
Open "ROOT/taobin_project/xml/page_payment.xml"
@ -4203,20 +4203,20 @@
__CMD "statement" 0 StatementCheckMenu "-"
If HalfPrice = "true" Then
; Discount 50
DEBUGVAR HalfPrice
__CMD "invoke-discount-50" UserSelectProductCode "-" "-"
Else
Var PriceDrink = PriceDrinkTmp
EndIf
;If HalfPrice = "true" Then
; ; Discount 50
; DEBUGVAR HalfPrice
; __CMD "invoke-discount-50" UserSelectProductCode "-" "-"
;
;Else
; Var PriceDrink = PriceDrinkTmp
;EndIf
DEBUGVAR PriceDrinkTmp
;Var Seeker.PriceDrink = PriceDrinkTmp
;Var PriceDrink = PriceDrinkTmp
Var PriceDrink = PriceDrinkTmp
DEBUGVAR PriceDrink