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

fix bug Var SumCoinAmount = CoinAmount + Seeker.IntVendingCredit

Browse source
This commit is contained in:
miggaze 2022-03-07 13:13:41 +07:00
parent 44e33545ca
commit ef4bab5a26
2 changed files with 26 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

1
xml/page_payment_cash.xml
View file

@ -198,6 +198,7 @@
Var RemainAmount = RemainAmount - Seeker.IntVendingCampaign Var RemainAmount = RemainAmount - Seeker.IntVendingCampaign
Var RemainAmount = RemainAmount - Seeker.IntVendingCredit Var RemainAmount = RemainAmount - Seeker.IntVendingCredit
Var SumCoinAmount = CoinAmount + Seeker.IntVendingCampaign Var SumCoinAmount = CoinAmount + Seeker.IntVendingCampaign
Var SumCoinAmount = CoinAmount + Seeker.IntVendingCredit
If SumCoinAmount >= PayAmount Then If SumCoinAmount >= PayAmount Then
SAVELOG "CoinInOk First" SAVELOG "CoinInOk First"

38
xml/page_payment_credit.xml
View file

@ -156,7 +156,8 @@
Refresh Refresh
StrLen TelephoneNumber TelNumLen StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable" ;Var Tel_Confirm_State = "Enable"
Function 2
EndIf EndIf
Var ShowErrorText = "Invisible" Var ShowErrorText = "Invisible"
@ -197,7 +198,8 @@
Refresh Refresh
StrLen TelephoneNumber TelNumLen StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable" ;Var Tel_Confirm_State = "Enable"
Function 2
EndIf EndIf
Var ShowErrorText = "Invisible" Var ShowErrorText = "Invisible"
@ -238,7 +240,8 @@
Refresh Refresh
StrLen TelephoneNumber TelNumLen StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable" ;Var Tel_Confirm_State = "Enable"
Function 2
EndIf EndIf
Var ShowErrorText = "Invisible" Var ShowErrorText = "Invisible"
@ -279,7 +282,8 @@
Refresh Refresh
StrLen TelephoneNumber TelNumLen StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable" ;Var Tel_Confirm_State = "Enable"
Function 2
EndIf EndIf
Var ShowErrorText = "Invisible" Var ShowErrorText = "Invisible"
@ -320,7 +324,8 @@
Refresh Refresh
StrLen TelephoneNumber TelNumLen StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable" ;Var Tel_Confirm_State = "Enable"
Function 2
EndIf EndIf
Var ShowErrorText = "Invisible" Var ShowErrorText = "Invisible"
@ -361,7 +366,8 @@
Refresh Refresh
StrLen TelephoneNumber TelNumLen StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable" ;Var Tel_Confirm_State = "Enable"
Function 2
EndIf EndIf
Var ShowErrorText = "Invisible" Var ShowErrorText = "Invisible"
@ -402,7 +408,8 @@
Refresh Refresh
StrLen TelephoneNumber TelNumLen StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable" ;Var Tel_Confirm_State = "Enable"
Function 2
EndIf EndIf
Var ShowErrorText = "Invisible" Var ShowErrorText = "Invisible"
@ -443,7 +450,8 @@
Refresh Refresh
StrLen TelephoneNumber TelNumLen StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable" ;Var Tel_Confirm_State = "Enable"
Function 2
EndIf EndIf
Var ShowErrorText = "Invisible" Var ShowErrorText = "Invisible"
@ -484,7 +492,8 @@
Refresh Refresh
StrLen TelephoneNumber TelNumLen StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable" ;Var Tel_Confirm_State = "Enable"
Function 2
EndIf EndIf
Var ShowErrorText = "Invisible" Var ShowErrorText = "Invisible"
@ -522,7 +531,8 @@
Trim TelephoneNumber 10 Trim TelephoneNumber 10
StrLen TelephoneNumber TelNumLen StrLen TelephoneNumber TelNumLen
If TelNumLen >= 10 Then If TelNumLen >= 10 Then
Var Tel_Confirm_State = "Enable" ;Var Tel_Confirm_State = "Enable"
Function 2
EndIf EndIf
Var ShowTextNumber = "Invisible" Var ShowTextNumber = "Invisible"
@ -577,7 +587,7 @@
<Button> <Button>
<X> 218 </X> <X> 397 </X>
<Y> 1607 </Y> <Y> 1607 </Y>
<Filename> Var( DirImage + "/bn_cancel2.png" )</Filename> <Filename> Var( DirImage + "/bn_cancel2.png" )</Filename>
@ -693,8 +703,10 @@
Open "/media/bt/xml/security_alarm.xml" Open "/media/bt/xml/security_alarm.xml"
</EventSecurity> </EventSecurity>
<Function2>
Var GetAccFlag = 1
GETACCEXT TelephoneNumber 19
</Function2>
</Popup> </Popup>