usacomplementaria clientes

2021-03-12 10:22:43 -07:00
parent 746fe19429
commit 322c031bef
1 changed files with 1 additions and 2 deletions
--- a/App_Code/Modelos.vb
+++ b/App_Code/Modelos.vb
@@ -2203,8 +2203,7 @@ Namespace Modelos
                    CveCuentaIVATrasladado = GlobalDTClasificacionPorcentaje(UsuarioActual.CveEmpresa, PorcentajeIVA:=DtDetalle.MAX("PorcentajeIVA").ToDouble).Rows(0)("CveCuentaIVATrasladado").ToString.ToEntero
                End If

-                Dim UsaComplementariaClientes As Boolean = False
-                If UsuarioActual.CveEmpresa.Contiene(1, 119) Then UsaComplementariaClientes = True
+                Dim UsaComplementariaClientes As Boolean = True

                If ObjConta.GetPlantillaConceptos(ObjFactura.CveEmpresa, CvePlantilaPoliza) Then
                    Dim dtt As DataTable = ObjConta.DtResultados