From 0c22282d4f1ebdb92a6c20331b1457bcf1df1217 Mon Sep 17 00:00:00 2001 From: Antonio Gonzalez Date: Wed, 8 Apr 2020 13:36:46 -0700 Subject: [PATCH 1/5] . --- Empresas/141/Formatos/Cotizacion.rdlc | 176 ++++---------------------- Empresas/141/Formatos/Factura.rdlc | 104 +-------------- 2 files changed, 30 insertions(+), 250 deletions(-) diff --git a/Empresas/141/Formatos/Cotizacion.rdlc b/Empresas/141/Formatos/Cotizacion.rdlc index 3cbfbd79f..83e4f56ce 100644 --- a/Empresas/141/Formatos/Cotizacion.rdlc +++ b/Empresas/141/Formatos/Cotizacion.rdlc @@ -1145,6 +1145,7 @@ true + true true @@ -1163,7 +1164,7 @@ Textbox1 8.04874cm 1.89472cm - 1.09816cm + 0.56899cm 19.15264cm 2 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 16.64639cm + 15.93202cm - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - @@ -540,7 +540,7 @@ - =Parameters!CantidadProductos.Value + =CountRows("DsInventarios") - =Parameters!CantidadUsados.Value + =Sum(iif(Fields!Clasificacion.Value = "USADOS",1,0),"DsInventarios") - =CountRows("DsInventarios") + =Sum(Fields!Cantidad.Value, "DsInventarios") @@ -579,10 +580,11 @@ - =Sum(iif(Fields!Clasificacion.Value = "USADOS",1,0),"DsInventarios") + =Sum(iif(Fields!Clasificacion.Value = "USADOS",Fields!Cantidad.Value,0),"DsInventarios") diff --git a/Ventas/RepTopClientesVentas.aspx b/Ventas/RepTopClientesVentas.aspx new file mode 100644 index 000000000..6d637b470 --- /dev/null +++ b/Ventas/RepTopClientesVentas.aspx @@ -0,0 +1,72 @@ +<%@ Page Title="Reporte de Top de Ventas por Cliente" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="RepTopClientesVentas.aspx.vb" Inherits="Ventas_RepTopClientesVentas" %> + + + + + + + + + + +
  • + PDF +
    • +     + + Reporte de Top de Ventas por Cliente + + + + + + +
    +
    +
    + + +
    +
    +
    + +
    + + + + + + + + + + + + + + +
    + +
    + + +
    + + +
    + + +
    +
    +
    +
    + +
    +     +     +     + + + diff --git a/Ventas/RepTopClientesVentas.aspx.vb b/Ventas/RepTopClientesVentas.aspx.vb new file mode 100644 index 000000000..ba07c2487 --- /dev/null +++ b/Ventas/RepTopClientesVentas.aspx.vb @@ -0,0 +1,42 @@ +Option Explicit On +Option Strict On + +Imports System.Data +Imports System.Web.Compilation +Imports Extensiones +Imports Microsoft.Reporting.WebForms + +Partial Class Ventas_RepTopClientesVentas + Inherits ClsPaginas + + Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load + If Not IsPostBack Then + + End If + End Sub + + Private Sub CargarFiltros() + Dim tablaAños As New DataTable + + Dim idAño As New DataColumn + idAño.ColumnName = "idAño" + idAño.Caption = "idAño" + idAño.DataType = System.Type.GetType("System.Int32") + + Dim Año As New DataColumn + Año.ColumnName = "Año" + Año.Caption = "Año" + Año.DataType = System.Type.GetType("System.Int32") + + tablaAños.Columns.Add(idAño) + tablaAños.Columns.Add(Año) + + Dim añoActual As Integer = DateTime.Now.Year + + For AñoIndex As Integer = añoActual To (añoActual - 10) Step -1 + Dim row As DataRow = tablaAños.NewRow() + 'row["idAño"] = + Next + + End Sub +End Class From a2c7d468f46939d5bce879880ba1ee42f26ab796 Mon Sep 17 00:00:00 2001 From: Antonio Gonzalez Date: Mon, 13 Apr 2020 15:50:20 -0700 Subject: [PATCH 5/5] =?UTF-8?q?Revert=20"ajuste=20de=20tama=C3=B1os=20en?= =?UTF-8?q?=20los=20qr"?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit This reverts commit 9efb6e6058fe6905bede64464e834e37e65cd726. --- Empresas/146/Formatos/Factura.rdlc | 4 ++-- Empresas/146/Formatos/NotaCredito.rdlc | 8 ++++---- 2 files changed, 6 insertions(+), 6 deletions(-) diff --git a/Empresas/146/Formatos/Factura.rdlc b/Empresas/146/Formatos/Factura.rdlc index cfc1aa148..35d8f5761 100644 --- a/Empresas/146/Formatos/Factura.rdlc +++ b/Empresas/146/Formatos/Factura.rdlc @@ -229,8 +229,8 @@ FitProportional 5.8661in 0.03915in - 1.1811in - 1.1811in + 1.10236in + 1.10236in 5