..
This commit is contained in:
miggaze
parent
691a292501
commit
271d219278
19 changed files with 982 additions and 391 deletions
|
|
@ -23,10 +23,20 @@
|
|||
;Var DirImage = "ROOT/taobin_project/image/collect_point1"
|
||||
EndIf
|
||||
|
||||
|
||||
Var waitAckPay = 0
|
||||
Var VendingTSIDTmp = ""
|
||||
If PayWithQR = 1 Then
|
||||
Var VendingTSIDTmp = VendingTSID
|
||||
EndIf
|
||||
|
||||
|
||||
</EventOpen>
|
||||
|
||||
|
||||
<EventActionOk>
|
||||
|
||||
|
||||
If ActionOKCase = 1 Then
|
||||
If CodeChannel = 1 Then
|
||||
Var SessionID2 = SelectSlot + ":"
|
||||
|
|
@ -64,6 +74,7 @@
|
|||
Var ActionOKCase = 2
|
||||
|
||||
Else
|
||||
|
||||
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
|
||||
EndIf
|
||||
|
||||
|
|
@ -74,6 +85,12 @@
|
|||
EndIf
|
||||
|
||||
EndIf
|
||||
|
||||
If waitAckPay = 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_drinkok.xml"
|
||||
EndIf
|
||||
|
||||
|
||||
</EventActionOk>
|
||||
|
||||
<EventActionError>
|
||||
|
|
@ -158,31 +175,56 @@
|
|||
Var ChangeTimeout = ChangeTimeout + 1
|
||||
EndIf
|
||||
|
||||
If waitAckPay = 1 Then
|
||||
If Timeout > 60 Then
|
||||
Var VendingTSID = ""
|
||||
Open "ROOT/taobin_project/xml/page_drinkok.xml"
|
||||
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
|
||||
If ChangeOK = 2 Then
|
||||
If ActionOKCase = 0 Then
|
||||
Var TelephoneNumber = "0899999999"
|
||||
|
||||
If TNumberTaobinCredit = "" Then
|
||||
Var TelephoneNumber = "0899999999"
|
||||
Var PayO2 = ""
|
||||
Else
|
||||
Var TelephoneNumber = TNumberTaobinCredit
|
||||
Var PayO2 = CoffeePinNumber
|
||||
EndIf
|
||||
|
||||
|
||||
Var VendingDiscount = 0
|
||||
Var VendingCampaign = 0
|
||||
Var ServiceType = "credit"
|
||||
Var SessionID2 = SelectDrink
|
||||
Var ServiceCredit = "coffee"
|
||||
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
|
||||
;Open "ROOT/xml/page_closeMaintenance.xml"
|
||||
|
||||
Var ActionOKCase = 1
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
If ChangeTimeout > 30 Then
|
||||
If ActionOKCase = 0 Then
|
||||
If TNumberTaobinCredit = "" Then
|
||||
Var TelephoneNumber = "0899999999"
|
||||
Var PayO2 = ""
|
||||
Else
|
||||
Var TelephoneNumber = TNumberTaobinCredit
|
||||
Var PayO2 = CoffeePinNumber
|
||||
EndIf
|
||||
|
||||
Var VendingDiscount = 0
|
||||
Var VendingCampaign = 0
|
||||
Var TelephoneNumber = "0899999999"
|
||||
;Var TelephoneNumber = "0899999999"
|
||||
Var ServiceType = "credit"
|
||||
Var SessionID2 = SelectDrink
|
||||
Var ServiceCredit = "coffee"
|
||||
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
|
||||
;Open "ROOT/xml/menu_closeMaintenance.xml"
|
||||
|
||||
Var ActionOKCase = 1
|
||||
EndIf
|
||||
EndIf
|
||||
|
|
@ -229,35 +271,30 @@
|
|||
|
||||
|
||||
If MachineState_Result = 1 Then
|
||||
Var Timeout = 0
|
||||
Var ProcessText = ""
|
||||
|
||||
Var TelephoneNumber = "0899999999"
|
||||
Var ServiceType = "coffee"
|
||||
Var ServiceCredit = SelectDrink
|
||||
Var SuggestID = ""
|
||||
If waitAckPay = 0 Then
|
||||
|
||||
If PayWithQR = 0 Then
|
||||
If CodeChannel = 1 Then
|
||||
Var SessionID2 = SessionID2 + "/"
|
||||
Var SessionID2 = SessionID2 + CodeNumber
|
||||
Var SessionID2 = SessionID2 + "/"
|
||||
Var SessionID2 = SessionID2 + VendingCode
|
||||
Var SessionID2 = SessionID2 + "/"
|
||||
Var SessionID2 = SessionID2 + SelectDrink
|
||||
Var SessionID2 = SessionID2 + "/"
|
||||
Var SessionID2 = SessionID2 + BoxID
|
||||
Var SessionID2 = SessionID2 + "/"
|
||||
Var SessionID2 = SessionID2 + "S"
|
||||
Var SessionID2 = SessionID2 + "/"
|
||||
Var SessionID2 = SessionID2 + CodeNumber
|
||||
Var SessionID2 = SessionID2 + "/"
|
||||
Var waitAckPay = 1
|
||||
Var Timeout = 0
|
||||
Var ProcessText = ""
|
||||
|
||||
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
|
||||
If TNumberTaobinCredit = "" Then
|
||||
Var TelephoneNumber = "0899999999"
|
||||
Var PayO2 = ""
|
||||
Else
|
||||
If CodeChannel = 2 Then
|
||||
Var TelephoneNumber = TNumberTaobinCredit
|
||||
Var PayO2 = CoffeePinNumber
|
||||
EndIf
|
||||
|
||||
|
||||
Var ServiceType = "coffee"
|
||||
Var ServiceCredit = SelectDrink
|
||||
Var SuggestID = ""
|
||||
|
||||
If PayWithQR = 0 Then
|
||||
If CodeChannel = 1 Then
|
||||
Var SessionID2 = SessionID2 + "/"
|
||||
Var SessionID2 = SessionID2 + ""
|
||||
Var SessionID2 = SessionID2 + CodeNumber
|
||||
Var SessionID2 = SessionID2 + "/"
|
||||
Var SessionID2 = SessionID2 + VendingCode
|
||||
Var SessionID2 = SessionID2 + "/"
|
||||
|
|
@ -272,27 +309,67 @@
|
|||
|
||||
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
|
||||
Else
|
||||
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
|
||||
If CodeChannel = 2 Then
|
||||
Var SessionID2 = SessionID2 + "/"
|
||||
Var SessionID2 = SessionID2 + ""
|
||||
Var SessionID2 = SessionID2 + "/"
|
||||
Var SessionID2 = SessionID2 + VendingCode
|
||||
Var SessionID2 = SessionID2 + "/"
|
||||
Var SessionID2 = SessionID2 + SelectDrink
|
||||
Var SessionID2 = SessionID2 + "/"
|
||||
Var SessionID2 = SessionID2 + BoxID
|
||||
Var SessionID2 = SessionID2 + "/"
|
||||
Var SessionID2 = SessionID2 + "S"
|
||||
Var SessionID2 = SessionID2 + "/"
|
||||
Var SessionID2 = SessionID2 + CodeNumber
|
||||
Var SessionID2 = SessionID2 + "/"
|
||||
|
||||
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
|
||||
Else
|
||||
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
|
||||
EndIf
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
|
||||
Else
|
||||
If ChangeFlag2 = 1 Then
|
||||
Var TelephoneNumber = "0899999999"
|
||||
Var VendingDiscount = 0
|
||||
Var VendingCampaign = 0
|
||||
Var ServiceType = "credit"
|
||||
Var SessionID2 = SelectDrink
|
||||
Var ServiceCredit = "coffee"
|
||||
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
|
||||
Else
|
||||
If ChangeFlag2 = 1 Then
|
||||
Var TelephoneNumber = "0899999999"
|
||||
Var VendingDiscount = 0
|
||||
Var VendingCampaign = 0
|
||||
Var ServiceType = "credit"
|
||||
Var SessionID2 = SelectDrink
|
||||
Var ServiceCredit = "coffee"
|
||||
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
|
||||
Else
|
||||
|
||||
If StoreCreditFlag = 1 Then
|
||||
|
||||
|
||||
Var VendingDiscount = 0
|
||||
Var VendingCampaign = 0
|
||||
Var ServiceType = "credit"
|
||||
Var SessionID2 = SelectDrink
|
||||
Var ServiceCredit = "coffee"
|
||||
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
|
||||
|
||||
|
||||
Else
|
||||
|
||||
;no wait ack pay
|
||||
Var waitAckPay = 0
|
||||
|
||||
EndIf
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
|
||||
|
||||
Var ServiceSuccess = "yes"
|
||||
Open "ROOT/taobin_project/xml/page_drinkok.xml"
|
||||
If waitAckPay = 0 Then
|
||||
Open "ROOT/taobin_project/xml/page_drinkok.xml"
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
|
||||
|
|
@ -306,7 +383,12 @@
|
|||
If CodeChannel = 0 Then
|
||||
If ChangeFlag = 0 Then
|
||||
Var ChangeFlag = 1
|
||||
Change ServiceAmount2
|
||||
|
||||
If StoreCreditFlag = 1 Then
|
||||
Var ChangeOK = 2
|
||||
Else
|
||||
Change ServiceAmount2
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
Else
|
||||
|
|
@ -315,7 +397,12 @@
|
|||
If ChangeFlag = 0 Then
|
||||
Var ChangeFlag = 1
|
||||
Var ServiceAmount2 = ServiceAmount2 - IntVendingCampaign
|
||||
Change ServiceAmount2
|
||||
|
||||
If StoreCreditFlag = 1 Then
|
||||
Var ChangeOK = 2
|
||||
Else
|
||||
Change ServiceAmount2
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
Else
|
||||
|
|
@ -342,7 +429,11 @@
|
|||
If ChangeFlag = 0 Then
|
||||
Var ChangeFlag = 1
|
||||
Var ServiceAmount2 = CoinAmount
|
||||
Change CoinAmount
|
||||
If StoreCreditFlag = 1 Then
|
||||
Var ChangeOK = 2
|
||||
Else
|
||||
Change ServiceAmount2
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
Else
|
||||
|
|
@ -359,7 +450,11 @@
|
|||
If ChangeFlag = 0 Then
|
||||
Var ChangeFlag = 1
|
||||
Var ServiceAmount2 = CoinAmount
|
||||
Change CoinAmount
|
||||
If StoreCreditFlag = 1 Then
|
||||
Var ChangeOK = 2
|
||||
Else
|
||||
Change ServiceAmount2
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
Else
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue