pakin/taobin_project
1
0
Fork 0
Code Issues Pull requests Projects 1 Releases 1 Packages Wiki Activity Actions

new payment

Browse source
This commit is contained in:
miggaze 2024-07-01 16:09:38 +07:00
parent e57b8cedf0
commit 1301258344
26 changed files with 43 additions and 42 deletions
Download patch file Download diff file Expand all files Collapse all files

2
xml/page_NewBrewing3.xml
View file

@ -6,7 +6,7 @@
<Volume> SoundVolume </Volume>
<EventOpen>
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/process/payext_setup.ev"
Var SendNotiPaySuccess = 2

1
xml/page_payment.xml
View file

@ -462,6 +462,7 @@
__CMD "CLEAR_TIME_BLINK_DISPLAY" 0 "-" "-"
;new payment coffee-payment
Var New_Payment = 1
If New_Payment = 1 Then
Var Seeker.ORDER_ID = ""
GenHashWithTimeStamp Seeker.ORDER_ID

16
xml/page_payment_cash.xml
View file

@ -367,7 +367,7 @@
CoinVending OFF
If Seeker = "curr" Then
__CMD "SetPay" "Coffee" Seeker.VendingTSID Seeker.ORDER_ID
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
MakeDrinkV1 SelectDrink SelectSugarID
Var TxRef1 = ""
CreateTxRef1 TxRef1
@ -390,7 +390,7 @@
CoinVending OFF
If Seeker = "curr" Then
__CMD "SetPay" "Coffee" Seeker.VendingTSID Seeker.ORDER_ID
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
MakeDrinkV1 SelectDrink SelectSugarID
Var TxRef1 = ""
CreateTxRef1 TxRef1
@ -1129,14 +1129,16 @@
Var Seeker.PayWithQR = 1
Var Seeker.VendingTSID = VendingTSID
If Seeker = "curr" Then
__CMD "SetPay" "Coffee" Seeker.VendingTSID Seeker.ORDER_ID
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
MakeDrinkV1 SelectDrink SelectSugarID
;Var TxRef1 = ""
;CreateTxRef1 TxRef1
EndIf
Var Seeker.PayWithQR = 1
Var Seeker.VendingTSID = VendingTSID
Var GIFShowProcess = "ROOT/ui/page_05_loading/pic_loading_cup.gif"
@ -1629,7 +1631,7 @@
Refresh
If Seeker = "curr" Then
__CMD "SetPay" "Coffee" Seeker.VendingTSID Seeker.ORDER_ID
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
MakeDrinkV1 SelectDrink SelectSugarID
EndIf
Var Seeker.CreditCard = 1
@ -1853,7 +1855,7 @@
If Seeker = "curr" Then
__CMD "SetPay" "Coffee" Seeker.VendingTSID Seeker.ORDER_ID
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
MakeDrinkV1 SelectDrink SelectSugarID
Var TxRef1 = ""
CreateTxRef1 TxRef1

2
xml/page_payment_code.xml
View file

@ -255,7 +255,7 @@
Var CART_INDEX = 0
If Seeker = "curr" Then
__CMD "SetPay" "Coffee" Seeker.VendingTSID Seeker.ORDER_ID
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
MakeDrinkV1 SelectDrink SelectSugarID
Var TxRef1 = ""
CreateTxRef1 TxRef1

2
xml/page_payment_codeAEON.xml
View file

@ -140,7 +140,7 @@
Var CART_INDEX = 0
If Seeker = "curr" Then
__CMD "SetPay" "Coffee" Seeker.VendingTSID Seeker.ORDER_ID
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
MakeDrinkV1 SelectDrink SelectSugarID
Var TxRef1 = ""
CreateTxRef1 TxRef1

2
xml/page_payment_codeAIS.xml
View file

@ -140,7 +140,7 @@
Var CART_INDEX = 0
If Seeker = "curr" Then
__CMD "SetPay" "Coffee" Seeker.VendingTSID Seeker.ORDER_ID
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
MakeDrinkV1 SelectDrink SelectSugarID
Var TxRef1 = ""
CreateTxRef1 TxRef1

2
xml/page_payment_codeDtac.xml
View file

