AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

faltaba un dispose en una instancia de ClsVentas

Browse Source
This commit is contained in:
Antonio Gonzalez
2020-09-02 12:10:49 -07:00
parent 9e7e01f81f
commit fe2567f24a
5 changed files with 18 additions and 18 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
App_Code/ClsPaginas.vb
View File

@@ -6990,7 +6990,7 @@ Public Class ClsPaginas
Dim rds5 As New ReportDataSource With {.Name = "DataSet5", .Value = If(Vta.DtNCVinculadas IsNot Nothing, Vta.DtNCVinculadas, New DataTable)} ' sino esta creado el objeto, lo creamos, para que no truene el reporte Dim rds5 As New ReportDataSource With {.Name = "DataSet5", .Value = If(Vta.DtNCVinculadas IsNot Nothing, Vta.DtNCVinculadas, New DataTable)} ' sino esta creado el objeto, lo creamos, para que no truene el reporte
lrds.Add(rds5) lrds.Add(rds5)
If UsuarioActual.CveEmpresa = 141 AndAlso (RutaFormato.Contains("Factura") Or RutaFormato.Contains("Cotizacion")) Then If UsuarioActual.CveEmpresa.Contiene(141, 152) AndAlso (RutaFormato.Contains("Factura") Or RutaFormato.Contains("Cotizacion")) Then
params.Add(New ReportParameter("Kilometraje", Vta.Kilometraje.ToString)) params.Add(New ReportParameter("Kilometraje", Vta.Kilometraje.ToString))
End If End If
'Imprime los parametros 'Imprime los parametros

19
Bancos/RepCortes.aspx
View File

@@ -52,7 +52,7 @@
<asp:HyperLink Visible="false" NavigateUrl="#" data-toggle="modal" data-target="#DivPersonalizar" ID="ImgPersonalizar" runat="server"> <i class="fa fa-pencil"></i> Personalizar</asp:HyperLink> <asp:HyperLink Visible="false" NavigateUrl="#" data-toggle="modal" data-target="#DivPersonalizar" ID="ImgPersonalizar" runat="server"> <i class="fa fa-pencil"></i> Personalizar</asp:HyperLink>
</asp:Content> </asp:Content>
<asp:Content ID="Content4" ContentPlaceHolderID="E" runat="Server"> <asp:Content ID="Content4" ContentPlaceHolderID="E" runat="Server">
<asp:Label ID="LblTitulo" runat="server" Text="Cortes"></asp:Label> <asp:Label ID="LblTitulo" runat="server" Text="Reporte Cortes"></asp:Label>
</asp:Content> </asp:Content>
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server"> <asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
</asp:Content> </asp:Content>
@@ -72,7 +72,8 @@
<br /> <br />
<div class="row"> <div class="row">
<div class="col-md-1"> <div class="col-md-1">
SubProyecto <asp:Label runat="server" ID="LblSubProyecto" Text="SubProyecto"/>
<%--SubProyecto--%>
</div> </div>
<div class="col-md-2"> <div class="col-md-2">
<asp:DropDownList runat="server" ID="DdlSubProyectos" CssClass="form-control input-sm select2me" DataValueField="CveSubProyecto" DataTextField="SubProyecto" Class="table-group-action-input form-control input-inline input-small input-sm"> <asp:DropDownList runat="server" ID="DdlSubProyectos" CssClass="form-control input-sm select2me" DataValueField="CveSubProyecto" DataTextField="SubProyecto" Class="table-group-action-input form-control input-inline input-small input-sm">
@@ -160,7 +161,7 @@
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Right"> <asp:TemplateField ItemStyle-HorizontalAlign="Right">
<HeaderTemplate> <HeaderTemplate>
<asp:Label Text="Ventas Credito" runat="server" CausesValidation="false"> </asp:Label> <asp:Label Text="Ventas Crédito" runat="server" CausesValidation="false"> </asp:Label>
<asp:Literal runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal> <asp:Literal runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</HeaderTemplate> </HeaderTemplate>
<ItemTemplate> <ItemTemplate>
@@ -187,7 +188,7 @@
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Right"> <asp:TemplateField ItemStyle-HorizontalAlign="Right">
<HeaderTemplate> <HeaderTemplate>
<asp:Label Text="Tarj. Debito" runat="server" CausesValidation="false"> </asp:Label> <asp:Label Text="Tarj. Débito" runat="server" CausesValidation="false"> </asp:Label>
<asp:Literal runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal> <asp:Literal runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</HeaderTemplate> </HeaderTemplate>
<ItemTemplate> <ItemTemplate>
@@ -196,7 +197,7 @@
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Right"> <asp:TemplateField ItemStyle-HorizontalAlign="Right">
<HeaderTemplate> <HeaderTemplate>
<asp:Label Text="Tarj. Credito" runat="server" CausesValidation="false"> </asp:Label> <asp:Label Text="Tarj. Crédito" runat="server" CausesValidation="false"> </asp:Label>
<asp:Literal runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal> <asp:Literal runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</HeaderTemplate> </HeaderTemplate>
<ItemTemplate> <ItemTemplate>
@@ -298,7 +299,7 @@
<b>Detalles del Corte</b> <b>Detalles del Corte</b>
<asp:GridView ID="GvP" runat="server" AutoGenerateColumns="False" GridLines="None" Caption="Resumen" CssClass="table table-striped table-advance table-hover ScrollAD"> <asp:GridView ID="GvP" runat="server" AutoGenerateColumns="False" GridLines="None" Caption="Resumen" CssClass="table table-striped table-advance table-hover ScrollAD">
<Columns> <Columns>
<asp:BoundField HeaderText="Metodo Pago" DataField="MetodoPago" /> <asp:BoundField HeaderText="Método Pago" DataField="MetodoPago" />
<asp:BoundField HeaderText="Total" DataField="Importe" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField HeaderText="Total" DataField="Importe" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" />
</Columns> </Columns>
</asp:GridView> </asp:GridView>
@@ -306,15 +307,15 @@
<Columns> <Columns>
<asp:TemplateField ItemStyle-HorizontalAlign="Left"> <asp:TemplateField ItemStyle-HorizontalAlign="Left">
<HeaderTemplate> <HeaderTemplate>
SerieFolio Serie - Folio
</HeaderTemplate> </HeaderTemplate>
<ItemTemplate> <ItemTemplate>
<asp:HyperLink ID="LBDescripcion" runat="server" Text='<%# Eval("SerieFolio") %>' NavigateUrl='<%# Eval("CveVenta", "/Ventas/Ventas.aspx?CveVenta={0}")%>' ></asp:HyperLink> <asp:HyperLink ID="LBDescripcion" runat="server" Text='<%# Eval("SerieFolio") %>' NavigateUrl='<%# Eval("CveVenta", "/Ventas/Ventas.aspx?CveVenta={0}")%>' ></asp:HyperLink>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:BoundField HeaderText="NombreComercial" DataField="NombreComercial" ItemStyle-HorizontalAlign="Left" /> <asp:BoundField HeaderText="Cliente" DataField="NombreComercial" ItemStyle-HorizontalAlign="Left" />
<asp:BoundField HeaderText="Total" DataField="ImportePagado" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField HeaderText="Total" DataField="ImportePagado" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" />
<asp:BoundField HeaderText="Metodo Pago" DataField="MetodoPago" ItemStyle-HorizontalAlign="Left" /> <asp:BoundField HeaderText="Método Pago" DataField="MetodoPago" ItemStyle-HorizontalAlign="Left" />
</Columns> </Columns>
<HeaderStyle CssClass="Titulos" /> <HeaderStyle CssClass="Titulos" />
<RowStyle CssClass="Texto" /> <RowStyle CssClass="Texto" />

