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

Merge branch 'master' of http://jperez@192.168.10.111:8383/SIG.git

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2024-05-10 00:41:13 -07:00
parent ac8a4008bd 6a1bfc0893
commit 0eb8d409c6
8 changed files with 358 additions and 402 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
App_Code/CalendarEvent.vb
View File

@@ -7,6 +7,7 @@ Public Class CalendarEvent
Public Property description As String Public Property description As String
Public Property start As String Public Property start As String
Public Property [end] As String Public Property [end] As String
Public Property FechaFinal As String
Public Property allDay As Boolean Public Property allDay As Boolean
Public Property CveEventoEstatus As Integer Public Property CveEventoEstatus As Integer
Public Property cveagendatipo As String Public Property cveagendatipo As String

1
Ashx/CargaEventos.ashx
View File

@@ -461,6 +461,7 @@ Public Class CargaEventos : Implements IHttpHandler, IRequiresSessionState
cevent.title = dr("DescripcionContrato").ToString cevent.title = dr("DescripcionContrato").ToString
cevent.start = String.Format("{0:s}", dr("FechaInicial").ToString.ToDateTime) cevent.start = String.Format("{0:s}", dr("FechaInicial").ToString.ToDateTime)
cevent.end = If(tipoVista = "fecha", String.Format("{0:s}", dr("FechaInicial").ToString.ToDateTime.AddHours(1)), String.Format("{0:s}", dr("FechaFinal").ToString.ToDateTime)) cevent.end = If(tipoVista = "fecha", String.Format("{0:s}", dr("FechaInicial").ToString.ToDateTime.AddHours(1)), String.Format("{0:s}", dr("FechaFinal").ToString.ToDateTime))
cevent.FechaFinal = String.Format("{0:s}", dr("FechaFinal").ToString.ToDateTime)
cevent.allDay = False cevent.allDay = False
cevent.NombreAcercamiento = dr("Ubicacion").ToString cevent.NombreAcercamiento = dr("Ubicacion").ToString
cevent.CveCliente = dr("CveCliente").ToString.ToEntero cevent.CveCliente = dr("CveCliente").ToString.ToEntero

2
OI/Proyecto.aspx.cs
View File

@@ -57,7 +57,7 @@ public partial class OI_Proyecto : ClsPaginas
} }
if (UsuarioActual.CveEmpresa == 13) if (UsuarioActual.CveEmpresa == 13 )
{ {
DvIndicador.Visible = true; DvIndicador.Visible = true;
} }

289
OI/RepIndicadoresEMD.aspx
View File

