-- RNC578, solo mostrar los productos con existencia

Ashx/SIGWeb.ashx

@@ -811,6 +811,7 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState
         Dim retorno As String = ""
         Dim DtRetorno As DataTable = Nothing
 
+
         Dim Estatus = IfNull(context.Request("estatus"), "-1").ToString.ToEntero
 
         Dim filtro As String = ""
@@ -823,7 +824,6 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState
             filtro = " Estatus = 'Inactivo' "
         End If
 
-
         Dim usuario As Usuario = UsuarioActual(context)
         Dim CveEmpresa As Integer
         If IsNothing(usuario) Then
@@ -998,6 +998,12 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState
 
             End If
 
+            If usuario.Empresa.Funcionalidad(578) = "1" AndAlso DtPSRetorno IsNot Nothing Then
+                'solo muestar productos con existencia.
+                DtPSRetorno = DtPSRetorno.FiltraParametros("ExistenciaTotal > 0")
+            End If
+            If DtPSRetorno.Columns("ExistenciaTotal") IsNot Nothing Then DtPSRetorno.Columns.Remove("ExistenciaTotal")
+
             If UsaGlobal Then
                 'se recarga el global, y el clspaginas, son los unicos 2 lugares
                 'Dim AppNombre As String = String.Format("GlobalDTPSSimplificado-{0}", CveEmpresa)