Merge branch 'master' of http://192.168.10.111:8383/SIG

Ventas/ProductosServicios.aspx.vb

@@ -997,7 +997,7 @@ Partial Class ProductosyServicios
                     hplImagen.Attributes.Add("href", String.Format("/ashx/SIGWeb.ashx?Metodo=GetImg&r={0}", Extensiones.Encripta(Me.Imagen)))
                 End If
 
-                If UsuarioActual.CveRol = 1 Then DivImagen.Visible = True
+                DivImagen.Visible = True
                 upGaleria.Update()
                 RegistraScript("clickgaleria();", "CG")
 

Ventas/Promociones.aspx.vb

@@ -347,11 +347,6 @@ Partial Class Ventas_Promociones
         '380 AplicaDomingo
         '381 IncluyeImpuestos
 
-
-
-
-
-
     End Sub
 
     Private Sub CargaDTUltimoCosto()
@@ -530,7 +525,7 @@ Partial Class Ventas_Promociones
         If UsuarioActual.Empresa.Funcionalidad(382) = "1" Then
             Dim tuc As Decimal = LblUltimoCosto.Text.ToDecimal
             Dim tpu As Decimal = TxtPromocionConcepto.Text.ToDecimal
-            If (tpu - tuc) / tuc < UsuarioActual.Empresa.Funcionalidad(129).ToDecimal / 100 Then
+            If tuc <= 0 OrElse (tpu - tuc) / tuc < UsuarioActual.Empresa.Funcionalidad(129).ToDecimal / 100 Then
                 Alert("El producto está debajo de la utilidad permitida, la promoción requerirá autorización.", TipoMensaje.MsgAdvertencia.ToastAdventencia)
             End If
         End If
@@ -712,7 +707,8 @@ Partial Class Ventas_Promociones
                         End If
                     End If
 
-
+                Else
+                    BloqueadoPromocionPorcentaje = True
                 End If
 
             Next