From 9178a8d77d7a674e45dc3b3ee484753005e4b695 Mon Sep 17 00:00:00 2001
From: Rene Molina <Rene.Molina@adssistemas.mx>
Date: Thu, 23 Jan 2020 20:06:47 -0700
Subject: [PATCH] -contratos tipos

---
 Contratos/Contrato.aspx.vb              | 6 +++---
 Contratos/PopUpBuscarContrato.aspx.vb   | 2 +-
 Contratos/RepContratosAvancesCP.aspx.vb | 2 +-
 3 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/Contratos/Contrato.aspx.vb b/Contratos/Contrato.aspx.vb
index 175b3bfb4..340a60c83 100644
--- a/Contratos/Contrato.aspx.vb
+++ b/Contratos/Contrato.aspx.vb
@@ -664,10 +664,10 @@ Partial Class Contratos_Default
     Private Sub loadComboTipoContrato(venta As Boolean)
         Try
             If venta Then
-                DdlTipoContrato.DataSource = GlobalDTContratosTipos.FiltraParametros($" CveEmpresa = {UsuarioActual.CveEmpresa} And TipoMovimiento = 1")
+                DdlTipoContrato.DataSource = GlobalDTContratosTipos(UsuarioActual.CveEmpresa).FiltraParametros(" TipoMovimiento = 1")
 
             Else
-                DdlTipoContrato.DataSource = GlobalDTContratosTipos.FiltraParametros($" CveEmpresa = {UsuarioActual.CveEmpresa} And TipoMovimiento = 0")
+                DdlTipoContrato.DataSource = GlobalDTContratosTipos(UsuarioActual.CveEmpresa).FiltraParametros(" TipoMovimiento = 0")
             End If
             dvDetContrato.Visible = True
             ' DdlTipoContrato.Visible = True
@@ -705,7 +705,7 @@ Partial Class Contratos_Default
         End If
 
         TipoContrato = DdlTipoContrato.SelectedValue.ToEntero
-        TxtDescripcionTipoContrato.Text = GlobalDTContratosTipos.FiltraParametros("CveContratoTipo = " & DdlTipoContrato.SelectedValue)(0)("Descripcion").ToString()
+        TxtDescripcionTipoContrato.Text = GlobalDTContratosTipos(UsuarioActual.CveEmpresa).FiltraParametros("CveContratoTipo = " & DdlTipoContrato.SelectedValue)(0)("Descripcion").ToString()
         TxtDescripcionTipoContrato.Visible = True
 
         CargaContratoPadre()
diff --git a/Contratos/PopUpBuscarContrato.aspx.vb b/Contratos/PopUpBuscarContrato.aspx.vb
index 121fb0129..75ff476e4 100644
--- a/Contratos/PopUpBuscarContrato.aspx.vb
+++ b/Contratos/PopUpBuscarContrato.aspx.vb
@@ -86,7 +86,7 @@ Partial Class Contratos_PopUpBuscarContrato
         UPDatos.Update()
 
         Try
-            DdlTipoContrato.DataSource = GlobalDTContratosTipos.FiltraParametros($" CveEmpresa = {UsuarioActual.CveEmpresa} AND TipoMovimiento = {DdlTipo.SelectedValue }")
+            DdlTipoContrato.DataSource = GlobalDTContratosTipos(UsuarioActual.CveEmpresa).FiltraParametros($" TipoMovimiento = {DdlTipo.SelectedValue }")
             DdlTipoContrato.DataBind()
             DdlTipoContrato.Items.Insert(0, New ListItem("Seleccione una opción", "-1"))
 
diff --git a/Contratos/RepContratosAvancesCP.aspx.vb b/Contratos/RepContratosAvancesCP.aspx.vb
index cfcc75727..ab22040e2 100644
--- a/Contratos/RepContratosAvancesCP.aspx.vb
+++ b/Contratos/RepContratosAvancesCP.aspx.vb
@@ -32,7 +32,7 @@ Partial Class Contratos_RepContratosAvancesCP
         DdlClientes.Items.Insert(0, New ListItem("Todos", "-1"))
         DdlClientes.DataBind()
 
-        DdlTipo.DataSource = GlobalDTContratosTipos().FiltraParametros($"CveEmpresa={UsuarioActual.CveEmpresa}")
+        DdlTipo.DataSource = GlobalDTContratosTipos(UsuarioActual.CveEmpresa)
         DdlTipo.Items.Insert(0, New ListItem("Todos", "-1"))
         DdlTipo.DataBind()