@ -140,7 +140,7 @@
Var CART_INDEX = 0
If Seeker = "curr" Then
__CMD "SetPay" "Coffee" Seeker.VendingTSID Seeker.ORDER_ID
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
MakeDrinkV1 SelectDrink SelectSugarID
Var TxRef1 = ""
CreateTxRef1 TxRef1

2
xml/page_payment_codeGLX.xml
View file

@ -140,7 +140,7 @@
Var CART_INDEX = 0
If Seeker = "curr" Then
__CMD "SetPay" "Coffee" Seeker.VendingTSID Seeker.ORDER_ID
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
MakeDrinkV1 SelectDrink SelectSugarID
Var TxRef1 = ""
CreateTxRef1 TxRef1

2
xml/page_payment_codeGrab.xml
View file

@ -140,7 +140,7 @@
Var CART_INDEX = 0
If Seeker = "curr" Then
__CMD "SetPay" "Coffee" Seeker.VendingTSID Seeker.ORDER_ID
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
MakeDrinkV1 SelectDrink SelectSugarID
Var TxRef1 = ""
CreateTxRef1 TxRef1

2
xml/page_payment_codeInfinyx.xml
View file

@ -140,7 +140,7 @@
Var CART_INDEX = 0
If Seeker = "curr" Then
__CMD "SetPay" "Coffee" Seeker.VendingTSID Seeker.ORDER_ID
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
MakeDrinkV1 SelectDrink SelectSugarID
Var TxRef1 = ""
CreateTxRef1 TxRef1

2
xml/page_payment_codeKBANK.xml
View file

@ -140,7 +140,7 @@
Var CART_INDEX = 0
If Seeker = "curr" Then
__CMD "SetPay" "Coffee" Seeker.VendingTSID Seeker.ORDER_ID
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
MakeDrinkV1 SelectDrink SelectSugarID
Var TxRef1 = ""
CreateTxRef1 TxRef1

2
xml/page_payment_codeLH.xml
View file

@ -140,7 +140,7 @@
Var CART_INDEX = 0
If Seeker = "curr" Then
__CMD "SetPay" "Coffee" Seeker.VendingTSID Seeker.ORDER_ID
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
MakeDrinkV1 SelectDrink SelectSugarID
Var TxRef1 = ""
CreateTxRef1 TxRef1

2
xml/page_payment_codeLotus.xml
View file

@ -140,7 +140,7 @@
Var CART_INDEX = 0
If Seeker = "curr" Then
__CMD "SetPay" "Coffee" Seeker.VendingTSID Seeker.ORDER_ID
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
MakeDrinkV1 SelectDrink SelectSugarID
Var TxRef1 = ""
CreateTxRef1 TxRef1

2
xml/page_payment_codeMCard.xml
View file

@ -140,7 +140,7 @@
Var CART_INDEX = 0
If Seeker = "curr" Then
__CMD "SetPay" "Coffee" Seeker.VendingTSID Seeker.ORDER_ID
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
MakeDrinkV1 SelectDrink SelectSugarID
Var TxRef1 = ""
CreateTxRef1 TxRef1

2
xml/page_payment_codeRabbit.xml
View file

@ -140,7 +140,7 @@
Var CART_INDEX = 0
If Seeker = "curr" Then
__CMD "SetPay" "Coffee" Seeker.VendingTSID Seeker.ORDER_ID
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
MakeDrinkV1 SelectDrink SelectSugarID
Var TxRef1 = ""
CreateTxRef1 TxRef1

2
xml/page_payment_codeSCG.xml
View file

@ -140,7 +140,7 @@
Var CART_INDEX = 0
If Seeker = "curr" Then
__CMD "SetPay" "Coffee" Seeker.VendingTSID Seeker.ORDER_ID
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
MakeDrinkV1 SelectDrink SelectSugarID
Var TxRef1 = ""
CreateTxRef1 TxRef1

2
xml/page_payment_codeThe1.xml
View file

@ -140,7 +140,7 @@
Var CART_INDEX = 0
If Seeker = "curr" Then
__CMD "SetPay" "Coffee" Seeker.VendingTSID Seeker.ORDER_ID
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
MakeDrinkV1 SelectDrink SelectSugarID
Var TxRef1 = ""
CreateTxRef1 TxRef1

