127 lines
3.8 KiB
Text
127 lines
3.8 KiB
Text
DEBUGVAR "MIGGAZE0"
|
|
If Seeker.PayWithQR = 1 Then
|
|
|
|
Var ServiceAmount2 = Seeker.ServiceAmount2
|
|
Var CreditReference = ""
|
|
Var TxReference = ""
|
|
Var VendingDiscount = 0
|
|
Var VendingCampaign = 0
|
|
Var SelectDrink = Seeker.selected_a_drink
|
|
Var SuggestID = ""
|
|
|
|
If ChangeFlag2 = 1 Then
|
|
Var TelephoneNumber = "0899999999"
|
|
Var PayO2 = ""
|
|
Var ServiceType = "credit"
|
|
Var SessionID2 = SelectDrink
|
|
Var ServiceCredit = "coffee"
|
|
Var PayDetail = ""
|
|
Var PayDetail2 = ""
|
|
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
|
|
|
|
Else
|
|
|
|
If Seeker.StoreCreditFlag = 1 Then
|
|
Var TelephoneNumber = Seeker.TNumberTaobinCredit
|
|
Var PayO2 = Seeker.CoffeePinNumber
|
|
Var ServiceType = "credit"
|
|
Var SessionID2 = SelectDrink
|
|
Var ServiceCredit = "coffee"
|
|
Var PayDetail = ""
|
|
Var PayDetail2 = ""
|
|
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
|
|
|
|
EndIf
|
|
EndIf
|
|
|
|
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/process/addpoint.ev"
|
|
|
|
If ConnectWithPOSMachine = 1 Then
|
|
Var SelectDrink = Seeker.selected_a_drink
|
|
Var ExtendData = Seeker.ExtendData
|
|
Var ServiceAmount2 = Seeker.ServiceAmount2
|
|
Var SessionID2 = SelectSlot + ":"
|
|
Var SessionID2 = SessionID2 + ExtendData
|
|
|
|
Var CreditReference = Seeker.CreditReferenceTmp
|
|
Var VendingDiscount = Seeker.VendingDiscount
|
|
Var VendingCampaign = Seeker.VendingCampaign
|
|
Var TxReference = Seeker.TxRef1
|
|
Var VendingOrderID = Seeker.ORDER_ID
|
|
Var PayType = "newpay"
|
|
|
|
Var ServiceType = "coffee-payment"
|
|
Var ServiceCredit = SelectDrink
|
|
Var SuggestID = ""
|
|
|
|
Var PayDetail = "2/S:0/0//XML|" + Seeker.OrderChanel
|
|
|
|
If GetFreeFromError = 1 Then
|
|
Var Seeker.CodeChannel = 1
|
|
Var Seeker.VendingCode = "FAU"
|
|
Var Seeker.CodeNumber = "0000000000"
|
|
Var VendingCampaign = ServiceAmount2
|
|
EndIf
|
|
|
|
Var PayDetail2 = Seeker.PayDetail2
|
|
POSPay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
|
|
EndIf
|
|
|
|
|
|
Else
|
|
|
|
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/process/addpoint.ev"
|
|
|
|
|
|
Var SelectDrink = Seeker.selected_a_drink
|
|
Var ExtendData = Seeker.ExtendData
|
|
Var ServiceAmount2 = Seeker.ServiceAmount2
|
|
Var SessionID2 = SelectSlot + ":"
|
|
Var SessionID2 = SessionID2 + ExtendData
|
|
|
|
Var CreditReference = Seeker.CreditReferenceTmp
|
|
Var VendingDiscount = Seeker.VendingDiscount
|
|
Var VendingCampaign = Seeker.VendingCampaign
|
|
Var TxReference = Seeker.TxRef1
|
|
Var VendingOrderID = Seeker.ORDER_ID
|
|
Var PayType = "newpay"
|
|
|
|
Var ServiceType = "coffee-payment"
|
|
Var ServiceCredit = SelectDrink
|
|
Var SuggestID = ""
|
|
|
|
Var PayDetail = "2/S:0/0//XML|" + Seeker.OrderChanel
|
|
|
|
If GetFreeFromError = 1 Then
|
|
Var Seeker.CodeChannel = 1
|
|
Var Seeker.VendingCode = "FAU"
|
|
Var Seeker.CodeNumber = "0000000000"
|
|
Var VendingCampaign = ServiceAmount2
|
|
EndIf
|
|
|
|
If Seeker.CodeChannel = 1 Then
|
|
Var SessionID2 = SessionID2 + "/"
|
|
Var SessionID2 = SessionID2 + ""
|
|
Var SessionID2 = SessionID2 + "/"
|
|
Var SessionID2 = SessionID2 + Seeker.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 + Seeker.CodeNumber
|
|
Var SessionID2 = SessionID2 + "/"
|
|
|
|
|
|
Var PayDetail2 = Seeker.PayDetail2
|
|
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
|
|
Else
|
|
|
|
|
|
Var PayDetail2 = Seeker.PayDetail2
|
|
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
|
|
|
|
EndIf
|
|
EndIf
|