THAI: Update Payment cash other now can control enable button
This commit is contained in:
parent
207100665f
commit
25e4feb230
3 changed files with 178 additions and 105 deletions
|
|
@ -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"
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue