From 1b4b48bdfb96edc89a535f0dd4cefc86b4364ddb Mon Sep 17 00:00:00 2001 From: Jonathan Alexis Perez Morales Date: Tue, 13 Aug 2024 15:54:41 -0700 Subject: [PATCH] --CITRUS. Modal de existencias por capas --- App_Code/ClsInventarios.vb | 27 ++++ Inventarios/Kardex.aspx | 282 +++++++++++++++++++++---------------- Inventarios/Kardex.aspx.vb | 30 ++++ 3 files changed, 219 insertions(+), 120 deletions(-) diff --git a/App_Code/ClsInventarios.vb b/App_Code/ClsInventarios.vb index d78ec663b..fd14b2e9a 100644 --- a/App_Code/ClsInventarios.vb +++ b/App_Code/ClsInventarios.vb @@ -1513,6 +1513,33 @@ Public Class ClsInventarios Return Retorno End Function + Public Function GetInvExistenciasCapas(CvePS As Integer, FechaI As DateTime, FechaF As DateTime, CveEmpresa As Integer, Optional CvesAlmacenes As String = "-1") As Boolean + Dim Retorno As Boolean = False + + DataAdapter("PA_Inv_ExistenciasCapasGet") + + With SqlAdapter.SelectCommand.Parameters + .Add("@CvePS", SqlDbType.Int).Value = CvePS + .Add("@FechaI", SqlDbType.DateTime).Value = FechaI + .Add("@FechaF", SqlDbType.DateTime).Value = FechaF + .Add("@CvesAlmacenes", SqlDbType.VarChar).Value = CvesAlmacenes + .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa + End With + + Try + SqlAdapter.Fill(Data) + Retorno = True + Catch Ex1 As SqlException + + Me.OnError("Ocurrió un error al obtener las existencias de los movimientos.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) + + Catch ex As Exception + OnError("Ocurrió un error al obtener las existencias de los movimientos.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) + End Try + + Return Retorno + + End Function Public Function GetKardexAlmacen(CvePS As Integer, FechaI As String, FechaF As String, CveAlmacen As Integer, CveUnidadMedida As Integer, CveUsuario As Integer, CveEmpresa As Integer) As Boolean Dim Retorno As Boolean = False diff --git a/Inventarios/Kardex.aspx b/Inventarios/Kardex.aspx index 937e82045..891cfad73 100644 --- a/Inventarios/Kardex.aspx +++ b/Inventarios/Kardex.aspx @@ -121,30 +121,33 @@ Kardex - +
  • - PDF + PDF
  • - Excel + Excel
  • - Series Disponibles + Series Disponibles
  • - Caducidad de producto + Caducidad de producto
  • - Ayuda + Existecias por capas +
    • +
  • + Ayuda <%--
       
    --%>
    • - - + + @@ -164,17 +167,17 @@
    - Producto: + Producto:
    - +
    <%----%> - +
    - +
    @@ -192,7 +195,7 @@
    - +
    @@ -217,77 +220,81 @@
    + - -
    > -
    - -
    - - - -
    - - -
    - - - -
    - -
    - -
    - -
    - -
    - -
    - -
    - - -
    - -
    - +
    > +
    + +
    + + +
    -
    -
    + +
    + + + +
    -
    -
    Código Inicio:
    -
    -
    Código Fin:
    -
    -
    Marca
    -
    - - - -
    -
    Proveedor:
    -
    - -
    - -
    -
    -
    - Anterior +
    + +
    + +
    + +
    + +
    + +
    + + +
    + +
    +
    -
    -
    -
    - Siguiente +
    + +
    + +
    +
    Código Inicio:
    +
    + +
    +
    Código Fin:
    +
    + +
    +
    Marca
    +
    + + + +
    +
    Proveedor:
    +
    + +
    + +
    +
    +
    + Anterior +
    +
    +
    +
    + Siguiente +
    -
    @@ -424,7 +431,7 @@ - + @@ -434,31 +441,31 @@ - + - + - + - + - + - + @@ -477,19 +484,19 @@ - + - + - + @@ -545,7 +552,7 @@