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

fix RI3 issue

Browse source
This commit is contained in:
Kenta420 2024-01-15 17:32:57 +07:00
parent 67b3f18edb
commit 2e5910d60e
3 changed files with 7 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

1
xml/page_payment.xml
View file

@ -139,6 +139,7 @@
Var Seeker.VendingCampaign = 0 Var Seeker.VendingCampaign = 0
Var Seeker.VendingTSID = "" Var Seeker.VendingTSID = ""
Var Seeker.CreditNotEnoughRefID = ""
Var PayType = "" Var PayType = ""
Var CART_INDEX = 0 Var CART_INDEX = 0

1
xml/page_payment_credit3.xml
View file

@ -64,7 +64,6 @@
Var ShowLoadingText = "Invisible" Var ShowLoadingText = "Invisible"
Var ShowErrorText = "Invisible" Var ShowErrorText = "Invisible"
Var Seeker.CreditNotEnoughRefID = ""
If show_eng = "true" Then If show_eng = "true" Then

9
xml/page_thankyou.xml
View file

@ -361,15 +361,18 @@
DEBUGVAR Seeker.CurrCreditAmount DEBUGVAR Seeker.CurrCreditAmount
If Seeker.CreditNotEnoughRefID = "" Then If Seeker.CreditNotEnoughRefID = "" Then
Var CurrAmount = Seeker.CurrCreditAmount
Var CurrTelePhoneNum = Seeker.CurrCreditTelNum
Var CurrPinNum = Seeker.CurrCreditPinNum
Var RefID = ""
AddData 41 CurrTelePhoneNum CurrAmount CurrPinNum RefID
Else Else
Var ServiceAmountSupCampain = Seeker.ServiceAmount2 - Seeker.IntVendingCampaign Var ServiceAmountSupCampain = Seeker.ServiceAmount2 - Seeker.IntVendingCampaign
If CoinAmount >= ServiceAmountSupCampain Then If CoinAmount >= ServiceAmountSupCampain Then
Var CurrAmount = Seeker.CurrCreditAmount Var CurrAmount = Seeker.CurrCreditAmount
Var RefID = "0/" + ServiceAmountSupCampain Var RefID = "0/" + Seeker.CreditNotEnoughRefID
Var RefID = RefID + Seeker.CreditNotEnoughRefID
Var Seeker.CreditReferenceTmp = RefID Var Seeker.CreditReferenceTmp = RefID
Else Else
Var CurrAmount = CoinAmount Var CurrAmount = CoinAmount