add problem 8

This commit is contained in:
pichet 2023-02-08 13:56:01 +07:00
parent 280da4833d
commit 5d44e41e6a
3 changed files with 57 additions and 19 deletions

View file

@ -46,15 +46,21 @@
StrLen TelephoneNumberProblem TelNumLen StrLen TelephoneNumberProblem TelNumLen
If TelNumLen >= 10 Then If TelNumLen >= 10 Then
Var ProblemID = 7
Var ChooseProblem = "taobin purchasing problems"
If Seeker.PayWithQR = 1 Then If Seeker.PayWithQR = 1 Then
Var VendingTSIDProblem = VendingTSIDTmp Var VendingTSIDProblem = VendingTSIDTmp
If Seeker.CampaignPayChanel = "promptpay" Then
Var ProblemID = 8
Var ChooseProblem = "taobin purchasing problems(Void Failed)"
EndIf
Else Else
Var VendingTSIDProblem = VendingTSID Var VendingTSIDProblem = VendingTSID
EndIf EndIf
Var ProblemID = 7
Var ChooseProblem = "taobin purchasing problems"
PROBLEM2 TelephoneNumberProblem ProblemID ChooseProblem VendingTSIDProblem PROBLEM2 TelephoneNumberProblem ProblemID ChooseProblem VendingTSIDProblem
EndIf EndIf
@ -110,17 +116,24 @@
<EventClick> <EventClick>
StrLen TelephoneNumberProblem TelNumLen StrLen TelephoneNumberProblem TelNumLen
If TelNumLen >= 10 Then If TelNumLen >= 10 Then
Var ProblemID = 7
Var ChooseProblem = "taobin purchasing problems"
If Seeker.PayWithQR = 1 Then If Seeker.PayWithQR = 1 Then
Var VendingTSIDProblem = VendingTSIDTmp Var VendingTSIDProblem = VendingTSIDTmp
If Seeker.CampaignPayChanel = "promptpay" Then
Var ProblemID = 8
Var ChooseProblem = "taobin purchasing problems(Void Failed)"
EndIf
Else Else
Var VendingTSIDProblem = VendingTSID Var VendingTSIDProblem = VendingTSID
EndIf EndIf
Var ProblemID = 7
Var ChooseProblem = "taobin purchasing problems"
PROBLEM2 TelephoneNumberProblem ProblemID ChooseProblem VendingTSIDProblem PROBLEM2 TelephoneNumberProblem ProblemID ChooseProblem VendingTSIDProblem
EndIf EndIf

View file

@ -516,15 +516,24 @@
StrLen TelephoneNumberProblem TelNumLen StrLen TelephoneNumberProblem TelNumLen
If TelNumLen >= 10 Then If TelNumLen >= 10 Then
Var ProblemID = 7
;Var ProblemID = 8
;Var ChooseProblem = "taobin purchasing problems(Void Failed)"
Var ChooseProblem = "taobin purchasing problems"
If Seeker.PayWithQR = 1 Then If Seeker.PayWithQR = 1 Then
Var VendingTSIDProblem = VendingTSIDTmp Var VendingTSIDProblem = VendingTSIDTmp
If Seeker.CampaignPayChanel = "promptpay" Then
Var ProblemID = 8
Var ChooseProblem = "taobin purchasing problems(Void Failed)"
EndIf
Else Else
Var VendingTSIDProblem = VendingTSID Var VendingTSIDProblem = VendingTSID
EndIf EndIf
Var ProblemID = 7
Var ChooseProblem = "taobin purchasing problems"
PROBLEM2 TelephoneNumberProblem ProblemID ChooseProblem VendingTSIDProblem PROBLEM2 TelephoneNumberProblem ProblemID ChooseProblem VendingTSIDProblem

View file

@ -47,15 +47,20 @@
StrLen TelephoneNumberProblem TelNumLen StrLen TelephoneNumberProblem TelNumLen
If TelNumLen >= 10 Then If TelNumLen >= 10 Then
Var ProblemID = 7
Var ChooseProblem = "taobin purchasing problems"
If Seeker.PayWithQR = 1 Then If Seeker.PayWithQR = 1 Then
Var VendingTSIDProblem = VendingTSIDTmp Var VendingTSIDProblem = VendingTSIDTmp
If Seeker.CampaignPayChanel = "promptpay" Then
Var ProblemID = 8
Var ChooseProblem = "taobin purchasing problems(Void Failed)"
EndIf
Else Else
Var VendingTSIDProblem = VendingTSID Var VendingTSIDProblem = VendingTSID
EndIf EndIf
Var ProblemID = 7
Var ChooseProblem = "taobin purchasing problems"
PROBLEM2 TelephoneNumberProblem ProblemID ChooseProblem VendingTSIDProblem PROBLEM2 TelephoneNumberProblem ProblemID ChooseProblem VendingTSIDProblem
EndIf EndIf
@ -82,7 +87,6 @@
EndIf EndIf
Var ProblemID = 7 Var ProblemID = 7
Var ChooseProblem = "taobin purchasing problems(Got Free)" Var ChooseProblem = "taobin purchasing problems(Got Free)"
PROBLEM2 TelephoneNumberProblem ProblemID ChooseProblem VendingTSIDProblem PROBLEM2 TelephoneNumberProblem ProblemID ChooseProblem VendingTSIDProblem
@ -99,15 +103,20 @@
StrLen TelephoneNumberProblem TelNumLen StrLen TelephoneNumberProblem TelNumLen
If TelNumLen >= 10 Then If TelNumLen >= 10 Then
Var ProblemID = 7
Var ChooseProblem = "taobin purchasing problems"
If Seeker.PayWithQR = 1 Then If Seeker.PayWithQR = 1 Then
Var VendingTSIDProblem = VendingTSIDTmp Var VendingTSIDProblem = VendingTSIDTmp
If Seeker.CampaignPayChanel = "promptpay" Then
Var ProblemID = 8
Var ChooseProblem = "taobin purchasing problems(Void Failed)"
EndIf
Else Else
Var VendingTSIDProblem = VendingTSID Var VendingTSIDProblem = VendingTSID
EndIf EndIf
Var ProblemID = 7
Var ChooseProblem = "taobin purchasing problems"
PROBLEM2 TelephoneNumberProblem ProblemID ChooseProblem VendingTSIDProblem PROBLEM2 TelephoneNumberProblem ProblemID ChooseProblem VendingTSIDProblem
EndIf EndIf
@ -235,15 +244,22 @@
StrLen TelephoneNumberProblem TelNumLen StrLen TelephoneNumberProblem TelNumLen
If TelNumLen >= 10 Then If TelNumLen >= 10 Then
Var ProblemID = 7
Var ChooseProblem = "taobin purchasing problems"
If Seeker.PayWithQR = 1 Then If Seeker.PayWithQR = 1 Then
Var VendingTSIDProblem = VendingTSIDTmp Var VendingTSIDProblem = VendingTSIDTmp
If Seeker.CampaignPayChanel = "promptpay" Then
Var ProblemID = 8
Var ChooseProblem = "taobin purchasing problems(Void Failed)"
EndIf
Else Else
Var VendingTSIDProblem = VendingTSID Var VendingTSIDProblem = VendingTSID
EndIf EndIf
Var ProblemID = 7
Var ChooseProblem = "taobin purchasing problems"
PROBLEM2 TelephoneNumberProblem ProblemID ChooseProblem VendingTSIDProblem PROBLEM2 TelephoneNumberProblem ProblemID ChooseProblem VendingTSIDProblem
EndIf EndIf