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

THAI: update payment_credit3_TopupCode

Browse source
This commit is contained in:
Kenta420 2024-01-30 17:38:23 +07:00
parent 3449fcc9cb
commit b412d5eb88
9 changed files with 1302 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

BIN
image/display_point/bn_checkKradong.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 3.7 KiB

BIN
image/display_point/bp_checkKradong.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 4 KiB

BIN
image/display_point_en/bn_checkKradong.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 4.3 KiB

BIN
image/display_point_en/bp_checkKradong.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 4.7 KiB

6
xml/page_check_member1.xml
View file

@ -71,7 +71,11 @@
If StepX = 1 Then
If Ext1a = "ok" Then
Var CoffeePoint1 = Ext1c
INT CoffeePoint1
Var CoffeePointOld = CoffeePoint1
Var TaobinName = Ext1d
Var TaobinCoupons = Ext1g
Var TaobinExpire = Ext1f

13
xml/page_check_member2.xml
View file

@ -1132,9 +1132,22 @@
</Text>
;<Button>
;<X> 156 </X>
;<Y> 1746 </Y>
;<Filename> Var( DirImage + "/bn_checkKradong.png" )</Filename>
;<FilenamePress> Var( DirImage + "/bp_checkKradong.png" )</FilenamePress>
;<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
;<Volume> SoundVolume </Volume>
;<EventClick>
; Open "ROOT/taobin_project/xml/page_check_member_point.xml"
;</EventClick>
;</Button>
<Button>
<X> 397 </X>
;<X> 630 </X>
<Y> 1746 </Y>
<Filename> Var( DirImage + bn_exit )</Filename>
<FilenamePress> Var( DirImage + bp_exit )</FilenamePress>

1218
xml/page_check_member_point.xml Normal file
View file

File diff suppressed because it is too large Load diff

12
xml/page_display_get_drink_5_baht.xml
View file

@ -42,7 +42,11 @@
Var PopUpState2 = "Invisible
EndIf
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
If FromCheckMemberPoint = 1 Then
Open "ROOT/taobin_project/xml/page_check_member3.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf
EndIf
@ -134,7 +138,11 @@
Refresh
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
If FromCheckMemberPoint = 1 Then
Open "ROOT/taobin_project/xml/page_check_member3.xml"
Else
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
EndIf
</EventClick>
</Button>

61
xml/page_payment_credit3-TopupCode.xml
View file

@ -28,6 +28,10 @@
Var ShowErrorText = "Invisible"
Var Tel_Confirm_State = "Invisible"
Var ErrorCause = ""
Var TextWaiting = ""
Var ReqAdddata42 = 0
Var ReqAdddata22 = 0
Var goBackBtnState = "Enable"
If show_eng = "true" Then
@ -42,7 +46,6 @@
<EventTimeout>
;Open "ROOT/xml/page_board.xml"
Var Timeout = Timeout + 1
If Timeout > 120 Then
@ -51,12 +54,33 @@
EndIf
If ReqAdddata42 = 1 Then
If Timeout = 3 Then
If ReqAdddata22 = 0 Then
GenHashWithTimeStamp PointCrm
Var useCreditAmount = PayAmountSubDiscount
Var BmiYear = useCreditAmount
Var GetScore = "useCredit"
AddData 22 TelephoneNumber BmiYear PointCrm GetScore
Var ReqAdddata22 = 1
Var Timeout = 0
EndIf
EndIf
EndIf
TimerReset
Refresh
</EventTimeout>
<EventActionOk>
If ReqAdddata22 = 1 Then
Var Seeker.CreditReferenceTmp = "" + useCreditAmount
Var Seeker.CreditReferenceTmp = Seeker.CreditReferenceTmp + "/"
Var Seeker.CreditReferenceTmp = Seeker.CreditReferenceTmp + PointCrm
CoinVending OFF
Open "ROOT/taobin_project/xml/page_payment_credit3-TopupSuccess.xml"
EndIf
If Seeker.CodeChannel = 1 Then
@ -82,9 +106,12 @@
AddData 42 TelephoneNumber CampaignCode CampaignID AmoutCoupon
Open "ROOT/taobin_project/xml/page_payment_credit3-TopupSuccess.xml"
Var Timeout = 0
Var ReqAdddata42 = 1
Var ReqAdddata22 = 0
Else
Var ShowErrorText = "Enable"
Var goBackBtnState = "Enable"
Var text_show_error = DirImage + "/text_show_error.png"
Var GetPayInfoFlag = 0
Var Seeker.CodeChannel = 0
@ -97,6 +124,8 @@
<EventActionError>
If Seeker.CodeChannel = 1 Then
Var CouponNumber = ""
Var TextWaiting = ""
Var goBackBtnState = "Enable"
Var ShowErrorText = "Enable"
@ -507,11 +536,13 @@
<X> 218 </X>
<Y> 1607 </Y>
<Filename> Var( DirImage + "/bn_back.png") </Filename>
<FilenamePress> Var( DirImage + "/bn_back.png") </FilenamePress>
<FilenamePress> Var( DirImage + "/bp_back.png") </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/taobin_project/xml/page_payment_credit3-1.xml"
If goBackBtnState = "Enable" Then
Open "ROOT/taobin_project/xml/page_payment_credit3-1.xml"
EndIf
</EventClick>
</Button>
@ -589,6 +620,14 @@
GetPayInfo TelephoneNumber2 ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
Var Timeout = 0
If show_eng = "true" Then
Var TextWaiting = "Please wait..."
Else
Var TextWaiting = "กรุณารอซักครู่..."
EndIf
Var goBackBtnState = "Disable"
Var Seeker.CodeChannel = 1
EndIf
@ -645,6 +684,18 @@
<Filename> text_show_error </Filename>
</Image>
<Text>
<X> 5 </X>
<Y> 940 </Y>
<Refresh> "Enable" </Refresh>
<Size> 30 </Size>
<Align> Center </Align>
<Width> 1080 </Width>
<Font> RobotoRegular </Font>
<Color> 0xFF0000 </Color>
<Value> TextWaiting </Value>
</Text>
;<Image>
;<X> 0 </X>