new payment

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

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

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