Update payext_setup.ev

This commit is contained in:
Kenta420 2024-10-31 17:32:44 +07:00
parent a7c6d6b33b
commit 5665af3706

View file

@ -1,8 +1,26 @@
If Seeker.PayWithQR = 0 Then
If Seeker.TNumberTaobinCredit = "" Then
Var TelephoneNumber = "0899999999"
Var PayO2 = ""
If Seeker.TNumberTaobinMember = "" Then
Else
Var TelephoneNumber = Seeker.TNumberTaobinMember
EndIf
Else
Var TelephoneNumber = Seeker.TNumberTaobinCredit
Var PayO2 = Seeker.CoffeePinNumber
EndIf
EndIf
DEBUGVAR TelephoneNumber
Var TelephoneNumberExt = TelephoneNumber
If TelephoneNumberExt = "" Then
Var TelephoneNumberExt = "0899999999"
EndIf
__CMD "SetTelNum" TelephoneNumberExt Seeker.ORDER_ID Seeker.VendingTSID
__CMD "SetTelNum" TelephoneNumberExt Seeker.ORDER_ID Seeker.VendingTSID
Var payOrderChannel = "/XML|" + Seeker.OrderChanel
__CMD "SetPayType" Seeker.ORDER_ID payOrderChannel ""