THAI: Added Pepsi x Taobin banner & wrap condition event cashless

This commit is contained in:
Kenta420 2025-03-25 15:41:27 +07:00
parent 3156f29f5f
commit 87a212b052
40 changed files with 53269 additions and 18525 deletions

View file

@ -1890,45 +1890,49 @@
Var PayInfoCFlag = 1
EndIf
If credit_card_enable = "Enable" Then
If ReqPayInfoFromCashOther = 2 Then
DEBUGVAR VendingCashless
If VendingCashless = "OK" Then
DEBUGVAR CashlessCode
DEBUGVAR VendingCashless
If VendingCashless = "OK" Then
DEBUGVAR CashlessCode
If KBankCashlessMachine = 1 Then
If KBankCashlessMachine = 1 Then
Var Seeker.CashlessVendingTrackNumber = VendingTrackNumber
Var Seeker.CashlessVendingTrackNumber = VendingTrackNumber
DEBUGVAR VendingTrackNumber
DEBUGVAR Var Seeker.CashlessVendingTrackNumber
DEBUGVAR VendingTrackNumber
DEBUGVAR Var Seeker.CashlessVendingTrackNumber
EndIf
Var Timeout = 0
Var QRErrorState = "Invisible"
Var LOADING_STATE = "Invisible"
If ViewBill > 0 Then
CoinVending BILLREJECT
EndIf
VendingQR OFF
CoinVending OFF
Refresh
If Seeker = "curr" Then
If New_Payment = 1 Then
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
EndIf
MakeDrinkV1 SelectDrink SelectSugarID
Var Timeout = 0
Var QRErrorState = "Invisible"
Var LOADING_STATE = "Invisible"
If ViewBill > 0 Then
CoinVending BILLREJECT
EndIf
VendingQR OFF
CoinVending OFF
Refresh
If Seeker = "curr" Then
If New_Payment = 1 Then
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
EndIf
MakeDrinkV1 SelectDrink SelectSugarID
EndIf
Var Seeker.CreditCard = 1
Var Seeker.CreditCardRef = CreditCardRef
Open "ROOT/taobin_project/xml/page_thankyou.xml"
EndIf
EndIf
Var Seeker.CreditCard = 1
Var Seeker.CreditCardRef = CreditCardRef
EndIf
Open "ROOT/taobin_project/xml/page_thankyou.xml"
EndIf
</EventActionOk>
@ -1952,25 +1956,29 @@
EndIf
If VendingCashless = "ERROR" Then
If CoinInOK = 1 Then
If credit_card_enable = "Enable" Then
If ReqPayInfoFromCashOther = 2 Then
If VendingCashless = "ERROR" Then
If CoinInOK = 1 Then
Else
If KBankCashlessMachine = 1 Then
; popup will close after 30 second
Var Timeout = 90
Var cancelButtonQRPopupState = "Enable"
Else
Var Timeout = 0
EndIf
EndIf
;Var QRErrorFlag = 1
If alphaState = "Enable" Then
Var QRErrorState = "Enable"
Var LOADING_STATE = "Invisible"
EndIf
Else
If KBankCashlessMachine = 1 Then
; popup will close after 30 second
Var Timeout = 90
Var cancelButtonQRPopupState = "Enable"
Else
Var Timeout = 0
EndIf
EndIf
;Var QRErrorFlag = 1
If alphaState = "Enable" Then
Var QRErrorState = "Enable"
Var LOADING_STATE = "Invisible"
EndIf
EndIf