AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

cambios al conciliar, especificar el usuario

Browse Source
This commit is contained in:
rrene
2020-11-14 11:45:04 -07:00
parent a47ca16ba4
commit 69c1836963
1 changed files with 4 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
App_Code/ClsBancos.vb
View File

@@ -4089,12 +4089,13 @@ Public Class ClsBancos
#Region "CONCILIACIÓN BANCARIA"
Public Function UpdateConciliacionBancaria(CveIE As Integer, FechaAplicado As Date) As Boolean
Public Function UpdateConciliacionBancaria(CveIE As Integer, FechaAplicado As Date, CveUsuario As Integer) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Banc_ConciliacionBancariaUpdate")
With SqlAdapter.SelectCommand.Parameters
.Add("@CveIE", SqlDbType.Int).Value = CveIE
.Add("@FechaAplicado", SqlDbType.Date).Value = FechaAplicado
.Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
End With
Try
SqlAdapter.Fill(Data)
@@ -4188,12 +4189,13 @@ Public Class ClsBancos
Return Retorno
End Function
Public Function DesconciliarIE(CveIE As Integer, FechaDesconciliado As Date) As Boolean
Public Function DesconciliarIE(CveIE As Integer, FechaDesconciliado As Date, CveUsuario As Integer) 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
End With
Try
SqlAdapter.Fill(Data)