fix image linepay and fix creditcard

This commit is contained in:
pichet 2022-11-01 17:33:29 +07:00
parent bd1e48627d
commit 943f8ef112
11 changed files with 24 additions and 42 deletions

Binary file not shown.

Before

Width:  |  Height:  |  Size: 3 KiB

After

Width:  |  Height:  |  Size: 3.4 KiB

Before After
Before After

Binary file not shown.

Before

Width:  |  Height:  |  Size: 4.2 KiB

After

Width:  |  Height:  |  Size: 4.8 KiB

Before After
Before After

Binary file not shown.

Before

Width:  |  Height:  |  Size: 4.3 KiB

After

Width:  |  Height:  |  Size: 4.6 KiB

Before After
Before After

Binary file not shown.

Before

Width:  |  Height:  |  Size: 3 KiB

After

Width:  |  Height:  |  Size: 3.4 KiB

Before After
Before After

Binary file not shown.

Before

Width:  |  Height:  |  Size: 4.2 KiB

After

Width:  |  Height:  |  Size: 4.8 KiB

Before After
Before After

Binary file not shown.

Before

Width:  |  Height:  |  Size: 4.3 KiB

After

Width:  |  Height:  |  Size: 4.6 KiB

Before After
Before After

View file

@ -792,26 +792,16 @@
Var SessionID2 = SessionID2 + Seeker.CodeNumber Var SessionID2 = SessionID2 + Seeker.CodeNumber
Var SessionID2 = SessionID2 + "/" Var SessionID2 = SessionID2 + "/"
If Seeker.CreditCard = 1 Then
CashlessReq SUCCESS
;CashlessReq FAIL
EndIf
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
Else Else
If Seeker.CodeChannel = 2 Then
Var SessionID2 = SessionID2 + "/"
Var SessionID2 = SessionID2 + ""
Var SessionID2 = SessionID2 + "/"
Var SessionID2 = SessionID2 + Seeker.VendingCode
Var SessionID2 = SessionID2 + "/"
Var SessionID2 = SessionID2 + SelectDrink
Var SessionID2 = SessionID2 + "/"
Var SessionID2 = SessionID2 + BoxID
Var SessionID2 = SessionID2 + "/"
Var SessionID2 = SessionID2 + "S"
Var SessionID2 = SessionID2 + "/"
Var SessionID2 = SessionID2 + Seeker.CodeNumber
Var SessionID2 = SessionID2 + "/"
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
Else
If Seeker.CreditCard = 1 Then If Seeker.CreditCard = 1 Then
CashlessReq SUCCESS CashlessReq SUCCESS
@ -820,7 +810,7 @@
EndIf EndIf
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
EndIf
EndIf EndIf

View file

@ -620,25 +620,16 @@
Var SessionID2 = SessionID2 + Seeker.CodeNumber Var SessionID2 = SessionID2 + Seeker.CodeNumber
Var SessionID2 = SessionID2 + "/" Var SessionID2 = SessionID2 + "/"
If Seeker.CreditCard = 1 Then
CashlessReq SUCCESS
;CashlessReq FAIL
EndIf
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
Else Else
If Seeker.CodeChannel = 2 Then
Var SessionID2 = SessionID2 + "/"
Var SessionID2 = SessionID2 + ""
Var SessionID2 = SessionID2 + "/"
Var SessionID2 = SessionID2 + Seeker.VendingCode
Var SessionID2 = SessionID2 + "/"
Var SessionID2 = SessionID2 + SelectDrink
Var SessionID2 = SessionID2 + "/"
Var SessionID2 = SessionID2 + BoxID
Var SessionID2 = SessionID2 + "/"
Var SessionID2 = SessionID2 + "S"
Var SessionID2 = SessionID2 + "/"
Var SessionID2 = SessionID2 + Seeker.CodeNumber
Var SessionID2 = SessionID2 + "/"
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
Else
If Seeker.CreditCard = 1 Then If Seeker.CreditCard = 1 Then
@ -649,7 +640,7 @@
EndIf EndIf
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
EndIf
EndIf EndIf

View file

@ -21,14 +21,15 @@
Var Seeker.TaobinErrorNetwork = 0 Var Seeker.TaobinErrorNetwork = 0
If show_eng = "true" Then If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/collectiing_en"
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2_eng.png" Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2_eng.png"
Else Else
Var DirImage = "ROOT/taobin_project/image/collectiing"
Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2.png" Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2.png"
EndIf EndIf
@ -230,7 +231,7 @@
<Image> <Image>
<X> 178 </X> <X> 178 </X>
<Y> 680 </Y> <Y> 680 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/text20.png" </Filename> <Filename> Var( DirImage + "/text20.png" ) </Filename>
</Image> </Image>

View file

@ -18,7 +18,7 @@
Var QRChannel = 0 Var QRChannel = 0
;Var PriceDrink = 1 Var PriceDrink = 2
Var DiscountDrink = 0 Var DiscountDrink = 0
Var SelectSlot = "1" Var SelectSlot = "1"

View file

@ -981,7 +981,7 @@
Var QR_POPUP = "/img_popup8-2.png" Var QR_POPUP = "/img_popup8-2.png"
Var VendingCashless = "-" Var VendingCashless = "-"
Var LOADING_STATE = "Enable" Var LOADING_STATE = "Enable"
CashlessPay PriceDrink CreditCardRef CashlessPay RemainAmount CreditCardRef
Var CashlessPayFlag = 1 Var CashlessPayFlag = 1
EndIf EndIf