parametro de cliente. en entrega almacen
This commit is contained in:
@@ -3910,7 +3910,7 @@ Public Class ClsGenerales
|
|||||||
|
|
||||||
Public Function AddInvEntregaAlmacenRuta(CveSubProyecto As Integer, CveDireccionOrigen As Integer, CveDireccionDestino As Integer, CveMovimientoAlmacen As Integer, CveChofer As Integer, CveCamion As Integer, FechaEntrega As Date, FechaLlegada As DateTime, Tipo As String,
|
Public Function AddInvEntregaAlmacenRuta(CveSubProyecto As Integer, CveDireccionOrigen As Integer, CveDireccionDestino As Integer, CveMovimientoAlmacen As Integer, CveChofer As Integer, CveCamion As Integer, FechaEntrega As Date, FechaLlegada As DateTime, Tipo As String,
|
||||||
FolioReferencia As String, Referencia As String, FechaLimite As Date, Orden As Integer, Estatus As Integer, Distancia As Integer, Optional CveConfigAutoTransporte As Integer = -1,
|
FolioReferencia As String, Referencia As String, FechaLimite As Date, Orden As Integer, Estatus As Integer, Distancia As Integer, Optional CveConfigAutoTransporte As Integer = -1,
|
||||||
Optional CveCamionRemolque1 As Integer = -1, Optional CveCamionRemolque2 As Integer = -1) As Integer
|
Optional CveCamionRemolque1 As Integer = -1, Optional CveCamionRemolque2 As Integer = -1, Optional CveCliente As Integer = -1) As Integer
|
||||||
Dim Retorno As Integer = -1
|
Dim Retorno As Integer = -1
|
||||||
DataAdapter("PA_Inv_EntregaAlmacenRutaAdd")
|
DataAdapter("PA_Inv_EntregaAlmacenRutaAdd")
|
||||||
|
|
||||||
@@ -3936,6 +3936,7 @@ Public Class ClsGenerales
|
|||||||
.Add("@CveCamionRemolque1", SqlDbType.Int).Value = CveCamionRemolque1
|
.Add("@CveCamionRemolque1", SqlDbType.Int).Value = CveCamionRemolque1
|
||||||
.Add("@CveCamionRemolque2", SqlDbType.Int).Value = CveCamionRemolque2
|
.Add("@CveCamionRemolque2", SqlDbType.Int).Value = CveCamionRemolque2
|
||||||
.Add("@CveConfigAutoTransporte", SqlDbType.Int).Value = CveConfigAutoTransporte
|
.Add("@CveConfigAutoTransporte", SqlDbType.Int).Value = CveConfigAutoTransporte
|
||||||
|
.Add("@CveCliente", SqlDbType.Int).Value = CveCliente
|
||||||
|
|
||||||
.Add("@CveEntregaAlmacen", SqlDbType.Int).Direction = ParameterDirection.Output
|
.Add("@CveEntregaAlmacen", SqlDbType.Int).Direction = ParameterDirection.Output
|
||||||
End With
|
End With
|
||||||
|
|||||||
Reference in New Issue
Block a user