fix RI3 issue
This commit is contained in:
parent
67b3f18edb
commit
2e5910d60e
3 changed files with 7 additions and 4 deletions
|
|
@ -361,15 +361,18 @@
|
|||
DEBUGVAR Seeker.CurrCreditAmount
|
||||
|
||||
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
|
||||
|
||||
Var ServiceAmountSupCampain = Seeker.ServiceAmount2 - Seeker.IntVendingCampaign
|
||||
|
||||
If CoinAmount >= ServiceAmountSupCampain Then
|
||||
Var CurrAmount = Seeker.CurrCreditAmount
|
||||
Var RefID = "0/" + ServiceAmountSupCampain
|
||||
Var RefID = RefID + Seeker.CreditNotEnoughRefID
|
||||
Var RefID = "0/" + Seeker.CreditNotEnoughRefID
|
||||
Var Seeker.CreditReferenceTmp = RefID
|
||||
Else
|
||||
Var CurrAmount = CoinAmount
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue