AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

mostrar solo clientes activos

Browse Source
This commit is contained in:
HECTOR RODRIGUEZ
2021-05-03 20:17:04 -07:00
parent dbc2af7fcf
commit aa650621dc
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
Ventas/Clientes.aspx.vb
View File

@@ -994,7 +994,7 @@ Partial Class Clientes
Private Sub CargaResponsables() Private Sub CargaResponsables()
Dim Dt As DataTable = GlobalDTUsuarios(-1, UsuarioActual.CveEmpresa).FiltraParametros("True", "Nombre") Dim Dt As DataTable = GlobalDTUsuarios(-1, UsuarioActual.CveEmpresa).FiltraParametros("True", "Nombre")
DdlResponsable.DataSource = Dt.FiltraParametros("", "", {"CveUsuario", "Nombre"}) DdlResponsable.DataSource = Dt.FiltraParametros("Estatus = 1", "", {"CveUsuario", "Nombre"})
DdlResponsable.DataBind() DdlResponsable.DataBind()
DdlResponsable.Items.Insert(0, New ListItem("Seleccione", "-1")) DdlResponsable.Items.Insert(0, New ListItem("Seleccione", "-1"))