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

fix Can use credit from current for next order

Browse source
This commit is contained in:
miggaze 2022-05-24 14:07:55 +07:00
parent 6dc2c89b7a
commit b45738d20e
13 changed files with 360 additions and 75 deletions
Download patch file Download diff file Expand all files Collapse all files

30
xml/page_payment_storeCredit.xml
View file

@ -89,6 +89,27 @@
INT CoffeeCredit
Var Seeker.CoffeePinNumber = Ext1c
If Seeker = "next" Then
Var Curr = "curr"
DEBUGVAR CoffeeCredit
DEBUGVAR Curr.CurrCreditAmount
If TelephoneNumber = Curr.CurrCreditTelNum Then
Var CoffeeCredit = CoffeeCredit + Curr.CurrCreditAmount
If Curr.CurrCreditUse > 0 Then
Var CoffeeCredit = CoffeeCredit - Curr.CurrCreditUse
If CoffeeCredit < 0 Then
Var CoffeeCredit = 0
EndIf
EndIf
EndIf
EndIf
Var Seeker.TNumberTaobinCredit = TelephoneNumber
If Seeker.pageStoreCredit0 = 1 Then
@ -115,6 +136,13 @@
CoinVending BILLSTACKALL
Var CoffeeCreditKeep = RemainAmountKeep + CoffeeCredit
;If Seeker = "next" Then
; Var Curr = "curr"
; Var CoffeeCreditKeep = CoffeeCreditKeep - Curr.CurrCreditUse
;EndIf
Open "ROOT/taobin_project/xml/page_payment_storeCredit3.xml"
EndIf
@ -126,6 +154,8 @@
Else
If Ext1a = "new customer" Then
Var CoffeeCreditKeep = 0
Var CoffeeCredit = 0
Var Seeker.TNumberTaobinCredit = TelephoneNumber
Open "ROOT/taobin_project/xml/page_payment_storeCredit2.xml"