-Serie Lote, Caducidad Seccion Almacen

Ashx/SIGFacturacion.ashx

@@ -542,7 +542,7 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
         TmpDT.Columns.Add("NoIdentificacion", GetType(String))
         TmpDT.Columns.Add("CveTipoPS", GetType(Integer))
         TmpDT.Columns.Add("CveTipoInvPS", GetType(Integer))
-        TmpDT.Columns.Add("SerieLote", GetType(String))
+        TmpDT.Columns.Add("Serie", GetType(String))
         TmpDT.Columns.Add("CuentaPredial", GetType(String))
         TmpDT.Columns.Add("Obs", GetType(String))
         TmpDT.Columns.Add("TiempoEntrega", GetType(String))
@@ -629,7 +629,7 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
 
     Private Function AgregarProductoServicio(ByRef Retorno As Modelos.Factura.MMensajeFactura, UsuarioActual As Usuario, TmpDT As DataTable, Consec As Integer, Cantidad As Double, CveUM As Integer, UM As String, CveClasificacion As Integer, Clasificacion As String, CvePS As Integer, PS As String, Obs As String,
                       PU As Decimal, Descuento As Decimal, CveSubProyecto As Integer,
-                      Optional SerieLote As String = "", Optional TiempoEntrega As String = "", Optional EntregaDirecta As Integer = 0,
+                      Optional Serie As String = "", Optional TiempoEntrega As String = "", Optional EntregaDirecta As Integer = 0,
                       Optional CveContratoDetalle As Integer = 0, Optional CveVentaDetalle As Integer = 0, Optional CveMovimientoDetallePedido As Integer = 0,
                       Optional CveOrdenCompraDetalle As Integer = 0, Optional CveVentaDetalleRemision As Integer = 0, Optional CveVentaDetalleCotizacion As Integer = 0,
                       Optional CuentaPredial As String = "", Optional RegeneraIEPS As Boolean = True, Optional CveVentaDetallePedido2 As Integer = 0,
@@ -682,7 +682,7 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
         Row("Proyecto") = DrSubProyecto("Proyecto").ToString()
         Row("CveSubProyecto") = CveSubProyecto
         Row("SubProyecto") = DrSubProyecto("SubProyecto").ToString()
-        Row("SerieLote") = SerieLote
+        Row("Serie") = Serie
         Row("TiempoEntrega") = TiempoEntrega
         Row("Orden") = TmpDT.Rows.Count + 1
         Row("Cantidad") = Cantidad

Ashx/SIGWeb.ashx

@@ -533,11 +533,11 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState
 
                 retorno = JsonConvert.SerializeObject(DtPSRetorno).ToString
                 context.Response.Write(retorno)
-
+                DtPSRetorno.Dispose()
             Else
                 context.Response.Write("[]")
             End If
-            DtPSRetorno.Dispose()
+
         End If
 
         Return retorno

Compras/PopUpVerFactura.aspx.vb

@@ -1820,7 +1820,7 @@ Partial Class PopUpVerFactura
                         params.Add(New ReportParameter("NombreRecibio", Capturo.ToUpper))
                         Dim logouri = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa)
                         params.Add(New ReportParameter("LogoPath", logouri))
-                        If DtMovimientos.COUNT("SerieLote") > 0 Then
+                        If DtMovimientos.COUNT("Serie") > 0 Then
                             params.Add(New ReportParameter("MostrarSerieLote", "1"))
                         Else
                             params.Add(New ReportParameter("MostrarSerieLote", "0"))
@@ -1904,7 +1904,7 @@ Partial Class PopUpVerFactura
                         params.Add(New ReportParameter("NombreRecibio", Personal))
                         Dim logouri = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa)
                         params.Add(New ReportParameter("LogoPath", logouri))
-                        If DtMovimientos.COUNT("SerieLote") > 0 Then
+                        If DtMovimientos.COUNT("Serie") > 0 Then
                             params.Add(New ReportParameter("MostrarSerieLote", "1"))
                         Else
                             params.Add(New ReportParameter("MostrarSerieLote", "0"))

Contabilidad2/RepMovimientosAuxiliaresCatalogo.aspx.vb

@@ -473,7 +473,7 @@ Partial Class Conta_RepMovimientosAuxiliaresCatalogo
         params.Add(New ReportParameter("pFechaInicio", FechaInicio.ToString("dd/MM/yyyy")))
         params.Add(New ReportParameter("CveMoneda", DdlMoneda.SelectedValue))
         params.Add(New ReportParameter("Cuenta", Cuenta))
-        ImprimirPDF("Contabilidad2/Reportes/RepMovimientosAuxiliaresCatalogo.rdlc", DtDatos, params, "MovimientosAuxiliares", Formato)
+        ImprimirPDF("Empresas/Grales/Formatos/RepMovimientosAuxiliaresCatalogo.rdlc", DtDatos, params, "MovimientosAuxiliares", Formato)
     End Sub
     Protected Sub DdlTipoCuentas_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlTipoCuentas.SelectedIndexChanged
         If DdlTipoCuentas.SelectedValue.ToEntero = -2 Then