diff --git a/App_Code/ClsPaginas.vb b/App_Code/ClsPaginas.vb
index 30c365a91..3ee4bfbb3 100644
--- a/App_Code/ClsPaginas.vb
+++ b/App_Code/ClsPaginas.vb
@@ -1921,7 +1921,7 @@ Public Class ClsPaginas
'sino existe, recarga los datos
If Application(AppNombre) Is Nothing Then
Dim ObjClientes As New ClsClientes
- If ObjClientes.GetClientes(-1, "-1", "-1", "-1", "-1", "-1", "-1", -1, CveEmpresa, Estatus:=-1) Then Application(AppNombre) = ObjClientes.DtResultados
+ If ObjClientes.GetClientes(-1, "-1", "-1", "-1", "-1", "-1", "-1", -1, CveEmpresa, Estatus:=-1) Then Application(AppNombre) = ObjClientes.DtResultados.Copy()
ObjClientes.Dispose()
End If
If CveEmpresa <> -1 Then
diff --git a/App_Code/Modelos.vb b/App_Code/Modelos.vb
index e8b616db1..47d5bf7b6 100644
--- a/App_Code/Modelos.vb
+++ b/App_Code/Modelos.vb
@@ -3383,8 +3383,8 @@ Namespace Modelos
'se excluyen las clasificaciones anteriores para que se asignen las de ingreso
If Not TmpDTDetalle(i)("CveClasificacion").ToString.Contiene("19958", "19933", "20242") Then
- If GlobalDTClasificacionPorcentaje(UsuarioActual.CveEmpresa, PorcentajeIVA:=TmpDTDetalle.MAX("PorcentajeIVA").ToDouble).Rows.Count > 0 Then
- TmpDTDetalle(i)("CveClasificacion") = GlobalDTClasificacionPorcentaje(UsuarioActual.CveEmpresa, PorcentajeIVA:=TmpDTDetalle.MAX("PorcentajeIVA").ToDouble).Rows(0)("CveClasificacion").ToString
+ If GlobalDTClasificacionPorcentaje(UsuarioActual.CveEmpresa, PorcentajeIVA:=TmpDTDetalle(i)("PorcentajeIVA").ToString().ToDouble).Rows.Count > 0 Then
+ TmpDTDetalle(i)("CveClasificacion") = GlobalDTClasificacionPorcentaje(UsuarioActual.CveEmpresa, PorcentajeIVA:=TmpDTDetalle(i)("PorcentajeIVA").ToString().ToDouble).Rows(0)("CveClasificacion").ToString
End If
End If
diff --git a/Bancos/IE.aspx.vb b/Bancos/IE.aspx.vb
index 1225270c4..5ba9b918a 100644
--- a/Bancos/IE.aspx.vb
+++ b/Bancos/IE.aspx.vb
@@ -1020,6 +1020,12 @@ Partial Class Bancos_IE
DdlPersonal.Enabled = False
End If
+ 'SI TIENE EL DATO DEBE MOSTRALO
+ If UsuarioActual.CveEmpresa = 119 AndAlso LblPagueseA.Text = "Beneficiario" AndAlso Not String.IsNullOrEmpty(ObjIE.PagueseA) Then
+ LblPagarA.Visible = True
+ LblPagarA.Text = ObjIE.PagueseA
+ End If
+
IDPoliza = ObjIE.IDPoliza
IDCtaContable = ObjIE.IdCtaContable
diff --git a/Empresas/13/Formatos/Factura.rdlc b/Empresas/13/Formatos/Factura.rdlc
index c5b2ba6c6..a096913df 100644
--- a/Empresas/13/Formatos/Factura.rdlc
+++ b/Empresas/13/Formatos/Factura.rdlc
@@ -3479,50 +3479,8 @@
2pt
-
- true
- true
-
-
-
-
- VERSION
-
-
-
- =Parameters!CFDIVersion.Value
-
-
-
-
-
-
- Textbox5
- 14.03578cm
- 16.60468cm
- 0.65292cm
- 3.68516cm
- 50
-
-
- 2pt
- 2pt
- 2pt
- 2pt
-
-
- 14.6887cm
+ 14.00096cm