[DUBAI] Fixed credit card again

xml/page_payment_cash-UAE.xml

@@ -807,38 +807,6 @@
 </EventActionError>
 
 <EventCashlessCard>
-
-    SAVELOG "EventCashlessCard"
-
-    Var CreditCardRef = ""
-	GenHashWithTimeStamp CreditCardRef
-	DEBUGVAR VendingCashless
-
-	Var QRCODE99 = ""
-	Var Timeout = 0
-	Var QRErrorState = "Invisible"
-
-	;add-pd-to-ref
-	Var CreditCardRef = CreditCardRef + "/"
-	Var CreditCardRef = CreditCardRef + SelectDrink
-	DEBUGVAR CreditCardRef
-
-	If VendingCashless = "READY" Then
-		If CoinInOK = 1 Then
-
-		Else
-			Var Timeout = 0
-		EndIf
-
-		Var QRErrorState = "Invisible"
-		Var QR_POPUP = "/img_popup8-2.png"
-		Var VendingCashless = "-"
-		Var LOADING_STATE = "Enable"
-		Var RemainAmountX = PayAmount - Seeker.IntVendingCampaign
-		CashlessPay RemainAmountX CreditCardRef
-		Var CashlessPayFlag = 1
-	EndIf
-
 	Refresh
 </EventCashlessCard>
 
@@ -1526,8 +1494,34 @@
     		If CancelFlag = 0 Then
                 Var QR_POPUP = "/img_popup8.png"
                 Var alphaState = "Enable"
-                Coin CARD
+                ;Coin CARD
                 Var ReqPayInfoFromCashOther = 2
+                Var CreditCardRef = ""
+
+               	GenHashWithTimeStamp CreditCardRef
+               	DEBUGVAR VendingCashless
+
+               	Var QRCODE99 = ""
+               	Var Timeout = 0
+               	Var QRErrorState = "Invisible"
+
+               	;add-pd-to-ref
+               	Var CreditCardRef = CreditCardRef + "/"
+               	Var CreditCardRef = CreditCardRef + SelectDrink
+               	DEBUGVAR CreditCardRef
+
+          		If CoinInOK = 1 Then
+
+          		Else
+         			Var Timeout = 0
+          		EndIf
+
+          		Var QRErrorState = "Invisible"
+          		Var VendingCashless = "-"
+          		Var LOADING_STATE = "Enable"
+          		Var RemainAmountX = PayAmount - Seeker.IntVendingCampaign
+          		CashlessPay RemainAmountX CreditCardRef
+          		Var CashlessPayFlag = 1
             EndIf
     	EndIf
     EndIf