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

MYS: fix qr size & extend timeout e-invoice

Browse source
This commit is contained in:
Pakin 2025-07-11 15:35:23 +07:00
parent 8aab43e5eb
commit db68244735
2 changed files with 39 additions and 22 deletions
Download patch file Download diff file Expand all files Collapse all files

BIN
inter/mys/image/page_e_receipt/img_popup_eReceiptPrompt_result.png
View file

Binary file not shown.
Side by side Swipe Overlay

Before

Width:  |  Height:  |  Size: 13 KiB

After

Width:  |  Height:  |  Size: 20 KiB

Before After
Before After

61
inter/mys/xml/e_receipt/page_show_e_receipt.lxml
View file

@ -15,6 +15,7 @@
Var ProductDesc = "" Var ProductDesc = ""
Var Timeout = 0 Var Timeout = 0
Var TimeoutAfterShowQR = 0
Var service = "eInvoice.mys" Var service = "eInvoice.mys"
Var EReceiptQR = "" Var EReceiptQR = ""
@ -82,9 +83,13 @@
<Timeout> 1000 </Timeout> <Timeout> 1000 </Timeout>
<EventTimeout> <EventTimeout>
DEBUGVAR TimeoutAfterShowQR
DEBUGVAR VendingTSID DEBUGVAR VendingTSID
Var Seeker.VendingTSID = VendingTSID If VendingTSID = "" Then
Else
Var Seeker.VendingTSID = VendingTSID
EndIf
DEBUGVAR Seeker.VendingTSID DEBUGVAR Seeker.VendingTSID
DEBUGVAR LOADING_STATE DEBUGVAR LOADING_STATE
@ -93,31 +98,43 @@ DEBUGVAR QR_STATE
DEBUGVAR Seeker.e_receipt DEBUGVAR Seeker.e_receipt
Var Timeout = Timeout + 1 If Seeker.VendingTSID = "" Then
Var Timeout = Timeout + 1
Else
If TimeoutAfterShowQR = 0 Then
Var LOADING_STATE = "Invisible"
SAVELOG "TSID should be ready!"
TRY "ROOT/taobin_project/inter/mys/xml/process/e_receipt.ev"
Var TimeoutAfterShowQR = 1
Refresh
EndIf
EndIf
If Timeout = 5 Then If Seeker.VendingTSID = "" Then
Var LOADING_STATE = "Invisible" Var QR_STATE = "Invisible"
SAVELOG "TSID should be ready!" Refresh
TRY "ROOT/taobin_project/inter/mys/xml/process/e_receipt.ev" Else
If TimeoutAfterShowQR > 2 Then
Var QR_STATE = "Enable"
EndIf
If TimeoutAfterShowQR > 0 Then
Var TimeoutAfterShowQR = TimeoutAfterShowQR + 1
EndIf
Refresh Refresh
EndIf EndIf
If Timeout > 5 Then If Timeout > 25 Then
Var QR_STATE = "Enable" SAVELOG "Timeout after waiting .."
Refresh
EndIf
If Timeout > 15 Then
Open "ROOT/taobin_project/xml/page_drinkok.xml" Open "ROOT/taobin_project/xml/page_drinkok.xml"
EndIf EndIf
If TimeoutAfterShowQR > 25 Then
SAVELOG "Timeout QR OK"
Open "ROOT/taobin_project/xml/page_drinkok.xml"
EndIf
Refresh Refresh
TimerReset TimerReset
@ -143,10 +160,10 @@ TimerReset
; need-change-position ; need-change-position
<QRCode> <QRCode>
<X> 415 </X> <X> 350 </X>
<Y> 875 </Y> <Y> 845 </Y>
<Width> 250 </Width> <Width> 360 </Width>
<Height> 250 </Height> <Height> 360 </Height>
<State> QR_STATE </State> <State> QR_STATE </State>
<Service> service </Service> <Service> service </Service>
</QRCode> </QRCode>
@ -155,7 +172,7 @@ TimerReset
<Image> <Image>
<X> 175 </X> <X> 175 </X>
<Y> 1200 </Y> <Y> 1230 </Y>
<Height> 300 </Height> <Height> 300 </Height>
<Width> 320 </Width> <Width> 320 </Width>
<Filename> Seeker.PictureDrink </Filename> <Filename> Seeker.PictureDrink </Filename>