cambi en cuentas de CveCuentas

Contratos/FacturacionMasiva.aspx.vb

@@ -89,24 +89,16 @@ Partial Class Contratos_FacturacionMasiva
         Get
             Return ViewState("IdCtaContRetIVA").ToString.ToEntero
         End Get
-    End Property
-    Private ReadOnly Property CveCuentaRetIVA As Integer
-        Get
-            Return ViewState("CveCuentaRetIVA").ToString.ToEntero
-        End Get
-    End Property
+    End Property
+
     Private ReadOnly Property IdCtaContRetISR As Integer
         Get
             Return ViewState("IdCtaContRetISR").ToString.ToEntero
         End Get
-    End Property
-    Private ReadOnly Property CveCuentaRetISR As Integer
-        Get
-            Return ViewState("CveCuentaRetISR").ToString.ToEntero
-        End Get
-    End Property
+    End Property
+
 #End Region
-
+
     Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
         If Not IsPostBack Then
             FolioVigentes = False
@@ -565,9 +557,7 @@ Partial Class Contratos_FacturacionMasiva
                 ObjFactura.ClaveUsoCFDI = GlobalDTSATUsosCFDI.FiltroPrimeroValor("UsoCFDI", $"CveUsoCFDI = {ObjCliente.CveUsoCFDI}")
 
                 ViewState("IdCtaContRetIVA") = ObjCliente.IdCtaContRetIVA
-                ViewState("CveCuentaRetIVA") = ObjCliente.CveCuentaRetIVA
                 ViewState("IdCtaContRetISR") = ObjCliente.IdCtaContRetISR
-                ViewState("CveCuentaRetISR") = ObjCliente.CveCuentaRetISR
 
                 'AGREGAR LOS PLAZOS PARA EL PAGO DEL CLIENTE
                 Dim FechaPago As DateTime = ObjFactura.Fecha.AddDays(ObjCliente.PlazoCobranza)