diff --git a/App_Code/ClsBancos.vb b/App_Code/ClsBancos.vb index 6b6d7482e..cc989e5e4 100644 --- a/App_Code/ClsBancos.vb +++ b/App_Code/ClsBancos.vb @@ -4308,13 +4308,14 @@ Public Class ClsBancos Return Retorno End Function - Public Function DesconciliarIE(CveIE As Integer, FechaDesconciliado As Date, CveUsuario As Integer) As Boolean + Public Function DesconciliarIE(CveIE As Integer, FechaDesconciliado As Date, CveUsuario As Integer, Optional DejarConciliado As Boolean = False) As Boolean Dim Retorno As Boolean = False DataAdapter("PA_Banc_IEDesconciliar") With SqlAdapter.SelectCommand.Parameters .Add("@CveIE", SqlDbType.Int).Value = CveIE .Add("@FechaDesconciliado", SqlDbType.Date).Value = FechaDesconciliado .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario + .Add("@DejarConciliado", SqlDbType.Int).Value = If(DejarConciliado, 1, 0) End With Try SqlAdapter.Fill(Data) diff --git a/Bancos/ConciliacionesBancarias.aspx b/Bancos/ConciliacionesBancarias.aspx index 39a3e738f..f3eb42492 100644 --- a/Bancos/ConciliacionesBancarias.aspx +++ b/Bancos/ConciliacionesBancarias.aspx @@ -396,10 +396,10 @@