diff --git a/Contabilidad/FiltraPolizas.aspx.vb b/Contabilidad/FiltraPolizas.aspx.vb
index 08d83a34f..0c28e02e6 100644
--- a/Contabilidad/FiltraPolizas.aspx.vb
+++ b/Contabilidad/FiltraPolizas.aspx.vb
@@ -45,14 +45,8 @@ Partial Class Contabilidad_FiltraPolizas
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
-
-
If Not Page.IsPostBack Then
-
-
ContabilidadSIG = UsuarioActual.Empresa.UsaContabilidadSIG
-
-
ViewState("Orden") = ""
DdlPeriodo.SelectedValue = Now.Month.ToString
TxtFechaICredito.Text = Now.FirstDayOfMonth.ToShortDateString
@@ -87,9 +81,6 @@ Partial Class Contabilidad_FiltraPolizas
Dim Ejercicio As Integer = DdlEjercicio.SelectedValue.ToString().ToEntero()
Dim Periodo As Integer = DdlPeriodo.SelectedValue.ToString().ToEntero()
-
-
-
If ContabilidadSIG Then
Dim ObjConta As New ClsContabilidad
@@ -103,7 +94,6 @@ Partial Class Contabilidad_FiltraPolizas
ObjConta.Dispose()
-
Else
Dim ObjConta As New ClsContPAQi(UsuarioActual.Empresa)
@@ -125,8 +115,6 @@ Partial Class Contabilidad_FiltraPolizas
End If
-
-
Gv.DataBind()
UpDatos.Update()
End Sub
@@ -151,7 +139,6 @@ Partial Class Contabilidad_FiltraPolizas
End If
-
DdlSegmentoNeg.DataBind()
DdlSegmentoNeg.Items.Insert(0, New ListItem("Todos", "-1"))
@@ -183,7 +170,6 @@ Partial Class Contabilidad_FiltraPolizas
End If
-
DdlEjercicio.DataBind()
DdlEjercicio.SelectedValueExist(UsuarioActual.Empresa.EjercicioActual.ToString)
@@ -624,8 +610,6 @@ Partial Class Contabilidad_FiltraPolizas
End If
-
-
End If
End Sub