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

Ajustes eFacturas controles filtro

Browse Source
This commit is contained in:
Oscar Irigoyen
2023-07-20 17:49:03 -07:00
parent e21b4f02cc
commit 12e4e4c3db
3 changed files with 72 additions and 15 deletions
Download Patch File Download Diff File Expand all files Collapse all files

38
Sistemas/RolesDetalle.aspx
View File

@@ -234,6 +234,44 @@
</ajax:TabPanel>
<ajax:TabPanel ID="TabPanelUsuarios" runat="server" HeaderText="Usuarios">
<ContentTemplate>
<asp:UpdatePanel ID="UpUsuarios" UpdateMode="Conditional" runat="server">
<ContentTemplate>
<div class="row">
<div class="col-md-6">
<div class="portlet light smmallpadding bordered ">
<div class="portlet-title">
<div class="caption font-green">
<i class="icon-pin font-green"></i>
<span class="caption-subject bold uppercase">Usuarios</span>
</div>
<div class="actions">
<div class="btn-group">
</div>
</div>
<div class="tools">
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
</div>
</div>
<div class="portlet-body">
<asp:GridView ID="GvUsurios" DataKeyNames="CveUsuario" data-sort="true" CssClass="table table-striped table-hover Widthall ScrollAD"
DataKey="CveUsuario" AutoGenerateColumns="false" GridLines="None" EmptyDataText="Aun no se usuarios" runat="server">
<Columns>
<asp:BoundField DataField="Usuario" HeaderText="Usuario" />
<asp:BoundField DataField="Nombre" HeaderText="Nombre" />
</Columns>
</asp:GridView>
</div>
</div>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</ContentTemplate>
</ajax:TabPanel>
</ajax:TabContainer>
<br />

15
Sistemas/RolesDetalle.aspx.vb
View File

@@ -30,6 +30,8 @@ Partial Class Sistemas_RolesDetalle
CargaGridIndicadores()
CargaGridPermisos()
CargaGridProcesos()
CargaUsuarios()
DdlModulo.DataSource = GlobalDTModulos()
DdlModulo.DataBind()
@@ -60,6 +62,19 @@ Partial Class Sistemas_RolesDetalle
End Sub
Private Sub CargaUsuarios()
Dim ObjUsuarios As New ClsSisUsuarios()
If ObjUsuarios.GetUsuarios(-1, CveRol) Then
GvUsurios.DataSource = ObjUsuarios.DtResultados.FiltraParametros("", "", {"CveUsuario", "Usuario", "Nombre"})
Else
GvUsurios.DataSource = Nothing
End If
ObjUsuarios.Dispose()
GvUsurios.DataBind()
End Sub
#Region "I N D I C A D O R E S"
Private Sub CargaGridIndicadores()