diff --git a/App_Code/ClsProductosServicios.vb b/App_Code/ClsProductosServicios.vb index f32ed4378..43926b628 100644 --- a/App_Code/ClsProductosServicios.vb +++ b/App_Code/ClsProductosServicios.vb @@ -1858,7 +1858,7 @@ Public Class ClsProductosServicios Return Retorno End Function - Public Function AddPorcentajeMarcas(CveCliente As Integer, CveMarca As Integer, PorcentajeProducto As Decimal, PorcentajeProducto2 As Decimal, PorcentajeProducto3 As Decimal, CveUsuario As Integer) As Boolean + Public Function AddPorcentajeMarcas(CveCliente As Integer, CveMarca As Integer, PorcentajeProducto As Decimal, PorcentajeProducto2 As Decimal, PorcentajeProducto3 As Decimal, CveUsuario As Integer, Optional ProntoPago As Decimal = -1, Optional Plazo As Integer = -1) As Boolean Dim Retorno As Boolean = False DataAdapter("PA_Vta_PorcentajeMarcasAdd") @@ -1870,6 +1870,8 @@ Public Class ClsProductosServicios .Add("@PorcentajeProducto2", SqlDbType.SmallMoney).Value = PorcentajeProducto2 .Add("@PorcentajeProducto3", SqlDbType.SmallMoney).Value = PorcentajeProducto3 .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario + .Add("@ProntoPago", SqlDbType.SmallMoney).Value = ProntoPago + .Add("@Plazo", SqlDbType.SmallInt).Value = Plazo End With Try @@ -1881,7 +1883,7 @@ Public Class ClsProductosServicios Return Retorno End Function - Public Function UpdatePorcentajeMarcas(CveCliente As Integer, CveMarca As Integer, PorcentajeProducto As Decimal, PorcentajeProducto2 As Decimal, PorcentajeProducto3 As Decimal) As Boolean + Public Function UpdatePorcentajeMarcas(CveCliente As Integer, CveMarca As Integer, PorcentajeProducto As Decimal, PorcentajeProducto2 As Decimal, PorcentajeProducto3 As Decimal, Optional ProntoPago As Decimal = -1, Optional Plazo As Integer = -1) As Boolean Dim Retorno As Boolean = False DataAdapter("PA_Vta_PorcentajeMarcasUpdate") @@ -1892,6 +1894,8 @@ Public Class ClsProductosServicios .Add("@PorcentajeProducto", SqlDbType.SmallMoney).Value = PorcentajeProducto .Add("@PorcentajeProducto2", SqlDbType.SmallMoney).Value = PorcentajeProducto2 .Add("@PorcentajeProducto3", SqlDbType.SmallMoney).Value = PorcentajeProducto3 + .Add("@ProntoPago", SqlDbType.SmallMoney).Value = ProntoPago + .Add("@Plazo", SqlDbType.SmallInt).Value = Plazo End With Try diff --git a/Ventas/Clientes.aspx b/Ventas/Clientes.aspx index 71d0fff76..c6897ef00 100644 --- a/Ventas/Clientes.aspx +++ b/Ventas/Clientes.aspx @@ -5501,9 +5501,9 @@