free from problem,credit with cash qr
This commit is contained in:
parent
6c68e86ca1
commit
0eb70b24f7
12 changed files with 212 additions and 26 deletions
|
|
@ -114,6 +114,13 @@
|
|||
EndIf
|
||||
|
||||
|
||||
If GetFreeFromError = 1 Then
|
||||
;Var GetFreeFromError = 0
|
||||
Var TelephoneNumberProblem = TelephoneNumberGOTFree
|
||||
|
||||
EndIf
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
|
@ -461,6 +468,10 @@
|
|||
EndIf
|
||||
EndIf
|
||||
|
||||
If MachineState_Result = 1 Then
|
||||
Var MachineState_Result = 2
|
||||
EndIf
|
||||
|
||||
|
||||
If MachineState_Result = 1 Then
|
||||
If waitAckPay = 0 Then
|
||||
|
|
@ -500,6 +511,12 @@
|
|||
|
||||
;Var PayDetail="1/S:0/500/1:430|1001:12|1002:15|1020:7|1042:5|1050:50|9501:1|9502:1|9701:1|9702:1"
|
||||
|
||||
If GetFreeFromError = 1 Then
|
||||
Var CodeChannel = 1
|
||||
Var VendingCode = "C48"
|
||||
Var CodeNumber = "0000000000"
|
||||
EndIf
|
||||
|
||||
If PayWithQR = 0 Then
|
||||
If CodeChannel = 1 Then
|
||||
Var SessionID2 = SessionID2 + "/"
|
||||
|
|
@ -535,6 +552,7 @@
|
|||
|
||||
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
|
||||
Else
|
||||
|
||||
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
|
||||
EndIf
|
||||
|
||||
|
|
@ -581,7 +599,12 @@
|
|||
If StoreCreditFlag = 1 Then
|
||||
Var ChangeOK = 2
|
||||
Else
|
||||
Change ServiceAmount2
|
||||
If GetFreeFromError = 1 Then
|
||||
Var ChangeOK = 2
|
||||
Else
|
||||
Change ServiceAmount2
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
|
||||
EndIf
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue