From 87f727d4b8e1399b7703e60b4b30d4c0b21fa62a Mon Sep 17 00:00:00 2001 From: rrene Date: Wed, 28 Jun 2023 08:21:37 -0700 Subject: [PATCH] =?UTF-8?q?--=20que=20entre=20a=20la=20p=C3=A1gina=20provi?= =?UTF-8?q?sionalmente=20sin=20importar=20el=20tipo=20conta?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- Contabilidad2/RepAnexoCatalogo.aspx.vb | 6 +++--- Contabilidad2/RepMovimientosAuxiliaresCatalogo.aspx.vb | 6 +++--- 2 files changed, 6 insertions(+), 6 deletions(-) diff --git a/Contabilidad2/RepAnexoCatalogo.aspx.vb b/Contabilidad2/RepAnexoCatalogo.aspx.vb index 8d064fb20..b22362481 100644 --- a/Contabilidad2/RepAnexoCatalogo.aspx.vb +++ b/Contabilidad2/RepAnexoCatalogo.aspx.vb @@ -82,9 +82,9 @@ Partial Class AC2_RepAnexoCatalogo Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load If Not Page.IsPostBack Then - If UsuarioActual.Empresa.TipoContabilidad = 2 AndAlso UsuarioActual.CveEmpresa <> 119 Then - Response.Redirect($"/Contabilidad/RepAnexoCatalogo.aspx") - End If + 'If UsuarioActual.Empresa.TipoContabilidad = 2 AndAlso UsuarioActual.CveEmpresa <> 119 Then + ' Response.Redirect($"/Contabilidad/RepAnexoCatalogo.aspx") + 'End If Dim ErrorParametros = True DtDatos = Nothing diff --git a/Contabilidad2/RepMovimientosAuxiliaresCatalogo.aspx.vb b/Contabilidad2/RepMovimientosAuxiliaresCatalogo.aspx.vb index 8ad1afab7..f5a336676 100644 --- a/Contabilidad2/RepMovimientosAuxiliaresCatalogo.aspx.vb +++ b/Contabilidad2/RepMovimientosAuxiliaresCatalogo.aspx.vb @@ -97,9 +97,9 @@ Partial Class Conta_RepMovimientosAuxiliaresCatalogo Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load If Not Page.IsPostBack Then - If UsuarioActual.Empresa.TipoContabilidad = 2 AndAlso UsuarioActual.CveEmpresa <> 119 Then - Response.Redirect($"/Contabilidad/RepMovimientosAuxiliaresCatalogo.aspx") - End If + 'If UsuarioActual.Empresa.TipoContabilidad = 2 AndAlso UsuarioActual.CveEmpresa <> 119 Then + ' Response.Redirect($"/Contabilidad/RepMovimientosAuxiliaresCatalogo.aspx") + 'End If Dim ErrorParametros = True