Fix pay Detail 2

This commit is contained in:
wanlop run 2024-04-09 16:00:36 +07:00
parent f0d5ee9d19
commit 559c313529
4 changed files with 7 additions and 7 deletions

Binary file not shown.

View file

@ -76,10 +76,10 @@
If Seeker.PayWithQR = 0 Then If Seeker.PayWithQR = 0 Then
DEBUGVAR TxRef1 DEBUGVAR TxRef1
Var PayDetail2 = topping_detail Var PayDetail2 = ToppingDetail
DEBUGVAR PayDetail DEBUGVAR PayDetail
DEBUGVAR PayDetail2 DEBUGVAR PayDetail2
UpdateTxRef2 TxRef1 ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate PayO2 PdpaAccept VendingDiscount VendingCampaign PayReference PayType CreditReference PayDetail, PayDetail2 UpdateTxRef2 TxRef1 ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate PayO2 PdpaAccept VendingDiscount VendingCampaign PayReference PayType CreditReference PayDetail, PayDetail2
EndIf EndIf

View file

@ -126,7 +126,7 @@
If ChangeFlag2 = 0 Then If ChangeFlag2 = 0 Then
If Seeker.PayWithQR = 0 Then If Seeker.PayWithQR = 0 Then
DEBUGVAR TxRef1 DEBUGVAR TxRef1
Var PayDetail2 = topping_detail Var PayDetail2 = ToppingDetail
DEBUGVAR PayDetail DEBUGVAR PayDetail
DEBUGVAR PayDetail2 DEBUGVAR PayDetail2
@ -145,10 +145,10 @@
If ChangeFlag2 = 0 Then If ChangeFlag2 = 0 Then
If Seeker.PayWithQR = 0 Then If Seeker.PayWithQR = 0 Then
DEBUGVAR TxRef1 DEBUGVAR TxRef1
Var PayDetail2 = topping_detail Var PayDetail2 = ToppingDetail
DEBUGVAR PayDetail DEBUGVAR PayDetail
DEBUGVAR PayDetail2 DEBUGVAR PayDetail2
UpdateTxRef2 TxRef1 ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate PayO2 PdpaAccept VendingDiscount VendingCampaign PayReference PayType CreditReference PayDetail PayDetail2 UpdateTxRef2 TxRef1 ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate PayO2 PdpaAccept VendingDiscount VendingCampaign PayReference PayType CreditReference PayDetail PayDetail2
EndIf EndIf

View file

@ -333,7 +333,7 @@
Var SessionID2 = SessionID2 + Seeker.CodeNumber Var SessionID2 = SessionID2 + Seeker.CodeNumber
Var SessionID2 = SessionID2 + "/" Var SessionID2 = SessionID2 + "/"
Var PayDetail2 = topping_detail Var PayDetail2 = ToppingDetail
DEBUGVAR PayDetail DEBUGVAR PayDetail
DEBUGVAR PayDetail2 DEBUGVAR PayDetail2
@ -341,7 +341,7 @@
Else Else
DEBUGVAR TxRef1 DEBUGVAR TxRef1
Var PayDetail2 = topping_detail Var PayDetail2 = ToppingDetail
DEBUGVAR PayDetail DEBUGVAR PayDetail
DEBUGVAR PayDetail2 DEBUGVAR PayDetail2