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

spiral pay

Browse source
This commit is contained in:
worawut 2023-06-07 18:36:37 +07:00
parent 326a9f4f71
commit a1e7e4be1e
3 changed files with 6420 additions and 33 deletions
Download patch file Download diff file Expand all files Collapse all files

6418
spiral/xml/page_catalog_vending_machine.xml
View file

File diff suppressed because it is too large Load diff

18
spiral/xml/page_spiral_failmuti.xml
View file

@ -8,8 +8,8 @@
<EventOpen> <EventOpen>
Var SetPayMuti = 0 Var SetPayMuti = 0
Var Timeout3 = 0 Var Timeout3 = 0
;Var LastMakeDrinkResult = "-" Var LastMakeDrinkResult = "-"
;Var MachineState_Result = 2 Var MachineState_Result = 2
Var ChangeFlag3 = 0 Var ChangeFlag3 = 0
Var ChangeFailSpiral = 0 Var ChangeFailSpiral = 0
@ -514,6 +514,11 @@ If Seeker.thankToppingFlag = 1 Then
EndIf EndIf
If SessionID2 = "2:00000" Then
Var SessionID2 = "1:00000"
EndIf
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 PriceDrinkTopping ServiceCharge Donate Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 PriceDrinkTopping ServiceCharge Donate
Var sendPayMultiFlag = 2 Var sendPayMultiFlag = 2
Else Else
@ -525,6 +530,10 @@ If Seeker.thankToppingFlag = 1 Then
EndIf EndIf
If SessionID2 = "2:00000" Then
Var SessionID2 = "1:00000"
EndIf
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 PriceDrinkTopping ServiceCharge Donate Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 PriceDrinkTopping ServiceCharge Donate
Var sendPayMultiFlag = 2 Var sendPayMultiFlag = 2
@ -547,6 +556,11 @@ If Seeker.thankToppingFlag = 1 Then
EndIf EndIf
;PAYEXT SVT ACC VendingTSIDTmp DEE ;PAYEXT SVT ACC VendingTSIDTmp DEE
If SessionID2 = "2:00000" Then
Var SessionID2 = "1:00000"
EndIf
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 PriceDrinkTopping ServiceCharge Donate Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 PriceDrinkTopping ServiceCharge Donate
Var sendPayMultiFlag = 2 Var sendPayMultiFlag = 2

15
spiral/xml/page_spiral_thankyou3.xml
View file

@ -222,6 +222,10 @@ If Seeker.thankToppingFlag = 1 Then
EndIf EndIf
If SessionID2 = "2:00000" Then
Var SessionID2 = "1:00000"
EndIf
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 PriceDrinkTopping ServiceCharge Donate Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 PriceDrinkTopping ServiceCharge Donate
Else Else
@ -232,6 +236,10 @@ If Seeker.thankToppingFlag = 1 Then
EndIf EndIf
If SessionID2 = "2:00000" Then
Var SessionID2 = "1:00000"
EndIf
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 PriceDrinkTopping ServiceCharge Donate Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 PriceDrinkTopping ServiceCharge Donate
@ -253,7 +261,12 @@ If Seeker.thankToppingFlag = 1 Then
EndIf EndIf
;PAYEXT SVT ACC VendingTSIDTmp DEE ;PAYEXT SVT ACC VendingTSIDTmp DEE
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID3 PriceDrink ServiceCharge Donate
If SessionID2 = "2:00000" Then
Var SessionID2 = "1:00000"
EndIf
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 PriceDrinkTopping ServiceCharge Donate
EndIf EndIf