MYS: add promotion profile to restore as previous profile after promo ends

This commit is contained in:
Pakin 2024-09-24 09:01:26 +07:00
parent 1687d8e612
commit 26a15c104c
5 changed files with 278 additions and 201 deletions

View file

@ -44,6 +44,9 @@ Var EnablePayLaterMode = 0
; Slide show Video
Var UseSlideShowVideo = 0
Var NoTrickPriceProfile = 0
If SystemDateMonthInt = 9 Then
If SystemDateDayInt < 17 Then
Var PromotionOreoToppingFreeEnable = 1
@ -59,7 +62,7 @@ If SystemDateMonthInt = 10 Then
If SetProReduceByBO = 1 Then
Var ProReducedPriceEnable = 1
EndIf
Var ProYuzu250Enable = 1
EndIf
@ -67,12 +70,17 @@ If SystemDateMonthInt = 11 Then
If SetProReduceByBO = 1 Then
Var ProReducedPriceEnable = 1
EndIf
Var ProYuzu250Enable = 1
EndIf
If SystemDateMonthInt = 12 Then
Var ProYuzu250Enable = 1
If SetProReduceByBO = 1 Then
Var ProReducedPriceEnable = 0
EndIf
EndIf
If SystemDateMonthInt = 1 Then
@ -83,6 +91,17 @@ If SystemDateMonthInt = 1 Then
EndIf
EndIf
If SystemDateMonthInt < 10 Then
Var ProReducedPriceEnable = 0
EndIf
If ProReducedPriceEnable = 0 Then
If XMLProfile = "PromoReduced" Then
Var NoTrickPriceProfile = 1
EndIf
EndIf
If BoxID = 177746 Then
Var ProThaiTeaEnable = 1
Var ProYuzuEnable = 1
@ -94,8 +113,8 @@ If BoxID = 177746 Then
Var UseSlideShowVideo = 0
Var ProReducedPriceEnable = 0
Var ProYuzu250Enable = 1
;Var ProReducedPriceEnable = 0
;Var ProYuzu250Enable = 1
EndIf
If BoxID = 210037 Then
@ -106,9 +125,9 @@ If BoxID = 210011 Then
Var UseSlideShowVideo = 1
EndIf
If BoxID = 200002 Then
Var UseSlideShowVideo = 1
EndIf
;If BoxID = 200002 Then
; Var UseSlideShowVideo = 1
;EndIf
;If BoxID = Something Then
; Var EnablePayLaterMode = 1