-- quitar código viejo

This commit is contained in:
2022-09-08 15:03:12 -07:00
parent 420f12ab44
commit b3bdf46fb1

View File

@@ -1673,27 +1673,6 @@ Public Class ClsBancos
Return Retorno
End Function
Public Function UpdateBancos_IETipoCambio(TipoCambio As Double, CveIE As Integer, CvePrePoliza As Integer, CveEmpresa As Integer) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Banc_IETipoCambioUpdate")
With SqlAdapter.SelectCommand.Parameters
.Add("@TipoCambio", SqlDbType.Float).Value = TipoCambio
.Add("@CveIE", SqlDbType.Int).Value = CveIE
.Add("@CvePrePoliza", SqlDbType.Int).Value = CvePrePoliza
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
OnError("Ocurrió un error al actualizar el tipo cambio del IE.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno
End Function
Public Function UpdateBancosTipoCambioValuacion(TipoCambio As Decimal, CveIE As Integer, CveEmpresa As Integer) As Boolean
Dim Retorno As Boolean = False