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

-- espacio

Browse Source
This commit is contained in:
rrene
2024-09-26 19:34:28 -07:00
parent a64e3cefe2
commit 3957601723
1 changed files with 0 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
App_Code/ClsInventarios.vb
View File

@@ -1035,18 +1035,8 @@ Public Class ClsInventarios
.Add("@CveClienteSucursal", SqlDbType.Int).Value = CveClienteSucursal
.Add("@PedidoContrato", SqlDbType.VarChar).Value = PedidoContrato
.Add("@GastoIndirecto", SqlDbType.Money).Value = GastoIndirecto
'.Add("@CveChofer", SqlDbType.Int).Value = CveChofer
'.Add("@CveCamion", SqlDbType.Int).Value = CveCamion
'.Add("@Placa", SqlDbType.VarChar).Value = Placa
'.Add("@FechaEntrega", SqlDbType.VarChar).Value = FechaEntrega
'.Add("@EspecifUnidad", SqlDbType.VarChar).Value = EspecifUnidad
.Add("@ResponsableCarga", SqlDbType.VarChar).Value = ResponsableCarga
.Add("@ResponsableRecibio", SqlDbType.VarChar).Value = ResponsableRecibio
'.Add("@Identificacion", SqlDbType.VarChar).Value = Identificacion
'.Add("@Domicilio", SqlDbType.VarChar).Value = Domicilio
'.Add("@Telefono", SqlDbType.VarChar).Value = Telefono
'.Add("@Ciudad", SqlDbType.VarChar).Value = Ciudad
'.Add("@Licencia", SqlDbType.VarChar).Value = Licencia
.Add("@Modulo", SqlDbType.VarChar).Value = Modulo
.Add("@CveOP", SqlDbType.Int).Value = CveOP
.Add("@CveEntregaAlmacen", SqlDbType.Int).Value = CveEntregaAlmacen
@@ -1077,7 +1067,6 @@ Public Class ClsInventarios
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 Decimal = -1, Optional CveCliente As Integer = -1, Optional CveProveedor As Integer = -1, Optional Remision As String = "") As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Inv_MovimientosUpdate")
With SqlAdapter.SelectCommand.Parameters
@@ -1118,7 +1107,6 @@ Public Class ClsInventarios
Public Function UpdateMovimientoPoliza(IDPoliza As Integer, CveMovimiento As Integer, CveEmpresa As Integer) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Inv_MovimientosPolizaUpdate")
With SqlAdapter.SelectCommand.Parameters
@@ -1140,7 +1128,6 @@ Public Class ClsInventarios
Public Function UpdateMovimientoGuia(Guia As String, CveMovimiento As Integer, CveEmpresa As Integer) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Inv_MovimientosPolizaUpdate")
With SqlAdapter.SelectCommand.Parameters
@@ -1162,7 +1149,6 @@ Public Class ClsInventarios
Public Function MovimientoRemove(CveMovimiento As Integer, CveEmpresa As Integer, Optional CveUsuario As Integer = -1) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Inv_MovimientosRemove")
With SqlAdapter.SelectCommand.Parameters