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

-- columna de tipo venta

Browse Source
This commit is contained in:
rrene
2025-01-13 08:29:55 -07:00
parent fcdac87d2e
commit 78eb011cee
1 changed files with 5 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
Ventas/RepComisionesSMS.aspx.vb
View File

@@ -34,7 +34,7 @@ Partial Class Ventas_RepComisionesSMS
Private Sub CargaCombos() Private Sub CargaCombos()
If UsuarioActual.CveVendedor = 0 Then GvDatos.Columns(15).Visible = True 'columna de comisiones de gerente If UsuarioActual.CveVendedor = 0 Then GvDatos.Columns(16).Visible = True 'columna de comisiones de gerente
'If UsuarioActual.Empresa.Funcionalidad(302) = "1" AndAlso DdlSubProyectoDatos.SelectedValue.ToEntero() > 0 Then 'If UsuarioActual.Empresa.Funcionalidad(302) = "1" AndAlso DdlSubProyectoDatos.SelectedValue.ToEntero() > 0 Then
' DdlVendedor.DataSource = GlobalDTVendedores(UsuarioActual.CveEmpresa, VendedorTipo:=-1).FiltraParametros(String.Format("VendedorTipo IN (1,4) AND (CveSubProyecto IS NULL OR CveSubProyecto = {0})", DdlSubProyectoDatos.SelectedValue)) ' DdlVendedor.DataSource = GlobalDTVendedores(UsuarioActual.CveEmpresa, VendedorTipo:=-1).FiltraParametros(String.Format("VendedorTipo IN (1,4) AND (CveSubProyecto IS NULL OR CveSubProyecto = {0})", DdlSubProyectoDatos.SelectedValue))
@@ -46,7 +46,7 @@ Partial Class Ventas_RepComisionesSMS
If UsuarioActual.CveVendedor > 0 Then If UsuarioActual.CveVendedor > 0 Then
DdlVendedor.SelectedValueExist(UsuarioActual.CveVendedor) DdlVendedor.SelectedValueExist(UsuarioActual.CveVendedor)
DdlVendedor.Enabled = False DdlVendedor.Enabled = False
GvDatos.Columns(15).Visible = False 'gerente GvDatos.Columns(16).Visible = False 'gerente
End If End If
DdlMedico.DataSource = GlobalDTMedicos(UsuarioActual.CveEmpresa).FiltraParametros("Estatus = 'True' ") DdlMedico.DataSource = GlobalDTMedicos(UsuarioActual.CveEmpresa).FiltraParametros("Estatus = 'True' ")
@@ -59,9 +59,9 @@ Partial Class Ventas_RepComisionesSMS
If UsuarioActual.TienePermisoProceso(376) Then If UsuarioActual.TienePermisoProceso(376) Then
DdlUsuarioAtendio.Enabled = False DdlUsuarioAtendio.Enabled = False
DdlUsuarioAtendio.SelectedValueExist(UsuarioActual.CveUsuario) DdlUsuarioAtendio.SelectedValueExist(UsuarioActual.CveUsuario)
GvDatos.Columns(15).Visible = False 'gerente GvDatos.Columns(16).Visible = False 'gerente
GvDatos.Columns(16).Visible = False 'ed.medica GvDatos.Columns(17).Visible = False 'ed.medica
GvDatos.Columns(17).Visible = False 'fecha pago GvDatos.Columns(18).Visible = False 'fecha pago
End If End If
End Sub End Sub