From c5dfa66659c9f4fbe96e43852784bde22b8e739b Mon Sep 17 00:00:00 2001
From: HECTOR RODRIGUEZ <hecttor201@gmail.com>
Date: Fri, 23 Jul 2021 10:17:55 -0700
Subject: [PATCH] dropdownlist por dropdownlost en proveedor

---
 Contratos/Contrato.aspx.vb     | 2 +-
 Contratos/ContratoObra.aspx    | 6 ++----
 Contratos/ContratoObra.aspx.vb | 6 ++++--
 3 files changed, 7 insertions(+), 7 deletions(-)

diff --git a/Contratos/Contrato.aspx.vb b/Contratos/Contrato.aspx.vb
index 62fc596a4..0158f31ad 100644
--- a/Contratos/Contrato.aspx.vb
+++ b/Contratos/Contrato.aspx.vb
@@ -1654,7 +1654,7 @@ Partial Class Contratos_Default
     End Sub
     Private Sub CargaContratoPadre()
         DdlContratoPadre.Items.Clear()
-        DdlContratoPadre.DataSource = GlobalDTContratos.FiltraParametros($"CveEmpresa = {UsuarioActual.CveEmpresa} AND CveContratoTipo = {TipoContrato} {If(DdlCliente.SelectedValue.ToEntero > 0, $"AND CveCliente = {DdlCliente.SelectedValue}", "")} {If(CveContrato > 0, $"AND CveContrato <> {CveContrato}", "")} ")
+        DdlContratoPadre.DataSource = GlobalDTContratos(UsuarioActual.CveEmpresa).FiltraParametros($"CveEmpresa = {UsuarioActual.CveEmpresa} AND CveContratoTipo = {TipoContrato} {If(DdlCliente.SelectedValue.ToEntero > 0, $"AND CveCliente = {DdlCliente.SelectedValue}", "")} {If(CveContrato > 0, $"AND CveContrato <> {CveContrato}", "")} ")
         DdlContratoPadre.DataBind()
         DdlContratoPadre.Items.Insert(0, New ListItem("Seleccione", "-1"))
     End Sub
diff --git a/Contratos/ContratoObra.aspx b/Contratos/ContratoObra.aspx
index 62d582d06..ebb96cdf0 100644
--- a/Contratos/ContratoObra.aspx
+++ b/Contratos/ContratoObra.aspx
@@ -355,10 +355,8 @@
                                                 <label class="col-md-3 truncate ">
                                                     <asp:Label ID="LblProveedor" runat="server" Text="Proveedor:"></asp:Label></label>
                                                 <div class="col-md-9">
-                                                        <asp:DropDownList ID="DdlContratista" runat="server" CssClass="input-sm form-control select2me" AppendDataBoundItems="True" DataTextField="RazonSocial" DataValueField="CveProveedor" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 350px !important;" ValidationGroup="GrpGuardar">
-                                                            <asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
-                                                        </asp:DropDownList>
-                                                    </div>
+                                                    <ADS:Dropdownlost ID="DdlContratista" runat="server" CssStyle="width: 100%;" Width="100%" DataTextField="RazonSocial" DataValueField="CveProveedor"  ></ADS:Dropdownlost>
+                                                  </div>
                                             </div>
 
  
diff --git a/Contratos/ContratoObra.aspx.vb b/Contratos/ContratoObra.aspx.vb
index 811096536..8d67cbbde 100644
--- a/Contratos/ContratoObra.aspx.vb
+++ b/Contratos/ContratoObra.aspx.vb
@@ -744,6 +744,8 @@ Partial Class Contratos_ContratoObra
                     TrCliente.Visible = False
                     CargaContratista()
                     DdlContratista.SelectedValue = ObjContratos.CveProveedor.ToString
+                    DdlContratista.SelectedText = ObjContratos.RazonSocial.ToString
+
                 Else
                     cargaClientes()
                     DdlCliente.SelectedValue = ObjContratos.CveCliente.ToString
@@ -1205,8 +1207,8 @@ Partial Class Contratos_ContratoObra
     '    DdlSubProyectoContrato.Items.Insert(0, New ListItem("Seleccione un Proyecto", "-1"))
     'End Sub
     Private Sub CargaContratista()
-        DdlContratista.DataSource = GlobalDTCompProveedores(UsuarioActual.CveEmpresa)
-        DdlContratista.DataBind()
+        DdlContratista.setEsWebService(True)
+        DdlContratista.Attributes.Add("data-metodo", "getproveedores")
     End Sub
 
     'Private Sub CargaVendedores()