diff --git a/xml/page_board.xml b/xml/page_board.xml index a187cc47..155478d1 100644 --- a/xml/page_board.xml +++ b/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 diff --git a/xml/page_enable_credit_card.xml b/xml/page_enable_credit_card.xml index ba78f7d3..c48cccf7 100644 --- a/xml/page_enable_credit_card.xml +++ b/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 diff --git a/xml/page_payment_cash-MYR.xml b/xml/page_payment_cash-MYR.xml index 51798ba5..56ef49ef 100644 --- a/xml/page_payment_cash-MYR.xml +++ b/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