-- corr

Ventas/Promociones.aspx.vb

@@ -158,7 +158,6 @@ Partial Class Ventas_Promociones
             PermisoAutorizPromocionPorcentaje = UsuarioActual.TienePermisoProceso(386)
 
             EmpresaGrupoDiaz = If(UsuarioActual.Empresa.Funcionalidad(382) = "1", True, False) 'Grupo díaz
-            EmpresaGrupoDiaz = True ''Para pruebas
 
             If EmpresaGrupoDiaz Then
                 DVModalClasificacion.Visible = False
@@ -212,7 +211,6 @@ Partial Class Ventas_Promociones
     End Sub
 
 
-
 #Region "BITACORA"
 
     Private Sub CargaGvBitacora()
@@ -240,7 +238,7 @@ Partial Class Ventas_Promociones
     Private Sub CargaValoresIniciales()
         Dim ObjPS As New ClsProductosServicios
         'CLASIFICACIONES
-        DdlClasificacion.DataSource = GlobalDTClasificaciones(UsuarioActual.CveEmpresa).FiltraParametros(" Codigo = '' OR Codigo IS NULL ", Orderby:="Clasificacion")
+        DdlClasificacion.DataSource = GlobalDTClasificaciones(UsuarioActual.CveEmpresa).FiltraParametros("", Orderby:="Clasificacion")
         DdlClasificacion.DataBind()
         If UsuarioActual.Empresa.Funcionalidad(382) = "1" Then
             DdlClasificacion.Items.Insert(0, New ListItem("Todos", "-1"))