diff --git a/Ventas/Promociones.aspx b/Ventas/Promociones.aspx
index 4a4d6b944..fac769ab1 100644
--- a/Ventas/Promociones.aspx
+++ b/Ventas/Promociones.aspx
@@ -234,7 +234,7 @@
diff --git a/Ventas/Promociones.aspx.vb b/Ventas/Promociones.aspx.vb
index 1d9f1a6b6..fdf49d14f 100644
--- a/Ventas/Promociones.aspx.vb
+++ b/Ventas/Promociones.aspx.vb
@@ -127,6 +127,8 @@ Partial Class Ventas_Promociones
#Region " PS "
Protected Sub DdlClasificacion_SelectedIndexChanged(sender As Object, e As EventArgs)
ChangeDdlProducto()
+ DdlTipoPromocion.Items.FindByValue("1").Enabled = False
+ DdlTipoPromocion.Items.FindByValue("3").Enabled = False
End Sub
Private Sub ChangeDdlProducto()
If UsuarioActual.Empresa.Funcionalidad(105) = "" Then
@@ -137,6 +139,10 @@ Partial Class Ventas_Promociones
DdlPS.ddlWS.Attributes.Add("data-idClasificacion", DdlClasificacion.SelectedValue)
End If
End Sub
+ Protected Sub DdlPS_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlPS.selectedindexchange
+ DdlTipoPromocion.Items.FindByValue("1").Enabled = True
+ DdlTipoPromocion.Items.FindByValue("3").Enabled = True
+ End Sub
#End Region