diff --git a/xml/page_payment_cash.xml b/xml/page_payment_cash.xml
index ba2a1293..81050699 100644
--- a/xml/page_payment_cash.xml
+++ b/xml/page_payment_cash.xml
@@ -199,6 +199,12 @@
 		Var RemainAmount = RemainAmount - Seeker.IntVendingCredit
 		Var SumCoinAmount = CoinAmount + Seeker.IntVendingCampaign
 		If SumCoinAmount >= PayAmount Then 
+
+			SAVELOG "CoinInOk First"
+			DEBUGVAR CoinAmount
+			DEBUGVAR Seeker.IntVendingCampaign
+			DEBUGVAR Seeker.IntVendingCredit
+
 			;Var VendingQRCode = "ERROR"
 			CoinVending OFF
 			Var Canout = SumCoinAmount - PayAmount
@@ -617,6 +623,8 @@
 		Var CoinInCounter = CoinInCounter + 1
 		If CoinInCounter = 1 Then
 
+		SAVELOG "CoinInOk OK"
+
 			;Var ChangeOK = 1
 			Var Timeout = 180
 			Var PayOK = 1
diff --git a/xml/page_payment_cashMore.xml b/xml/page_payment_cashMore.xml
index fbbb6d51..aafd7ae2 100644
--- a/xml/page_payment_cashMore.xml
+++ b/xml/page_payment_cashMore.xml
@@ -229,6 +229,12 @@
 		Var RemainAmount = RemainAmount - Seeker.IntVendingCredit
 		Var SumCoinAmount = CoinAmount + Seeker.IntVendingCampaign
 		If SumCoinAmount >= PayAmount Then 
+
+			SAVELOG "CoinInOk First"
+			DEBUGVAR CoinAmount
+			DEBUGVAR Seeker.IntVendingCampaign
+			DEBUGVAR Seeker.IntVendingCredit
+
 			;Var VendingQRCode = "ERROR"
 			CoinVending OFF
 			Var Canout = SumCoinAmount - PayAmount
@@ -534,6 +540,8 @@
 		Var CoinInCounter = CoinInCounter + 1
 		If CoinInCounter = 1 Then
 
+			SAVELOG "CoinInOk OK"
+
 			;Var ChangeOK = 1
 			Var Timeout = 180
 			Var PayOK = 1