@@ -6,20 +6,18 @@
<link href="/Metronic/assets/global/plugins/datatables/plugins/bootstrap/dataTables.bootstrap.css" rel="stylesheet" /> <link href="/Metronic/assets/global/plugins/datatables/plugins/bootstrap/dataTables.bootstrap.css" rel="stylesheet" />
</asp:Content> </asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server"> <asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
Reporte de Comisiones Reporte de Indicadores
</asp:Content> </asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server"> <asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
</asp:Content> </asp:Content>
<asp:Content ID="Content4" ContentPlaceHolderID="E" runat="Server"> <asp:Content ID="Content4" ContentPlaceHolderID="E" runat="Server">
Reporte de Comisiones Reporte de Indicadores
</asp:Content> </asp:Content>
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server"> <asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
<asp:UpdatePanel runat="server" ID="UpAcciones" UpdateMode="Always"> <asp:UpdatePanel runat="server" ID="UpAcciones" UpdateMode="Always">
<ContentTemplate> <ContentTemplate>
<li>
<asp:LinkButton runat="server" ID="LnkComisiones" OnClick="LnkComisiones_Click" data-toggle="tooltip" data-placement="left" title="Comisiones" Text="<i class='fa fa-money'></i> Comisiones"></asp:LinkButton>
</li>
<li> <li>
<asp:LinkButton ID="LnkExportar" runat="server" Visible="false"><i class="fa fa-file-excel-o"></i> Excel</asp:LinkButton> <asp:LinkButton ID="LnkExportar" runat="server" Visible="false"><i class="fa fa-file-excel-o"></i> Excel</asp:LinkButton>
</li> </li>
@@ -42,62 +40,48 @@
<a href="javascript:;" class="expand"></a> <a href="javascript:;" class="expand"></a>
</div> </div>
<div class="titlefiltros caption"> <div class="titlefiltros caption">
<div class="row" style="height: 32px;"> <div class="row" style="height: 32px;">
<label class="col-md-1 truncate">Ejercicio:</label>
<div class="col-md-1 truncate"> <div class="col-md-1">
Fecha Inicio: <asp:DropDownList ID="DdlEjercicio" CssClass="form-control input-sm select2me" runat="server">
</div> <asp:ListItem Text="2015" Value="2015"></asp:ListItem>
<div class="col-md-1" style="min-width: 115px"> <asp:ListItem Text="2016" Value="2016"></asp:ListItem>
<div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 100px !important; padding: 0px;"> <asp:ListItem Text="2017" Value="2017"></asp:ListItem>
<asp:TextBox Width="80px" ID="txtFechaI" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="10"></asp:TextBox> <asp:ListItem Text="2018" Value="2018"></asp:ListItem>
<span class="input-group-btn "> <asp:ListItem Text="2019" Value="2019"></asp:ListItem>
<asp:LinkButton ID="imgCalendario" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton> <asp:ListItem Text="2020" Value="2020"></asp:ListItem>
</span> <asp:ListItem Text="2021" Value="2021"></asp:ListItem>
</div> <asp:ListItem Text="2022" Value="2022"></asp:ListItem>
<ajax:MaskedEditExtender ID="MEEFechaI" runat="server" TargetControlID="txtFechaI" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender> <asp:ListItem Text="2023" Value="2023"></asp:ListItem>
<ajax:CalendarExtender runat="server" ID="Calendario" TargetControlID="txtFechaI" PopupButtonID="ImgCalendario" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender> <asp:ListItem Text="2024" Value="2024" Selected="True"></asp:ListItem>
<asp:RequiredFieldValidator ID="rfvFechaI" runat="server" ControlToValidate="txtFechaI" Display="None" ErrorMessage="El campo <b>''Fecha Inicial''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="Valida"></asp:RequiredFieldValidator> </asp:DropDownList>
<asp:CompareValidator ID="cvFechaI" runat="server" ControlToValidate="txtFechaI" Display="None" ErrorMessage="El campo <b>''Fecha Inicial''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="Valida"></asp:CompareValidator> </div>
<ajax:ValidatorCalloutExtender ID="vcoFfvFI" runat="server" HighlightCssClass="vco" TargetControlID="rfvFechaI" Width="350px"></ajax:ValidatorCalloutExtender>
<ajax:ValidatorCalloutExtender ID="vcoCvFI" runat="server" HighlightCssClass="vco" TargetControlID="cvFechaI" Width="350px"></ajax:ValidatorCalloutExtender> <label class="col-md-1 truncate">Periodo:</label>
</div> <div class="col-md-1">
<div class="col-md-1 truncate"> <asp:DropDownList ID="DdlPeriodo" CssClass="form-control input-sm select2me" runat="server">
Fecha Fin: <asp:ListItem Text="Enero" Value="1"></asp:ListItem>
<asp:ListItem Text="Febrero" Value="2"></asp:ListItem>
</div> <asp:ListItem Text="Marzo" Value="3"></asp:ListItem>
<div class="col-md-1" style="min-width: 115px"> <asp:ListItem Text="Abril" Value="4"></asp:ListItem>
<div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 100px !important; padding: 0px;"> <asp:ListItem Text="Mayo" Value="5" Selected="True"></asp:ListItem>
<asp:TextBox Width="80px" ID="txtFechaF" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="10"></asp:TextBox> <asp:ListItem Text="Junio" Value="6"></asp:ListItem>
<span class="input-group-btn "> <asp:ListItem Text="Julio" Value="7"></asp:ListItem>
<asp:LinkButton ID="imgCalendarioF" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton> <asp:ListItem Text="Agosto" Value="8"></asp:ListItem>
</span> <asp:ListItem Text="Septiembre" Value="9"></asp:ListItem>
</div> <asp:ListItem Text="Octubre" Value="10"></asp:ListItem>
<ajax:MaskedEditExtender ID="MEEFechaF" runat="server" TargetControlID="txtFechaF" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender> <asp:ListItem Text="Noviembre" Value="11"></asp:ListItem>
<ajax:CalendarExtender runat="server" ID="Calendario2" TargetControlID="txtFechaF" PopupButtonID="imgCalendarioF" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender> <asp:ListItem Text="Diciembre" Value="12"></asp:ListItem>
<asp:RequiredFieldValidator ID="rfvFechaF" runat="server" ControlToValidate="txtFechaF" Display="None" ErrorMessage="El campo <b>''Fecha Final''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="Valida"></asp:RequiredFieldValidator> </asp:DropDownList>
<asp:CompareValidator ID="cvFechaF" runat="server" ControlToValidate="txtFechaF" Display="None" ErrorMessage="El campo <b>''Fecha Final''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="Valida"></asp:CompareValidator> </div>
<ajax:ValidatorCalloutExtender ID="vcoRfvFF" runat="server" HighlightCssClass="vco" TargetControlID="rfvFechaF" Width="350px"></ajax:ValidatorCalloutExtender>
<ajax:ValidatorCalloutExtender ID="vcoCvFF" runat="server" HighlightCssClass="vco" TargetControlID="cvFechaF" Width="350px"></ajax:ValidatorCalloutExtender> <asp:Label runat="server" ID="LblSubProyecto" class="col-md-1 truncate">:</asp:Label>
</div> <div class="col-md-2">
<asp:DropDownList ID="DdlSubProyecto" runat="server" CssClass="form-control select2me input-sm" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Width="100%" AppendDataBoundItems="true">
<label class="col-md-1 ">Médico:</label> </asp:DropDownList>
<div class="col-md-1"> </div>
<asp:DropDownList ID="DdlMedico" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="Medico" DataValueField="CveMedico" Width="100%">
</asp:DropDownList>
</div>
<label class="col-md-1 ">Vendedor:</label>
<div class="col-md-1">
<asp:DropDownList ID="DdlVendedor" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="Vendedor" DataValueField="CveVendedor" Width="100%">
</asp:DropDownList>
</div>
<label class="col-md-1 ">Técnico:</label>
<div class="col-md-1">
<asp:DropDownList ID="DdlUsuarioAtendio" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="Nombre" DataValueField="CveUsuario" Width="100%">
</asp:DropDownList>
</div>
@@ -113,174 +97,53 @@
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
<ajax:TabContainer runat="server" ID="Tabs">
<ajax:TabPanel ID="TabComisiones" runat="server" HeaderText="Comisiones" ClientIDMode="Static">
<ContentTemplate>
<asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<div class="row" style="margin-left: 0px; margin-top: 5px; margin-bottom: 5px; text-align: right; margin-right: 5px;" align="left">
<input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvDatos.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvDatos.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</div>
<div class="row">
<div class="col-md-12">
<asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False"
DataKeyNames="CveVenta,SerieFolio,Hospital,Medico,Especialidad,FechaCirugia,Procedimiento,Codigo,PU,Cantidad,Total,CveVendedor,Vendedor,Nombre,ComisionMedico,ComisionVendedor,ComisionTecnico"
data-sort="true"
EmptyDataText="No se encontraron Medicos Registrados" ToolTip="Listado de Medicos" CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn" GridLines="None">
<Columns>
<asp:BoundField HeaderText="Folio" DataField="SerieFolio" ItemStyle-HorizontalAlign="Left" /> <asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
<asp:BoundField HeaderText="Nombre Hospital" DataField="Hospital" ItemStyle-HorizontalAlign="Left" /> <ContentTemplate>
<asp:BoundField HeaderText="Especialidad" DataField="Especialidad" ItemStyle-HorizontalAlign="Left" /> <div class="row" style="margin-left: 0px; margin-top: 5px; margin-bottom: 5px; text-align: right; margin-right: 5px;" align="left">
<asp:BoundField HeaderText="Médico" DataField="Medico" ItemStyle-HorizontalAlign="Left" /> <input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvDatos.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
<asp:BoundField HeaderText="Fecha Hora Cirugia" DataField="FechaCirugia" ItemStyle-HorizontalAlign="Left" DataFormatString="{0:dd/MM/yyyy hh:mm}" /> <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvDatos.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
<asp:BoundField HeaderText="Procedimiento" DataField="Procedimiento" ItemStyle-HorizontalAlign="Left" /> </div>
<asp:BoundField HeaderText="Código Producto" DataField="Codigo" ItemStyle-HorizontalAlign="Left" /> <div class="row">
<asp:BoundField HeaderText="Nombre Del Producto" DataField="PS" ItemStyle-HorizontalAlign="Left" /> <div class="col-md-12">
<asp:BoundField HeaderText="Precio Unitario" DataField="PU" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" /> <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False"
<asp:BoundField HeaderText="Cantidad Utilizada" DataField="Cantidad" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" /> DataKeyNames=""
<asp:BoundField HeaderText="Monto Venta Total" DataField="Total" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" /> data-sort="true"
<asp:BoundField HeaderText="Vendedor" DataField="Vendedor" ItemStyle-HorizontalAlign="Left" /> EmptyDataText="No se encontraron Datos" ToolTip="" CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn" GridLines="None">
<asp:BoundField HeaderText="Comisión Vendedor" DataField="ComisionVendedor" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" /> <Columns>
<asp:BoundField HeaderText="Técnico" DataField="Nombre" ItemStyle-HorizontalAlign="Left" /> <asp:BoundField HeaderText="Número" DataField="Numero" ItemStyle-HorizontalAlign="Left" />
<asp:BoundField HeaderText="Comisión Técnico" DataField="ComisionTecnico" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField HeaderText="Indicador" DataField="Indicador" ItemStyle-HorizontalAlign="Left" />
<asp:BoundField HeaderText="Educación Médica" DataField="ComisionMedico" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField HeaderText="ACARREO SAN JOSE A QUILA" DataField="ACARREO SAN JOSE A QUILA" ItemStyle-HorizontalAlign="Left" />
<asp:BoundField HeaderText="PIPER MERIDIAN M500" DataField="PIPER MERIDIAN M500" ItemStyle-HorizontalAlign="Left" />
<asp:BoundField HeaderText="PRESA JALES PEÑA COLORADA" DataField="PRESA JALES PEÑA COLORADA" ItemStyle-HorizontalAlign="Left" />
<asp:BoundField HeaderText="MINA LA CRUZ" DataField="MINA LA CRUZ" ItemStyle-HorizontalAlign="Left" />
<asp:BoundField HeaderText="TOGUI -UBER" DataField="TOGUI -UBER" ItemStyle-HorizontalAlign="Left" />
<asp:BoundField HeaderText="SAN IGNACIO" DataField="SAN IGNACIO" ItemStyle-HorizontalAlign="Left" />
<asp:BoundField HeaderText="Porcentaje" DataField="Porcentaje" ItemStyle-HorizontalAlign="Right" />
<asp:BoundField HeaderText="Comentarios" DataField="Comentarios" ItemStyle-HorizontalAlign="Left" Visible="false" />
</Columns> </Columns>
</asp:GridView> </asp:GridView>
</div> </div>
</div> </div>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
</ContentTemplate>
</ajax:TabPanel>
<ajax:TabPanel ID="TabEspeciales" runat="server" HeaderText="Especiales" ClientIDMode="Static">
<ContentTemplate>
<asp:UpdatePanel ID="UpDatosEspeciales" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<div class="row" style="margin-left: 0px; margin-top: 5px; margin-bottom: 5px; text-align: right; margin-right: 5px;" align="left">
<div class="col-md-6">
<input type="text" id="TxtBusquedaEspecial" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusquedaEspecial','{0}')", GvDatosEspeciales.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusquedaEspecial','{0}')", GvDatosEspeciales.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</div>
</div>
<div class="row">
<div class="col-md-6">
<asp:GridView ID="GvDatosEspeciales" runat="server" AutoGenerateColumns="False"
DataKeyNames=""
data-sort="true"
EmptyDataText="No se encontraron Medicos Registrados" ToolTip="Listado de Medicos" CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn" GridLines="None">
<Columns>
<asp:BoundField HeaderText="Médico" DataField="Medico" ItemStyle-HorizontalAlign="Left" />
<asp:BoundField HeaderText="Com. Médico" DataField="ComisionMedico" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" ControlStyle-Width="120px" />
<asp:BoundField HeaderText="Com. Gerente" DataField="ComisionGerente" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" ControlStyle-Width="120px" />
<asp:BoundField HeaderText="Com. Vendedor" DataField="ComisionVendedor" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" ControlStyle-Width="120px" />
<asp:BoundField HeaderText="Com. Técnico" DataField="ComisionTecnico" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" ControlStyle-Width="120px" />
<asp:BoundField HeaderText="Fecha de Pago" DataField="FechaPago" ItemStyle-HorizontalAlign="Center" DataFormatString="{0:dd/MM/yyyy}" ControlStyle-Width="80px" />
</Columns>
</asp:GridView>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</ContentTemplate>
</ajax:TabPanel>
</ajax:TabContainer>
<div id="DvModalComisiones" class="modal ADS fade" role="dialog">
<div class="modal-dialog" style="width: 900px;">
<asp:UpdatePanel runat="server" class="modal-content" ID="UpDvModalComisiones" UpdateMode="Conditional">
<ContentTemplate>
<div class="modal-header ">
<button type="button" class="close" data-dismiss="modal">×</button>
<h4 class="modal-title">
<asp:Literal ID="Literal1" runat="server">Comisiones</asp:Literal></h4>
</div>
<div class="modal-body">
<div class="row" style="margin-left: 0px; margin-top: 5px; margin-bottom: 5px; text-align: right; margin-right: 5px;" align="left">
<input type="text" id="TxtBusquedaComiciones" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusquedaComiciones','{0}')", GvComisiones.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusquedaComiciones','{0}')", GvComisiones.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</div>
<div class="row">
<div class="col-md-12">
<asp:GridView ID="GvComisiones" runat="server" AutoGenerateColumns="False"
DataKeyNames="CvePS,ComisionMedico,ComisionGerente,ComisionVendedor,ComisionTecnico"
data-sort="true" OnRowDataBound="GvComisiones_RowDataBound"
EmptyDataText="No se encontraron Comisiones" ToolTip="Listado de Medicos" CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn" GridLines="None">
<Columns>
<asp:TemplateField HeaderText="Código/Producto" ItemStyle-HorizontalAlign="Left">
<ItemTemplate>
<asp:Literal ID="LtlCodigoPS" runat="server" Text='<%# Eval("CodigoPS") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Médico" ItemStyle-HorizontalAlign="Left">
<ItemTemplate>
<asp:TextBox ID="TxtComisionMedico" Width="75px" runat="server" Text='<%# String.Format("{0:#.00}", Eval("ComisionMedico")) %>' Style="text-align: right;" onkeyup="FormatoMoneda(this)" AutoComplete="off"></asp:TextBox>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="% Gerente" ItemStyle-HorizontalAlign="Left">
<ItemTemplate>
<asp:TextBox ID="TxtComisionGerente" Width="75px" runat="server" Text='<%# String.Format("{0:#.00}", Eval("ComisionGerente")) %>' Style="text-align: right;" onkeyup="FormatoMoneda(this);validaPorcentaje(this);" AutoComplete="off" ></asp:TextBox>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="% Vendedor" ItemStyle-HorizontalAlign="Left">
<ItemTemplate>
<asp:TextBox ID="TxtComisionVendedor" Width="75px" runat="server" Text='<%# String.Format("{0:#.00}", Eval("ComisionVendedor")) %>' Style="text-align: right;" onkeyup="FormatoMoneda(this);validaPorcentaje(this);" AutoComplete="off" ></asp:TextBox>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="% Técnico" ItemStyle-HorizontalAlign="Left">
<ItemTemplate>
<asp:TextBox ID="TxtComisionTecnico" Width="75px" runat="server" Text='<%# String.Format("{0:#.00}", Eval("ComisionTecnico")) %>' Style="text-align: right;" onkeyup="FormatoMoneda(this);validaPorcentaje(this);" AutoComplete="off" ></asp:TextBox>
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
</div>
</div>
</div>
<div class="modal-footer">
<asp:Button ID="BtnGuardarComisiones" OnClick="BtnGuardarComisiones_Click" runat="server" class="btn btn-success" Text="Guardar" ValidationGroup="GrpGuardarEspecialidad" />
<button id="BtnCerrar" runat="server" type="button" class="btn default" data-dismiss="modal">Cerrar</button>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>
</asp:Content> </asp:Content>

