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

cambio de float a decimal

Browse Source
This commit is contained in:
rrene
2021-09-28 21:53:11 -07:00
parent f4e00cb5f0
commit 9073471684
1 changed files with 18 additions and 18 deletions
Download Patch File Download Diff File Expand all files Collapse all files

36
App_Code/ClsCompras.vb
View File

@@ -438,12 +438,12 @@ Public Class ClsCompras
End Function
Public Function AddCompraDetalle(CveCompra As Integer, CveUM As Integer, CvePS As Integer, CveSubProyecto As Integer, CveCliente As Integer, CveActivoFijo As Integer,
Cantidad As Double, PU As Double, IVA As Double, Total As Double, Descuento As Double, Observaciones As String, CveOCDetalle As Integer,
Cantidad As Decimal, PU As Decimal, IVA As Decimal, Total As Decimal, Descuento As Decimal, Observaciones As String, CveOCDetalle As Integer,
Optional TipoRecepcion As Integer = -1, Optional CveContrato As Integer = -1, Optional CvePresupuestoEgreso As Integer = -1,
Optional AplicaCostoIndirecto As Integer = -1, Optional EstatusAlmacen As Integer = -1, Optional CvePersonal As Integer = -1, Optional CveTipoGasto As Integer = -1,
Optional AF_Medida As Integer = -1, Optional AF_TipoMantenimiento As Integer = -1, Optional Referencia As String = "", Optional OtrosGastos As Decimal = 0,
Optional RetIVA As Double = 0, Optional RetISR As Double = 0, Optional IEPSPS As Double = 0, Optional IEPSPSIVA As Double = 0,
Optional IVAPorcentaje As Double = 0, Optional RetIVAPorcentaje As Double = 0, Optional RetISRPorcentaje As Double = 0, Optional IEPSPSPorcentaje As Double = 0, Optional IEPSPSIVAPorcentaje As Double = 0,
Optional RetIVA As Decimal = 0, Optional RetISR As Decimal = 0, Optional IEPSPS As Decimal = 0, Optional IEPSPSIVA As Decimal = 0,
Optional IVAPorcentaje As Decimal = 0, Optional RetIVAPorcentaje As Decimal = 0, Optional RetISRPorcentaje As Decimal = 0, Optional IEPSPSPorcentaje As Decimal = 0, Optional IEPSPSIVAPorcentaje As Decimal = 0,
Optional NoDeducible As Boolean = False, Optional CveContratoDetalle As Integer = -1, Optional CveCultivoCuadroDetalle As Integer = -1) As Boolean
Dim Retorno As Boolean = False
@@ -457,12 +457,12 @@ Public Class ClsCompras
.Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
.Add("@CveCliente", SqlDbType.Int).Value = CveCliente
.Add("@CveActivoFijo", SqlDbType.Int).Value = CveActivoFijo
.Add("@Cantidad", SqlDbType.Float).Value = Cantidad
.Add("@PU", SqlDbType.Float).Value = PU
.Add("@IVA", SqlDbType.Float).Value = IVA
.Add("@Total", SqlDbType.Float).Value = Total
.Add("@Descuento", SqlDbType.Float).Value = Descuento
.Add("@OtrosGastos", SqlDbType.Float).Value = OtrosGastos
.Add("@Cantidad", SqlDbType.Decimal).Value = Cantidad
.Add("@PU", SqlDbType.Decimal).Value = PU
.Add("@IVA", SqlDbType.Decimal).Value = IVA
.Add("@Total", SqlDbType.Decimal).Value = Total
.Add("@Descuento", SqlDbType.Decimal).Value = Descuento
.Add("@OtrosGastos", SqlDbType.Decimal).Value = OtrosGastos
.Add("@Observaciones", SqlDbType.VarChar).Value = Observaciones
.Add("@CveOCDetalle", SqlDbType.Int).Value = CveOCDetalle
.Add("@TipoRecepcion", SqlDbType.Int).Value = TipoRecepcion
@@ -476,16 +476,16 @@ Public Class ClsCompras
.Add("@AF_TipoMantenimiento", SqlDbType.Int).Value = AF_TipoMantenimiento
.Add("@Referencia", SqlDbType.VarChar).Value = Referencia
.Add("@CveCompraDetalle", SqlDbType.Int).Direction = ParameterDirection.Output
.Add("@RetIVA", SqlDbType.Float).Value = RetIVA
.Add("@RetISR", SqlDbType.Float).Value = RetISR
.Add("@IEPSPS", SqlDbType.Float).Value = IEPSPS
.Add("@IEPSPSIVA", SqlDbType.Float).Value = IEPSPSIVA
.Add("@RetIVA", SqlDbType.Decimal).Value = RetIVA
.Add("@RetISR", SqlDbType.Decimal).Value = RetISR
.Add("@IEPSPS", SqlDbType.Decimal).Value = IEPSPS
.Add("@IEPSPSIVA", SqlDbType.Decimal).Value = IEPSPSIVA
.Add("@IVAPorcentaje", SqlDbType.Float).Value = IVAPorcentaje
.Add("@RetIVAPorcentaje", SqlDbType.Float).Value = RetIVAPorcentaje
.Add("@RetISRPorcentaje", SqlDbType.Float).Value = RetISRPorcentaje
.Add("@IEPSPSPorcentaje", SqlDbType.Float).Value = IEPSPSPorcentaje
.Add("@IEPSPSIVAPorcentaje", SqlDbType.Float).Value = IEPSPSIVAPorcentaje
.Add("@IVAPorcentaje", SqlDbType.Decimal).Value = IVAPorcentaje
.Add("@RetIVAPorcentaje", SqlDbType.Decimal).Value = RetIVAPorcentaje
.Add("@RetISRPorcentaje", SqlDbType.Decimal).Value = RetISRPorcentaje
.Add("@IEPSPSPorcentaje", SqlDbType.Decimal).Value = IEPSPSPorcentaje
.Add("@IEPSPSIVAPorcentaje", SqlDbType.Decimal).Value = IEPSPSIVAPorcentaje
.Add("@NoDeducible", SqlDbType.Bit).Value = NoDeducible
.Add("@CveContratoDetalle", SqlDbType.Int).Value = CveContratoDetalle
.Add("@CveCultivoCuadroDetalle", SqlDbType.Int).Value = CveCultivoCuadroDetalle