4
Bancos/RepCortes.aspx.vb
View File

@@ -61,9 +61,7 @@ Partial Class Bancos_RepCortes
txtFechaVI.Text = Now.ToShortDateString txtFechaVI.Text = Now.ToShortDateString
txtFechaVF.Text = Now.ToShortDateString txtFechaVF.Text = Now.ToShortDateString
Me.Form.DefaultButton = BtnConsultar.UniqueID Me.Form.DefaultButton = BtnConsultar.UniqueID
DdlSubProyectos.DataSource = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa) CargarCentrosDeCosto(Nothing, DdlSubProyectos, Nothing, LblSubProyecto)
DdlSubProyectos.DataBind()
DdlSubProyectos.Items.Insert(0, New ListItem("Todos", "-1"))
End If End If
End Sub End Sub

2
Compras/PopUpVerFactura.aspx.vb
View File

@@ -518,7 +518,7 @@ Partial Class PopUpVerFactura
End If End If
ObjVenta.Dispose() ObjVenta.Dispose()
ObjPuntoVenta.Dispose() ObjPuntoVenta.Dispose()
Dim FechaCorte As String = $"&emsp;<b>Fecha Corte:</b> {Fecha}" Dim FechaCorte As String = $"&emsp;<b>Fecha fin:</b> {Fecha}"
Dim Usuario As String = $"&emsp;<b>Usuario:</b> {Nombre}" Dim Usuario As String = $"&emsp;<b>Usuario:</b> {Nombre}"
If DtCortesVentas.Rows.Count > 0 Or DtCortesVentasResumen.Rows.Count > 0 Then If DtCortesVentas.Rows.Count > 0 Or DtCortesVentasResumen.Rows.Count > 0 Then
Dim Imagen As New System.IO.FileInfo(String.Format("{0}/Logo.png", UsuarioActual.Empresa.Ruta)) Dim Imagen As New System.IO.FileInfo(String.Format("{0}/Logo.png", UsuarioActual.Empresa.Ruta))

9
General/PopUpPaqueteriasGuias.aspx.cs
View File

@@ -864,17 +864,18 @@ public partial class General_PopUpPaqueteriasGuias : ClsPaginas
{ {
ClsVentas ObjVenta = new ClsVentas(); ClsVentas ObjVenta = new ClsVentas();
if (ObjVenta.GetVentaDetalle(CveVenta)) if (ObjVenta.GetVenta(CveVenta,UsuarioActual.CveEmpresa))
{ {
DataTable VentasDetalle = ObjVenta.DtResultados; if (ObjVenta.DtResultados.Rows.Count > 0)
if (VentasDetalle.Rows.Count > 0)
{ {
double Total = VentasDetalle.SUM("Total"); DataRow VentasDetalle = ObjVenta.DtResultados.Rows[0];
double Total = VentasDetalle["Total"].ToString().ToDouble();
bool Mostrar = (Total >= 100000.00); bool Mostrar = (Total >= 100000.00);
tdLblPolizaSeguro.Visible = Mostrar; tdLblPolizaSeguro.Visible = Mostrar;
tdTxtPolizaSeguro.Visible = Mostrar; tdTxtPolizaSeguro.Visible = Mostrar;
} }
} }
ObjVenta.Dispose();
} }
} }