pakin/taobin_project
1
0
Fork 0
Code Issues Pull requests Projects 1 Releases 1 Packages Wiki Activity Actions

THAI: update promptpay QR code support discount and use remain credit in same time

Browse source
This commit is contained in:
Kenta420 2024-05-21 15:41:19 +07:00
parent df2e4915bc
commit 838bc92fc2
3 changed files with 12 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

4
xml/page_member_topup3.xml
View file

@ -49,6 +49,10 @@
Var PayCreditChannel = "cash" Var PayCreditChannel = "cash"
If SELLSTATUS = "SELLNOCASH" Then
Var PayState1 = "Disable"
EndIf
Var text_4 = "/text_4.png" Var text_4 = "/text_4.png"

14
xml/page_payment.xml
View file

@ -301,7 +301,7 @@
Var Seeker.IntVendingCampaign = PriceDiff Var Seeker.IntVendingCampaign = PriceDiff
Var Seeker.FreeVendingCampaign = 0 Var Seeker.FreeVendingCampaign = 0
Var Seeker.CodeChannel = 1 Var Seeker.CodeChannel = 1
Var Seeker.CodeNumber = IDNum Var Seeker.CodeNumber = "00000000"
Var Seeker.VendingCampaignRI3 = PriceDiff Var Seeker.VendingCampaignRI3 = PriceDiff
Var Seeker.CampaignPPrice = PromoPriceDrink Var Seeker.CampaignPPrice = PromoPriceDrink
@ -315,7 +315,7 @@
Var Seeker.IntVendingCampaign = PriceDiff Var Seeker.IntVendingCampaign = PriceDiff
Var Seeker.FreeVendingCampaign = 0 Var Seeker.FreeVendingCampaign = 0
Var Seeker.CodeChannel = 1 Var Seeker.CodeChannel = 1
Var Seeker.CodeNumber = IDNum Var Seeker.CodeNumber = "00000000"
Var Seeker.VendingCampaignRI3 = PriceDiff Var Seeker.VendingCampaignRI3 = PriceDiff
Var Seeker.CampaignPPrice = PromotionPriceDrink Var Seeker.CampaignPPrice = PromotionPriceDrink
EndIf EndIf
@ -326,7 +326,7 @@
Var Seeker.IntVendingCampaign = PriceDiff Var Seeker.IntVendingCampaign = PriceDiff
Var Seeker.FreeVendingCampaign = 0 Var Seeker.FreeVendingCampaign = 0
Var Seeker.CodeChannel = 1 Var Seeker.CodeChannel = 1
Var Seeker.CodeNumber = IDNum Var Seeker.CodeNumber = "00000000"
Var Seeker.VendingCampaignRI3 = PriceDiff Var Seeker.VendingCampaignRI3 = PriceDiff
Var Seeker.CampaignPPrice = PromotionPriceDrink Var Seeker.CampaignPPrice = PromotionPriceDrink
EndIf EndIf
@ -349,7 +349,7 @@
Var Seeker.IntVendingCampaign = PriceDiff Var Seeker.IntVendingCampaign = PriceDiff
Var Seeker.FreeVendingCampaign = 0 Var Seeker.FreeVendingCampaign = 0
Var Seeker.CodeChannel = 1 Var Seeker.CodeChannel = 1
Var Seeker.CodeNumber = IDNum Var Seeker.CodeNumber = "00000000"
Var Seeker.VendingCampaignRI3 = PriceDiff Var Seeker.VendingCampaignRI3 = PriceDiff
Var Seeker.CampaignPPrice = PriceDrink - PriceDiff Var Seeker.CampaignPPrice = PriceDrink - PriceDiff
EndIf EndIf
@ -363,7 +363,7 @@
Var Seeker.IntVendingCampaign = PriceDiff Var Seeker.IntVendingCampaign = PriceDiff
Var Seeker.FreeVendingCampaign = 0 Var Seeker.FreeVendingCampaign = 0
Var Seeker.CodeChannel = 1 Var Seeker.CodeChannel = 1
Var Seeker.CodeNumber = IDNum Var Seeker.CodeNumber = "00000000"
Var Seeker.VendingCampaignRI3 = PriceDiff Var Seeker.VendingCampaignRI3 = PriceDiff
Var Seeker.CampaignPPrice = 1 Var Seeker.CampaignPPrice = 1
Else Else
@ -373,7 +373,7 @@
Var Seeker.IntVendingCampaign = PriceDiff Var Seeker.IntVendingCampaign = PriceDiff
Var Seeker.FreeVendingCampaign = 0 Var Seeker.FreeVendingCampaign = 0
Var Seeker.CodeChannel = 1 Var Seeker.CodeChannel = 1
Var Seeker.CodeNumber = IDNum Var Seeker.CodeNumber = "00000000"
Var Seeker.VendingCampaignRI3 = PriceDiff Var Seeker.VendingCampaignRI3 = PriceDiff
Var Seeker.CampaignPPrice = 1 Var Seeker.CampaignPPrice = 1
EndIf EndIf
@ -388,7 +388,7 @@
Var Seeker.IntVendingCampaign = PriceDiff Var Seeker.IntVendingCampaign = PriceDiff
Var Seeker.FreeVendingCampaign = 0 Var Seeker.FreeVendingCampaign = 0
Var Seeker.CodeChannel = 1 Var Seeker.CodeChannel = 1
Var Seeker.CodeNumber = IDNum Var Seeker.CodeNumber = "00000000"
Var Seeker.VendingCampaignRI3 = PriceDiff Var Seeker.VendingCampaignRI3 = PriceDiff
Var Seeker.CampaignPPrice = 1 Var Seeker.CampaignPPrice = 1
EndIf EndIf

2
xml/page_payment_cash.xml
View file

@ -2548,7 +2548,7 @@
If Seeker.IntVendingCredit > 0 Then If Seeker.IntVendingCredit > 0 Then
If Seeker.IntVendingCampaign > 0 Then If Seeker.IntVendingCampaign > 0 Then
Var ECommerceQR = ECommerceQR + ":" Var ECommerceQR = ECommerceQR + "|"
EndIf EndIf
Var ECommerceQR = ECommerceQR + "CRD" Var ECommerceQR = ECommerceQR + "CRD"
Var ECommerceQR = ECommerceQR + ":" Var ECommerceQR = ECommerceQR + ":"