THAI: PaymentCode move actionOk to EventTimeout
This commit is contained in:
parent
d9da7fee97
commit
8dbb50cd0f
1 changed files with 262 additions and 275 deletions
|
|
@ -10,6 +10,7 @@
|
|||
<EventOpen>
|
||||
; On open
|
||||
Var ECommerce = ""
|
||||
Var CodeActionOK = 0
|
||||
Var Seeker.FreeVendingCampaign = 0
|
||||
|
||||
Var Timeout = 0
|
||||
|
|
@ -56,7 +57,7 @@
|
|||
Var DirImage = "ROOT/taobin_project/image/collectiing_msc/"
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
|
||||
|
||||
If web_readyOK = "true" Then
|
||||
Var web_readyOK = "false"
|
||||
|
|
@ -159,6 +160,261 @@
|
|||
Refresh
|
||||
EndIf
|
||||
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
If CodeActionOK = 1 Then
|
||||
|
||||
DEBUGVAR CodeActionOK
|
||||
DEBUGVAR ECommerce
|
||||
|
||||
If ECommerce = "" Then
|
||||
|
||||
Else
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
SPLIT ECommerce "/" 5 Seeker.VendingCode
|
||||
SPLIT ECommerce "/" 7 Seeker.VendingCampaignRI3
|
||||
SPLIT ECommerce "/" 8 VendingCampaign1
|
||||
SPLIT ECommerce "/" 9 ShouldCollectPoint
|
||||
SPLIT ECommerce "/" 10 PaymentButtonControl
|
||||
|
||||
DEBUGVAR PaymentButtonControl
|
||||
|
||||
If PaymentButtonControl = "" Then
|
||||
Var PaymentEnableAll = "true"
|
||||
Else
|
||||
If PaymentButtonControl = "*" Then
|
||||
Var PaymentEnableAll = "true"
|
||||
Else
|
||||
Var PaymentEnableAll = "false"
|
||||
STRCONTAIN "TWN" PaymentButtonControl TWN_CashOtherEnable
|
||||
STRCONTAIN "KBA" PaymentButtonControl KBA_CashOtherEnable
|
||||
STRCONTAIN "LPY" PaymentButtonControl LPY_CashOtherEnable
|
||||
STRCONTAIN "AIR" PaymentButtonControl AIR_CashOtherEnable
|
||||
STRCONTAIN "MAX" PaymentButtonControl MAX_CashOtherEnable
|
||||
STRCONTAIN "WEC" PaymentButtonControl WEC_CashOtherEnable
|
||||
STRCONTAIN "ALP" PaymentButtonControl ALP_CashOtherEnable
|
||||
STRCONTAIN "UNP" PaymentButtonControl UNP_CashOtherEnable
|
||||
STRCONTAIN "ACU" PaymentButtonControl ACU_CashOtherEnable
|
||||
STRCONTAIN "TAO" PaymentButtonControl TAO_CreditEnable
|
||||
STRCONTAIN "CSH" PaymentButtonControl CSH_CashEnable
|
||||
STRCONTAIN "CRD" PaymentButtonControl CRD_CreditCardEnable
|
||||
|
||||
If CSH_CashEnable = "true" Then
|
||||
|
||||
Else
|
||||
CoinVending OFF
|
||||
Var CPD_CouponCodeEnable = "true"
|
||||
EndIf
|
||||
|
||||
If TWN_CashOtherEnable = "true" Then
|
||||
Var E_WalletEnable = "true"
|
||||
EndIf
|
||||
|
||||
If KBA_CashOtherEnable = "true" Then
|
||||
Var E_WalletEnable = "true"
|
||||
EndIf
|
||||
|
||||
If LPY_CashOtherEnable = "true" Then
|
||||
Var E_WalletEnable = "true"
|
||||
EndIf
|
||||
|
||||
If AIR_CashOtherEnable = "true" Then
|
||||
Var E_WalletEnable = "true"
|
||||
EndIf
|
||||
|
||||
If MAX_CashOtherEnable = "true" Then
|
||||
Var E_WalletEnable = "true"
|
||||
EndIf
|
||||
|
||||
If WEC_CashOtherEnable = "true" Then
|
||||
Var E_WalletEnable = "true"
|
||||
EndIf
|
||||
|
||||
If ALP_CashOtherEnable = "true" Then
|
||||
Var E_WalletEnable = "true"
|
||||
EndIf
|
||||
|
||||
If UNP_CashOtherEnable = "true" Then
|
||||
Var E_WalletEnable = "true"
|
||||
EndIf
|
||||
|
||||
If ACU_CashOtherEnable = "true" Then
|
||||
Var E_WalletEnable = "true"
|
||||
EndIf
|
||||
|
||||
|
||||
DEBUGVAR CSH_CashEnable
|
||||
DEBUGVAR TAO_CreditEnable
|
||||
DEBUGVAR CPD_CouponCodeEnable
|
||||
DEBUGVAR CRD_CreditCardEnable
|
||||
DEBUGVAR E_WalletEnable
|
||||
DEBUGVAR TWN_CashOtherEnable
|
||||
DEBUGVAR KBA_CashOtherEnable
|
||||
DEBUGVAR LPY_CashOtherEnable
|
||||
DEBUGVAR AIR_CashOtherEnable
|
||||
DEBUGVAR MAX_CashOtherEnable
|
||||
DEBUGVAR WEC_CashOtherEnable
|
||||
DEBUGVAR ALP_CashOtherEnable
|
||||
DEBUGVAR UNP_CashOtherEnable
|
||||
DEBUGVAR ACU_CashOtherEnable
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
|
||||
If Seeker.VendingCode = "" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "KBA:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "AIR:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "TWN:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
SAVELOG Seeker.VendingCode
|
||||
SAVELOG Seeker.VendingCampaignRI3
|
||||
|
||||
SAVELOG ShouldCollectPoint
|
||||
INT ShouldCollectPoint
|
||||
|
||||
If Seeker.VendingCode = "C00" Then
|
||||
|
||||
Else
|
||||
Var VendingCreditRemain = ""
|
||||
|
||||
If VendingCampaign1 = "" Then
|
||||
Var IntVendingCampaign1 = -1
|
||||
Else
|
||||
Var IntVendingCampaign1 = VendingCampaign1
|
||||
INT IntVendingCampaign1
|
||||
|
||||
If IntVendingCampaign1 > 0 Then
|
||||
Var VendingCreditRemain = VendingCampaign1
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
|
||||
|
||||
|
||||
Var Seeker.IntVendingCampaign = Seeker.VendingCampaignRI3
|
||||
INT Seeker.IntVendingCampaign
|
||||
|
||||
Var VendingREFID = SessionID
|
||||
|
||||
|
||||
DEBUGVAR IntVendingCampaign1
|
||||
DEBUGVAR PayAmount
|
||||
DEBUGVAR Seeker.IntVendingCampaign
|
||||
|
||||
If Seeker.IntVendingCampaign > 0 Then
|
||||
Var QRChannel = 0
|
||||
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
|
||||
If ShouldCollectPoint = 1 Then
|
||||
Var Seeker.CollectPointMain = 1
|
||||
|
||||
If PaymentCodeShouldCollectPromotionPoint = 1 Then
|
||||
Var Seeker.CollectPointPromotion = 1
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
TRY "ROOT/taobin_project/xml/event/collect_promotion_point_condition.ev"
|
||||
|
||||
|
||||
;Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
Var Seeker.VendingCampaign = PayAmount
|
||||
Var Seeker.FreeVendingCampaign = 1
|
||||
CoinVending OFF
|
||||
;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif"
|
||||
If CART_COUNT >= 1 Then
|
||||
|
||||
Cart "PreparID" 1
|
||||
Var CART_INDEX = 1
|
||||
Var PayReference = ""
|
||||
GenHashWithTimeStamp PayReference
|
||||
Cart "MakeID" CART_INDEX
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Else
|
||||
Var CART_INDEX = 0
|
||||
|
||||
;include="ROOT/taobin_project/xml/sometime/make_drink.xml"
|
||||
EndIf
|
||||
Else
|
||||
If ShouldCollectPoint = 1 Then
|
||||
Var Seeker.CollectPointMain = 1
|
||||
EndIf
|
||||
|
||||
If PaymentCodeShouldCollectPromotionPoint = 1 Then
|
||||
Var Seeker.CollectPointPromotion = 1
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
;Var SessionID2 = SelectSlot + ":"
|
||||
;Var SessionID2 = SessionID2 + Seeker.ExtendData
|
||||
|
||||
;Var CreditAmount1 = ""
|
||||
;Var ServiceAmountFlow = ""
|
||||
;Var TelephoneNumber2 = "0899999999"
|
||||
;Var ServiceType = "coffee"
|
||||
;Var ECommerce = ""
|
||||
;Var ECommerce = ECommerce + PriceDrink
|
||||
;Var ECommerce = ECommerce + "/"
|
||||
;Var ECommerce = ECommerce + DiscountDrink
|
||||
;Var ECommerce = ECommerce + "/"
|
||||
;Var ECommerce = ECommerce + SessionID2
|
||||
;Var ECommerce = ECommerce + "/"
|
||||
;Var ECommerce = ECommerce + SelectDrink
|
||||
;Var ECommerce = ECommerce + "/"
|
||||
;Var ECommerce = ECommerce + "KBA:2/"
|
||||
;Var ECommerce = ECommerce + Seeker.VendingCode
|
||||
;Var ECommerce = ECommerce + ":"
|
||||
;Var ECommerce = ECommerce + Seeker.CodeNumber
|
||||
;Var ECommerce = ECommerce + ":"
|
||||
;Var ECommerce = ECommerce + Seeker.VendingCampaignRI3
|
||||
;Var ServiceParameter = "max"
|
||||
;Var ServiceCharge = 0
|
||||
;Var AccountType = "new"
|
||||
;Var testservice = "kbank"
|
||||
;Var tc = ""
|
||||
;Var GetScore = ""
|
||||
;Var OperatorName = ""
|
||||
;Var SessionID = ""
|
||||
|
||||
|
||||
;GetPayInfo TelephoneNumber2 ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
|
||||
;Var Timeout = 0
|
||||
;Var Seeker.CodeChannel = 2
|
||||
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
Else
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
EndIf
|
||||
Else
|
||||
|
||||
Var ShowErrorText = "Enable"
|
||||
Var text_show_error = DirImage + "/text_show_error.png"
|
||||
Var GetPayInfoFlag = 0
|
||||
Var Seeker.CodeChannel = 0
|
||||
EndIf
|
||||
EndIf
|
||||
EndIf
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
TimerReset
|
||||
</EventTimeout>
|
||||
|
||||
|
|
@ -192,282 +448,12 @@
|
|||
|
||||
<EventActionOk>
|
||||
|
||||
|
||||
If Seeker.CodeChannel = 1 Then
|
||||
|
||||
Var ShowLoadingText = "Invisible"
|
||||
|
||||
SAVELOG "Seeker.CodeChannel 1 > ActOK."
|
||||
Var CodeActionOK = 1
|
||||
EndIf
|
||||
|
||||
|
||||
DEBUGVAR ECommerce
|
||||
SAVELOG ECommerce
|
||||
|
||||
SPLIT ECommerce "/" 5 Seeker.VendingCode
|
||||
SPLIT ECommerce "/" 7 Seeker.VendingCampaignRI3
|
||||
SPLIT ECommerce "/" 8 VendingCampaign1
|
||||
SPLIT ECommerce "/" 9 ShouldCollectPoint
|
||||
SPLIT ECommerce "/" 10 PaymentButtonControl
|
||||
|
||||
DEBUGVAR PaymentButtonControl
|
||||
|
||||
If PaymentButtonControl = "" Then
|
||||
Var PaymentEnableAll = "true"
|
||||
Else
|
||||
If PaymentButtonControl = "*" Then
|
||||
Var PaymentEnableAll = "true"
|
||||
Else
|
||||
Var PaymentEnableAll = "false"
|
||||
STRCONTAIN "TWN" PaymentButtonControl TWN_CashOtherEnable
|
||||
STRCONTAIN "KBA" PaymentButtonControl KBA_CashOtherEnable
|
||||
STRCONTAIN "LPY" PaymentButtonControl LPY_CashOtherEnable
|
||||
STRCONTAIN "AIR" PaymentButtonControl AIR_CashOtherEnable
|
||||
STRCONTAIN "MAX" PaymentButtonControl MAX_CashOtherEnable
|
||||
STRCONTAIN "WEC" PaymentButtonControl WEC_CashOtherEnable
|
||||
STRCONTAIN "ALP" PaymentButtonControl ALP_CashOtherEnable
|
||||
STRCONTAIN "UNP" PaymentButtonControl UNP_CashOtherEnable
|
||||
STRCONTAIN "ACU" PaymentButtonControl ACU_CashOtherEnable
|
||||
STRCONTAIN "TAO" PaymentButtonControl TAO_CreditEnable
|
||||
STRCONTAIN "CSH" PaymentButtonControl CSH_CashEnable
|
||||
STRCONTAIN "CRD" PaymentButtonControl CRD_CreditCardEnable
|
||||
|
||||
If CSH_CashEnable = "true" Then
|
||||
|
||||
Else
|
||||
CoinVending OFF
|
||||
Var CPD_CouponCodeEnable = "true"
|
||||
EndIf
|
||||
|
||||
If TWN_CashOtherEnable = "true" Then
|
||||
Var E_WalletEnable = "true"
|
||||
EndIf
|
||||
|
||||
If KBA_CashOtherEnable = "true" Then
|
||||
Var E_WalletEnable = "true"
|
||||
EndIf
|
||||
|
||||
If LPY_CashOtherEnable = "true" Then
|
||||
Var E_WalletEnable = "true"
|
||||
EndIf
|
||||
|
||||
If AIR_CashOtherEnable = "true" Then
|
||||
Var E_WalletEnable = "true"
|
||||
EndIf
|
||||
|
||||
If MAX_CashOtherEnable = "true" Then
|
||||
Var E_WalletEnable = "true"
|
||||
EndIf
|
||||
|
||||
If WEC_CashOtherEnable = "true" Then
|
||||
Var E_WalletEnable = "true"
|
||||
EndIf
|
||||
|
||||
If ALP_CashOtherEnable = "true" Then
|
||||
Var E_WalletEnable = "true"
|
||||
EndIf
|
||||
|
||||
If UNP_CashOtherEnable = "true" Then
|
||||
Var E_WalletEnable = "true"
|
||||
EndIf
|
||||
|
||||
If ACU_CashOtherEnable = "true" Then
|
||||
Var E_WalletEnable = "true"
|
||||
EndIf
|
||||
|
||||
|
||||
DEBUGVAR CSH_CashEnable
|
||||
DEBUGVAR TAO_CreditEnable
|
||||
DEBUGVAR CPD_CouponCodeEnable
|
||||
DEBUGVAR CRD_CreditCardEnable
|
||||
DEBUGVAR E_WalletEnable
|
||||
DEBUGVAR TWN_CashOtherEnable
|
||||
DEBUGVAR KBA_CashOtherEnable
|
||||
DEBUGVAR LPY_CashOtherEnable
|
||||
DEBUGVAR AIR_CashOtherEnable
|
||||
DEBUGVAR MAX_CashOtherEnable
|
||||
DEBUGVAR WEC_CashOtherEnable
|
||||
DEBUGVAR ALP_CashOtherEnable
|
||||
DEBUGVAR UNP_CashOtherEnable
|
||||
DEBUGVAR ACU_CashOtherEnable
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
|
||||
If Seeker.VendingCode = "" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "KBA:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "AIR:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
If Seeker.VendingCode = "TWN:2" Then
|
||||
Var Seeker.VendingCode = "C00"
|
||||
EndIf
|
||||
|
||||
SAVELOG Seeker.VendingCode
|
||||
SAVELOG Seeker.VendingCampaignRI3
|
||||
|
||||
SAVELOG ShouldCollectPoint
|
||||
INT ShouldCollectPoint
|
||||
|
||||
If Seeker.VendingCode = "C00" Then
|
||||
|
||||
Else
|
||||
Var VendingCreditRemain = ""
|
||||
|
||||
If VendingCampaign1 = "" Then
|
||||
Var IntVendingCampaign1 = -1
|
||||
Else
|
||||
Var IntVendingCampaign1 = VendingCampaign1
|
||||
INT IntVendingCampaign1
|
||||
|
||||
If IntVendingCampaign1 > 0 Then
|
||||
Var VendingCreditRemain = VendingCampaign1
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
|
||||
|
||||
|
||||
Var Seeker.IntVendingCampaign = Seeker.VendingCampaignRI3
|
||||
INT Seeker.IntVendingCampaign
|
||||
|
||||
Var VendingREFID = SessionID
|
||||
|
||||
|
||||
DEBUGVAR IntVendingCampaign1
|
||||
DEBUGVAR PayAmount
|
||||
DEBUGVAR Seeker.IntVendingCampaign
|
||||
|
||||
If Seeker.IntVendingCampaign > 0 Then
|
||||
Var QRChannel = 0
|
||||
|
||||
If Seeker.IntVendingCampaign >= PayAmount Then
|
||||
|
||||
If ShouldCollectPoint = 1 Then
|
||||
Var Seeker.CollectPointMain = 1
|
||||
|
||||
If PaymentCodeShouldCollectPromotionPoint = 1 Then
|
||||
Var Seeker.CollectPointPromotion = 1
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
TRY "ROOT/taobin_project/xml/event/collect_promotion_point_condition.ev"
|
||||
|
||||
|
||||
;Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
Var Seeker.VendingCampaign = PayAmount
|
||||
Var Seeker.FreeVendingCampaign = 1
|
||||
CoinVending OFF
|
||||
;Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif"
|
||||
If CART_COUNT >= 1 Then
|
||||
|
||||
Cart "PreparID" 1
|
||||
Var CART_INDEX = 1
|
||||
Var PayReference = ""
|
||||
GenHashWithTimeStamp PayReference
|
||||
Cart "MakeID" CART_INDEX
|
||||
Open "ROOT/taobin_project/xml/page_thankyou.xml"
|
||||
Else
|
||||
Var CART_INDEX = 0
|
||||
|
||||
;include="ROOT/taobin_project/xml/sometime/make_drink.xml"
|
||||
EndIf
|
||||
Else
|
||||
If ShouldCollectPoint = 1 Then
|
||||
Var Seeker.CollectPointMain = 1
|
||||
EndIf
|
||||
|
||||
If PaymentCodeShouldCollectPromotionPoint = 1 Then
|
||||
Var Seeker.CollectPointPromotion = 1
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
;Var SessionID2 = SelectSlot + ":"
|
||||
;Var SessionID2 = SessionID2 + Seeker.ExtendData
|
||||
|
||||
;Var CreditAmount1 = ""
|
||||
;Var ServiceAmountFlow = ""
|
||||
;Var TelephoneNumber2 = "0899999999"
|
||||
;Var ServiceType = "coffee"
|
||||
;Var ECommerce = ""
|
||||
;Var ECommerce = ECommerce + PriceDrink
|
||||
;Var ECommerce = ECommerce + "/"
|
||||
;Var ECommerce = ECommerce + DiscountDrink
|
||||
;Var ECommerce = ECommerce + "/"
|
||||
;Var ECommerce = ECommerce + SessionID2
|
||||
;Var ECommerce = ECommerce + "/"
|
||||
;Var ECommerce = ECommerce + SelectDrink
|
||||
;Var ECommerce = ECommerce + "/"
|
||||
;Var ECommerce = ECommerce + "KBA:2/"
|
||||
;Var ECommerce = ECommerce + Seeker.VendingCode
|
||||
;Var ECommerce = ECommerce + ":"
|
||||
;Var ECommerce = ECommerce + Seeker.CodeNumber
|
||||
;Var ECommerce = ECommerce + ":"
|
||||
;Var ECommerce = ECommerce + Seeker.VendingCampaignRI3
|
||||
;Var ServiceParameter = "max"
|
||||
;Var ServiceCharge = 0
|
||||
;Var AccountType = "new"
|
||||
;Var testservice = "kbank"
|
||||
;Var tc = ""
|
||||
;Var GetScore = ""
|
||||
;Var OperatorName = ""
|
||||
;Var SessionID = ""
|
||||
|
||||
|
||||
;GetPayInfo TelephoneNumber2 ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
|
||||
;Var Timeout = 0
|
||||
;Var Seeker.CodeChannel = 2
|
||||
|
||||
Var Seeker.CodeChannel = 1
|
||||
|
||||
If CART_COUNT >= 1 Then
|
||||
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
Else
|
||||
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
EndIf
|
||||
|
||||
|
||||
|
||||
Else
|
||||
|
||||
Var ShowErrorText = "Enable"
|
||||
Var text_show_error = DirImage + "/text_show_error.png"
|
||||
Var GetPayInfoFlag = 0
|
||||
Var Seeker.CodeChannel = 0
|
||||
|
||||
EndIf
|
||||
EndIf
|
||||
|
||||
Else
|
||||
|
||||
;SAVELOG "Seeker.CodeChannel 2 > ActOK."
|
||||
;
|
||||
;Var CreditAmount = 0
|
||||
;Var QRCODE99 = SessionID
|
||||
;Var QRCODE99 = QRCODE99 + Ext1a
|
||||
;Var QRCODE99 = QRCODE99 + Ext21
|
||||
;Var QRCODETMP = QRCODE99
|
||||
;Var Seeker.CodeChannel = 1
|
||||
;
|
||||
;If CART_COUNT >= 1 Then
|
||||
; Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
|
||||
;Else
|
||||
; Open "ROOT/taobin_project/xml/page_payment_cash.xml"
|
||||
;EndIf
|
||||
|
||||
|
||||
EndIf
|
||||
|
||||
</EventActionOk>
|
||||
|
||||
<EventActionError>
|
||||
|
|
@ -1063,8 +1049,8 @@
|
|||
Var ECommerce = ECommerce + "/"
|
||||
Var ECommerce = ECommerce + Seeker.CodeNumber
|
||||
|
||||
Var ECommerce = ECommerce + ":"
|
||||
Var ECommerce = ECommerce + PromotionIDCurrentOrder
|
||||
Var ECommerce = ECommerce + ":"
|
||||
Var ECommerce = ECommerce + PromotionIDCurrentOrder
|
||||
|
||||
Var ServiceParameter = "max"
|
||||
Var ServiceCharge = 0
|
||||
|
|
@ -1081,6 +1067,7 @@
|
|||
|
||||
Var TelephoneNumber = Seeker.CodeNumber
|
||||
Var Seeker.CodeChannel = 1
|
||||
Var CodeActionOK = 0
|
||||
|
||||
EndIf
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue