THAI: update collect point even discount is = drink price

This commit is contained in:
Kenta420 2024-04-24 18:00:42 +07:00
parent 1d38695131
commit 507d819b90
2 changed files with 17 additions and 22 deletions

View file

@ -169,8 +169,9 @@
SAVELOG ECommerce
SPLIT ECommerce "/" 5 Seeker.VendingCode
SPLIT ECommerce "/" 7 Seeker.VendingCampaignRI3
SPLIT ECommerce "/" 7 Seeker.VendingCampaignRI3
SPLIT ECommerce "/" 8 VendingCampaign1
SPLIT ECommerce "/" 9 ShouldCollectPoint
If Seeker.VendingCode = "" Then
Var Seeker.VendingCode = "C00"
@ -190,7 +191,9 @@
SAVELOG Seeker.VendingCode
SAVELOG Seeker.VendingCampaignRI3
SAVELOG ShouldCollectPoint
INT ShouldCollectPoint
If Seeker.VendingCode = "C00" Then
@ -226,24 +229,8 @@
If Seeker.IntVendingCampaign >= PayAmount Then
If IntVendingCampaign1 >= 0 Then
If Seeker.VendingCode = "FFR50" Then
Var Seeker.CollectPointMain = 0
Var Seeker.CollectPointPromotion = 0
Else
Var Seeker.CollectPointMain = 1
Var Seeker.CollectPointPromotion = 1
EndIf
EndIf
If Seeker.VendingCode = "MKF" Then
Var Seeker.CollectPointMain = 0
Var Seeker.CollectPointPromotion = 1
EndIf
If Seeker.VendingCode = "AFR" Then
Var Seeker.CollectPointMain = 0
Var Seeker.CollectPointPromotion = 1
If ShouldCollectPoint = 1 Then
Var Seeker.CollectPointMain = 1
EndIf
;Open "ROOT/taobin_project/xml/page_payment_cash.xml"
@ -277,8 +264,9 @@
Open "ROOT/taobin_project/xml/page_thankyou.xml"
EndIf
Else
Var Seeker.CollectPointMain = 1
Var Seeker.CollectPointPromotion = 1
If ShouldCollectPoint = 1 Then
Var Seeker.CollectPointMain = 1
EndIf
EndIf