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

fix bug storeCreditFlag

Browse source
This commit is contained in:
pichet 2022-09-26 13:29:51 +07:00
parent 5feff39de2
commit fec97ef9c6
1 changed files with 25 additions and 18 deletions
Download patch file Download diff file Expand all files Collapse all files

43
xml/page_payment_cash.xml
View file

@ -1201,27 +1201,34 @@
CoinVending BILLREJECT CoinVending BILLREJECT
Else Else
If Seeker.StoreCreditFlag = 1 Then
Var RemainAmount = PayAmount - CoinAmount CoinVending BILLSTACKALL
Var RemainAmount = RemainAmount - Seeker.IntVendingCampaign
Var RemainAmount = RemainAmount - Seeker.IntVendingCredit
If ViewBill > RemainAmount Then
Var RemainAmountKeep = ViewBill - RemainAmount
Else Else
Var RemainAmountKeep = ViewBill
Var RemainAmount = PayAmount - CoinAmount
Var RemainAmount = RemainAmount - Seeker.IntVendingCampaign
Var RemainAmount = RemainAmount - Seeker.IntVendingCredit
If ViewBill > RemainAmount Then
Var RemainAmountKeep = ViewBill - RemainAmount
Else
Var RemainAmountKeep = ViewBill
EndIf
Var Timeout = 0
Var RemainAmountStr = "" + RemainAmount
Var showRemaining = charOfBaht + RemainAmountStr
Var alphaState3 = "Enable"
EndIf EndIf
Var Timeout = 0
Var RemainAmountStr = "" + RemainAmount
Var showRemaining = charOfBaht + RemainAmountStr
Var alphaState3 = "Enable"
EndIf EndIf