add condition for enable credit card

xml/page_board.xml

@@ -797,6 +797,17 @@
 		If Not#LanguageLoaded = "" Then
 			LoadLanguage "/mnt/sdcard/coffeevending/taobin_project/inter/mys/menu/lang.tsv"
 		EndIf
+
+		; load credit
+
+		If EnableCreditCard = "" Then
+            CacheVarStr "get" EnableCreditCard
+        Else
+            CacheVarStr "put" EnableCreditCard
+        EndIf
+
+		DEBUGVAR EnableCreditCard
+
 	EndIf
 
 	If CountryName = "Indonesia" Then

xml/page_enable_credit_card.xml

@@ -20,7 +20,13 @@
         EndIf
 
         If EnableCreditCard = "true" Then
-            Var showStatusText = "OK"
+
+            If NetworkStatus = "ACTIVATE" Then
+                Var showStatusText = "OK"
+            Else
+                Var showStatusText = "NETWORK DOWN"
+            EndIf
+
         Else
             Var showStatusText = "OFF"
         EndIf
@@ -274,8 +280,23 @@
             ; Validate
 
             If PassPhrase = "16583" Then
-                Var EnableCreditCard = "true"
+
-                Var showStatusText = "OK"
+                If NetworkStatus = "ACTIVATE" Then
+                    Var EnableCreditCard = "true"
+                    Var showStatusText = "OK"
+
+                    CacheVarStr "put" EnableCreditCard
+
+                    Var PassPhrase = ""
+                Else
+                    Var EnableCreditCard = ""
+                    Var showStatusText = "NETWORK DOWN"
+
+                    CacheVarStr "put" EnableCreditCard
+
+                    Var PassPhrase = ""
+                EndIf
+                
 
                 Refresh
             Else
@@ -284,6 +305,11 @@
                     Var EnableCreditCard = ""
                     Var showStatusText = "OFF"
 
+                    CacheVarStr "put" EnableCreditCard
+
+                    Var PassPhrase = ""
+
+
                     Refresh
 
                 Else

xml/page_payment_cash-MYR.xml

@@ -454,7 +454,17 @@
 
 
 	If EnableCreditCard = "true" Then
-		Var PayState5 = "Enable"
+		DEBUGVAR EnableCreditCard
+		DEBUGVAR SELLONLINE
+		DEBUGVAR SELLSTATUAS
+		DEBUGVAR NetworkStatus
+		DEBUGVAR NetworkDown
+		If NetworkStatus = "ACTIVATE" Then
+			Var PayState5 = "Enable"
+		Else
+			Var PayState5 = "Disable"
+		EndIf
+		DEBUGVAR EnableCreditCard
 	Else
 		Var PayState5 = "Disable"
 	EndIf
@@ -690,6 +700,7 @@
 		Var QR_POPUP = "/img_popup8-2.png"
 		Var VendingCashless = "-"
 		Var LOADING_STATE = "Enable"
+		Var alphaState = "Enable"
 		Var RemainAmountX = PayAmount - Seeker.IntVendingCampaign  
 		CashlessPay RemainAmountX CreditCardRef
 		Var CashlessPayFlag = 1