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

Permiso para ver importe de Inventario en RepRemisiones.aspx

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2022-01-03 20:31:53 -07:00
parent fe3ce7a520
commit db06a3fffa
4 changed files with 28 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
Ventas/RepRemisiones.aspx.vb
View File

@@ -92,10 +92,15 @@ Partial Class RepRemisiones
Dim ObjVentas As New ClsVentas
If ObjVentas.GetRepRemisionesSinFacturar(FechaI, FechaF, FechaV, Sucursales, CveCliente, CveContrato, Vendedores, UsuarioActual.CveEmpresa, CveUsuarioConsulta:=UsuarioActual.CveUsuario) Then
GvDatos.DataSource = ObjVentas.DtResultados
DtVentas = ObjVentas.DtResultados
DtVentas = ObjVentas.DtResultados.Copy()
GvDatos.DataSource = DtVentas
End If
GvDatos.Columns(7).Visible = ObjVentas.DtResultados.SUMD("Descuento") > 0
If DtVentas IsNot Nothing Then
GvDatos.Columns(7).Visible = DtVentas.SUMD("Descuento") > 0
End If
GvDatos.Columns(10).Visible = UsuarioActual.TienePermisoProceso(201)
ObjVentas.Dispose()
GvDatos.DataBind()