Totalizadores en reporte de cortes

This commit is contained in:
2020-03-10 19:49:26 -07:00
parent d35d87836d
commit 16dc8cc966
2 changed files with 47 additions and 49 deletions

View File

@@ -57,13 +57,6 @@
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
</asp:Content>
<asp:Content ID="Content8" ContentPlaceHolderID="HA" runat="Server">
<%-- <asp:UpdatePanel ID="UpdatePanel1" runat="server" RenderMode="Inline" UpdateMode="Conditional">
<ContentTemplate>
<div class="btn-group pull-right btn-separete">
</div>
</ContentTemplate>
</asp:UpdatePanel>--%>
</asp:Content>
<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server" defaultbutton="BtnConsultar">
<asp:UpdatePanel ID="UPFiltros" runat="server" UpdateMode="Conditional">
@@ -74,7 +67,7 @@
<asp:Button ID="BtnConsultar" runat="server" Text="Consultar" class="btn btn-primary" />
<a href="javascript:;" data-idchekbox="<%= chkexpand.ClientID%>" class=" <%= IIf(chkexpand.Checked = True, "collapse", "expand")%>"></a>
<asp:CheckBox ID="chkexpand" CssClass="hidden" runat="server" />
<audio id="audio" src="http://www.soundjay.com/button/beep-07.wav" autostart="false"></audio>
<%-- <audio id="audio" src="http://www.soundjay.com/button/beep-07.wav" autostart="false"></audio>--%>
</div>
<br />
<div class="row">
@@ -121,14 +114,6 @@
</div>
</div>
</div>
<%-- <div class="portlet-body magindate" <%= IIf(chkexpand.Checked = True, "", "style=""display:none;""")%>>
<div class="row">
<div class="col-md-1">Moneda:</div>
<div class="col-md-2">
<asp:DropDownList ID="DdlMoneda" runat="server" CssClass="form-control input-sm select2me" AppendDataBoundItems="true" DataTextField="Moneda" DataValueField="CveMoneda" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 100% !important;" ValidationGroup="GrpGuardar"></asp:DropDownList></td>
</div>
</div>
</div>--%>
</div>
</ContentTemplate>
</asp:UpdatePanel>
@@ -164,8 +149,6 @@
<asp:Literal ID="LtlTotalVentas" runat="server" Text='<%# Eval("VentasCorte", "{0:N2}") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Right">
<HeaderTemplate>
<asp:Label Text="N.C." runat="server" CausesValidation="false"> </asp:Label>
@@ -175,9 +158,6 @@
<asp:Literal ID="LtlNotasCredito" runat="server" Text='<%# Eval("NotasCredito", "{0:N2}") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Right">
<HeaderTemplate>
<asp:Label Text="Ventas Credito" runat="server" CausesValidation="false"> </asp:Label>
@@ -392,10 +372,10 @@
return false;
}
function PlaySound() {
var sound = document.getElementById("audio");
sound.play()
}
//function PlaySound() {
// var sound = document.getElementById("audio");
// sound.play()
//}
function FechaGeneral(lnk, FechaDocumento) {
debugger;

View File

@@ -79,9 +79,9 @@ Partial Class Bancos_RepCortes
UPDatos.Update()
End If
ObjPuntoVenta.Dispose()
End Sub
End Sub
#End Region
#Region "G V - D A T O S "
Protected Sub GvDatos_RowDataBound(sender As Object, e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles GvDatos.RowDataBound
If e.Row.RowType = DataControlRowType.DataRow Then
@@ -89,30 +89,48 @@ Partial Class Bancos_RepCortes
e.Row.CssClass = "SubTotales2"
End If
End If
End Sub
'Protected Sub GvD_RowCommand(sender As Object, e As GridViewCommandEventArgs) Handles GvD.RowCommand
' If e.CommandArgument.ToString.ToEntero > 0 Then
' End If
' Dim Vent As New ClsPuntoVenta
' If Vent.GetCortesDetalleVentas(16200, 61) Then
' Alert(Vent.DtResultados.Rows.Count.ToString)
' GvD.DataSource = Vent.DtResultados
' GvD.DataBind()
' 'RegistraScript("$get")
' divDetalle.Visible = True
' End If
' Vent.Dispose()
'End Sub
End Sub
Protected Sub GvP_RowDataBound(sender As Object, e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles GvP.RowDataBound
If e.Row.RowType = DataControlRowType.DataRow Then
If e.Row.DBCampo("MetodoPago").ToString = "Total" Then
e.Row.CssClass = "SubTotales"
End If
End If
End Sub
Protected Sub GvD_RowDataBound(sender As Object, e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles GvD.RowDataBound
If e.Row.RowType = DataControlRowType.DataRow Then
If e.Row.DBCampo("CveVenta").ToString = "" Then
e.Row.CssClass = "Totales"
End If
End If
End Sub
'Protected Sub GvD_RowCommand(sender As Object, e As GridViewCommandEventArgs) Handles GvD.RowCommand
' If e.CommandArgument.ToString.ToEntero > 0 Then
' End If
' Dim Vent As New ClsPuntoVenta
' If Vent.GetCortesDetalleVentas(16200, 61) Then
' Alert(Vent.DtResultados.Rows.Count.ToString)
' GvD.DataSource = Vent.DtResultados
' GvD.DataBind()
' 'RegistraScript("$get")
' divDetalle.Visible = True
' End If
' Vent.Dispose()
'End Sub
#End Region
#Region "BOTONES"
Protected Sub BtnConsultar_Click(sender As Object, e As System.EventArgs) Handles BtnConsultar.Click
CargaDatos()
End Sub