Estado resultado horizontal por subproyecto grafica pastel negativos y porcentaje acumulado, Rep ventas utilidad porcentaje, Kardex almacen horizontal congelar dos columnas iniciales filtro por producto
This commit is contained in:
@@ -1535,7 +1535,8 @@ Public Class ClsInventarios
|
|||||||
End Function
|
End Function
|
||||||
Public Function GetKardexAlmacenHorizontal(CvePS As Integer, FechaFin As Date, CveAlmacen As Integer, CveUnidadMedida As Integer, CveProveedor As Integer, CveTipoAlmacen As Integer,
|
Public Function GetKardexAlmacenHorizontal(CvePS As Integer, FechaFin As Date, CveAlmacen As Integer, CveUnidadMedida As Integer, CveProveedor As Integer, CveTipoAlmacen As Integer,
|
||||||
IncluyeTransitorios As Integer, CveClasificacion As Integer, CveUsuario As Integer, CveEmpresa As Integer, Optional CondicionExistencias As Integer = 0,
|
IncluyeTransitorios As Integer, CveClasificacion As Integer, CveUsuario As Integer, CveEmpresa As Integer, Optional CondicionExistencias As Integer = 0,
|
||||||
Optional Orden As Integer = -1, Optional Marcas As String = "-1", Optional IncluyeProyectado As Integer = -1, Optional CveAlmacenes As String = "-1", Optional GPO As Integer = 1) As Boolean
|
Optional Orden As Integer = -1, Optional Marcas As String = "-1", Optional IncluyeProyectado As Integer = -1, Optional CveAlmacenes As String = "-1",
|
||||||
|
Optional GPO As Integer = 1, Optional CodigoPS As String = "-1") As Boolean
|
||||||
Dim Retorno As Boolean = False
|
Dim Retorno As Boolean = False
|
||||||
|
|
||||||
DataAdapter("PA_Inv_KardexAlmacenHorizontalGet")
|
DataAdapter("PA_Inv_KardexAlmacenHorizontalGet")
|
||||||
@@ -1558,6 +1559,7 @@ Public Class ClsInventarios
|
|||||||
.Add("@IncluyeProyectado", SqlDbType.TinyInt).Value = IncluyeProyectado
|
.Add("@IncluyeProyectado", SqlDbType.TinyInt).Value = IncluyeProyectado
|
||||||
.Add("@CveAlmacenes", SqlDbType.NVarChar).Value = CveAlmacenes
|
.Add("@CveAlmacenes", SqlDbType.NVarChar).Value = CveAlmacenes
|
||||||
.Add("@GPO", SqlDbType.Int).Value = GPO
|
.Add("@GPO", SqlDbType.Int).Value = GPO
|
||||||
|
.Add("@CodigoPS", SqlDbType.VarChar).Value = CodigoPS
|
||||||
|
|
||||||
End With
|
End With
|
||||||
|
|
||||||
|
|||||||
@@ -1231,6 +1231,11 @@
|
|||||||
<asp:HyperLink ID="HLAnterior" runat="server" Text='<%# Eval("ImporteAcumulado", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
|
<asp:HyperLink ID="HLAnterior" runat="server" Text='<%# Eval("ImporteAcumulado", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
|
||||||
</ItemTemplate>
|
</ItemTemplate>
|
||||||
<ItemStyle Width="150px" HorizontalAlign="Right" />
|
<ItemStyle Width="150px" HorizontalAlign="Right" />
|
||||||
|
</asp:TemplateField>
|
||||||
|
<asp:TemplateField HeaderText="%" ItemStyle-Width="30px" ItemStyle-Font-Size="10px" >
|
||||||
|
<ItemTemplate>
|
||||||
|
<asp:Label ID="LblPorcentajeAcumualdo" runat="server" Text='<%# Eval("PorcentajeAcumulado", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:Label>
|
||||||
|
</ItemTemplate>
|
||||||
</asp:TemplateField>
|
</asp:TemplateField>
|
||||||
<%--<asp:BoundField HeaderText="%" DataField="PorcentajeAcumulado" DataFormatString="{0:N2}" ItemStyle-Width="100px" />--%>
|
<%--<asp:BoundField HeaderText="%" DataField="PorcentajeAcumulado" DataFormatString="{0:N2}" ItemStyle-Width="100px" />--%>
|
||||||
</Columns>
|
</Columns>
|
||||||
@@ -1407,7 +1412,15 @@
|
|||||||
</ItemTemplate>
|
</ItemTemplate>
|
||||||
<ItemStyle Width="150px" HorizontalAlign="Right" />
|
<ItemStyle Width="150px" HorizontalAlign="Right" />
|
||||||
</asp:TemplateField>
|
</asp:TemplateField>
|
||||||
<asp:BoundField HeaderText="%" DataField="PorcentajeAcumulado" DataFormatString="{0:N2}" ItemStyle-Width="30px" ItemStyle-Font-Size="10px" />
|
|
||||||
|
<asp:TemplateField HeaderText="%" ItemStyle-Width="30px" ItemStyle-Font-Size="10px" >
|
||||||
|
<ItemTemplate>
|
||||||
|
<asp:Label ID="LblPorcentajeAcumualdo" runat="server" Text='<%# Eval("PorcentajeAcumulado", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:Label>
|
||||||
|
</ItemTemplate>
|
||||||
|
<ItemStyle Width="150px" HorizontalAlign="Right" />
|
||||||
|
</asp:TemplateField>
|
||||||
|
|
||||||
|
<%--<asp:BoundField HeaderText="%" DataField="PorcentajeAcumulado" DataFormatString="{0:N2}" />--%>
|
||||||
</Columns>
|
</Columns>
|
||||||
|
|
||||||
</asp:GridView>
|
</asp:GridView>
|
||||||
@@ -1565,11 +1578,20 @@
|
|||||||
|
|
||||||
function CargaGraficaPastel() {
|
function CargaGraficaPastel() {
|
||||||
let data = cdatos;
|
let data = cdatos;
|
||||||
|
let newData = JSON.parse(JSON.stringify(data));
|
||||||
|
|
||||||
|
newData = newData.map(function (item) {
|
||||||
|
if (item.Valor < 0) {
|
||||||
|
item.Valor = Math.abs(item.Valor);
|
||||||
|
}
|
||||||
|
return item;
|
||||||
|
});
|
||||||
|
|
||||||
var chart = AmCharts.makeChart("chartdiv", {
|
var chart = AmCharts.makeChart("chartdiv", {
|
||||||
"type": "pie",
|
"type": "pie",
|
||||||
"theme": "light",
|
"theme": "light",
|
||||||
"dataProvider":
|
"dataProvider":
|
||||||
data,
|
newData,
|
||||||
"valueField": "Valor",
|
"valueField": "Valor",
|
||||||
"titleField": "Texto",
|
"titleField": "Texto",
|
||||||
"outlineAlpha": 0.4,
|
"outlineAlpha": 0.4,
|
||||||
@@ -1583,7 +1605,9 @@
|
|||||||
}
|
}
|
||||||
function ADSBegin() {
|
function ADSBegin() {
|
||||||
$('.DdlGrafica').on('select2:select', function (e) {
|
$('.DdlGrafica').on('select2:select', function (e) {
|
||||||
|
|
||||||
var data = e.params.data;
|
var data = e.params.data;
|
||||||
|
|
||||||
currentid = data.id;
|
currentid = data.id;
|
||||||
if (currentid == 1) {
|
if (currentid == 1) {
|
||||||
CargaGraficaBarras();
|
CargaGraficaBarras();
|
||||||
@@ -1752,7 +1776,9 @@
|
|||||||
});
|
});
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
function initamgrafica() {
|
function initamgrafica() {
|
||||||
|
|
||||||
AmCharts.addInitHandler(function (chart) {
|
AmCharts.addInitHandler(function (chart) {
|
||||||
function handleCustomMarkerToggle(legendEvent) {
|
function handleCustomMarkerToggle(legendEvent) {
|
||||||
var dataProvider = legendEvent.chart.dataProvider;
|
var dataProvider = legendEvent.chart.dataProvider;
|
||||||
|
|||||||
@@ -2096,20 +2096,16 @@ Partial Class Contabilidad_RepEstadoResultadosHorizontal
|
|||||||
DtGastosSubProyectoH = DtDatosSubProyectoH.FiltraParametros("Tipo ='G' ")
|
DtGastosSubProyectoH = DtDatosSubProyectoH.FiltraParametros("Tipo ='G' ")
|
||||||
DTTotalesSubProyectoH = DtDatosSubProyectoH.Clone()
|
DTTotalesSubProyectoH = DtDatosSubProyectoH.Clone()
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
Dim Row As DataRow = DtIngresosSubProyectoH.NewRow
|
Dim Row As DataRow = DtIngresosSubProyectoH.NewRow
|
||||||
|
|
||||||
Dim TotalActual = 0.0, TotalAnterior = 0.0
|
Dim TotalActual = 0.0, TotalAnterior = 0.0
|
||||||
|
|
||||||
|
|
||||||
Dim IndexData As Integer = 0
|
Dim IndexData As Integer = 0
|
||||||
Dim IndexGv As Integer = 1
|
Dim IndexGv As Integer = 1
|
||||||
Dim IndexMax As Integer = 1
|
Dim IndexMax As Integer = 1
|
||||||
Dim IndexSubProyecto = 0
|
Dim IndexSubProyecto = 0
|
||||||
Dim IndexSubProyectoMax As Integer = DTSubProyectosCabecerasH.Rows.Count - 1
|
Dim IndexSubProyectoMax As Integer = DTSubProyectosCabecerasH.Rows.Count - 1
|
||||||
|
|
||||||
|
|
||||||
If IndexSubProyectoMax > GvIngresosSubProyectoH.Columns.Count - 2 Then
|
If IndexSubProyectoMax > GvIngresosSubProyectoH.Columns.Count - 2 Then
|
||||||
IndexSubProyectoMax = GvIngresosSubProyectoH.Columns.Count - 2
|
IndexSubProyectoMax = GvIngresosSubProyectoH.Columns.Count - 2
|
||||||
End If
|
End If
|
||||||
@@ -2121,7 +2117,7 @@ Partial Class Contabilidad_RepEstadoResultadosHorizontal
|
|||||||
'34
|
'34
|
||||||
Dim IDX_LIMPIAR As Integer = 1
|
Dim IDX_LIMPIAR As Integer = 1
|
||||||
|
|
||||||
For IDX_LIMPIAR = 1 To GvIngresosSubProyectoH.Columns.Count - 2
|
For IDX_LIMPIAR = 1 To GvIngresosSubProyectoH.Columns.Count - 3
|
||||||
CType(GvIngresosSubProyectoH.Columns(IDX_LIMPIAR), BoundField).DataField = Nothing
|
CType(GvIngresosSubProyectoH.Columns(IDX_LIMPIAR), BoundField).DataField = Nothing
|
||||||
CType(GvIngresosSubProyectoH.Columns(IDX_LIMPIAR), BoundField).HeaderText = ""
|
CType(GvIngresosSubProyectoH.Columns(IDX_LIMPIAR), BoundField).HeaderText = ""
|
||||||
GvIngresosSubProyectoH.Columns(IDX_LIMPIAR).Visible = False
|
GvIngresosSubProyectoH.Columns(IDX_LIMPIAR).Visible = False
|
||||||
@@ -2236,13 +2232,11 @@ Partial Class Contabilidad_RepEstadoResultadosHorizontal
|
|||||||
Next
|
Next
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
Row.Item("Nombre") = "TOTAL INGRESOS "
|
Row.Item("Nombre") = "TOTAL INGRESOS "
|
||||||
Row.Item("ImporteActual") = DtIngresosSubProyectoH.SUM("ImporteActual", "Not CtaMayor In (3,4)") 'TotalActual.ToString
|
Row.Item("ImporteActual") = DtIngresosSubProyectoH.SUM("ImporteActual", "Not CtaMayor In (3,4)") 'TotalActual.ToString
|
||||||
Row.Item("PorcentajeActual") = "100.00"
|
Row.Item("PorcentajeActual") = 100.0
|
||||||
Row.Item("ImporteAcumulado") = DtIngresosSubProyectoH.SUM("ImporteAcumulado", "Not CtaMayor In (3,4)") 'TotalAnterior.ToString
|
Row.Item("ImporteAcumulado") = DtIngresosSubProyectoH.SUM("ImporteAcumulado", "Not CtaMayor In (3,4)") 'TotalAnterior.ToString
|
||||||
Row.Item("PorcentajeAcumulado") = "100.00"
|
Row.Item("PorcentajeAcumulado") = 100.0
|
||||||
Row.Item("CtaMayor") = -1
|
Row.Item("CtaMayor") = -1
|
||||||
Row.Item("CountDinamico") = DtIngresosSubProyectoH.MAX("CountDinamico")
|
Row.Item("CountDinamico") = DtIngresosSubProyectoH.MAX("CountDinamico")
|
||||||
CountDinamicoSubProyecto = DtIngresosSubProyectoH.MAX("CountDinamico").ToEntero
|
CountDinamicoSubProyecto = DtIngresosSubProyectoH.MAX("CountDinamico").ToEntero
|
||||||
@@ -2299,11 +2293,15 @@ Partial Class Contabilidad_RepEstadoResultadosHorizontal
|
|||||||
End If
|
End If
|
||||||
Next
|
Next
|
||||||
|
|
||||||
|
|
||||||
|
Dim totalTemp As Decimal = DtIngresosSubProyectoH.SUMD($"ImporteAcumulado", "Not CtaMayor In (-1,3,4)") - DtGastosSubProyectoH.SUMD($"ImporteAcumulado", "Not CtaMayor In (-1,3,4)")
|
||||||
Row.Item("Nombre") = "Resultado del ejercicio"
|
Row.Item("Nombre") = "Resultado del ejercicio"
|
||||||
Row.Item("ImporteAcumulado") = DtIngresosSubProyectoH.SUM($"ImporteAcumulado", "Not CtaMayor In (-1,3,4)") - DtGastosSubProyectoH.SUM($"ImporteAcumulado", "Not CtaMayor In (-1,3,4)")
|
Row.Item("ImporteAcumulado") = DtIngresosSubProyectoH.SUM($"ImporteAcumulado", "Not CtaMayor In (-1,3,4)") - DtGastosSubProyectoH.SUM($"ImporteAcumulado", "Not CtaMayor In (-1,3,4)")
|
||||||
Row.Item("CtaMayor") = -2
|
Row.Item("CtaMayor") = -2
|
||||||
Row.Item("CountDinamico") = DtIngresosSubProyectoH.MAX("CountDinamico").ToString.ToEntero
|
Row.Item("CountDinamico") = DtIngresosSubProyectoH.MAX("CountDinamico").ToString.ToEntero
|
||||||
|
|
||||||
|
Row.Item("PorcentajeAcumulado") = If(DdlvistaPorcentaje.SelectedValue.ToEntero = 1, 100, (totalTemp * 100 / DtIngresosSubProyectoH.SUMD($"ImporteAcumulado", "Not CtaMayor In (-1,3,4)")))
|
||||||
|
|
||||||
DTTotalesSubProyectoH.Rows.Add(Row)
|
DTTotalesSubProyectoH.Rows.Add(Row)
|
||||||
|
|
||||||
End If
|
End If
|
||||||
@@ -2316,6 +2314,9 @@ Partial Class Contabilidad_RepEstadoResultadosHorizontal
|
|||||||
GvIngresosSubProyectoH.DataBind()
|
GvIngresosSubProyectoH.DataBind()
|
||||||
|
|
||||||
|
|
||||||
|
'GvIngresosSubProyectoH.Columns(55).Visible = True
|
||||||
|
'GvIngresosSubProyectoH.Columns(56).Visible = True
|
||||||
|
|
||||||
|
|
||||||
UpDatosSubProyectoH.Update()
|
UpDatosSubProyectoH.Update()
|
||||||
|
|
||||||
@@ -2469,6 +2470,9 @@ Partial Class Contabilidad_RepEstadoResultadosHorizontal
|
|||||||
Dim lista As New List(Of Object)
|
Dim lista As New List(Of Object)
|
||||||
Dim colorindex As Integer = 0
|
Dim colorindex As Integer = 0
|
||||||
For Each campo As String() In listaCampos
|
For Each campo As String() In listaCampos
|
||||||
|
|
||||||
|
'Dim valorCampo As Decimal = If(e.Row.DBCampo(campo(0)).ToDecimal() < 0, (e.Row.DBCampo(campo(0)).ToDecimal() * -1), e.Row.DBCampo(campo(0)).ToDecimal())
|
||||||
|
|
||||||
lista.Add(New With {.Texto = campo(1), .Valor = e.Row.DBCampo(campo(0)).ToDecimal(), .Color = listacolores(colorindex)})
|
lista.Add(New With {.Texto = campo(1), .Valor = e.Row.DBCampo(campo(0)).ToDecimal(), .Color = listacolores(colorindex)})
|
||||||
colorindex = colorindex + 1
|
colorindex = colorindex + 1
|
||||||
If colorindex >= listacolores.Count Then
|
If colorindex >= listacolores.Count Then
|
||||||
@@ -2727,3 +2731,4 @@ Partial Class Contabilidad_RepEstadoResultadosHorizontal
|
|||||||
|
|
||||||
End Class
|
End Class
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
@@ -78,6 +78,22 @@
|
|||||||
width: 22%;
|
width: 22%;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
|
.AdsCEll > div:nth-child(1) > table:nth-child(1) > tbody:nth-child(1) > tr:nth-child(2) > th:nth-child(1){
|
||||||
|
width:150px!important
|
||||||
|
}
|
||||||
|
.AdsCEll > div:nth-child(1) > table:nth-child(1) > tbody:nth-child(1) > tr:nth-child(2) > th:nth-child(2){
|
||||||
|
width:400px!important
|
||||||
|
}
|
||||||
|
|
||||||
|
#ADColC_GvDatos > tbody:nth-child(1) > tr:nth-child(2) > td:nth-child(1){
|
||||||
|
width:150px!important
|
||||||
|
}
|
||||||
|
#ADColC_GvDatos > tbody:nth-child(1) > tr:nth-child(2) > td:nth-child(2){
|
||||||
|
width:400px!important
|
||||||
|
}
|
||||||
|
|
||||||
</style>
|
</style>
|
||||||
</asp:Content>
|
</asp:Content>
|
||||||
|
|
||||||
@@ -195,6 +211,12 @@
|
|||||||
</div>
|
</div>
|
||||||
</div>
|
</div>
|
||||||
<asp:Panel ID="pnlOrden" runat="server" CssClass="row">
|
<asp:Panel ID="pnlOrden" runat="server" CssClass="row">
|
||||||
|
|
||||||
|
<asp:Label runat="server" ID="Label3" Text="Producto:" class="col-md-1 truncate" />
|
||||||
|
<div class="col-md-2">
|
||||||
|
<asp:TextBox runat="server" ID="TxtPS" CssClass="form-control" Height="30px"></asp:TextBox>
|
||||||
|
</div>
|
||||||
|
|
||||||
<asp:Label runat="server" ID="LblOrden" class="col-md-1 truncate">Orden:</asp:Label>
|
<asp:Label runat="server" ID="LblOrden" class="col-md-1 truncate">Orden:</asp:Label>
|
||||||
<div class="col-md-2">
|
<div class="col-md-2">
|
||||||
<asp:DropDownList ID="DdlOrden" runat="server" CssClass="select2me" Width="100%">
|
<asp:DropDownList ID="DdlOrden" runat="server" CssClass="select2me" Width="100%">
|
||||||
@@ -236,29 +258,29 @@
|
|||||||
|
|
||||||
<asp:UpdatePanel ID="UpDatos" runat="server">
|
<asp:UpdatePanel ID="UpDatos" runat="server">
|
||||||
<ContentTemplate>
|
<ContentTemplate>
|
||||||
<asp:GridView ID="GvDatos" runat="server" ShowHeader="true" EmptyDataText="No hay registros." AutoGenerateColumns="True" data-heighterror="275"
|
<asp:GridView ID="GvDatos" runat="server" ShowHeader="true" EmptyDataText="No hay registros." AutoGenerateColumns="True"
|
||||||
ShowFooter="True" ShowHeaderWhenEmpty="True" HeaderStyle-CssClass="Texto" CssClass="table table-striped table-hover Widthall ScrollAD" data-sort="true" GridLines="None">
|
CssClass="ADSCROLLER2 table table-striped table-advance table-hover" data-cols="2" data-heightmenos="300" data-sort="true"
|
||||||
|
ShowFooter="True" ShowHeaderWhenEmpty="True" HeaderStyle-CssClass="Texto" GridLines="None">
|
||||||
<Columns>
|
<Columns>
|
||||||
<asp:TemplateField ItemStyle-HorizontalAlign="Left">
|
<asp:TemplateField ItemStyle-HorizontalAlign="Left" ItemStyle-Width="150px">
|
||||||
<HeaderTemplate>
|
<HeaderTemplate>
|
||||||
Código
|
Código
|
||||||
</HeaderTemplate>
|
</HeaderTemplate>
|
||||||
<ItemTemplate>
|
<ItemTemplate>
|
||||||
<div class='truncate' style='width: 200px;'>
|
|
||||||
<asp:Label runat="server" Text='<%# Eval("Codigo") %>' Width="100px"></asp:Label>
|
<asp:Label runat="server" Text='<%# Eval("Codigo") %>'></asp:Label>
|
||||||
</div>
|
|
||||||
</ItemTemplate>
|
</ItemTemplate>
|
||||||
</asp:TemplateField>
|
</asp:TemplateField>
|
||||||
<asp:TemplateField ItemStyle-HorizontalAlign="Left">
|
<asp:TemplateField ItemStyle-HorizontalAlign="Left" ItemStyle-Width="400px">
|
||||||
<HeaderTemplate>
|
<HeaderTemplate>
|
||||||
Producto
|
Producto
|
||||||
|
|
||||||
|
|
||||||
</HeaderTemplate>
|
</HeaderTemplate>
|
||||||
<ItemTemplate>
|
<ItemTemplate>
|
||||||
<div class='truncate' style='width: 200px;'>
|
|
||||||
<asp:Label runat="server" Text='<%# Eval("PS") %>' Width="250px"></asp:Label>
|
<asp:Label runat="server" Text='<%# Eval("PS") %>' ></asp:Label>
|
||||||
</div>
|
|
||||||
</ItemTemplate>
|
</ItemTemplate>
|
||||||
</asp:TemplateField>
|
</asp:TemplateField>
|
||||||
</Columns>
|
</Columns>
|
||||||
|
|||||||
@@ -155,7 +155,7 @@ Partial Class Inventarios_KardexAlmacen
|
|||||||
|
|
||||||
If ObjMovimientos.GetKardexAlmacenHorizontal(CvePS, FechaF, -1, DdlUnidadMedida.SelectedValue.ToEntero, CveProveedorCompra, DdlTipoAlmacen.SelectedValue.ToEntero(), IncluyeTransitorios,
|
If ObjMovimientos.GetKardexAlmacenHorizontal(CvePS, FechaF, -1, DdlUnidadMedida.SelectedValue.ToEntero, CveProveedorCompra, DdlTipoAlmacen.SelectedValue.ToEntero(), IncluyeTransitorios,
|
||||||
DdlClasificacion.SelectedValue.ToEntero, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CondicionExistencias:=DdlExistencia.SelectedValue.ToEntero,
|
DdlClasificacion.SelectedValue.ToEntero, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CondicionExistencias:=DdlExistencia.SelectedValue.ToEntero,
|
||||||
Orden:=DdlOrden.SelectedValue.ToEntero(), Marcas:=Marcas, IncluyeProyectado:=DdlProyeccionFiltro.SelectedValue.ToEntero, CveAlmacenes:=CveAlmacenes, GPO:=GPO) Then
|
Orden:=DdlOrden.SelectedValue.ToEntero(), Marcas:=Marcas, IncluyeProyectado:=DdlProyeccionFiltro.SelectedValue.ToEntero, CveAlmacenes:=CveAlmacenes, GPO:=GPO, CodigoPS:=TxtPS.Text) Then
|
||||||
If ObjMovimientos.DtResultados IsNot Nothing AndAlso ObjMovimientos.DtResultados.Rows.Count > 0 Then
|
If ObjMovimientos.DtResultados IsNot Nothing AndAlso ObjMovimientos.DtResultados.Rows.Count > 0 Then
|
||||||
dt = ObjMovimientos.DtResultados
|
dt = ObjMovimientos.DtResultados
|
||||||
Dim ListaBorrar As New List(Of DataColumn)
|
Dim ListaBorrar As New List(Of DataColumn)
|
||||||
|
|||||||
@@ -66,10 +66,10 @@ public class TareasJam : IHttpHandler
|
|||||||
DataTable DTClientes = new DataTable();
|
DataTable DTClientes = new DataTable();
|
||||||
DataTable DTAlmacenes = new DataTable();
|
DataTable DTAlmacenes = new DataTable();
|
||||||
|
|
||||||
string RutaProductos = $@"{ HttpContext.Current.Server.MapPath("~") }Temp\Productos{NowADS().ToString("yyyyMMdd")}.xlsx";
|
string RutaProductos = $@"{ HttpContext.Current.Server.MapPath("~") }Temp\Productos{ClsPaginas.NowADS().ToString("yyyyMMdd")}.xlsx";
|
||||||
string RutaVentas = $@"{ HttpContext.Current.Server.MapPath("~") }Temp\Ventas{NowADS().ToString("yyyyMMdd")}.xlsx";
|
string RutaVentas = $@"{ HttpContext.Current.Server.MapPath("~") }Temp\Ventas{ClsPaginas.NowADS().ToString("yyyyMMdd")}.xlsx";
|
||||||
string RutaClientes = $@"{ HttpContext.Current.Server.MapPath("~") }Temp\Clientes{NowADS().ToString("yyyyMMdd")}.xlsx";
|
string RutaClientes = $@"{ HttpContext.Current.Server.MapPath("~") }Temp\Clientes{ClsPaginas.NowADS().ToString("yyyyMMdd")}.xlsx";
|
||||||
string RutaAlmacenes = $@"{ HttpContext.Current.Server.MapPath("~") }Temp\Almacenes{NowADS().ToString("yyyyMMdd")}.xlsx";
|
string RutaAlmacenes = $@"{ HttpContext.Current.Server.MapPath("~") }Temp\Almacenes{ClsPaginas.NowADS().ToString("yyyyMMdd")}.xlsx";
|
||||||
|
|
||||||
|
|
||||||
string FormatoVentas = $@"{ HttpContext.Current.Server.MapPath("~") }\TareasProgramadas\FormatosThalamus\FormatoVentas.xlsx";
|
string FormatoVentas = $@"{ HttpContext.Current.Server.MapPath("~") }\TareasProgramadas\FormatosThalamus\FormatoVentas.xlsx";
|
||||||
@@ -543,7 +543,7 @@ public class TareasJam : IHttpHandler
|
|||||||
ClsSisMail Correo = new ClsSisMail();
|
ClsSisMail Correo = new ClsSisMail();
|
||||||
string Para = "julian@adssistemas.mx;rene.molina@adssistemas.mx;oscar.irigoyen@adssistemas.mx";
|
string Para = "julian@adssistemas.mx;rene.molina@adssistemas.mx;oscar.irigoyen@adssistemas.mx";
|
||||||
// string Para = "oscar.irigoyen@adssistemas.mx";
|
// string Para = "oscar.irigoyen@adssistemas.mx";
|
||||||
string Asunto = ErrorProceso ? $"Carga Layout Corteva {NowADS().ToString("yyyy-MM-dd")}" : $"Carga Layout Corteva Error {NowADS().ToString("yyyy-MM-dd")}";
|
string Asunto = ErrorProceso ? $"Carga Layout Corteva {ClsPaginas.NowADS().ToString("yyyy-MM-dd")}" : $"Carga Layout Corteva Error {ClsPaginas.NowADS().ToString("yyyy-MM-dd")}";
|
||||||
|
|
||||||
Correo.SendMail(ClsPaginas.EmpresaNotificaciones, Para, Asunto, Cuerpo, Archivos:ListaArchivos);
|
Correo.SendMail(ClsPaginas.EmpresaNotificaciones, Para, Asunto, Cuerpo, Archivos:ListaArchivos);
|
||||||
this.GuardaLog($"EjecutaThalamus: MandaCorreo() correo enviado. ");
|
this.GuardaLog($"EjecutaThalamus: MandaCorreo() correo enviado. ");
|
||||||
|
|||||||
@@ -233,6 +233,7 @@
|
|||||||
<Columns>
|
<Columns>
|
||||||
<asp:HyperLinkField ItemStyle-HorizontalAlign="Left" Target="_blank" HeaderText="Grupo" DataTextField="GPO" DataNavigateUrlFields="FechaI,FechaF,CveSubProyecto,CveCliente,CveVendedor,Grupo,GPO,CvePS,CveClasificacion,CveMarca,CveCategoria" DataNavigateUrlFormatString="RepVentasUtilidad.aspx?FechaI={0}&FechaF={1}&CveSubProyecto={2}&CveCliente={3}&CveVendedor={4}&Gpo={5}&CveGpo={6}&CvePS={7}&CveClasificacion={8}&CveMarca={9}&CveCategoria={10}" />
|
<asp:HyperLinkField ItemStyle-HorizontalAlign="Left" Target="_blank" HeaderText="Grupo" DataTextField="GPO" DataNavigateUrlFields="FechaI,FechaF,CveSubProyecto,CveCliente,CveVendedor,Grupo,GPO,CvePS,CveClasificacion,CveMarca,CveCategoria" DataNavigateUrlFormatString="RepVentasUtilidad.aspx?FechaI={0}&FechaF={1}&CveSubProyecto={2}&CveCliente={3}&CveVendedor={4}&Gpo={5}&CveGpo={6}&CvePS={7}&CveClasificacion={8}&CveMarca={9}&CveCategoria={10}" />
|
||||||
<asp:BoundField ItemStyle-HorizontalAlign="Right" HeaderText="Ventas" DataField="Ventas" DataFormatString="{0:N2}" />
|
<asp:BoundField ItemStyle-HorizontalAlign="Right" HeaderText="Ventas" DataField="Ventas" DataFormatString="{0:N2}" />
|
||||||
|
<asp:BoundField ItemStyle-HorizontalAlign="Right" HeaderText="%" DataField="ProcentajeVentas" DataFormatString="{0:N2}" ItemStyle-Width="30px" />
|
||||||
<asp:BoundField ItemStyle-HorizontalAlign="Right" HeaderText="Descuento" DataField="Descuento" DataFormatString="{0:N2}" />
|
<asp:BoundField ItemStyle-HorizontalAlign="Right" HeaderText="Descuento" DataField="Descuento" DataFormatString="{0:N2}" />
|
||||||
<asp:BoundField ItemStyle-HorizontalAlign="Right" HeaderText="Bonificación" DataField="Bonificacion" DataFormatString="{0:N2}" />
|
<asp:BoundField ItemStyle-HorizontalAlign="Right" HeaderText="Bonificación" DataField="Bonificacion" DataFormatString="{0:N2}" />
|
||||||
<asp:BoundField ItemStyle-HorizontalAlign="Right" HeaderText="Costo" DataField="Costo" DataFormatString="{0:N2}" />
|
<asp:BoundField ItemStyle-HorizontalAlign="Right" HeaderText="Costo" DataField="Costo" DataFormatString="{0:N2}" />
|
||||||
|
|||||||
Reference in New Issue
Block a user