fix change coin multi

This commit is contained in:
miggaze 2021-11-15 19:41:38 +07:00
parent 2d873f12e9
commit 646c0b9d4e
4 changed files with 55 additions and 20 deletions

View file

@ -485,7 +485,9 @@
EndIf
If MachineState_Result = 1 Then
Var MachineState_Result = 2
EndIf
If MachineState_Result = 1 Then
@ -605,7 +607,9 @@
If StoreCreditFlag = 1 Then
Var ChangeOK = 2
Else
Change ServiceAmount2
;Change ServiceAmount2
Var ChangeAmountSum = ChangeAmountSum + ServiceAmount2
Var ChangeOK = 2
EndIf
EndIf
@ -620,7 +624,9 @@
If StoreCreditFlag = 1 Then
Var ChangeOK = 2
Else
Change ServiceAmount3
;Change ServiceAmount3
Var ChangeAmountSum = ChangeAmountSum + ServiceAmount3
Var ChangeOK = 2
EndIf
EndIf