Correciones

This commit is contained in:
2020-07-03 13:38:04 -07:00
parent c68f7b51aa
commit 8d693c1764

View File

@@ -25,11 +25,13 @@ Partial Class GPS_RecursoConfiableTracking
Public Sub CargaDispositivos()
DdlDispositivoFiltro.DataSource = GlobalDTDispositivosUsuarios(UsuarioActual.CveCliente, UsuarioActual.CveUsuario)
Dim DtDispositivos As DataTable = GlobalDTDispositivosUsuarios(UsuarioActual.CveCliente, UsuarioActual.CveUsuario).FiltraParametros("Estatus = 1 AND PlacasVehiculo IS NOT NULL AND PlacasVehiculo <> ''")
DdlDispositivoFiltro.DataSource = DtDispositivos
DdlDispositivoFiltro.DataBind()
DdlDispositivoFiltro.Items.Insert(0, New ListItem("Todos", "-1"))
DdlDispositivo.DataSource = GlobalDTDispositivosUsuarios(UsuarioActual.CveCliente, UsuarioActual.CveUsuario).FiltraParametros("PlacasVehiculo IS NOT NULL AND PlacasVehiculo <> ''")
DdlDispositivo.DataSource = DtDispositivos
DdlDispositivo.DataBind()
DdlDispositivo.Items.Insert(0, New ListItem("Seleccione", "-1"))