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

Add PayDetail2 from seeker before call action Pay/PAYEXT

Browse source
This commit is contained in:
wanlop run 2024-04-11 17:25:04 +07:00
parent 6b535fc770
commit cec8e4e427
14 changed files with 356 additions and 259 deletions
Download patch file Download diff file Expand all files Collapse all files

43
xml/page_drinkok.xml
View file

@ -277,50 +277,7 @@
If MultiGo = 1 Then
If CART_INDEX = CART_COUNT Then
;Pay Multi
If sendPayMultiFlag = 0 Then
If Seeker.PayWithQR = 0 Then
Var ServiceType = "coffee-multi"
Else
Var ServiceType = "coffee-multiQR"
EndIf
If Seeker.TNumberTaobinCredit = "" Then
Var TelephoneNumber = "0899999999"
Var PayO2 = ""
If Seeker.TNumberTaobinMember = "" Then
Else
Var TelephoneNumber = Seeker.TNumberTaobinMember
EndIf
Else
Var TelephoneNumber = Seeker.TNumberTaobinCredit
Var PayO2 = Seeker.CoffeePinNumber
EndIf
Var ServiceCredit = "00-00-00-0000"
Var SuggestID = ""
Var PayDetail="1/S:0/0/"
Var SessionID3 = "" + CART_COUNT
Var SessionID3 = SessionID3 + ":00000"
SAVELOG PayO2
Var VendingCampaign = IntVendingCampaign
Var CreditReference = Seeker.CreditReferenceTmp
Var PayType = ""
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID3 ServiceAmountSum ServiceCharge Donate
Var sendPayMultiFlag = 1
EndIf
EndIf
EndIf
; Do not change
;
If MachineStage = "show-menu" Then