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

Merge branch 'master' of http://192.168.10.111:8383/SIG

Browse Source
This commit is contained in:
JORGE LUIS CAUDILLO ESPARZA
2023-02-02 11:55:59 -07:00
parent 3f81b54267 5b91e058c0
commit 0e6d5c58cc
209 changed files with 43368 additions and 20056 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Sistemas/PopUpCambiaUsuario.aspx.vb
View File

@@ -25,9 +25,9 @@ Partial Class Sistemas_PopUpCambiaUsuario
RegistraScript("window.close();")
End If
Dim DtEmp As DataTable = GlobalDTEmpresas.Copy
Dim DtEmp As DataTable = GlobalDTEmpresas(CveEmpresa:=-1).Copy
Dim NombreEmp As String = UsuarioActual.Empresa.Empresa
'''condición para ocultar los nombres de las empresas y ponerles "mi empresa de venta (xxx)"
''condición para ocultar los nombres de las empresas y ponerles "mi empresa de venta (xxx)"
''If UsuarioActual.CveUsuario = 100 Then
'' Dim customerRow() As Data.DataRow
@@ -197,7 +197,7 @@ Partial Class Sistemas_PopUpCambiaUsuario
End Sub
Private Sub CargaUsuarios(Optional Orden As String = "Nombre")
Dim dtt As DataTable = GlobalDTUsuarios(-1, DdlEmpresa.SelectedValue.ToEntero)
Dim dtt As DataTable = GlobalDTUsuarios(-1, CveEmpresa:=DdlEmpresa.SelectedValue.ToEntero)
'If DdlRol.SelectedValue <> "-1" Then
' dtt = dtt.FiltraParametros("CveRol=" & DdlRol.SelectedValue)
'End If