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

Cambios de reportes a esquema contable

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2021-03-05 20:20:32 -07:00
parent 95400c2169
commit 0a66620d18
9 changed files with 1535 additions and 1490 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
App_Code/ClsVentas.vb
View File

@@ -1454,7 +1454,7 @@ Public Class ClsVentas
Public Function GetRepVentasPeriodos(FechaI As Date, FechaF As Date, FechaIEjec As Date, FechaFEjec As Date, CveCliente As Integer, CveSubProyectoEjecucion As Integer,
CveVendedor As Integer, CveUsuario As Integer, CveEstatus As Integer, IVA As String, CveEmpresa As Integer, Gpo As Integer, Optional TipoDocto As String = "-1",
Optional CveProyecto As Integer = -1, Optional CveSubProyecto As Integer = -1, Optional TipoCambio As Integer = 1, Optional TCEspecifico As Decimal = -1, Optional CveUsuarioConsulta As Integer = -1, Optional VerEn As Integer = -1,
Optional CveClienteClasificacion As Integer = -1, Optional TipoCliente As Integer = -1) As Boolean
Optional CveClienteClasificacion As Integer = -1, Optional TipoCliente As Integer = -1, Optional ModalidadContable As Boolean = False) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_VentasGetRepPeriodo")
@@ -1482,6 +1482,7 @@ Public Class ClsVentas
.Add("@VerEn", SqlDbType.Int).Value = VerEn
.Add("@CveClienteClasificacion", SqlDbType.Int).Value = CveClienteClasificacion
.Add("@TipoCliente", SqlDbType.Int).Value = TipoCliente
.Add("@ModalidadContable", SqlDbType.Bit).Value = ModalidadContable
End With
Try
@@ -1551,7 +1552,7 @@ Public Class ClsVentas
CveVendedor As Integer, CveUsuario As Integer, CveEstatus As Integer, IVA As String, CveEmpresa As Integer, Gpo As Integer,
Optional TipoCambio As Integer = -1, Optional TCEspecifico As Double = -1, Optional CveUsuarioConsulta As Integer = -1,
Optional TipoDocto As String = "-1", Optional CveClienteClasificacion As Integer = -1, Optional CveProveedorCompra As Integer = -1,
Optional CveMarca As Integer = -1, Optional MostrarLitraje As Boolean = False, Optional TipoCliente As Integer = -1) As Boolean
Optional CveMarca As Integer = -1, Optional MostrarLitraje As Boolean = False, Optional TipoCliente As Integer = -1, Optional ModalidadContable As Boolean = False) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Vta_GetRepPS")
@@ -1581,6 +1582,8 @@ Public Class ClsVentas
.Add("@CveMarca", SqlDbType.Int).Value = CveMarca
.Add("@MostrarLitraje", SqlDbType.Bit).Value = MostrarLitraje
.Add("@TipoCliente", SqlDbType.Int).Value = TipoCliente
.Add("@ModalidadContable", SqlDbType.Bit).Value = ModalidadContable
End With
@@ -1599,7 +1602,7 @@ Public Class ClsVentas
CveVendedor As Integer, CveUsuario As Integer, CveEstatus As Integer, CveEmpresa As Integer, Optional CveUsuarioConsulta As Integer = -1,
Optional TipoDocto As String = "-1", Optional GPO As Integer = -1, Optional CveMoneda As Integer = -1, Optional TipoCambio As Integer = -1,
Optional TCEspecifico As Double = 0, Optional CveClienteClasificacion As Integer = -1, Optional CveProveedorCompra As Integer = -1, Optional CveMarca As Integer = -1,
Optional CveClasificacionDetalle As Integer = -1, Optional TipoCliente As Integer = -1) As Boolean
Optional CveClasificacionDetalle As Integer = -1, Optional TipoCliente As Integer = -1, Optional ModalidadContable As Boolean = False) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Vta_GetRepPSDetalle")
@@ -1632,7 +1635,7 @@ Public Class ClsVentas
.Add("@CveMarca", SqlDbType.Int).Value = CveMarca
.Add("@CveClasificacionDetalle", SqlDbType.Int).Value = CveClasificacionDetalle
.Add("@TipoCliente", SqlDbType.Int).Value = TipoCliente
.Add("@ModalidadContable", SqlDbType.Bit).Value = ModalidadContable
End With
@@ -3793,7 +3796,7 @@ Public Class ClsVentas
CveVendedor As Integer, CveUsuario As Integer, CveEstatus As Integer, IVA As String, CveEmpresa As Integer, Gpo As Integer, Optional TipoDocto As String = "-1",
Optional CveProyecto As Integer = -1, Optional CveSubProyecto As Integer = -1, Optional TipoCambio As Integer = 1, Optional TCEspecifico As Decimal = -1,
Optional CveUsuarioConsulta As Integer = -1, Optional VerEn As Integer = -1, Optional CvePS As Integer = -1, Optional CveClasificacion As Integer = -1,
Optional CveCategoria As Integer = -1, Optional TipoFecha As Integer = 1, Optional CveClienteClasificacion As Integer = -1) As Boolean
Optional CveCategoria As Integer = -1, Optional TipoFecha As Integer = 1, Optional CveClienteClasificacion As Integer = -1, Optional ModalidadContable As Boolean = False) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_VentasGetRepPeriodoPS")
With SqlAdapter.SelectCommand.Parameters
@@ -3822,6 +3825,7 @@ Public Class ClsVentas
.Add("@CveCategoria", SqlDbType.Int).Value = CveCategoria
.Add("@TipoFecha", SqlDbType.Int).Value = TipoFecha
.Add("@CveClienteClasificacion", SqlDbType.Int).Value = CveClienteClasificacion
.Add("@ModalidadContable", SqlDbType.Bit).Value = ModalidadContable
End With
Try
SqlAdapter.Fill(Data)

16
Ventas/RepProductosServicios.aspx
View File

@@ -5,11 +5,11 @@
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
<style>
table > tbody > .SubTotales ,table > tbody > .SubTotales:hover,table > tbody > .SubTotales:nth-of-type(odd) {
table > tbody > .SubTotales, table > tbody > .SubTotales:hover, table > tbody > .SubTotales:nth-of-type(odd) {
background: #CCCCCC !important;
}
table > tbody > .SubTotalesB ,table > tbody > .SubTotalesB:hover,table > tbody > .SubTotalesB:nth-of-type(odd) {
table > tbody > .SubTotalesB, table > tbody > .SubTotalesB:hover, table > tbody > .SubTotalesB:nth-of-type(odd) {
background: #DDD !important;
}
@@ -130,6 +130,7 @@
</div>
<div class="col-md-1 truncate">
Fecha Inicio:
</div>
<div class="col-md-1">
<div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 100px !important; padding: 0px;">
@@ -147,6 +148,7 @@
</div>
<div class="col-md-1 truncate">
Fecha Fin:
</div>
<div class="col-md-1">
<div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 100px !important; padding: 0px;">
@@ -298,7 +300,7 @@
</div>
<label runat="server" id="LblLitraje" title="Mostrar Litraje" data-toggle="tooltip" data-placement="top" class="col-md-1" visible="false">Litraje:</label>
<div runat="server" id="DvLitraje" class="col-md-2" visible ="false" >
<div runat="server" id="DvLitraje" class="col-md-2" visible="false">
<asp:CheckBox runat="server" ID="ChkLitraje" CssClass="mkcheck" />
</div>
@@ -317,7 +319,10 @@
<asp:ListItem Text="Venta Mostrador" Value="2"></asp:ListItem>
</asp:DropDownList>
</div>
<label class="col-md-1 truncate">Modalidad Contable:</label>
<div class="col-md-2">
<asp:CheckBox ID="ChkModalidadContable" runat="server" Checked="false" CssClass="input-sm" />
</div>
</div>
</div>
@@ -429,6 +434,7 @@
<div class="row" style="margin-left: 10px;" runat="server" id="LiEspecifico" visible="false">
Especifico:
<asp:TextBox ID="TxtEspecifico" runat="server" Width="55px" />
</div>
</ContentTemplate>

6
Ventas/RepProductosServicios.aspx.vb
View File

@@ -273,7 +273,7 @@ Partial Class Ventas_RepProductosServicios
DdlSubProyectoEjecucion.SelectedValue.ToEntero, DdlVendedor.SelectedValue.ToEntero, DdlUsuario.SelectedValue.ToEntero, DdlEstatus.SelectedValue.ToEntero, "-1",
UsuarioActual.CveEmpresa, DdlGrupo.SelectedValue.ToEntero, CveUsuarioConsulta:=UsuarioActual.CveUsuario, TipoDocto:=TipoComprobante,
CveClienteClasificacion:=DdlClienteClasificacion.SelectedValue.ToEntero, TipoCambio:=TipoCambio, TCEspecifico:=TCEspecifico, CveProveedorCompra:=CveProveedorCompra,
CveMarca:=DdlMarcaPSDes.SelectedValue.ToEntero, MostrarLitraje:=ChkLitraje.Checked, TipoCliente:=DdlTipoCliente.SelectedValue.ToEntero) Then
CveMarca:=DdlMarcaPSDes.SelectedValue.ToEntero, MostrarLitraje:=ChkLitraje.Checked, TipoCliente:=DdlTipoCliente.SelectedValue.ToEntero, ModalidadContable:=ChkModalidadContable.Checked) Then
GvDatos.DataSource = ObjVentas.DtResultados
DtVentas = ObjVentas.DtResultados
Else
@@ -353,11 +353,11 @@ Partial Class Ventas_RepProductosServicios
FechaIEjec = If(IsDate(TxtFechaIEjec.Text.Trim()), TxtFechaIEjec.Text.Trim(), "-1")
FechaFEjec = If(IsDate(TxtFechaFEjec.Text.Trim()), TxtFechaFEjec.Text.Trim(), "-1")
Dim Liga = String.Format("/Ventas/RepProductosServiciosDetalle.aspx?CveProyecto={0}&CveSubProyecto={1}&CveCategoria={2}&CveClasificacion={3}&CvePS={4}&CveCliente={5}&CveSubProyectoEjecucion={6}&CveVendedor={7}&CveUsuario={8}&CveEstatus={9}&Anio={10}&Mes={11}&AnioMes={12}&Fecha={13}&AnioEjec={14}&MesEjec={15}&AnioMesEjec={16}&FechaEjec={17}&FechaI={18}&FechaF={19}&FechaEI={20}&FechaEF={21}&TipoDocto={22}&Grupo={23}&CveMoneda={24}&TipoCambio={25}&TCEspecifico={26}&CveClienteClasificacion={27}&CveProveedorCompra={28}&CveMarca={29}&CveClasificacionDetalle={30}&TipoCliente={31}",
Dim Liga = String.Format("/Ventas/RepProductosServiciosDetalle.aspx?CveProyecto={0}&CveSubProyecto={1}&CveCategoria={2}&CveClasificacion={3}&CvePS={4}&CveCliente={5}&CveSubProyectoEjecucion={6}&CveVendedor={7}&CveUsuario={8}&CveEstatus={9}&Anio={10}&Mes={11}&AnioMes={12}&Fecha={13}&AnioEjec={14}&MesEjec={15}&AnioMesEjec={16}&FechaEjec={17}&FechaI={18}&FechaF={19}&FechaEI={20}&FechaEF={21}&TipoDocto={22}&Grupo={23}&CveMoneda={24}&TipoCambio={25}&TCEspecifico={26}&CveClienteClasificacion={27}&CveProveedorCompra={28}&CveMarca={29}&CveClasificacionDetalle={30}&TipoCliente={31}&ModalidadContable={32}",
e.Row.DBCampo("CveProyecto"), e.Row.DBCampo("CveSubProyecto"), e.Row.DBCampo("CveCategoria"), e.Row.DBCampo("CveClasificacion"), e.Row.DBCampo("CvePS"),
e.Row.DBCampo("CveCliente"), e.Row.DBCampo("CveSubProyectoEjecucion"), e.Row.DBCampo("Vendedor"), e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"),
e.Row.DBCampo("Anio"), e.Row.DBCampo("Mes"), e.Row.DBCampo("AnioMes"), e.Row.DBCampo("Fecha"), e.Row.DBCampo("AnioEjec"), e.Row.DBCampo("MesEjec"), e.Row.DBCampo("AnioMesEjec"), e.Row.DBCampo("FechaEjec"),
FechaI, FechaF, FechaIEjec, FechaFEjec, e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("CveGpo"), e.Row.DBCampo("CveMoneda"), e.Row.DBCampo("TipoCambio"), e.Row.DBCampo("TCEspecifico"), e.Row.DBCampo("CveClienteClasificacion"), e.Row.DBCampo("CveProveedorCompra"), cveMarca, CveClasificacionDetalle, If(DdlGrupo.SelectedValue.ToEntero = 23, e.Row.DBCampo("TipoCliente"), DdlTipoCliente.SelectedValue))
FechaI, FechaF, FechaIEjec, FechaFEjec, e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("CveGpo"), e.Row.DBCampo("CveMoneda"), e.Row.DBCampo("TipoCambio"), e.Row.DBCampo("TCEspecifico"), e.Row.DBCampo("CveClienteClasificacion"), e.Row.DBCampo("CveProveedorCompra"), cveMarca, CveClasificacionDetalle, If(DdlGrupo.SelectedValue.ToEntero = 23, e.Row.DBCampo("TipoCliente"), DdlTipoCliente.SelectedValue), If(ChkModalidadContable.Checked, 1, 0))
e.Row.FCLiteral("LtlGrupo").Text = String.Format("<a target=""_blank"" Class=""{0}"" href=""{1}"">{2}</a>", Css, Liga, e.Row.DBCampo("Gpo"))

17
Ventas/RepProductosServiciosDetalle.aspx
View File

@@ -81,7 +81,7 @@
</li>
</ContentTemplate>
<Triggers>
<asp:PostBackTrigger ControlID= "BtnDescargarZipPDF" />
<asp:PostBackTrigger ControlID="BtnDescargarZipPDF" />
</Triggers>
</asp:UpdatePanel>
@@ -131,6 +131,7 @@
</div>
<div class="col-md-1 truncate">
Fecha Inicio:
</div>
<div class="col-md-1">
<div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 100px !important; padding: 0px;">
@@ -148,6 +149,7 @@
</div>
<div class="col-md-1 truncate">
Fecha Fin:
</div>
<div class="col-md-1">
<div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 100px !important; padding: 0px;">
@@ -303,7 +305,8 @@
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
</asp:DropDownList>
</div>
</div>
<div class="row">
<label title="Tipo Cliente" data-toggle="tooltip" data-placement="top" class="col-md-1 ">Tipo Cliente:</label>
<div class="col-md-2">
<asp:DropDownList ID="DdlTipoCliente" runat="server" AppendDataBoundItems="true" Class="table-group-action-input form-control input-inline input-small input-sm select2me">
@@ -312,9 +315,10 @@
<asp:ListItem Text="Venta Mostrador" Value="2"></asp:ListItem>
</asp:DropDownList>
</div>
<label class="col-md-1 truncate">Modalidad Contable:</label>
<div class="col-md-2">
<asp:CheckBox ID="ChkModalidadContable" runat="server" Checked="false" CssClass="input-sm" />
</div>
</div>
</div>
</div>
@@ -324,7 +328,7 @@
<ContentTemplate>
<asp:GridView ID="GvDatos" runat="server" Width="99%" AutoGenerateColumns="False" EmptyDataText="No se encontraron Ventas con los filtros especificados" ToolTip="Listado de Ventas"
CssClass="table table-striped table-advance table-hover Widthall ScrollAD" GridLines="None" DataKeyNames="TipoDocumento,SerieFolio" >
CssClass="table table-striped table-advance table-hover Widthall ScrollAD" GridLines="None" DataKeyNames="TipoDocumento,SerieFolio">
<Columns>
<asp:HyperLinkField HeaderText="Serie Folio" DataTextField="SerieFolio" Target="_blank" DataNavigateUrlFields="CveVenta" DataNavigateUrlFormatString="~/Ventas/Ventas.aspx?CveVenta={0}" ItemStyle-Width="5%" ItemStyle-HorizontalAlign="Left" />
<asp:BoundField HeaderText="Fecha" DataField="Fecha" DataFormatString="{0:d}" ItemStyle-Width="5%" ItemStyle-HorizontalAlign="Center" />
@@ -412,6 +416,7 @@
<div class="row" style="margin-left: 10px;" runat="server" id="LiEspecifico" visible="false">
Especifico:
<asp:TextBox ID="TxtEspecifico" runat="server" Width="55px" />
</div>
</ContentTemplate>

10
Ventas/RepProductosServiciosDetalle.aspx.vb
View File

@@ -373,7 +373,8 @@ Partial Class Ventas_RepProductosServiciosDetalle
TxtFechaIEjec.Text = If(AnioEjec <> "-1", String.Format("01/01/{0}", AnioEjec), TxtFechaIEjec.Text)
TxtFechaIEjec.Text = If(MesEjec <> "-1", String.Format("01/{0}/0001", MesEjec), TxtFechaIEjec.Text)
Dim ModalidadContable As Boolean = CBool(If(Request("ModalidadContable") IsNot Nothing, Request("ModalidadContable").ToEntero(), 0))
ChkModalidadContable.Checked = ModalidadContable
CveMoneda = If(Request("CveMoneda") IsNot Nothing AndAlso Request("CveMoneda").ToEntero() > 0, Request("CveMoneda").ToEntero(), -1).ToEntero
DdlProyecto.SelectedValueExist(CveProyecto)
@@ -403,7 +404,7 @@ Partial Class Ventas_RepProductosServiciosDetalle
CargaProvedores(CveProveedorCompra)
'If CveProveedorCompra.ToEntero > 0 Then DdlProveedor.SelectedValue = CveProveedorCompra
DdlTipoPSDes.SelectedValueExist(CveClasificacionDetalle)
CargaDatos(CveProyecto, CveSubProyecto, CveCategoria, CveClasificacion, CvePS, Mes, MesEjec, CveCliente, CveSubProyectoEjecucion, CveVendedor, CveUsuario, CveEstatus, GPO.ToEntero, TipoDocto, CveMarca)
CargaDatos(CveProyecto, CveSubProyecto, CveCategoria, CveClasificacion, CvePS, Mes, MesEjec, CveCliente, CveSubProyectoEjecucion, CveVendedor, CveUsuario, CveEstatus, GPO.ToEntero, TipoDocto, CveMarca, ModalidadContable)
CargarMarcas(CveMarca)
End Sub
#End Region
@@ -432,7 +433,8 @@ Partial Class Ventas_RepProductosServiciosDetalle
DdlSubProyectoEjecucion.SelectedValue.ToEntero, DdlVendedor.SelectedValue.ToEntero, DdlUsuario.SelectedValue.ToEntero, DdlEstatus.SelectedValue.ToEntero,
UsuarioActual.CveEmpresa, CveUsuarioConsulta:=UsuarioActual.CveUsuario, TipoDocto:=TipoComprobante, GPO:=DdlGrupo.SelectedValue.ToEntero, CveMoneda:=CveMoneda,
TipoCambio:=TipoCambio, TCEspecifico:=TCEspecifico, CveClienteClasificacion:=DdlClienteClasificacion.SelectedValue.ToEntero, CveProveedorCompra:=CveProveedorCompra,
CveMarca:=DdlMarcaPSDes.SelectedValue.ToEntero, CveClasificacionDetalle:=DdlTipoPSDes.SelectedValue.ToEntero(), TipoCliente:=DdlTipoCliente.SelectedValue.ToEntero) Then
CveMarca:=DdlMarcaPSDes.SelectedValue.ToEntero, CveClasificacionDetalle:=DdlTipoPSDes.SelectedValue.ToEntero(), TipoCliente:=DdlTipoCliente.SelectedValue.ToEntero,
ModalidadContable:=ChkModalidadContable.Checked) Then
GvDatos.DataSource = ObjVentas.DtResultados
TmpDT = ObjVentas.DtResultados
Else
@@ -444,7 +446,7 @@ Partial Class Ventas_RepProductosServiciosDetalle
Agrupador = DdlGrupo.SelectedItem.Text
End Sub
Private Sub CargaDatos(CveProyecto As String, CveSubProyecto As String, CveCategoria As String, CveClasificacion As String, CvePS As String, Mes As String, MesEjec As String, CveCliente As Integer, CveSubProyectoEjecucion As String, CveVendedor As Integer, CveUsuario As String, CveEstatus As String, Gpo As Integer, TipoDocto As String, CveMarca As Integer)
Private Sub CargaDatos(CveProyecto As String, CveSubProyecto As String, CveCategoria As String, CveClasificacion As String, CvePS As String, Mes As String, MesEjec As String, CveCliente As Integer, CveSubProyectoEjecucion As String, CveVendedor As Integer, CveUsuario As String, CveEstatus As String, Gpo As Integer, TipoDocto As String, CveMarca As Integer, ModalidadContable As Boolean)
Dim ObjVentas As New ClsVentas()
Dim FechaI, FechaF, FechaIEjec, FechaFEjec As Date
FechaI = If(IsDate(txtFechaI.Text.Trim()), txtFechaI.Text.ToDate, MinFecha)

6
Ventas/RepProductosServiciosPeriodo.aspx
View File

@@ -236,6 +236,12 @@
<asp:DropDownList ID="DdlClienteClasificacion" AutoPostBack="true" OnSelectedIndexChanged="DdlClienteClasificacion_SelectedIndexChanged" runat="server" AppendDataBoundItems="true" CssClass="table-group-action-input form-control input-inline input-small input-sm select2me" DataTextField="ClienteClasificacion" DataValueField="CveClienteClasificacion"></asp:DropDownList>
</div>
</div>
<div class="row" >
<label class="col-md-1 truncate">Modalidad Contable:</label>
<div class="col-md-2">
<asp:CheckBox ID="ChkModalidadContable" runat="server" Checked="false" CssClass="input-sm" />
</div>
</div>
</div>
</div>
</ContentTemplate>

4
Ventas/RepProductosServiciosPeriodo.aspx.cs
View File

@@ -353,8 +353,8 @@ public partial class Ventas_RepProductosServiciosPeriodo : ClsPaginas
DateTime FechaI, FechaF, FechaIEjec, FechaFEjec;
if (txtFechaI.Text.Trim() != "") { FechaI = txtFechaI.Text.ToDate(); } else { FechaI = MinFecha; }
if (txtFechaF.Text.Trim() != "") { FechaF = txtFechaF.Text.ToDate(); } else { FechaF = MaxFecha; }
if (TxtFechaIEjec.Text.Trim() != "") { FechaIEjec = TxtFechaIEjec.Text.ToDate(); } else { FechaIEjec = MinFecha; }
if (TxtFechaFEjec.Text.Trim() != "") { FechaFEjec = TxtFechaFEjec.Text.ToDate(); } else { FechaFEjec = MaxFecha; }
if (TxtFechaIEjec.Text.Trim() != "") { FechaIEjec = TxtFechaIEjec.Text.ToDate(); } else { FechaIEjec = MinFecha; }
if (TxtFechaFEjec.Text.Trim() != "") { FechaFEjec = TxtFechaFEjec.Text.ToDate(); } else { FechaFEjec = MaxFecha; }
if (ObjVentas.GetRepPSPeriodo(FechaI, FechaF, FechaIEjec, FechaFEjec, DdlClientes.SelectedValue.ToEntero(), DdlSubProyectoEjecucion.SelectedValue.ToEntero(),
DdlVendedor.SelectedValue.ToEntero(), DdlUsuario.SelectedValue.ToEntero(), DdlEstatus.SelectedValue.ToEntero(), "-1", UsuarioActual.CveEmpresa,

22
Ventas/RepVentasPeriodo.aspx
View File

@@ -245,6 +245,12 @@
</div>
</div>
<div class="row">
<label class="col-md-1 truncate">Modalidad Contable:</label>
<div class="col-md-2">
<asp:CheckBox ID="ChkModalidadContable" runat="server" Checked="false" CssClass="input-sm" />
</div>
</div>
</div>
</div>
</ContentTemplate>
@@ -259,6 +265,7 @@
<asp:TemplateField ItemStyle-HorizontalAlign="Left">
<HeaderTemplate>
Grupo
</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlGrupo" runat="server" Text='<%# Eval("GPO") %>'></asp:Literal>
@@ -267,6 +274,7 @@
<asp:TemplateField>
<HeaderTemplate>
Cantidad
</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlCant" runat="server" Text='<%# Eval("Cantidad", "{0:N0}") %>'></asp:Literal>
@@ -275,6 +283,7 @@
<asp:TemplateField>
<HeaderTemplate>
Ene
</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlEne" runat="server" Text='<%# Eval("Enero", "{0:N2}") %>'></asp:Literal>
@@ -283,6 +292,7 @@
<asp:TemplateField>
<HeaderTemplate>
Feb
</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlFeb" runat="server" Text='<%# Eval("Febrero", "{0:N2}") %>'></asp:Literal>
@@ -291,6 +301,7 @@
<asp:TemplateField>
<HeaderTemplate>
Mar
</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlMar" runat="server" Text='<%# Eval("Marzo", "{0:N2}") %>'></asp:Literal>
@@ -299,6 +310,7 @@
<asp:TemplateField>
<HeaderTemplate>
Abr
</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlAbr" runat="server" Text='<%# Eval("Abril", "{0:N2}") %>'></asp:Literal>
@@ -307,6 +319,7 @@
<asp:TemplateField>
<HeaderTemplate>
May
</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlMay" runat="server" Text='<%# Eval("Mayo", "{0:N2}") %>'></asp:Literal>
@@ -315,6 +328,7 @@
<asp:TemplateField>
<HeaderTemplate>
Jun
</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlJun" runat="server" Text='<%# Eval("Junio", "{0:N2}") %>'></asp:Literal>
@@ -323,6 +337,7 @@
<asp:TemplateField>
<HeaderTemplate>
Jul
</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlJul" runat="server" Text='<%# Eval("Julio", "{0:N2}") %>'></asp:Literal>
@@ -331,6 +346,7 @@
<asp:TemplateField>
<HeaderTemplate>
Ago
</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlAgo" runat="server" Text='<%# Eval("Agosto", "{0:N2}") %>'></asp:Literal>
@@ -339,6 +355,7 @@
<asp:TemplateField>
<HeaderTemplate>
Sep
</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlSep" runat="server" Text='<%# Eval("Septiembre", "{0:N2}") %>'></asp:Literal>
@@ -347,6 +364,7 @@
<asp:TemplateField>
<HeaderTemplate>
Oct
</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlOct" runat="server" Text='<%# Eval("Octubre", "{0:N2}") %>'></asp:Literal>
@@ -355,6 +373,7 @@
<asp:TemplateField>
<HeaderTemplate>
Nov
</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlNov" runat="server" Text='<%# Eval("Noviembre", "{0:N2}") %>'></asp:Literal>
@@ -363,6 +382,7 @@
<asp:TemplateField>
<HeaderTemplate>
Dic
</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlDic" runat="server" Text='<%# Eval("Diciembre", "{0:N2}") %>'></asp:Literal>
@@ -371,6 +391,7 @@
<asp:TemplateField>
<HeaderTemplate>
Total
</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlTotal" runat="server" Text='<%# Eval("Total", "{0:N2}") %>'></asp:Literal>
@@ -452,6 +473,7 @@
</asp:RadioButtonList>
<div class="row" style="margin-left: 10px;" runat="server" id="LiEspecifico" visible="false">
Especifico:
<asp:TextBox ID="TxtEspecifico" runat="server" Width="55px" />
</div>
</ContentTemplate>

2
Ventas/RepVentasPeriodo.aspx.vb
View File

@@ -195,7 +195,7 @@ Partial Class RepVentasPeriodo
If ObjVentas.GetRepVentasPeriodos(FechaI, FechaF, FechaIEjec, FechaFEjec, DdlClientes.SelectedValue.ToEntero, DdlSubProyectoEjecucion.SelectedValue.ToEntero, DdlVendedor.SelectedValue.ToEntero,
DdlUsuario.SelectedValue.ToEntero, DdlEstatus.SelectedValue.ToEntero, "-1", UsuarioActual.CveEmpresa, DdlGrupo.SelectedValue.ToEntero, DdlTipoComprobante.SelectedValue,
DdlProyecto.SelectedValue.ToEntero, DdlSubProyecto.SelectedValue.ToEntero, RblTipoCambio.SelectedValue.ToEntero, TCEspecifico, CveUsuarioConsulta:=UsuarioActual.CveUsuario,
VerEn:=VerEn, CveClienteClasificacion:=DdlClienteClasificacion.SelectedValue.ToEntero, TipoCliente:=DdlTipoCliente.SelectedValue.ToEntero) Then
VerEn:=VerEn, CveClienteClasificacion:=DdlClienteClasificacion.SelectedValue.ToEntero, TipoCliente:=DdlTipoCliente.SelectedValue.ToEntero, ModalidadContable:=ChkModalidadContable.Checked) Then
GvDatos.DataSource = ObjVentas.DtResultados
DtVentas = ObjVentas.DtResultados