diff --git a/Contabilidad/CatCuentas.aspx.vb b/Contabilidad/CatCuentas.aspx.vb
index 04346da23..1f8142139 100644
--- a/Contabilidad/CatCuentas.aspx.vb
+++ b/Contabilidad/CatCuentas.aspx.vb
@@ -28,7 +28,7 @@ Partial Class Contabilidad_CatCuentas
     Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
         If Not Page.IsPostBack Then
 
-            If Not UsuarioActual.CveEmpresa.Contiene(13, 83) Then
+            If Not UsuarioActual.CveEmpresa.Contiene(13, 83) AndAlso EsProduccion Then
                 Response.Redirect("/Contabilidad2/CatCuentas.aspx")
                 Exit Sub
             End If