351
OI/RepIndicadoresEMD.aspx.vb
View File

@@ -2,6 +2,8 @@
Option Strict On Option Strict On
Imports System.Data Imports System.Data
Imports CrystalDecisions.Shared.Json
Imports DocumentFormat.OpenXml.Vml.Office
Imports Extensiones Imports Extensiones
@@ -24,99 +26,206 @@ Partial Class OI_RepIndicadoresEMD
If Not Page.IsPostBack Then If Not Page.IsPostBack Then
Dim FechaInicial As Date = New Date(10) Dim FechaInicial As Date = New Date(10)
txtFechaI.Text = Now.FirstDayOfMonth.ToString("dd/MM/yyyy")
txtFechaF.Text = Now.ToString("dd/MM/yyyy")
CargaCombos() CargaCombos()
CargaDatos() CargaDatos()
End If End If
End Sub End Sub
Private Sub CargaCombos() Private Sub CargaCombos()
'If UsuarioActual.Empresa.Funcionalidad(302) = "1" AndAlso DdlSubProyectoDatos.SelectedValue.ToEntero() > 0 Then CargarCentrosDeCosto(Nothing, DdlSubProyecto, Nothing, LblSubProyecto, AplicaTodos:="Todos")
' DdlVendedor.DataSource = GlobalDTVendedores(UsuarioActual.CveEmpresa, VendedorTipo:=-1).FiltraParametros(String.Format("VendedorTipo IN (1,4) AND (CveSubProyecto IS NULL OR CveSubProyecto = {0})", DdlSubProyectoDatos.SelectedValue))
'Else
DdlVendedor.DataSource = GlobalDTVendedores(UsuarioActual.CveEmpresa).FiltraParametros("VendedorTipo = 1")
'End If
DdlVendedor.DataBind()
DdlVendedor.Items.Insert(0, New ListItem("Todos", "-1"))
DdlMedico.DataSource = GlobalDTMedicos(UsuarioActual.CveEmpresa).FiltraParametros("Estatus = 'True' ")
DdlMedico.DataBind()
DdlMedico.Items.Insert(0, New ListItem("Todos", "-1"))
DdlUsuarioAtendio.DataSource = GlobalDTUsuarios(-1, UsuarioActual.CveEmpresa)
DdlUsuarioAtendio.DataBind()
DdlUsuarioAtendio.Items.Insert(0, New ListItem("Todos", "-1"))
End Sub End Sub
Private Function CrearTablaDatos() As DataTable
Dim DTDatos As New DataTable
DTDatos.Columns.Add("Numero", GetType(Integer))
DTDatos.Columns.Add("Indicador", GetType(String))
DTDatos.Columns.Add("Comentarios", GetType(String))
DTDatos.Columns.Add("ACARREO SAN JOSE A QUILA", GetType(String))
DTDatos.Columns.Add("PIPER MERIDIAN M500", GetType(String))
DTDatos.Columns.Add("PRESA JALES PEÑA COLORADA", GetType(String))
DTDatos.Columns.Add("MINA LA CRUZ", GetType(String))
DTDatos.Columns.Add("TOGUI -UBER", GetType(String))
DTDatos.Columns.Add("SAN IGNACIO", GetType(String))
DTDatos.Columns.Add("Porcentaje", GetType(String))
'DTDatos.Columns.Add("", GetType(String))
DTDatos.AcceptChanges()
Dim nRow1 As DataRow = DTDatos.NewRow
Dim nRow2 As DataRow = DTDatos.NewRow
Dim nRow3 As DataRow = DTDatos.NewRow
Dim nRow4 As DataRow = DTDatos.NewRow
Dim nRow5 As DataRow = DTDatos.NewRow
Dim nRow6 As DataRow = DTDatos.NewRow
Dim nRow7 As DataRow = DTDatos.NewRow
Dim nRow8 As DataRow = DTDatos.NewRow
Dim nRow9 As DataRow = DTDatos.NewRow
Dim nRow10 As DataRow = DTDatos.NewRow
'ACARREO SAN JOSE A QUILA
'PIPER MERIDIAN M500
'PRESA JALES PEÑA COLORADA
'MINA LA CRUZ
'TOGUI -UBER
'SAN IGNACIO
nRow1("Numero") = "1"
nRow1("Indicador") = "Programación de bolsa aprobada en tiempo"
nRow1("Comentarios") = "Si programaron en tiempo según la tarea"
nRow1("ACARREO SAN JOSE A QUILA") = "1"
nRow1("PIPER MERIDIAN M500") = "1"
nRow1("PRESA JALES PEÑA COLORADA") = "1"
nRow1("MINA LA CRUZ") = "0"
nRow1("TOGUI -UBER") = "1"
nRow1("SAN IGNACIO") = "1"
nRow1("Porcentaje") = "67%"
nRow2("Numero") = "2"
nRow2("Indicador") = "Solicitudes fuera de presupuesto"
nRow2("Comentarios") = "Hacer cambios a presupuestos"
nRow2("ACARREO SAN JOSE A QUILA") = "1"
nRow2("PIPER MERIDIAN M500") = "0"
nRow2("PRESA JALES PEÑA COLORADA") = "0"
nRow2("MINA LA CRUZ") = "0"
nRow2("TOGUI -UBER") = "1"
nRow2("SAN IGNACIO") = "1"
nRow2("Porcentaje") = "67%"
nRow3("Numero") = "3"
nRow3("Indicador") = "Viáticos dentro de presupuesto"
nRow3("Comentarios") = "Si se salió de lo gastado en el rubro de viáticos"
nRow3("ACARREO SAN JOSE A QUILA") = ""
nRow3("PIPER MERIDIAN M500") = ""
nRow3("PRESA JALES PEÑA COLORADA") = ""
nRow3("MINA LA CRUZ") = ""
nRow3("TOGUI -UBER") = ""
nRow3("SAN IGNACIO") = ""
nRow3("Porcentaje") = ""
nRow4("Numero") = "4"
nRow4("Indicador") = "Viáticos no deducibles"
nRow4("Comentarios") = "Viáticos no deducibles"
nRow4("ACARREO SAN JOSE A QUILA") = ""
nRow4("PIPER MERIDIAN M500") = ""
nRow4("PRESA JALES PEÑA COLORADA") = ""
nRow4("MINA LA CRUZ") = ""
nRow4("TOGUI -UBER") = ""
nRow4("SAN IGNACIO") = ""
nRow4("Porcentaje") = ""
nRow5("Numero") = "5"
nRow5("Indicador") = "Utilidad operativa"
nRow5("Comentarios") = "Ing-Egs"
nRow5("ACARREO SAN JOSE A QUILA") = ""
nRow5("PIPER MERIDIAN M500") = ""
nRow5("PRESA JALES PEÑA COLORADA") = ""
nRow5("MINA LA CRUZ") = ""
nRow5("TOGUI -UBER") = ""
nRow5("SAN IGNACIO") = ""
nRow5("Porcentaje") = ""
nRow6("Numero") = "11"
nRow6("Indicador") = "Factura ligada a orden de compra en SIG"
nRow6("Comentarios") = "Relación"
nRow6("ACARREO SAN JOSE A QUILA") = ""
nRow6("PIPER MERIDIAN M500") = ""
nRow6("PRESA JALES PEÑA COLORADA") = ""
nRow6("MINA LA CRUZ") = ""
nRow6("TOGUI -UBER") = ""
nRow6("SAN IGNACIO") = ""
nRow6("Porcentaje") = ""
nRow7("Numero") = "12"
nRow7("Indicador") = "Cumplimiento del programa de mantenimientos preventivos"
nRow7("Comentarios") = ""
nRow7("ACARREO SAN JOSE A QUILA") = "ND"
nRow7("PIPER MERIDIAN M500") = "ND"
nRow7("PRESA JALES PEÑA COLORADA") = "ND"
nRow7("MINA LA CRUZ") = "ND"
nRow7("TOGUI -UBER") = "ND"
nRow7("SAN IGNACIO") = "ND"
nRow7("Porcentaje") = "50%"
nRow8("Numero") = "13"
nRow8("Indicador") = "Relación entre mantenimiento preventivo y correctivo"
nRow8("Comentarios") = ""
nRow8("ACARREO SAN JOSE A QUILA") = "ND"
nRow8("PIPER MERIDIAN M500") = "ND"
nRow8("PRESA JALES PEÑA COLORADA") = "ND"
nRow8("MINA LA CRUZ") = "ND"
nRow8("TOGUI -UBER") = "ND"
nRow8("SAN IGNACIO") = "ND"
nRow8("Porcentaje") = "50%"
nRow9("Numero") = "14"
nRow9("Indicador") = "Consumo de combustible"
nRow9("Comentarios") = ""
nRow9("ACARREO SAN JOSE A QUILA") = "ND"
nRow9("PIPER MERIDIAN M500") = "ND"
nRow9("PRESA JALES PEÑA COLORADA") = "ND"
nRow9("MINA LA CRUZ") = "ND"
nRow9("TOGUI -UBER") = "ND"
nRow9("SAN IGNACIO") = "ND"
nRow9("Porcentaje") = "50%"
nRow10("Numero") = "15"
nRow10("Indicador") = "Relación de entradas de almacén contra órdenes de compra"
nRow10("Comentarios") = "Relación"
nRow10("ACARREO SAN JOSE A QUILA") = ""
nRow10("PIPER MERIDIAN M500") = ""
nRow10("PRESA JALES PEÑA COLORADA") = ""
nRow10("MINA LA CRUZ") = ""
nRow10("TOGUI -UBER") = ""
nRow10("SAN IGNACIO") = ""
nRow10("Porcentaje") = ""
DTDatos.Rows.Add(nRow1)
DTDatos.Rows.Add(nRow2)
DTDatos.Rows.Add(nRow3)
DTDatos.Rows.Add(nRow4)
DTDatos.Rows.Add(nRow5)
DTDatos.Rows.Add(nRow6)
DTDatos.Rows.Add(nRow7)
DTDatos.Rows.Add(nRow8)
DTDatos.Rows.Add(nRow9)
DTDatos.Rows.Add(nRow10)
DTDatos.AcceptChanges()
Return DTDatos
End Function
Public Sub CargaDatos() Public Sub CargaDatos()
LnkExportar.Visible = False LnkExportar.Visible = False
Dim ObjVentas As New ClsVentas GvDatos.DataSource = CrearTablaDatos()
If ObjVentas.GetComisionesMedicasRep(txtFechaI.Text.ToDate, txtFechaF.Text.ToDate, UsuarioActual.CveEmpresa, -1, -1, DdlMedico.SelectedValue.ToEntero, DdlVendedor.SelectedValue.ToEntero, DdlUsuarioAtendio.SelectedValue.ToEntero, -1, 1) Then
GvDatos.DataSource = ObjVentas.DtResultados
If ObjVentas.DtResultados IsNot Nothing AndAlso ObjVentas.DtResultados.Rows.Count > 0 Then
LnkExportar.Visible = True
End If
Else
GvDatos.DataSource = Nothing
End If
ObjVentas.Dispose()
GvDatos.DataBind() GvDatos.DataBind()
'LnkExportar.Visible = True
'GvDatos.DataBind()
If GvDatos.Rows.Count > 0 Then
LnkExportar.Visible = True
End If
UpDatos.Update() UpDatos.Update()
End Sub End Sub
Public Sub CargaDatosEspeciales()
LnkExportar.Visible = False
Dim ObjVentas As New ClsVentas
If ObjVentas.GetComisionesMedicasRep(txtFechaI.Text.ToDate, txtFechaF.Text.ToDate, UsuarioActual.CveEmpresa, -1, -1, DdlMedico.SelectedValue.ToEntero, DdlVendedor.SelectedValue.ToEntero, DdlUsuarioAtendio.SelectedValue.ToEntero, -1, 2) Then
GvDatosEspeciales.DataSource = ObjVentas.DtResultados
If ObjVentas.DtResultados IsNot Nothing AndAlso ObjVentas.DtResultados.Rows.Count > 0 Then
LnkExportar.Visible = True
End If
Else
GvDatosEspeciales.DataSource = Nothing
End If
ObjVentas.Dispose()
GvDatosEspeciales.DataBind()
UpDatosEspeciales.Update()
End Sub
Protected Sub BtnConsultar_Click(sender As Object, e As EventArgs) Protected Sub BtnConsultar_Click(sender As Object, e As EventArgs)
CargaDatos()
If Tabs.ActiveTabIndex = 0 Then
CargaDatos()
Else
CargaDatosEspeciales()
End If
End Sub End Sub
#Region "EXCEL" #Region "EXCEL"
@@ -125,16 +234,13 @@ Partial Class OI_RepIndicadoresEMD
Dim SbFiltros As New StringBuilder() Dim SbFiltros As New StringBuilder()
SbFiltros.AppendFormat($"Fecha Inicio: {txtFechaI.Text} Fecha Fin: {txtFechaF.Text}|") SbFiltros.AppendFormat($"Ejercicio: {DdlEjercicio.SelectedItem.Text} Periodo: {DdlPeriodo.SelectedItem.Text}|")
If Tabs.ActiveTabIndex = 0 Then ' GvDatos.Columns(10).Visible = False
GvDatos.Columns(10).Visible = False GvDatos.ExportToExcelGembox("IndicadoresEMD", UsuarioActual, "Indicadores EMD", DatoTituloExtra:=$"", DatosFiltros:=SbFiltros.ToString())
GvDatos.ExportToExcelGembox("Comisiones", UsuarioActual, "Comisiones", DatoTituloExtra:=$"", DatosFiltros:=SbFiltros.ToString()) ' GvDatos.Columns(10).Visible = True
GvDatos.Columns(10).Visible = True
Else
GvDatosEspeciales.ExportToExcelGembox("Comisiones", UsuarioActual, "Comisiones Especiales", DatoTituloExtra:=$"", DatosFiltros:=SbFiltros.ToString())
End If
End Sub End Sub
@@ -145,107 +251,10 @@ Partial Class OI_RepIndicadoresEMD
#End Region #End Region
Protected Sub LnkComisiones_Click(sender As Object, e As EventArgs)
CargaComisiones()
RegistraScript("$('#DvModalComisiones').modal('show');")
End Sub
Private Sub CargaComisiones()
DTDatos = New DataTable
GvComisiones.DataSource = Nothing
Dim objVentas As New ClsVentas
If objVentas.GetComisionesMedicas(UsuarioActual.CveEmpresa) Then
GvComisiones.DataSource = objVentas.DtResultados
DTDatos = objVentas.DtResultados
End If
objVentas.Dispose()
GvComisiones.DataBind()
UpDvModalComisiones.Update()
End Sub
Protected Sub BtnGuardarComisiones_Click(sender As Object, e As EventArgs)
Dim objVentas As New ClsVentas
objVentas.IniciaTransacSQL()
Dim TieneError As Boolean = False
For Each GvRow As GridViewRow In GvComisiones.Rows
Dim CvePS As Integer = GvRow.DataKey("CvePS").ToEntero
Dim ComisionMedicoDT As Decimal = DTDatos.FiltroPrimeroValor("ComisionMedico", $"CvePS = {CvePS} ").ToDecimal
Dim ComisionVendedorDT As Decimal = DTDatos.FiltroPrimeroValor("ComisionVendedor", $"CvePS = {CvePS} ").ToDecimal
Dim ComisionTecnicoDT As Decimal = DTDatos.FiltroPrimeroValor("ComisionTecnico", $"CvePS = {CvePS} ").ToDecimal
Dim ComisionGerenteDT As Decimal = DTDatos.FiltroPrimeroValor("ComisionGerente", $"CvePS = {CvePS} ").ToDecimal
Dim ComisionMedicoGV As Decimal = GvRow.FCTextBox("TxtComisionMedico").Text.ToDecimal
Dim ComisionGerenteGV As Decimal = (GvRow.FCTextBox("TxtComisionGerente").Text.ToDecimal / 100).RoundSQL(4)
Dim ComisionVendedorGV As Decimal = (GvRow.FCTextBox("TxtComisionVendedor").Text.ToDecimal / 100).RoundSQL(4)
Dim ComisionTecnicoGV As Decimal = (GvRow.FCTextBox("TxtComisionTecnico").Text.ToDecimal / 100).RoundSQL(4)
If ComisionMedicoDT <> ComisionMedicoGV Or ComisionVendedorDT <> ComisionVendedorGV Or ComisionTecnicoDT <> ComisionTecnicoGV Or ComisionGerenteDT <> ComisionGerenteGV Then
If Not objVentas.AddUpdateComisionesMedicas(GvRow.DataKey("CvePS").ToEntero, UsuarioActual.CveEmpresa, ComisionMedicoGV, ComisionVendedorGV, ComisionTecnicoGV, ComisionGerenteGV) Then
TieneError = True
End If
End If
Next
If TieneError Then
objVentas.RollBack()
Else
objVentas.Commit()
Alert("Comisiones Actualizadas correctamente")
End If
objVentas.Dispose()
End Sub
Protected Sub GvComisiones_RowDataBound(sender As Object, e As GridViewRowEventArgs)
If e.Row.RowType = DataControlRowType.DataRow Then
'ComisionMedico,ComisionGerente,ComisionVendedor,ComisionTecnico"
If e.Row.DataKey("ComisionMedico").ToDecimal = 0 Then
e.Row.FCTextBox("TxtComisionMedico").Text = ""
Else
e.Row.FCTextBox("TxtComisionMedico").Text = e.Row.DataKey("ComisionMedico").ToDecimal.ToString("###.00")
End If
If e.Row.DataKey("ComisionGerente").ToDecimal = 0 Then
e.Row.FCTextBox("TxtComisionGerente").Text = ""
Else
e.Row.FCTextBox("TxtComisionGerente").Text = (e.Row.DataKey("ComisionGerente").ToDecimal * 100).ToString("###.00")
End If
If e.Row.DataKey("ComisionVendedor").ToDecimal = 0 Then
e.Row.FCTextBox("TxtComisionVendedor").Text = ""
Else
e.Row.FCTextBox("TxtComisionVendedor").Text = (e.Row.DataKey("ComisionVendedor").ToDecimal * 100).ToString("###.00")
End If
If e.Row.DataKey("ComisionTecnico").ToDecimal = 0 Then
e.Row.FCTextBox("TxtComisionTecnico").Text = ""
Else
e.Row.FCTextBox("TxtComisionTecnico").Text = (e.Row.DataKey("ComisionTecnico").ToDecimal * 100).ToString("###.00")
End If
End If
End Sub
End Class End Class

