From 60ae7256cd84d66fed9f6ac88495ceef1cbd9d55 Mon Sep 17 00:00:00 2001 From: Oscar Irigoyen Date: Tue, 27 Sep 2022 11:20:42 -0700 Subject: [PATCH] RepAnexoCatalogoCC correciones, pop buscar existencia se agrega buscar por serie --- App_Code/ClsContabilidad.vb | 1 + App_Code/ClsInventarios.vb | 19 ++ Contabilidad2/RepAnexoCatalogoCC.aspx | 5 +- Contabilidad2/RepAnexoCatalogoCC.aspx.vb | 5 +- .../RepEstadoResultadosHorizontal.aspx | 170 +++++++++--------- .../RepEstadoResultadosHorizontal.aspx.vb | 46 +++-- Inventarios/PopUpExistenciasAlmacen.aspx | 79 +++++++- Inventarios/PopUpExistenciasAlmacen.aspx.vb | 30 ++++ 8 files changed, 249 insertions(+), 106 deletions(-) diff --git a/App_Code/ClsContabilidad.vb b/App_Code/ClsContabilidad.vb index 4c5f48563..48190a254 100644 --- a/App_Code/ClsContabilidad.vb +++ b/App_Code/ClsContabilidad.vb @@ -4417,6 +4417,7 @@ Public Class ClsContabilidad End With Try + SqlAdapter.SelectCommand.CommandTimeout = 0 SqlAdapter.Fill(DSet) Retorno = True Catch ex As Exception diff --git a/App_Code/ClsInventarios.vb b/App_Code/ClsInventarios.vb index 232f88953..19c44dfe0 100644 --- a/App_Code/ClsInventarios.vb +++ b/App_Code/ClsInventarios.vb @@ -6015,6 +6015,25 @@ Public Class ClsInventarios #End Region + Public Function GetProductoPorSerie(Serie As String, CveEmpresa As Integer) As Boolean + Dim Retorno As Boolean = False + DataAdapter("PA_Inv_ProductoPorSerieGet") + + With SqlAdapter.SelectCommand.Parameters + .Add("@Serie", SqlDbType.VarChar).Value = Serie + .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa + End With + + Try + SqlAdapter.Fill(Data) + Retorno = True + Catch ex As Exception + OnError("Ocurrió un error al consultar los productos por serie.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) + End Try + + Return Retorno + End Function + #Region " IDisposable Support " ' IDisposable Protected Overridable Sub Dispose(ByVal disposing As Boolean) diff --git a/Contabilidad2/RepAnexoCatalogoCC.aspx b/Contabilidad2/RepAnexoCatalogoCC.aspx index fce33e0af..00b5d13c2 100644 --- a/Contabilidad2/RepAnexoCatalogoCC.aspx +++ b/Contabilidad2/RepAnexoCatalogoCC.aspx @@ -53,7 +53,7 @@