From fa57f67cff77ea8b97d0a0b1e5856d407d4ed4cc Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Thu, 30 Jun 2022 16:57:19 -0700
Subject: [PATCH] -- limpieza de cuentas

---
 Compras/Compras.aspx.vb | 21 ---------------------
 1 file changed, 21 deletions(-)

diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb
index 1d54b6c32..422d39038 100644
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -385,14 +385,6 @@ Partial Class Compras_Compras
             ViewState("IdCuentaBancaria") = value
         End Set
     End Property
-    Private Property CveCuentaBancaria As Integer
-        Get
-            Return ViewState("CveCuentaBancaria").ToString.ToEntero
-        End Get
-        Set(value As Integer)
-            ViewState("CveCuentaBancaria") = value
-        End Set
-    End Property
     Private Property IdCuentaBancariaComplementaria As Integer
         Get
             Return ViewState("IdCuentaBancariaComplementaria").ToString.ToEntero
@@ -401,14 +393,6 @@ Partial Class Compras_Compras
             ViewState("IdCuentaBancariaComplementaria") = value
         End Set
     End Property
-    Private Property CveCuentaBancariaComplementaria As Integer
-        Get
-            Return ViewState("CveCuentaBancariaComplementaria").ToString.ToEntero
-        End Get
-        Set(value As Integer)
-            ViewState("CveCuentaBancariaComplementaria") = value
-        End Set
-    End Property
     Private Property IvaAcumulado As Double
         Get
             Return ViewState("IvaAcumulado").ToString.ToDouble
@@ -1210,11 +1194,9 @@ Partial Class Compras_Compras
                 CompraSaldo = 0
                 ViewState("CvePersonal") = -1
                 IdCuentaBancaria = 0
-                CveCuentaBancaria = 0
             End If
 
             IdCuentaBancariaComplementaria = 0
-            CveCuentaBancariaComplementaria = 0
 
             'If UsuarioActual.TienePermisoProceso(259) Then
             DivEsNoDeducible.Visible = True
@@ -12864,9 +12846,7 @@ Partial Class Compras_Compras
         If dr IsNot Nothing Then
             CveMoneda = dr("CveMoneda").ToString.ToEntero
             IdCuentaBancaria = dr("IdCtaContable").ToString.ToEntero
-            CveCuentaBancaria = dr("IdCtaContableSIG").ToString.ToEntero
             IdCuentaBancariaComplementaria = dr("IdCtaContableComplementaria").ToString.ToEntero
-            CveCuentaBancariaComplementaria = dr("IdCtaContableComplementariaSIG").ToString.ToEntero
             If dr("UsaTarjeta").ToString = "True" Then
                 CargaGridTarjetas()
             Else
@@ -12891,7 +12871,6 @@ Partial Class Compras_Compras
         If dr IsNot Nothing Then
             CveMoneda = dr("CveMoneda").ToString.ToEntero
             IdCuentaBancaria = dr("IdCtaContable").ToString.ToEntero
-            CveCuentaBancaria = dr("IdCtaContableSIG").ToString.ToEntero
             EstaAsociadoACajaChica = True
         End If