diff --git a/xml/page_payment_cash.xml b/xml/page_payment_cash.xml index 7875a55f..a5163f69 100644 --- a/xml/page_payment_cash.xml +++ b/xml/page_payment_cash.xml @@ -323,13 +323,6 @@ EndIf - If MyMintEnable = 1 Then - If FromMyMintPro = 1 Then - Var PayState2 = "Disable" - Var PayState5 = "Disable" - Var PayState6 = "Disable" - EndIf - EndIf @@ -699,13 +692,13 @@ - ;If Seeker.IntVendingCampaign > 0 Then - ; Var ECommerceQR = ECommerceQR + Seeker.VendingCode - ; Var ECommerceQR = ECommerceQR + ":" - ; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber - ; Var ECommerceQR = ECommerceQR + ":" - ; Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3 - ;EndIf + If Seeker.IntVendingCampaign > 0 Then + Var ECommerceQR = ECommerceQR + Seeker.VendingCode + Var ECommerceQR = ECommerceQR + ":" + Var ECommerceQR = ECommerceQR + Seeker.CodeNumber + Var ECommerceQR = ECommerceQR + ":" + Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3 + EndIf Var ServiceParameter = "max" Var ServiceCharge = 0 @@ -752,13 +745,13 @@ Var ECommerceQR = ECommerceQR + "/" Var ECommerceQR = ECommerceQR + "TWN:2/" - ;If Seeker.IntVendingCampaign > 0 Then - ; Var ECommerceQR = ECommerceQR + Seeker.VendingCode - ; Var ECommerceQR = ECommerceQR + ":" - ; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber - ; Var ECommerceQR = ECommerceQR + ":" - ; Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3 - ;EndIf + If Seeker.IntVendingCampaign > 0 Then + Var ECommerceQR = ECommerceQR + Seeker.VendingCode + Var ECommerceQR = ECommerceQR + ":" + Var ECommerceQR = ECommerceQR + Seeker.CodeNumber + Var ECommerceQR = ECommerceQR + ":" + Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3 + EndIf Var ServiceParameter = "max" @@ -806,13 +799,13 @@ Var ECommerceQR = ECommerceQR + "/" Var ECommerceQR = ECommerceQR + "DOL:2/" - ;If Seeker.IntVendingCampaign > 0 Then - ; Var ECommerceQR = ECommerceQR + Seeker.VendingCode - ; Var ECommerceQR = ECommerceQR + ":" - ; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber - ; Var ECommerceQR = ECommerceQR + ":" - ; Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3 - ;EndIf + If Seeker.IntVendingCampaign > 0 Then + Var ECommerceQR = ECommerceQR + Seeker.VendingCode + Var ECommerceQR = ECommerceQR + ":" + Var ECommerceQR = ECommerceQR + Seeker.CodeNumber + Var ECommerceQR = ECommerceQR + ":" + Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3 + EndIf Var ServiceParameter = "max" Var ServiceCharge = 0 @@ -859,13 +852,13 @@ Var ECommerceQR = ECommerceQR + "/" Var ECommerceQR = ECommerceQR + "LPY:2/" - ;If Seeker.IntVendingCampaign > 0 Then - ; Var ECommerceQR = ECommerceQR + Seeker.VendingCode - ; Var ECommerceQR = ECommerceQR + ":" - ; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber - ; Var ECommerceQR = ECommerceQR + ":" - ; Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3 - ;EndIf + If Seeker.IntVendingCampaign > 0 Then + Var ECommerceQR = ECommerceQR + Seeker.VendingCode + Var ECommerceQR = ECommerceQR + ":" + Var ECommerceQR = ECommerceQR + Seeker.CodeNumber + Var ECommerceQR = ECommerceQR + ":" + Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3 + EndIf Var ServiceParameter = "max" Var ServiceCharge = 0 @@ -912,13 +905,13 @@ Var ECommerceQR = ECommerceQR + "/" Var ECommerceQR = ECommerceQR + "LZP:2/" - ;If Seeker.IntVendingCampaign > 0 Then - ; Var ECommerceQR = ECommerceQR + Seeker.VendingCode - ; Var ECommerceQR = ECommerceQR + ":" - ; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber - ; Var ECommerceQR = ECommerceQR + ":" - ; Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3 - ;EndIf + If Seeker.IntVendingCampaign > 0 Then + Var ECommerceQR = ECommerceQR + Seeker.VendingCode + Var ECommerceQR = ECommerceQR + ":" + Var ECommerceQR = ECommerceQR + Seeker.CodeNumber + Var ECommerceQR = ECommerceQR + ":" + Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3 + EndIf Var ServiceParameter = "max" Var ServiceCharge = 0 @@ -966,13 +959,13 @@ Var ECommerceQR = ECommerceQR + "MAX:2/" - ;If Seeker.IntVendingCampaign > 0 Then - ; Var ECommerceQR = ECommerceQR + Seeker.VendingCode - ; Var ECommerceQR = ECommerceQR + ":" - ; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber - ; Var ECommerceQR = ECommerceQR + ":" - ; Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3 - ;EndIf + If Seeker.IntVendingCampaign > 0 Then + Var ECommerceQR = ECommerceQR + Seeker.VendingCode + Var ECommerceQR = ECommerceQR + ":" + Var ECommerceQR = ECommerceQR + Seeker.CodeNumber + Var ECommerceQR = ECommerceQR + ":" + Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3 + EndIf Var ServiceParameter = "max" Var ServiceCharge = 0 @@ -1020,13 +1013,13 @@ Var ECommerceQR = ECommerceQR + "WEC:2/" - ;If Seeker.IntVendingCampaign > 0 Then - ; Var ECommerceQR = ECommerceQR + Seeker.VendingCode - ; Var ECommerceQR = ECommerceQR + ":" - ; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber - ; Var ECommerceQR = ECommerceQR + ":" - ; Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3 - ;EndIf + If Seeker.IntVendingCampaign > 0 Then + Var ECommerceQR = ECommerceQR + Seeker.VendingCode + Var ECommerceQR = ECommerceQR + ":" + Var ECommerceQR = ECommerceQR + Seeker.CodeNumber + Var ECommerceQR = ECommerceQR + ":" + Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3 + EndIf Var ServiceParameter = "max" Var ServiceCharge = 0 @@ -1073,13 +1066,13 @@ Var ECommerceQR = ECommerceQR + "/" Var ECommerceQR = ECommerceQR + "ALP:2/" - ;If Seeker.IntVendingCampaign > 0 Then - ; Var ECommerceQR = ECommerceQR + Seeker.VendingCode - ; Var ECommerceQR = ECommerceQR + ":" - ; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber - ; Var ECommerceQR = ECommerceQR + ":" - ; Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3 - ;EndIf + If Seeker.IntVendingCampaign > 0 Then + Var ECommerceQR = ECommerceQR + Seeker.VendingCode + Var ECommerceQR = ECommerceQR + ":" + Var ECommerceQR = ECommerceQR + Seeker.CodeNumber + Var ECommerceQR = ECommerceQR + ":" + Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3 + EndIf Var ServiceParameter = "max" Var ServiceCharge = 0 @@ -1126,13 +1119,13 @@ Var ECommerceQR = ECommerceQR + "/" Var ECommerceQR = ECommerceQR + "UNP:2/" - ;If Seeker.IntVendingCampaign > 0 Then - ; Var ECommerceQR = ECommerceQR + Seeker.VendingCode - ; Var ECommerceQR = ECommerceQR + ":" - ; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber - ; Var ECommerceQR = ECommerceQR + ":" - ; Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3 - ;EndIf + If Seeker.IntVendingCampaign > 0 Then + Var ECommerceQR = ECommerceQR + Seeker.VendingCode + Var ECommerceQR = ECommerceQR + ":" + Var ECommerceQR = ECommerceQR + Seeker.CodeNumber + Var ECommerceQR = ECommerceQR + ":" + Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3 + EndIf Var ServiceParameter = "max" @@ -1180,13 +1173,13 @@ Var ECommerceQR = ECommerceQR + "/" Var ECommerceQR = ECommerceQR + "ACU:2/" - ;If Seeker.IntVendingCampaign > 0 Then - ; Var ECommerceQR = ECommerceQR + Seeker.VendingCode - ; Var ECommerceQR = ECommerceQR + ":" - ; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber - ; Var ECommerceQR = ECommerceQR + ":" - ; Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3 - ;EndIf + If Seeker.IntVendingCampaign > 0 Then + Var ECommerceQR = ECommerceQR + Seeker.VendingCode + Var ECommerceQR = ECommerceQR + ":" + Var ECommerceQR = ECommerceQR + Seeker.CodeNumber + Var ECommerceQR = ECommerceQR + ":" + Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3 + EndIf Var ServiceParameter = "max" diff --git a/xml/page_payment_cashOther.xml b/xml/page_payment_cashOther.xml index d7d94559..1499434b 100644 --- a/xml/page_payment_cashOther.xml +++ b/xml/page_payment_cashOther.xml @@ -57,24 +57,71 @@ EndIf - Var WalletEnable = "Enable" - If Seeker.IntVendingCampaign > 0 Then - DEBUGVAR "Discount Disable Wallet" - Var WalletEnable = "Disable" - EndIf - Var SendDiscountCampaign = 0 - ;If Seeker.IntVendingCampaign > 0 Then - ; SAVELOG "Have discount enable send discount campaign" - ; Var SendDiscountCampaign = 1 - ;EndIf - - If From15THBPro = 1 Then - DEBUGVAR "Discount Disable Wallet" - Var WalletEnable = "Disable" + If Seeker.IntVendingCampaign > 0 Then + SAVELOG "Have discount enable send discount campaign" + Var SendDiscountCampaign = 1 EndIf + Var TWN_CashOtherButtonState = "Disable" + Var KBA_CashOtherButtonState = "Disable" + Var LPY_CashOtherButtonState = "Disable" + Var AIR_CashOtherButtonState = "Disable" + Var MAX_CashOtherButtonState = "Disable" + Var WEC_CashOtherButtonState = "Disable" + Var ALP_CashOtherButtonState = "Disable" + Var UNP_CashOtherButtonState = "Disable" + Var ACU_CashOtherButtonState = "Disable" + + If EnableCashOtherAll = "true" Then + Var TWN_CashOtherButtonState = "Enable" + Var KBA_CashOtherButtonState = "Enable" + Var LPY_CashOtherButtonState = "Enable" + Var AIR_CashOtherButtonState = "Enable" + Var MAX_CashOtherButtonState = "Enable" + Var WEC_CashOtherButtonState = "Enable" + Var ALP_CashOtherButtonState = "Enable" + Var UNP_CashOtherButtonState = "Enable" + Var ACU_CashOtherButtonState = "Enable" + EndIf + + If TWN_CashOtherEnable = "true" Then + Var TWN_CashOtherButtonState = "Enable" + EndIf + + If KBA_CashOtherEnable = "true" Then + Var KBA_CashOtherButtonState = "Enable" + EndIf + + If LPY_CashOtherEnable = "true" Then + Var LPY_CashOtherButtonState = "Enable" + EndIf + + If AIR_CashOtherEnable = "true" Then + Var AIR_CashOtherButtonState = "Enable" + EndIf + + If MAX_CashOtherEnable = "true" Then + Var MAX_CashOtherButtonState = "Enable" + EndIf + + If WEC_CashOtherEnable = "true" Then + Var WEC_CashOtherButtonState = "Enable" + EndIf + + If ALP_CashOtherEnable = "true" Then + Var ALP_CashOtherButtonState = "Enable" + EndIf + + If UNP_CashOtherEnable = "true" Then + Var UNP_CashOtherButtonState = "Enable" + EndIf + + If ACU_CashOtherEnable = "true" Then + Var ACU_CashOtherButtonState = "Enable" + EndIf + ;Var InvisibleCCard = "Invisible" @@ -175,7 +222,7 @@