shoppy webapp

This commit is contained in:
miggaze 2021-11-25 15:56:33 +07:00
parent 6bf00e2e26
commit a8de5d11a6
58 changed files with 835 additions and 419 deletions

View file

@ -181,47 +181,45 @@
Var CoffeePinNumber = PinNumber
Var IntVendingCredit = SumCreditAmount
;Var PriceDrinkWithCredit = PriceDrink - SumCreditAmount
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
Var TelephoneNumberQR = "0899999999"
If CART_COUNT >= 1 Then
Var ServiceType = "coffee-multi"
Else
Var ServiceType = "coffee"
EndIf
Var ECommerceQR = ""
Var ECommerceQR = ECommerceQR + PriceDrink
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + DiscountDrink
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + SessionID2
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + SelectDrink
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + "KBA:2/"
Var ECommerceQR = ECommerceQR + "CRD"
Var ECommerceQR = ECommerceQR + ":"
Var ECommerceQR = ECommerceQR + TNumberTaobinCredit
Var ECommerceQR = ECommerceQR + ":"
Var ECommerceQR = ECommerceQR + SumCreditAmount
Var ServiceParameter = "max"
Var ServiceCharge = 0
Var AccountType = "new"
Var testservice = "kbank"
Var tc = ""
Var GetScore = ""
Var OperatorName = ""
Var SessionID = ""
GetPayInfo TelephoneNumberQR ECommerceQR ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
Var QRCODE99 = ""
Var QRCODETMP = ""
Var ReqPayInfoFlag = 1
;Var SessionID2 = SelectSlot + ":"
;Var SessionID2 = SessionID2 + ExtendData
;Var CreditAmount1 = ""
;Var ServiceAmountFlow = ""
;Var TelephoneNumberQR = "0899999999"
;If CART_COUNT >= 1 Then
; Var ServiceType = "coffee-multi"
;Else
; Var ServiceType = "coffee"
;EndIf
;Var ECommerceQR = ""
;Var ECommerceQR = ECommerceQR + PriceDrink
;Var ECommerceQR = ECommerceQR + "/"
;Var ECommerceQR = ECommerceQR + DiscountDrink
;Var ECommerceQR = ECommerceQR + "/"
;Var ECommerceQR = ECommerceQR + SessionID2
;Var ECommerceQR = ECommerceQR + "/"
;Var ECommerceQR = ECommerceQR + SelectDrink
;Var ECommerceQR = ECommerceQR + "/"
;Var ECommerceQR = ECommerceQR + "KBA:2/"
;Var ECommerceQR = ECommerceQR + "CRD"
;Var ECommerceQR = ECommerceQR + ":"
;Var ECommerceQR = ECommerceQR + TNumberTaobinCredit
;Var ECommerceQR = ECommerceQR + ":"
;Var ECommerceQR = ECommerceQR + SumCreditAmount
;Var ServiceParameter = "max"
;Var ServiceCharge = 0
;Var AccountType = "new"
;Var testservice = "kbank"
;Var tc = ""
;Var GetScore = ""
;Var OperatorName = ""
;Var SessionID = ""
;GetPayInfo TelephoneNumberQR ECommerceQR ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
;Var QRCODE99 = ""
;Var QRCODETMP = ""
;
;Var ReqPayInfoFlag = 1