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

keep trans, status sell, error code 1303

Browse source
This commit is contained in:
miggaze 2022-08-01 16:00:47 +07:00
parent 928e1c98ce
commit af4b96322d
29 changed files with 436 additions and 71 deletions
Download patch file Download diff file Expand all files Collapse all files

65
xml/page_payment_cash.xml
View file

@ -236,6 +236,11 @@
CoinVending OFF
If Seeker = "curr" Then
MakeDrinkV1 SelectDrink SelectSugarID
Var TxRef1 = ""
CreateTxRef1 TxRef1
Else
Var TxRef1 = ""
CreateTxRef1 TxRef1
EndIf
Open "ROOT/taobin_project/xml/page_thankyou.xml"
@ -300,9 +305,15 @@
Var EnoughChange = "yes"
Var SELLONLINE = 0
If SELLSTATUS = "SELLONLINE" Then
Var SELLONLINE = 1
EndIf
If SELLSTATUS = "SELLNOCASH" Then
Var SELLONLINE = 1
EndIf
If NetworkStatus = "DOWN" Then
If SELLONLINE = 0 Then
SAVELOG "Cash only NetworkStatus down"
Var PayState2 = "Disable"
@ -312,20 +323,39 @@
Var PayState6 = "Disable"
Var PayOfflineMode = 1
Var ShowNetworkProblem = "Enable"
Var ShowButtonClick2 = "Invisible"
Var ShowNetworkProblemText = "การสื่อสารขัดข้อง ชำระเงินได้เฉพาะเงินสด"
Else
Var PayOfflineMode = 0
EndIf
If NetworkStatus = "ACTIVATE" Then
Var ShowNetworkProblem = "Invisible"
Var ShowNetworkProblemText = ""
Else
Var ShowNetworkProblem = "Enable"
Var ShowButtonClick2 = "Invisible"
Var ShowNetworkProblemText = "การสื่อสารขัดข้อง ชำระเงินได้เฉพาะเงินสด"
EndIf
If NOCashFlag = 1 Then
Var PayState1 = "Disable"
EndIf
;cancel order
If SELLSTATUS = "DEACTIVE" Then
Var SELLONLINE = 1
EndIf
;If NetworkStatus = "ACTIVATE" Then
; Var ShowNetworkProblem = "Invisible"
; Var ShowNetworkProblemText = ""
;
;Else
; Var ShowNetworkProblem = "Enable"
; Var ShowButtonClick2 = "Invisible"
; Var ShowNetworkProblemText = "การสื่อสารขัดข้อง ชำระเงินได้เฉพาะเงินสด"
;EndIf
Var pay_with_credit_image = DirImage + "/bp_pay_with_credit.png"
Var pay_with_chanel_text = DirImage + "/text_1.png"
@ -511,7 +541,15 @@
If ReqPayInfoFlag2 = 1 Then
Var Seeker.CampaignPayChanel = "kbank"
DEBUGVAR VendingBank
If VendingBank = "kbank" Then
Var Seeker.CampaignPayChanel = "kbank"
Else
Var Seeker.CampaignPayChanel = "cash"
EndIf
EndIf
If ReqPayInfoFlag2 = 2 Then
Var Seeker.CampaignPayChanel = "shopee"
@ -525,6 +563,8 @@
If Seeker = "curr" Then
MakeDrinkV1 SelectDrink SelectSugarID
;Var TxRef1 = ""
;CreateTxRef1 TxRef1
EndIf
Var Seeker.PayWithQR = 1
Var Seeker.VendingTSID = VendingTSID
@ -758,6 +798,11 @@
If Seeker = "curr" Then
MakeDrinkV1 SelectDrink SelectSugarID
Var TxRef1 = ""
CreateTxRef1 TxRef1
Else
Var TxRef1 = ""
CreateTxRef1 TxRef1
EndIf
Open "ROOT/taobin_project/xml/page_thankyou.xml"