2
xml/page_payment_codeTrue.xml
View file

@ -140,7 +140,7 @@
Var CART_INDEX = 0
If Seeker = "curr" Then
__CMD "SetPay" "Coffee" Seeker.VendingTSID Seeker.ORDER_ID
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
MakeDrinkV1 SelectDrink SelectSugarID
Var TxRef1 = ""
CreateTxRef1 TxRef1

2
xml/page_payment_credit2.xml
View file

@ -197,7 +197,7 @@
Var CART_INDEX = 0
If Seeker = "curr" Then
__CMD "SetPay" "Coffee" Seeker.VendingTSID Seeker.ORDER_ID
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
MakeDrinkV1 SelectDrink SelectSugarID
Var TxRef1 = ""
CreateTxRef1 TxRef1

2
xml/page_payment_credit3-0.xml
View file

@ -111,7 +111,7 @@
Var CART_INDEX = 0
If Seeker = "curr" Then
__CMD "SetPay" "Coffee" Seeker.VendingTSID Seeker.ORDER_ID
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
MakeDrinkV1 SelectDrink SelectSugarID
Var TxRef1 = ""
CreateTxRef1 TxRef1

2
xml/page_payment_credit3-TopupSuccess.xml
View file

@ -81,7 +81,7 @@
If Seeker = "curr" Then
DEBUGVAR "MakeDrinkV1"
__CMD "SetPay" "Coffee" Seeker.VendingTSID Seeker.ORDER_ID
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
MakeDrinkV1 SelectDrink SelectSugarID
Var TxRef1 = ""
CreateTxRef1 TxRef1

2
xml/page_payment_credit3.xml
View file

@ -190,7 +190,7 @@
Var CART_INDEX = 0
If Seeker = "curr" Then
__CMD "SetPay" "Coffee" Seeker.VendingTSID Seeker.ORDER_ID
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
MakeDrinkV1 SelectDrink SelectSugarID
Var TxRef1 = ""

2
xml/page_payment_storeCredit3.xml
View file

@ -93,7 +93,7 @@
Var CART_INDEX = 0
If Seeker = "curr" Then
__CMD "SetPay" "Coffee" Seeker.VendingTSID Seeker.ORDER_ID
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
MakeDrinkV1 SelectDrink SelectSugarID
Var TxRef1 = ""
CreateTxRef1 TxRef1

2
xml/page_thankyouConti.xml
View file

@ -309,7 +309,7 @@
Else
Var LastMakeDrinkResult = "-"
__CMD "SetPay" "Coffee" Seeker.VendingTSID Seeker.ORDER_ID
__CMD "SetPay" "coffee-payment" Seeker.VendingTSID Seeker.ORDER_ID
MakeDrinkV1 Seeker.selected_a_drink SelectSugarID
EndIf

13
xml/process/payext_setup.ev
View file

@ -1,7 +1,6 @@
Var SVT = "coffee"
Var ACC = TelephoneNumber
Var DEE = PayDetail
Var PayDetail2 = Seeker.PayDetail2
PAYEXT_SETUP SVT ACC Seeker.VendingTSID Seeker.ORDER_ID
DEBUGVAR TelephoneNumber
Var TelephoneNumberExt = TelephoneNumber
If TelephoneNumberExt = "" Then
Var TelephoneNumberExt = "0899999999"
EndIf
__CMD "SetTelNum" TelephoneNumberExt Seeker.ORDER_ID Seeker.VendingTSID

11
xml/process/payment.ev
View file

@ -1,8 +1,6 @@
If Seeker.PayWithQR = 1 Then
;pay credit if coinAmount > 0
DEBUGVAR "MIGGAZE0"
If Seeker.PayWithQR = 1 Then
Var ServiceAmount2 = Seeker.ServiceAmount2
Var CreditReference = ""
@ -37,12 +35,13 @@
EndIf
EndIf
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/process/addpoint.ev"
;TRY "/mnt/sdcard/coffeevending/taobin_project/xml/process/addpoint.ev"
Else
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/process/addpoint.ev"
Var SelectDrink = Seeker.selected_a_drink
Var ExtendData = Seeker.ExtendData
Var ServiceAmount2 = Seeker.ServiceAmount2