This commit is contained in:
miggaze 2023-06-30 13:26:12 +07:00
parent 68230a7720
commit 3598a24eec
18 changed files with 85 additions and 14 deletions

Binary file not shown.

After

Width:  |  Height:  |  Size: 3.6 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 6.1 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 4.9 KiB

View file

@ -178,6 +178,19 @@
DEBUGVAR Seeker.PointTaobinStr
DEBUGVAR Seeker.TNumberTaobinMember
If TaobinPDPA = 0 Then
If CountryName = "Malaysia" Then
Open "ROOT/taobin_project/xml/page_collect_point_3.xml"
EndIf
If CountryName = "Indonesia" Then
Open "ROOT/taobin_project/xml/page_collect_point_3.xml"
EndIf
If CountryName = "Australia" Then
Open "ROOT/taobin_project/xml/page_collect_point_3.xml"
EndIf
Open "ROOT/taobin_project/xml/page_show_consent.xml"
EndIf

View file

@ -227,8 +227,8 @@
<Button>
<X> 441 </X>
<Y> 741 </Y>
<X> 440 </X>
<Y> 965 </Y>
<State> WalletEnable </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_shoppy.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_pay_with_shoppy.png" </FilenamePress>
@ -293,17 +293,19 @@
<Button>
<X> 208 </X>
<Y> 1189 </Y>
<X> 441 </X>
<Y> 741 </Y>
<State> WalletEnable </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_dolfin.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_pay_with_dolfin.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/collectiing/bd_pay_with_dolfin.png" </FilenameDisable>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_paotang.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_pay_with_paotang.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/collectiing/bd_pay_with_paotang.png" </FilenameDisable>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var QR_POPUP = "/img_popup5.png"
Var QR_POPUP = "/img_popup1.png"
Var LOADING_STATE = "Enable"
Var QRCODE99 = ""
@ -330,7 +332,7 @@
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + SelectDrink
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + "DOL:2/"
Var ECommerceQR = ECommerceQR + "KBA:2/"
;If IntVendingCampaign > 0 Then
; Var ECommerceQR = ECommerceQR + Seeker.VendingCode
@ -350,7 +352,7 @@
Var SessionID = ""
GetPayInfo TelephoneNumberQR ECommerceQR ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
Var ReqPayInfoFlag = 4
Var ReqPayInfoFlag = 1
Var ReqPayInfoFromCashOther = 1
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
@ -455,8 +457,10 @@
</Button>
<Button>
<X> 440 </X>
<Y> 965 </Y>
<X> 675 </X>
<Y> 741 </Y>
<State> WalletEnable </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_lazpay.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_pay_with_lazpay.png" </FilenamePress>
@ -585,8 +589,10 @@
</Button>
<Button>
<X> 675 </X>
<Y> 741 </Y>
<X> 208 </X>
<Y> 1189 </Y>
<State> WalletEnable </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_wechat.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_pay_with_wechat.png" </FilenamePress>

View file

@ -791,6 +791,10 @@
Var ECommerce = ECommerce + "/"
Var ECommerce = ECommerce + Seeker.CodeNumber
Var ECommerce = ECommerce + ":"
Var ECommerce = ECommerce + PromotionIDCurrentOrder
Var ServiceParameter = "max"
Var ServiceCharge = 0
Var AccountType = "new"

View file

@ -595,6 +595,10 @@
Var ECommerce = ECommerce + "/"
Var ECommerce = ECommerce + Seeker.CodeNumber
Var ECommerce = ECommerce + ":"
Var ECommerce = ECommerce + PromotionIDCurrentOrder
Var ServiceParameter = "max"
Var ServiceCharge = 0
Var AccountType = "new"

View file

@ -598,6 +598,10 @@
Var ECommerce = ECommerce + "/"
Var ECommerce = ECommerce + Seeker.CodeNumber
Var ECommerce = ECommerce + ":"
Var ECommerce = ECommerce + PromotionIDCurrentOrder
Var ServiceParameter = "max"
Var ServiceCharge = 0
Var AccountType = "new"

View file

@ -598,6 +598,10 @@
Var ECommerce = ECommerce + "/"
Var ECommerce = ECommerce + Seeker.CodeNumber
Var ECommerce = ECommerce + ":"
Var ECommerce = ECommerce + PromotionIDCurrentOrder
Var ServiceParameter = "max"
Var ServiceCharge = 0
Var AccountType = "new"

View file

@ -598,6 +598,10 @@
Var ECommerce = ECommerce + "/"
Var ECommerce = ECommerce + Seeker.CodeNumber
Var ECommerce = ECommerce + ":"
Var ECommerce = ECommerce + PromotionIDCurrentOrder
Var ServiceParameter = "max"
Var ServiceCharge = 0
Var AccountType = "new"

View file

@ -595,6 +595,10 @@
Var ECommerce = ECommerce + "/"
Var ECommerce = ECommerce + Seeker.CodeNumber
Var ECommerce = ECommerce + ":"
Var ECommerce = ECommerce + PromotionIDCurrentOrder
Var ServiceParameter = "max"
Var ServiceCharge = 0
Var AccountType = "new"

View file

@ -595,6 +595,10 @@
Var ECommerce = ECommerce + "/"
Var ECommerce = ECommerce + Seeker.CodeNumber
Var ECommerce = ECommerce + ":"
Var ECommerce = ECommerce + PromotionIDCurrentOrder
Var ServiceParameter = "max"
Var ServiceCharge = 0
Var AccountType = "new"

View file

@ -598,6 +598,10 @@
Var ECommerce = ECommerce + "/"
Var ECommerce = ECommerce + Seeker.CodeNumber
Var ECommerce = ECommerce + ":"
Var ECommerce = ECommerce + PromotionIDCurrentOrder
Var ServiceParameter = "max"
Var ServiceCharge = 0
Var AccountType = "new"

View file

@ -598,6 +598,10 @@
Var ECommerce = ECommerce + "/"
Var ECommerce = ECommerce + Seeker.CodeNumber
Var ECommerce = ECommerce + ":"
Var ECommerce = ECommerce + PromotionIDCurrentOrder
Var ServiceParameter = "max"
Var ServiceCharge = 0
Var AccountType = "new"

View file

@ -598,6 +598,10 @@
Var ECommerce = ECommerce + "/"
Var ECommerce = ECommerce + Seeker.CodeNumber
Var ECommerce = ECommerce + ":"
Var ECommerce = ECommerce + PromotionIDCurrentOrder
Var ServiceParameter = "max"
Var ServiceCharge = 0
Var AccountType = "new"

View file

@ -598,6 +598,10 @@
Var ECommerce = ECommerce + "/"
Var ECommerce = ECommerce + Seeker.CodeNumber
Var ECommerce = ECommerce + ":"
Var ECommerce = ECommerce + PromotionIDCurrentOrder
Var ServiceParameter = "max"
Var ServiceCharge = 0
Var AccountType = "new"

View file

@ -598,6 +598,10 @@
Var ECommerce = ECommerce + "/"
Var ECommerce = ECommerce + Seeker.CodeNumber
Var ECommerce = ECommerce + ":"
Var ECommerce = ECommerce + PromotionIDCurrentOrder
Var ServiceParameter = "max"
Var ServiceCharge = 0
Var AccountType = "new"

View file

@ -598,6 +598,10 @@
Var ECommerce = ECommerce + "/"
Var ECommerce = ECommerce + Seeker.CodeNumber
Var ECommerce = ECommerce + ":"
Var ECommerce = ECommerce + PromotionIDCurrentOrder
Var ServiceParameter = "max"
Var ServiceCharge = 0
Var AccountType = "new"