free not collect point, failed page, show QR Error

This commit is contained in:
miggaze 2021-04-02 14:57:15 +07:00
parent c2c3c540ec
commit 126d0417e3
59 changed files with 756 additions and 31 deletions

View file

@ -273,6 +273,8 @@
EndIf
If ReqPayInfoFlag = 1 Then
Var CashTextWarning = ""
Var QRErrorState = "Invisible"
Var QRCODE99 = SessionID
Var QRCODE99 = QRCODE99 + Ext1a
SAVELOG Ext1a
@ -303,6 +305,7 @@
If Timeout >= 120 Then
Var alphaState = "Invisible"
Var PayState3 = "Disable"
EndIf
@ -750,20 +753,28 @@
If CoinInFlag = 0 Then
If CancelFlag = 0 Then
Var FlagQROpened = 1
Var alphaState = "Enable"
;CoinVending OFF
VendingQR ON
Refresh
If CoinAmount > 0 Then
Change CoinAmount
Var ChangeOK = 0
Var CancelFlag = 1
Var CancelCounter = 0
Var NoGotoMenupage = "true"
EndIf
Var FlagQROpened = 1
Var alphaState = "Enable"
;CoinVending OFF
VendingQR ON
If QRCODE99 = "" Then
Var CashTextWarning = "ระบบ Promtpay ไม่สามารถใช้งานได้ในขณะนี้"
Var QRErrorState = "Enable"
Else
Var CashTextWarning = ""
Var QRErrorState = "Invisible"
EndIf
Refresh
If CoinAmount > 0 Then
Change CoinAmount
Var ChangeOK = 0
Var CancelFlag = 1
Var CancelCounter = 0
Var NoGotoMenupage = "true"
EndIf
EndIf
EndIf
EndIf
@ -820,6 +831,7 @@
;VendingQR OFF
If CoinInOK = 0 Then
If CancelFlag = 0 Then
@ -912,6 +924,7 @@
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var QRErrorState = "Invisible"
Var alphaState = "Invisible"
;CoinVending ON
;VendingQR OFF
@ -1040,7 +1053,17 @@
;</Text>
<Text>
<X> 270 </X>
<Y> 1000 </Y>
<Width>550</Width>
<Align> Center </Align>
<Size> 30 </Size>
<Font> KanitRegularTTF </Font>
<State> alphaState </State>
<Color> 0xFF0000 </Color>
<Value> CashTextWarning </Value>
</Text>
<QRCode>
@ -1052,6 +1075,18 @@
<Service> testservice </Service>
</QRCode>
<Button>
<X> 490 </X>
<Y> 1050 </Y>
<State>QRErrorState</State>
<Filename> "ROOT/taobin_project/image/page_payment/QRError.png" </Filename>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<EventSecurity>