Add My Mint My Moment promotion

This commit is contained in:
Kenta420 2023-11-21 16:14:06 +07:00
parent 73e9f924c5
commit cc0cf98945
76 changed files with 16819 additions and 46 deletions

View file

@ -65,50 +65,50 @@
Var CampaingRef1 = CampaingRef1 + CampaingRef2
Var ParamCP = ParamCP + CampaingRef1
Var GoToNormalCollectPoint = 1
Var PepweenCollectPoint = 1
If PepweenEnable = 1 Then
If Seeker.selected_a_drink = "12-99-05-0053" Then
Var GoToNormalCollectPoint = 0
Var PepweenCollectPoint = 0
EndIf
If Seeker.selected_a_drink = "12-99-05-0054" Then
Var GoToNormalCollectPoint = 0
Var PepweenCollectPoint = 0
EndIf
If Seeker.selected_a_drink = "12-99-05-0055" Then
Var GoToNormalCollectPoint = 0
Var PepweenCollectPoint = 0
EndIf
If Seeker.selected_a_drink = "12-99-05-0057" Then
Var GoToNormalCollectPoint = 0
Var PepweenCollectPoint = 0
EndIf
If Seeker.selected_a_drink = "12-99-05-0058" Then
Var GoToNormalCollectPoint = 0
Var PepweenCollectPoint = 0
EndIf
If Seeker.selected_a_drink = "12-99-05-0059" Then
Var GoToNormalCollectPoint = 0
Var PepweenCollectPoint = 0
EndIf
If Seeker.selected_a_drink = "12-99-05-0060" Then
Var GoToNormalCollectPoint = 0
Var PepweenCollectPoint = 0
EndIf
If Seeker.selected_a_drink = "12-99-05-0061" Then
Var GoToNormalCollectPoint = 0
Var PepweenCollectPoint = 0
EndIf
If Seeker.selected_a_drink = "12-99-05-0062" Then
Var GoToNormalCollectPoint = 0
Var PepweenCollectPoint = 0
EndIf
If Seeker.selected_a_drink = "12-99-05-0064" Then
Var GoToNormalCollectPoint = 0
Var PepweenCollectPoint = 0
EndIf
If Seeker.selected_a_drink = "12-99-05-0065" Then
Var GoToNormalCollectPoint = 0
Var PepweenCollectPoint = 0
EndIf
If Seeker.selected_a_drink = "12-99-05-0056" Then
Var GoToNormalCollectPoint = 0
Var PepweenCollectPoint = 0
EndIf
If Seeker.selected_a_drink = "12-99-03-0066" Then
Var GoToNormalCollectPoint = 0
Var PepweenCollectPoint = 0
EndIf
EndIf
DEBUGVAR GoToNormalCollectPoint
DEBUGVAR PepweenCollectPoint
If Seeker.TNumberTaobinCredit = "" Then
@ -146,15 +146,22 @@
Var Param1 = TelephoneNumber + "/"
Var Param1 = Param1 + ParamCP
If GoToNormalCollectPoint = 0 Then
GETACCEXT TelephoneNumber 31
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_2.xml"
Else
GETACCEXT Param1 23
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
If MyMintEnable = 1 Then
If FromMyMintPro = 1 Then
GETACCEXT TelephoneNumber 32
Open "ROOT/taobin_project/xml/event/my_mint_my_moment/page_collect_point_pro_mymint_2.xml"
EndIf
EndIf
If PepweenEnable = 1 Then
If PepweenCollectPoint = 0 Then
GETACCEXT TelephoneNumber 31
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_2.xml"
EndIf
EndIf
GETACCEXT Param1 23
Open "ROOT/taobin_project/xml/page_collect_point_2.xml"
EndIf
Else
@ -173,7 +180,7 @@
SAVELOG "collect_point1-p71."
Var TelephoneNumberX = TelephoneNumber
DEBUGVAR TelephoneNumber
DEBUGVAR GoToNormalCollectPoint
DEBUGVAR PepweenCollectPoint
If PromotionIDCurrentOrder > 1 Then
Open "ROOT/taobin_project/xml/page_display_Promo1Get1Free.xml"
EndIf
@ -181,7 +188,17 @@
;GetAccInfo TelephoneNumber OperatorTemp CreditAmount OperatorStatus AccountType GetScore tc
Var Param1 = TelephoneNumber + "/"
Var Param1 = Param1 + ParamCP
If GoToNormalCollectPoint = 0 Then
DEBUGVAR MyMintEnable
DEBUGVAR FromMyMintPro
If MyMintEnable = 1 Then
If FromMyMintPro = 1 Then
GETACCEXT TelephoneNumber 32
Open "ROOT/taobin_project/xml/event/my_mint_my_moment/page_collect_point_pro_mymint_2.xml"
EndIf
EndIf
If PepweenCollectPoint = 0 Then
GETACCEXT TelephoneNumber 31
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_2.xml"
Else
@ -657,7 +674,14 @@
Var Param1 = TelephoneNumber + "/"
Var Param1 = Param1 + ParamCP
If GoToNormalCollectPoint = 0 Then
If MyMintEnable = 1 Then
If FromMyMintPro = 1 Then
GETACCEXT TelephoneNumber 32
Open "ROOT/taobin_project/xml/event/my_mint_my_moment/page_collect_point_pro_mymint_2.xml"
EndIf
EndIf
If PepweenCollectPoint = 0 Then
GETACCEXT TelephoneNumber 31
Open "ROOT/taobin_project/xml/event/pepween/page_collect_point_pro_pepween_2.xml"
Else