-- existencias ps, el parametro de Excluyetransitorios
This commit is contained in:
@@ -1875,7 +1875,7 @@ Public Class ClsInventarios
|
|||||||
Optional Serie As String = "-1", Optional Lote As String = "-1", Optional FechaCaducidad As Date = MinFecha,
|
Optional Serie As String = "-1", Optional Lote As String = "-1", Optional FechaCaducidad As Date = MinFecha,
|
||||||
Optional CveVendedor As Integer = -1, Optional CveCliente As Integer = -1,
|
Optional CveVendedor As Integer = -1, Optional CveCliente As Integer = -1,
|
||||||
Optional ExcluyeAdelantado As Integer = -1, Optional PendientePorSurtir As Integer = -1,
|
Optional ExcluyeAdelantado As Integer = -1, Optional PendientePorSurtir As Integer = -1,
|
||||||
Optional ExcluyeApartados As Integer = 1, Optional RestringirAlmacenes As Integer = -1) As Decimal
|
Optional ExcluyeApartados As Integer = 1, Optional RestringirAlmacenes As Integer = -1, Optional ExcluyeTransitorios As Integer = -1) As Decimal
|
||||||
Dim Retorno As Decimal = -1
|
Dim Retorno As Decimal = -1
|
||||||
|
|
||||||
If FechaMovto = "-1" Then
|
If FechaMovto = "-1" Then
|
||||||
@@ -1900,6 +1900,7 @@ Public Class ClsInventarios
|
|||||||
.Add("@ExcluyeAdelantado", SqlDbType.Int).Value = ExcluyeAdelantado
|
.Add("@ExcluyeAdelantado", SqlDbType.Int).Value = ExcluyeAdelantado
|
||||||
.Add("@PendientePorSurtir", SqlDbType.Int).Value = PendientePorSurtir
|
.Add("@PendientePorSurtir", SqlDbType.Int).Value = PendientePorSurtir
|
||||||
.Add("@ExcluyeApartados", SqlDbType.Int).Value = ExcluyeApartados
|
.Add("@ExcluyeApartados", SqlDbType.Int).Value = ExcluyeApartados
|
||||||
|
.Add("@ExcluyeTransitorios", SqlDbType.Int).Value = ExcluyeTransitorios
|
||||||
.Add("@RestringirAlmacenes", SqlDbType.Int).Value = RestringirAlmacenes
|
.Add("@RestringirAlmacenes", SqlDbType.Int).Value = RestringirAlmacenes
|
||||||
|
|
||||||
.Add("@Existencia", SqlDbType.Money).Direction = ParameterDirection.Output
|
.Add("@Existencia", SqlDbType.Money).Direction = ParameterDirection.Output
|
||||||
@@ -1927,7 +1928,7 @@ Public Class ClsInventarios
|
|||||||
Optional FechaMovto As String = "-1", Optional CveVendedor As Integer = -1, Optional CveCliente As Integer = -1,
|
Optional FechaMovto As String = "-1", Optional CveVendedor As Integer = -1, Optional CveCliente As Integer = -1,
|
||||||
Optional Serie As String = "-1", Optional Lote As String = "-1", Optional Caducidad As Date = MinFecha,
|
Optional Serie As String = "-1", Optional Lote As String = "-1", Optional Caducidad As Date = MinFecha,
|
||||||
Optional ExcluyeAdelantado As Integer = -1, Optional PendientePorSurtir As Integer = -1,
|
Optional ExcluyeAdelantado As Integer = -1, Optional PendientePorSurtir As Integer = -1,
|
||||||
Optional ExcluyeApartados As Integer = 1, Optional RestringirAlmacenes As Integer = -1, Optional TopSelect As Integer = 10000) As Boolean
|
Optional ExcluyeApartados As Integer = 1, Optional RestringirAlmacenes As Integer = -1, Optional ExcluyeTransitorios As Integer = -1, Optional TopSelect As Integer = 10000) As Boolean
|
||||||
Dim Retorno As Boolean = False
|
Dim Retorno As Boolean = False
|
||||||
DataAdapter("PA_Inv_ExistenciasGet")
|
DataAdapter("PA_Inv_ExistenciasGet")
|
||||||
|
|
||||||
@@ -1948,6 +1949,7 @@ Public Class ClsInventarios
|
|||||||
.Add("@ExcluyeAdelantado", SqlDbType.Int).Value = ExcluyeAdelantado
|
.Add("@ExcluyeAdelantado", SqlDbType.Int).Value = ExcluyeAdelantado
|
||||||
.Add("@PendientePorSurtir", SqlDbType.Int).Value = PendientePorSurtir
|
.Add("@PendientePorSurtir", SqlDbType.Int).Value = PendientePorSurtir
|
||||||
.Add("@ExcluyeApartados", SqlDbType.Int).Value = ExcluyeApartados
|
.Add("@ExcluyeApartados", SqlDbType.Int).Value = ExcluyeApartados
|
||||||
|
.Add("@ExcluyeTransitorios", SqlDbType.Int).Value = ExcluyeTransitorios
|
||||||
.Add("@RestringirAlmacenes", SqlDbType.Int).Value = RestringirAlmacenes
|
.Add("@RestringirAlmacenes", SqlDbType.Int).Value = RestringirAlmacenes
|
||||||
.Add("@TopSelect", SqlDbType.Int).Value = TopSelect
|
.Add("@TopSelect", SqlDbType.Int).Value = TopSelect
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user