combo proveedores a dropdonwlost

This commit is contained in:
2021-09-28 07:36:13 -07:00
parent ddb344462a
commit 2b2cd2127d
2 changed files with 6 additions and 6 deletions

View File

@@ -46,7 +46,7 @@
<tr style="text-align: left">
<td class="text-right"><b>Proveedor:</b></td>
<td>
<asp:DropDownList ID="DdlProveedor" CssClass="form-control input-sm select2me" runat="server" DataTextField="RazonSocial" DataValueField="CveProveedor" Width="180px"></asp:DropDownList>
<ADS:Dropdownlost ID="DdlProveedores" runat="server" UsaWebService="true" data-metodo="getproveedores" CssStyle="width: 100%;" Width="100%" DataTextField="RazonSocial" DataValueField="CveProveedor"></ADS:Dropdownlost>
</td>
</tr>
<tr style="text-align: left">

View File

@@ -31,9 +31,9 @@ Partial Class Compras_PopUpBuscarFolioC
End Sub
Protected Sub CargaProveedor()
DdlProveedor.DataSource = GlobalDTCompProveedores(UsuarioActual.CveEmpresa)
DdlProveedor.DataBind()
DdlProveedor.Items.Insert(0, New ListItem("Todos", "-1"))
'DdlProveedor.DataSource = GlobalDTCompProveedores(UsuarioActual.CveEmpresa)
'DdlProveedor.DataBind()
'DdlProveedor.Items.Insert(0, New ListItem("Todos", "-1"))
End Sub
@@ -57,7 +57,7 @@ Partial Class Compras_PopUpBuscarFolioC
If ValidarUnFiltroSeleccionado() Then
Dim ObjCompras As New ClsCompras()
If ObjCompras.GetCompras(UsuarioActual.CveEmpresa, DdlTipoDocto.SelectedValue, Folio, FolioFiscal, Codigo, Proveedor, FechaI, FechaF, Descripcion, Obs,
CveProveedor:=DdlProveedor.SelectedValue.ToEntero, TopSelect:=100) Then
CveProveedor:=DdlProveedores.SelectedValue.ToEntero, TopSelect:=100) Then
If ObjCompras.DtResultados.Rows.Count > 0 Then
LtlTotalRegistros.Text = ObjCompras.DtResultados.Rows.Count.ToString.FormatoNumero(0)
GV.DataSource = ObjCompras.DtResultados
@@ -112,7 +112,7 @@ Partial Class Compras_PopUpBuscarFolioC
If TxtDescripcion.Text.Trim.Length > 0 Then Return True
If TxtObservaciones.Text.Trim.Length > 0 Then Return True
If DdlTipoDocto.SelectedValue <> "-1" Then Return True
If DdlProveedor.SelectedValue.ToEntero <> 0 Then Return True
If DdlProveedores.SelectedValue.ToEntero <> 0 Then Return True
Return False
End Function
End Class