pakin/taobin_project
1
0
Fork 0
Code Issues Pull requests Projects 1 Releases 1 Packages Wiki Activity Actions

order conti order

Browse source
This commit is contained in:
miggaze 2021-12-17 12:48:38 +07:00
parent 256eb9e6d0
commit b5e9418ba9
47 changed files with 4889 additions and 3864 deletions
Download patch file Download diff file Expand all files Collapse all files

48
xml/page_drinkfail2Multi.xml
View file

@ -118,16 +118,16 @@
If cart_next = 2 Then
If TNumberTaobinCredit = "" Then
If Seeker.TNumberTaobinCredit = "" Then
Var TelephoneNumber = "0899999999"
Var PayO2 = ""
If TNumberTaobinMember = "" Then
If Seeker.TNumberTaobinMember = "" Then
Else
Var TelephoneNumber = TNumberTaobinMember
Var TelephoneNumber = Seeker.TNumberTaobinMember
EndIf
Else
Var TelephoneNumber = TNumberTaobinCredit
Var PayO2 = CoffeePinNumber
Var TelephoneNumber = Seeker.TNumberTaobinCredit
Var PayO2 = Seeker.CoffeePinNumber
EndIf
Var PayDetail="1/F:0/0/"
@ -142,9 +142,9 @@
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
If PayWithQR = 0 Then
If CodeChannel = 0 Then
If StoreCreditFlag = 1 Then
If Seeker.PayWithQR = 0 Then
If Seeker.CodeChannel = 0 Then
If Seeker.StoreCreditFlag = 1 Then
Else
Var ChangeAmountSum = ChangeAmountSum + ServiceAmount2
@ -160,16 +160,16 @@
EndIf
If cart_next = 3 Then
If TNumberTaobinCredit = "" Then
If Seeker.TNumberTaobinCredit = "" Then
Var TelephoneNumber = "0899999999"
Var PayO2 = ""
If TNumberTaobinMember = "" Then
If Seeker.TNumberTaobinMember = "" Then
Else
Var TelephoneNumber = TNumberTaobinMember
Var TelephoneNumber = Seeker.TNumberTaobinMember
EndIf
Else
Var TelephoneNumber = TNumberTaobinCredit
Var PayO2 = CoffeePinNumber
Var TelephoneNumber = Seeker.TNumberTaobinCredit
Var PayO2 = Seeker.CoffeePinNumber
EndIf
Var PayDetail="1/F:0/0/"
@ -184,9 +184,9 @@
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
If PayWithQR = 0 Then
If CodeChannel = 0 Then
If StoreCreditFlag = 1 Then
If Seeker.PayWithQR = 0 Then
If Seeker.CodeChannel = 0 Then
If Seeker.StoreCreditFlag = 1 Then
Else
Var ChangeAmountSum = ChangeAmountSum + ServiceAmount2
@ -230,22 +230,22 @@
;Pay Multi
If sendPayMultiFlag = 0 Then
If PayWithQR = 0 Then
If Seeker.PayWithQR = 0 Then
Var ServiceType = "coffee-multi"
Else
Var ServiceType = "coffee-multiQR"
EndIf
If TNumberTaobinCredit = "" Then
If Seeker.TNumberTaobinCredit = "" Then
Var TelephoneNumber = "0899999999"
Var PayO2 = ""
If TNumberTaobinMember = "" Then
If Seeker.TNumberTaobinMember = "" Then
Else
Var TelephoneNumber = TNumberTaobinMember
Var TelephoneNumber = Seeker.TNumberTaobinMember
EndIf
Else
Var TelephoneNumber = TNumberTaobinCredit
Var PayO2 = CoffeePinNumber
Var TelephoneNumber = Seeker.TNumberTaobinCredit
Var PayO2 = Seeker.CoffeePinNumber
EndIf
Var ServiceCredit = "00-00-00-0000"
@ -256,7 +256,7 @@
SAVELOG PayO2
Var VendingCampaign = IntVendingCampaign
Var VendingCampaign = Seeker.IntVendingCampaign
Var CreditReference = CreditReferenceTmp
Var PayType = ""
@ -278,7 +278,7 @@
Else
If sendPayMultiFlag = 1 Then
Var TNumberTaobinMember = ""
Var Seeker.TNumberTaobinMember = ""
;Open "ROOT/taobin_project/xml/page_back_to_main.xml"
Open "ROOT/taobin_project/xml/page_drinkfail2.xml"
EndIf