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

-- option explicit on

Browse Source
This commit is contained in:
rrene
2023-09-04 18:31:36 -07:00
parent 8cf6d77ad1
commit b0d3321027
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
App_Code/ClsInventarios.vb
View File

@@ -1069,7 +1069,7 @@ Public Class ClsInventarios
Public Function UpdateMovimiento(CveMovimiento As Integer, CveAlmacen As Integer, CveConcepto As Integer, CveMoneda As Integer, FechaMovto As DateTime, Folio As Integer, CveUsuario As Integer, CveEmpresa As Integer, CveCompra As Integer, Public Function UpdateMovimiento(CveMovimiento As Integer, CveAlmacen As Integer, CveConcepto As Integer, CveMoneda As Integer, FechaMovto As DateTime, Folio As Integer, CveUsuario As Integer, CveEmpresa As Integer, CveCompra As Integer,
CveVenta As Integer, CveSubProyecto As Integer, CveActivoFijo As Integer, Optional CvePersonal As Integer = -1, Optional Guia As String = "", Optional Observaciones As String = "", Optional Recibio As String = "", Optional TipoCambio As Double = -1, Optional CveCliente As Integer = -1, Optional CveProveedor As Integer = -1, Optional Remision As String = "") As Boolean CveVenta As Integer, CveSubProyecto As Integer, CveActivoFijo As Integer, Optional CvePersonal As Integer = -1, Optional Guia As String = "", Optional Observaciones As String = "", Optional Recibio As String = "", Optional TipoCambio As Double = -1, Optional CveCliente As Integer = -1, Optional CveProveedor As Integer = -1, Optional Remision As String = "") As Boolean
Dim Retorno = False Dim Retorno As Boolean = False
DataAdapter("PA_Inv_MovimientosUpdate") DataAdapter("PA_Inv_MovimientosUpdate")
@@ -3694,7 +3694,7 @@ Public Class ClsInventarios
End Function End Function
Public Function AddConsignaciones(CveProveedor As Integer, CveCompra As Integer, SerieFolio As String, Fecha As Date, CveUsuario As Integer) As Integer Public Function AddConsignaciones(CveProveedor As Integer, CveCompra As Integer, SerieFolio As String, Fecha As Date, CveUsuario As Integer) As Integer
Dim Retorno = -1 Dim Retorno As Integer = -1
DataAdapter("PA_Inv_ConsignacionesAdd") DataAdapter("PA_Inv_ConsignacionesAdd")