fix bug collect poing after use multi

This commit is contained in:
miggaze 2021-11-16 12:54:23 +07:00
parent 200cb7e771
commit ade4abc056
4 changed files with 37 additions and 12 deletions

View file

@ -21,7 +21,10 @@
Play "ROOT/taobin_project/sound_thai/dontforget_number.mp3"
EndIf
SAVELOG "collect_point1"
SAVELOG TNumberTaobinCredit
SAVELOG TelephoneNumber
SAVELOG "collect_point1_"
Var FromConsent = 0
@ -42,11 +45,16 @@
Var CreditAmount = 0
Var OperatorStatus = ""
Var AccountType = ""
SAVELOG "collect_point1-p49."
GetAccInfo TelephoneNumber OperatorTemp CreditAmount OperatorStatus AccountType GetScore tc
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
EndIf
Var Tel_Confirm_Flag = 1
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
@ -565,16 +573,23 @@
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var StepGetPoint = 0
Var PdpaAsk = 0
Var OperatorTemp = ""
Var CreditAmount = 0
Var OperatorStatus = ""
Var AccountType = ""
GetAccInfo TelephoneNumber OperatorTemp CreditAmount OperatorStatus AccountType GetScore tc
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
If Tel_Confirm_Flag = 1 Then
Var StepGetPoint = 0
Var PdpaAsk = 0
Var OperatorTemp = ""
Var CreditAmount = 0
Var OperatorStatus = ""
Var AccountType = ""
SAVELOG "collect_point1-p583."
GetAccInfo TelephoneNumber OperatorTemp CreditAmount OperatorStatus AccountType GetScore tc
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
EndIf
</EventClick>
</Button>

View file

@ -50,6 +50,7 @@
Var TNumberTaobinMember = ""
Var VendingTSIDTmp = ""
Var PayType = ""
Var CART_INDEX = 0
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/page_payment_en/page_payment"

View file

@ -43,6 +43,7 @@
Var cart3_en = "Invisible"
Var PriceDrink = 0
Var CART_INDEX = 0

View file

@ -27,6 +27,8 @@
Var FailedCount = 0
Var ChangeAmountSum = 0
Var Tel_Confirm_Flag = 0
If show_eng = "true" Then
Var ImageDoing = "ROOT/taobin_project/image/page_doing/img2_eng.png"
@ -50,6 +52,13 @@
Machine LidWithDelay
LED LedDoorLid Blink 255 255 255 255
EndIf
DEBUGVAR TNumberTaobinCredit
DEBUGVAR TelephoneNumber
DEBUGVAR StoreCreditFlag
</EventOpen>
@ -112,8 +121,7 @@
; run test;
If CountDownThankyou = 0 Then
;Open "ROOT/taobin_project/xml/page_lid_straw.xml"
;Open "ROOT/taobin_project/xml/page_brewing.xml"
If IgnoreNetCore = "true" Then
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf