-- double a decimal

This commit is contained in:
2023-08-14 19:23:10 -07:00
parent d096c38420
commit acb5d18fad

View File

@@ -151,9 +151,9 @@ Public Class ClsBancos
Public Property Referencia As String
Public Property TipoCredito As Integer
Public Property Plazo As Integer
Public Property ImporteCredito As Double
Public Property CreditoValor As Double
Public Property TotalFinanciado As Double
Public Property ImporteCredito As Decimal
Public Property CreditoValor As Decimal
Public Property TotalFinanciado As Decimal
Public Property Proveedor As String
Public Property CveProveedor As Integer
Public Property CveTipoCredito As Integer
@@ -2434,8 +2434,8 @@ Public Class ClsBancos
FacturaSerieFolio = Data.Rows(0)("FacturaSerieFolio").ToString
FacturaDescripcion = Data.Rows(0)("FacturaDescripcion").ToString
FacturaFecha = Data.Rows(0)("FacturaFecha").ToString.ToDate
CreditoValor = Data.Rows(0)("CreditoValor").ToString.ToDouble
TotalFinanciado = Data.Rows(0)("TotalFinanciado").ToString.ToDouble
CreditoValor = Data.Rows(0)("CreditoValor").ToString.ToDecimal
TotalFinanciado = Data.Rows(0)("TotalFinanciado").ToString.ToDecimal
CvePrePoliza = Data.Rows(0)("CvePrePoliza").ToString.ToEntero
End If
Retorno = True