77
OI/TareaDetalle.aspx.cs
View File

@@ -51,6 +51,12 @@ public partial class OI_TareaDetalle : ClsPaginas
public System.Data.DataTable CheckListNew { get { return ViewState["CheckListNew"] != null ? (System.Data.DataTable)ViewState["CheckListNew"] : null; } set { ViewState["CheckListNew"] = value; } } public System.Data.DataTable CheckListNew { get { return ViewState["CheckListNew"] != null ? (System.Data.DataTable)ViewState["CheckListNew"] : null; } set { ViewState["CheckListNew"] = value; } }
public int chklistitemindex { get { return ViewState["chklistitemindex"] != null ? ViewState["chklistitemindex"].ToString().ToEntero() : 0; } set { ViewState["chklistitemindex"] = value; } } public int chklistitemindex { get { return ViewState["chklistitemindex"] != null ? ViewState["chklistitemindex"].ToString().ToEntero() : 0; } set { ViewState["chklistitemindex"] = value; } }
public int CveIndicador { get { return ViewState["CveIndicador"].ToString().ToEntero(); } set { ViewState["CveIndicador"] = value; } }
public int Indicador { get { return ViewState["Indicador"].ToString().ToEntero(); } set { ViewState["Indicador"] = value; } }
public int ValorIndicador { get { return ViewState["ValorIndicador"].ToString().ToEntero(); } set { ViewState["ValorIndicador"] = value; } }
public int CveSubProyectoIndicador { get { return ViewState["CveSubProyectoIndicador"].ToString().ToEntero(); } set { ViewState["CveSubProyectoIndicador"] = value; } }
#endregion #endregion
protected void Page_Load(object sender, EventArgs e) protected void Page_Load(object sender, EventArgs e)
{ {
@@ -72,6 +78,12 @@ public partial class OI_TareaDetalle : ClsPaginas
EsNuevo = true; EsNuevo = true;
CveUsuarioPara = 0; CveUsuarioPara = 0;
CveUsuarioDe = 0; CveUsuarioDe = 0;
CveIndicador = -1;
Indicador = -1;
ValorIndicador = -1;
CveSubProyectoIndicador = -1;
if (Request["Archivo"] != null) if (Request["Archivo"] != null)
{ {
string strArchivo = string.Format("{0}{1}", UsuarioActual.Empresa.Ruta, ModExtensiones.Decripta(Request["Archivo"].ToString())); string strArchivo = string.Format("{0}{1}", UsuarioActual.Empresa.Ruta, ModExtensiones.Decripta(Request["Archivo"].ToString()));
@@ -458,6 +470,11 @@ public partial class OI_TareaDetalle : ClsPaginas
//OIE.[CveEventoEstatus], OIE.[FechaInicio], OIE.[FechaFin], OIE.[FechaRealTermino], OIE.[CveRevision], OIE.[Archivo], OIE.[FechaIng], //OIE.[CveEventoEstatus], OIE.[FechaInicio], OIE.[FechaFin], OIE.[FechaRealTermino], OIE.[CveRevision], OIE.[Archivo], OIE.[FechaIng],
//OIE.[CveUsuarioIng], OIE.[CveEmpresa], OIE.[CveUsuarioModifico], OIE.[Avance] //OIE.[CveUsuarioIng], OIE.[CveEmpresa], OIE.[CveUsuarioModifico], OIE.[Avance]
CveIndicador = drow["CveIndicador"].ToString().ToEntero();
Indicador = drow["Indicador"].ToString().ToEntero();
ValorIndicador = drow["ValorIndicador"].ToString().ToEntero();
CveSubProyectoIndicador = drow["CveSubProyectoIndicador"].ToString().ToEntero();
LtlVinculo.Text = ""; LtlVinculo.Text = "";
LtlVinculoLink.Text = ""; LtlVinculoLink.Text = "";
CveEventoPadre = drow["CveEventoPadre"].ToString().ToEntero(); CveEventoPadre = drow["CveEventoPadre"].ToString().ToEntero();
@@ -1021,8 +1038,15 @@ public partial class OI_TareaDetalle : ClsPaginas
using (ClsOIEventos objOI = new ClsOIEventos()) using (ClsOIEventos objOI = new ClsOIEventos())
{ {
objOI.IniciaTransacSQL();
bool ProcesoOK = false;
if (objOI.UpdateEstatusEvento2(CveEstatus, -1, RCveEvento, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, TxtComentarioTerminarpadre.Text)) if (objOI.UpdateEstatusEvento2(CveEstatus, -1, RCveEvento, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, TxtComentarioTerminarpadre.Text))
{
ProcesoOK = true;
}
if (ProcesoOK)
{ {
ObjEventosCorreo o = objOI.objCorreo; ObjEventosCorreo o = objOI.objCorreo;
if (CveEstatus >= 3) if (CveEstatus >= 3)
@@ -1033,31 +1057,22 @@ public partial class OI_TareaDetalle : ClsPaginas
{ {
pnlfecharealtermino.Visible = false; pnlfecharealtermino.Visible = false;
} }
//CargaEstatusEventos(DdlEventoEstatus.SelectedValue.ToEntero);
//if (DdlEventoEstatus.SelectedValue.ToEntero == 3 | DdlEventoEstatus.SelectedValue.ToEntero == 1)
// EnviarCorreoCambioEstatus(false);
//CargaDatos();
if (CveEstatus == 4) if (CveEstatus == 4)
{ {
TxtAvance.Text = "100"; TxtAvance.Text = "100";
LblPorcentaje.Text = string.Format("{0:##0.##}", "100".ToDecimal()); LblPorcentaje.Text = string.Format("{0:##0.##}", "100".ToDecimal());
} }
string mensaje = string.Format("Se cambió el Estatus de \"{0}\" a \"{1}\"", DdlEventoEstatus.SelectedItem.Text, DDlEstatus.SelectedItem.Text);
DdlEventoEstatus.SelectedValueExist(DDlEstatus.SelectedValue);
lblEstatus.Text = DdlEventoEstatus.SelectedItem.Text;
UpEstatus.Update();
RegistraScript(string.Format("$('#{0}').modal('hide')", iddivCambiarEstatus));
Alert(mensaje, ModExtensiones.TipoMensaje.ToastInformacion);
cargaActividades(objOI);
string Nombrede = ""; string Nombrede = "";
string Nombrepara = ""; string Nombrepara = "";
System.Data.DataTable dt = get_GlobalDTUsuarios(CveUsuario: CveUsuarioDe, CveEmpresa: UsuarioActual.CveEmpresa); System.Data.DataTable dt = get_GlobalDTUsuarios(CveUsuario: CveUsuarioDe, CveEmpresa: UsuarioActual.CveEmpresa);
if (dt.Rows.Count > 0) if (dt.Rows.Count > 0)
{ {
Nombrede = dt.Rows[0]["Nombre"].ToString(); Nombrede = dt.Rows[0]["Nombre"].ToString();
} }
dt = get_GlobalDTUsuarios(CveUsuario: CveUsuarioDe, CveEmpresa: UsuarioActual.CveEmpresa); dt = get_GlobalDTUsuarios(CveUsuario: CveUsuarioDe, CveEmpresa: UsuarioActual.CveEmpresa);
if (dt.Rows.Count > 0) if (dt.Rows.Count > 0)
{ {
@@ -1068,10 +1083,46 @@ public partial class OI_TareaDetalle : ClsPaginas
DateTime FFin = txtFechaF.Text.ToDateTimeExcat(); DateTime FFin = txtFechaF.Text.ToDateTimeExcat();
if (o != null) if (o != null)
{ {
string mailbody = MailgetBodyNuevatarea(o.Folio, o.Link, o.Asunto, o.Descripcion, fInicio,FFin, o.Prioridad, o.Tema, Nombrede, Nombrepara, string.Format("Tarea Estatus Actualizado ({0})", o.Estatus)); string mailbody = MailgetBodyNuevatarea(o.Folio, o.Link, o.Asunto, o.Descripcion, fInicio, FFin, o.Prioridad, o.Tema, Nombrede, Nombrepara, string.Format("Tarea Estatus Actualizado ({0})", o.Estatus));
EnviarCorreo(UsuarioActual.Empresa, o.AsuntoCorreo, mailbody, o.mailPara, ""); EnviarCorreo(UsuarioActual.Empresa, o.AsuntoCorreo, mailbody, o.mailPara, "");
} }
}
if (ProcesoOK && CveIndicador > 0 && (DDlEstatus.SelectedValue.ToEntero() == 3 || DDlEstatus.SelectedValue.ToEntero() == 4)){
if(Indicador == 1)
{
int Valor = 0;
int dias = (int) (txtFechaF.Text.ToDate() - NowADS()).TotalDays;
if (dias >= -2)
{
Valor = 1;
}
if (!objOI.UpdateIndicador(CveIndicador, Valor, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa))
{
ProcesoOK = false;
}
}
}
if (ProcesoOK){
cargaActividades(objOI);
objOI.Commit();
string mensaje = string.Format("Se cambió el Estatus de \"{0}\" a \"{1}\"", DdlEventoEstatus.SelectedItem.Text, DDlEstatus.SelectedItem.Text);
DdlEventoEstatus.SelectedValueExist(DDlEstatus.SelectedValue);
lblEstatus.Text = DdlEventoEstatus.SelectedItem.Text;
UpEstatus.Update();
RegistraScript(string.Format("$('#{0}').modal('hide')", iddivCambiarEstatus));
Alert(mensaje, ModExtensiones.TipoMensaje.ToastInformacion);
}
else{
objOI.RollBack();
} }
} }

4
Transportes/RepContratos.aspx
View File

@@ -269,7 +269,7 @@
<label class="col-md-4">Servicio</label> <label class="col-md-4">Servicio</label>
<div class="col-md-8"> <div class="col-md-8">
<div class="input-group"> <div class="input-group">
<asp:TextBox ID="TxtDescripcion" runat="server" MaxLength="70" Width="100%" <asp:TextBox ID="TxtDescripcion" runat="server" MaxLength="250" Width="100%"
TextMode="MultiLine" TextMode="MultiLine"
Rows="3"></asp:TextBox> Rows="3"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVDescripcion" runat="server" ControlToValidate="TxtDescripcion" <asp:RequiredFieldValidator ID="RFVDescripcion" runat="server" ControlToValidate="TxtDescripcion"
@@ -289,7 +289,7 @@
<label class="col-md-4">Observaciones</label> <label class="col-md-4">Observaciones</label>
<div class="col-md-8"> <div class="col-md-8">
<div class="input-group"> <div class="input-group">
<asp:TextBox ID="TxtObservaciones" runat="server" MaxLength="70" Width="100%" <asp:TextBox ID="TxtObservaciones" runat="server" MaxLength="200" Width="100%"
TextMode="MultiLine" TextMode="MultiLine"
Rows="3"></asp:TextBox> Rows="3"></asp:TextBox>
<div class="input-group-addon"> <div class="input-group-addon">

35
Transportes/RepContratosCalendario.aspx
View File

@@ -696,8 +696,13 @@
$('#<%=TxtObservaciones.ClientID%>').val(event.title); $('#<%=TxtObservaciones.ClientID%>').val(event.title);
$('#<%=TxtDescripcion.ClientID%>').val(event.title); $('#<%=TxtDescripcion.ClientID%>').val(event.title);
$('#<%=TxtUbicacion.ClientID%>').val(event.NombreAcercamiento); $('#<%=TxtUbicacion.ClientID%>').val(event.NombreAcercamiento);
$('#<%=TxtFechaSalida.ClientID%>').val(event.start._i);
$('#<%=TxtFechaRegreso.ClientID%>').val(event.end._i); <%--$('#<%=TxtFechaSalida.ClientID%>').val(event.start._i);
$('#<%=TxtFechaRegreso.ClientID%>').val(event.end._i);--%>
$('#<%=TxtFechaSalida.ClientID%>').val(formatearFechaISO(event.start._i));
$('#<%=TxtFechaRegreso.ClientID%>').val(formatearFechaISO(event.FechaFinal));
$('#<%=DdlClientes.ClientID%>').val(event.CveCliente); $('#<%=DdlClientes.ClientID%>').val(event.CveCliente);
$('#<%=DdlAF.ClientID%>').val(event.CveActivoFijo); $('#<%=DdlAF.ClientID%>').val(event.CveActivoFijo);
$('#<%=DdlChofer.ClientID%>').val(event.CvePersonal); $('#<%=DdlChofer.ClientID%>').val(event.CvePersonal);
@@ -720,6 +725,30 @@
$('#<%=BtnModal.ClientID%>').click(); $('#<%=BtnModal.ClientID%>').click();
} }
function formatearFechaISO(fechaISO) {
let fecha = new Date(fechaISO);
// Formatear la fecha en DD/MM/YYYY
let dia = fecha.getDate().toString().padStart(2, '0');
let mes = (fecha.getMonth() + 1).toString().padStart(2, '0'); // getMonth() devuelve mes de 0-11
let año = fecha.getFullYear();
// Formatear la hora en formato 12 horas con AM/PM
let horas = fecha.getHours();
let minutos = fecha.getMinutes().toString().padStart(2, '0');
let periodo = 'a. m.';
if (horas >= 12) {
periodo = 'p. m.';
horas = horas > 12 ? horas - 12 : horas; // Convertir hora de formato 24 a 12 horas
}
if (horas === 0) horas = 12; // Medianoche se muestra como 12 a.m.
horas = horas.toString().padStart(2, '0');
// Combinar la fecha y la hora
return `${dia}/${mes}/${año} ${horas}:${minutos}:00 ${periodo}`;
}
function RadionButtonSelectedValueSet(name, SelectdValue) { function RadionButtonSelectedValueSet(name, SelectdValue) {
$('input[name="' + name + '"][value="' + SelectdValue + '"]').prop('checked', true); $('input[name="' + name + '"][value="' + SelectdValue + '"]').prop('checked', true);
} }
@@ -824,6 +853,8 @@
}); });
} }
</script> </script>