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

-- mejora en sms kpi

Browse Source
This commit is contained in:
rrene
2025-04-21 12:36:04 -07:00
parent baaad4326c
commit 12caf4dd47
2 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
Inicio.aspx
View File

@@ -548,7 +548,7 @@
</div> </div>
</div> </div>
<br /> <br />
<div class="row" style="width: 95%; margin-right: 2.5%; margin-left: 2.5%;" runat="server" id="divsms1"> <div class="row" style="width: 95%; margin-right: 2.5%; margin-left: 2.5%;" runat="server" id="divsms1" visible="false">
<asp:UpdatePanel ID="UpdatePanel2" UpdateMode="Conditional" runat="server"> <asp:UpdatePanel ID="UpdatePanel2" UpdateMode="Conditional" runat="server">
<ContentTemplate> <ContentTemplate>
<div class="row" > <div class="row" >

4
Inicio.aspx.vb
View File

@@ -190,10 +190,11 @@ Partial Class Inicio
If UsuarioActual.TienePermisoProceso(343) Then MuestraPsProximosAVencer() If UsuarioActual.TienePermisoProceso(343) Then MuestraPsProximosAVencer()
If UsuarioActual.TienePermisoProceso(344) Then MuestraRSCOProximosAVencer() If UsuarioActual.TienePermisoProceso(344) Then MuestraRSCOProximosAVencer()
If UsuarioActual.Empresa.Funcionalidad(578) = "1" AndAlso UsuarioActual.CveRol.Contiene(1577, 1639, 1573) Then If UsuarioActual.Empresa.Funcionalidad(578) = "1" AndAlso UsuarioActual.CveUsuario = 3964 Then 'AndAlso UsuarioActual.CveRol.Contiene(1577, 1639, 1573) Then
Dim Opcion As Integer = 1 Dim Opcion As Integer = 1
Dim CveVendedor As Integer = -1 Dim CveVendedor As Integer = -1
Dim CveUsuarioTecnico As Integer = -1 Dim CveUsuarioTecnico As Integer = -1
divsms1.Visible = True
If UsuarioActual.CveRol = 1577 Then If UsuarioActual.CveRol = 1577 Then
Opcion = 1 'vendedor Opcion = 1 'vendedor
CveVendedor = UsuarioActual.CveVendedor CveVendedor = UsuarioActual.CveVendedor
@@ -2524,7 +2525,6 @@ Partial Class Inicio
If DdlSMSOpciones.SelectedValue = "1" Then If DdlSMSOpciones.SelectedValue = "1" Then
DdlSMSVendedores.DataSource = GlobalDTVendedores(UsuarioActual.CveEmpresa).FiltraParametros("CveEstatus=1") DdlSMSVendedores.DataSource = GlobalDTVendedores(UsuarioActual.CveEmpresa).FiltraParametros("CveEstatus=1")
DdlSMSVendedores.DataBind() DdlSMSVendedores.DataBind()
DdlSMSVendedores.Items.Insert(0, New ListItem("Todos", "-1"))
DdlSMSVendedores.Visible = True DdlSMSVendedores.Visible = True
DdlSMSTecnico.Visible = False DdlSMSTecnico.Visible = False
CargaKPICirugias(DdlSMSOpciones.SelectedValue.ToEntero, DdlSMSVendedores.SelectedValue.ToEntero) CargaKPICirugias(DdlSMSOpciones.SelectedValue.ToEntero, DdlSMSVendedores.SelectedValue.ToEntero)