From c354d1aaf422df2b3351c5a424e5a681e1bd07dd Mon Sep 17 00:00:00 2001 From: rrene Date: Thu, 6 Jul 2023 17:53:34 -0700 Subject: [PATCH] =?UTF-8?q?--=20flujo=20diario,=20opci=C3=B3n=20para=20flt?= =?UTF-8?q?rar=20por=20concilados?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- App_Code/ClsBancos.vb | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/App_Code/ClsBancos.vb b/App_Code/ClsBancos.vb index ba2901f1a..ab3e713ef 100644 --- a/App_Code/ClsBancos.vb +++ b/App_Code/ClsBancos.vb @@ -1944,7 +1944,7 @@ Public Class ClsBancos Return Retorno End Function - Public Function GetIngresoEgresosDelDia(Fecha As Date, Tipo As String, CveEmpresa As Integer) As Boolean + Public Function GetIngresoEgresosDelDia(Fecha As Date, Tipo As String, Opcion As Integer, CveEmpresa As Integer) As Boolean Dim Retorno As Boolean = False DataAdapter("PA_Banc_IngresoEgresosDiariosGet") @@ -1952,7 +1952,7 @@ Public Class ClsBancos .Add("@Fecha", SqlDbType.Date).Value = Fecha .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa .Add("@Tipo", SqlDbType.VarChar).Value = Tipo 'Ing Ingresp Egs Egreso - '.Add("@Opcion", SqlDbType.VarChar).Value = Opcion ' 1 Bancos 2 caja chica + .Add("@Opcion", SqlDbType.VarChar).Value = Opcion End With Try