THAI: update payment_credit3_TopupCode

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

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>