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

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

Browse Source
This commit is contained in:
Antonio Gonzalez
2020-05-06 08:50:25 -07:00
parent f6d3c44588 b73939bd8f
commit 8b4045e5ba
18 changed files with 3150 additions and 2695 deletions
Download Patch File Download Diff File Expand all files Collapse all files

30
App_Code/ClsAcumuladores.vb
View File

@@ -797,6 +797,21 @@ Public Class ClsAcumuladores
Return Retorno
End Function
Public Function EliminarGarantiasDetalle(CveVenta As Integer) As Boolean
Dim Retorno As Boolean = False
SqlDataAdapter("PA_Acum_GarantiasDetallePolizaRemove")
With SqlAdapter.SelectCommand.Parameters
.Add("@CveVenta", SqlDbType.Int).Value = CveVenta
End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As SqlException
OnError("Ocurrió un error a eliminar de garantia.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
End Try
Return Retorno
End Function
#End Region
@@ -863,6 +878,21 @@ Public Class ClsAcumuladores
End Try
Return Retorno
End Function
Public Function EliminarPolizaVirtual(CveVenta As Integer) As Boolean
Dim Retorno As Boolean = False
SqlDataAdapter("PA_Vta_PolizaVirtualRemove")
With SqlAdapter.SelectCommand.Parameters
.Add("@CveVenta", SqlDbType.Int).Value = CveVenta
End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As SqlException
OnError("Ocurrió un al eliminar poliza virtual. ", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
End Try
Return Retorno
End Function
#End Region
Public Function DistribuidorMovtosAdd(CveCliente As Integer, Cantidad As Integer, CveTamaño As Integer, CveConcepto As Integer, CveVenta As Integer, CveUsuario As Integer,

17
App_Code/ClsOIEventos.vb
View File

@@ -238,6 +238,23 @@ Public Class ClsOIEventos
Return Retorno
End Function
Public Function GetEventosVinculos(CveEvento As Integer, CveEmpresa As Integer) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_OI_EventosVinculosGet")
With SqlAdapter.SelectCommand.Parameters
.Add("@CveEvento", SqlDbType.Int).Value = CveEvento
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
OnError("Ocurrió un error al obtener el Catálogo de Evento Usuario.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno
End Function
Public Function UpUsuarioseventosVisto(CveEvento As Integer, CveUsuario As Integer) As Boolean
Dim Retorno As Boolean = False
DataAdapter("UPDATE OI_EventosUsuarios SET Visto=1 WHERE CveEvento =@CveEvento AND CveUsuario=@CveUsuario", CommandType.Text)

19
App_Code/ClsVentas.vb
View File

@@ -4496,6 +4496,25 @@ Public Class ClsVentas
Return Retorno
End Function
Public Function EliminarUsados(CveVenta As Integer) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Vta_VentasUsadosRemove", CommandType.StoredProcedure)
With SqlAdapter.SelectCommand.Parameters
.Add("@CveVenta", SqlDbType.Int).Value = CveVenta
End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
OnError("Ocurrió un error al eliminar los usados.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
End Try
Return Retorno
End Function
Public Function GetVentasUsados(CveVenta As Integer, CveSubProyecto As Integer, Fecha As DateTime, CveEmpresa As Integer) As Boolean
Dim Retorno As Boolean = False

4
Compras/Compras.aspx
View File

@@ -2952,7 +2952,9 @@
<span class="caption-subject bold">Agregar</span>
</div>--%>
<asp:HyperLink ID="ImgAddObs" CssClass="caption-subject bold" data-toggle="modal" data-target="#ModalBitacora" runat="server" Text=" <i class='fa fa-commenting font-green' style='font-weight: 700 !important;' ><span class='caption-subject bold'>Agregar</span></i>" Style="cursor: pointer;" ToolTip="Observaciones"></asp:HyperLink><br />
<asp:HyperLink ID="HlEvento" CssClass="thickbox caption-subject bold" runat="server" Text=" <i class='fa fa-calendar-plus-o font-green' style='font-weight: 700 !important;' >Agendar</i>" Visible="false" Style="cursor: pointer;" ToolTip="Agendar"></asp:HyperLink>
<asp:HyperLink ID="HlEvento" CssClass="thickbox caption-subject bold" runat="server" Text=" <i class='fa fa-calendar-plus-o font-green' style='font-weight: 700 !important;' >Agendar</i>" Visible="false" Style="cursor: pointer;" ToolTip="Agendar"></asp:HyperLink><br />
<asp:Literal ID="LtlTareaNueva" runat="server"></asp:Literal>
<UserControl:TareaNueva runat="server" id="TareaNueva" />
</div>
</div>

2
Compras/Compras.aspx.vb
View File

@@ -1624,6 +1624,8 @@ Partial Class Compras_Compras
LtlTareaNueva.Text = String.Format("<a class=""caption-subject bold font-green"" onclick=""OpenModalNewTareaUserControl(1,-1,{{CveCompra:{0}}});""> <i class=""fa fa-plus""'></i> Tarea</a>", CveCompra)
End If

99
OI/MinutaDetalle.aspx
View File

@@ -217,8 +217,8 @@
<asp:TemplateField>
<ItemStyle HorizontalAlign="Center" Width="50px" />
<HeaderTemplate>
<a id="chkAll" onclick="chkAll_OncLick(1);" class="linkCorreo" data-toggle="tooltip" title="Seleccionar todos(Visibles)"><i class="fa fa fa-check-square-o"></i></a>
<a id="UnchkAll" onclick="chkAll_OncLick(0);" class="linkCorreo" data-toggle="tooltip" title="Quitar seleccion todos(Visibles)"><i class="fa fa-square-o"></i></a>
<%-- <a id="chkAll" onclick="chkAll_OncLick(1);" class="linkCorreo" data-toggle="tooltip" title="Seleccionar todos(Visibles)"><i class="fa fa fa-check-square-o"></i></a>
<a id="UnchkAll" onclick="chkAll_OncLick(0);" class="linkCorreo" data-toggle="tooltip" title="Quitar seleccion todos(Visibles)"><i class="fa fa-square-o"></i></a>--%>
</HeaderTemplate>
<ItemTemplate>
<asp:CheckBox ID="ChkOk" CssClass="ChkOk" Checked="false" runat="server" />
@@ -327,8 +327,8 @@
</ajax:TabPanel>
<ajax:TabPanel ID="TabTareas" Visible="false" runat="server" HeaderText="Tareas">
<ContentTemplate>
<asp:Panel runat="server" ID="portletTareas" class="portlet light smmallpadding bordered">
<UserControl:TareaNueva runat="server" id="tareanueva" Ismodal="false" />
<asp:Panel runat="server" ID="portletTareas" Visible="false" class="portlet light smmallpadding bordered">
<div class="portlet-title">
<div class="caption font-green">
<i class="icon-pin font-green"></i>
@@ -452,50 +452,51 @@
//OIE.[CveEventoEstatus], OIE.[FechaInicio], OIE.[FechaFin], OIE.[FechaRealTermino], OIE.[CveRevision], OIE.[Archivo], OIE.[FechaIng],
//OIE.[CveUsuarioIng], OIE.[CveEmpresa], OIE.[CveUsuarioModifico], OIE.[Avance]--%>
</div>
<asp:GridView ID="GVTareas" runat="server" GridLines="None" CssClass="table table-hover table-striped ScrollAD Widthall" AutoGenerateColumns="False"
DataKeyNames="Titulo,NombreRegistro,CveEvento,CveTipoEvento,Folio,Asunto,Descripcion,Prioridad,CveUsuarioDe,CveUsuarioPara,CveEventoEstatus,FechaInicio,FechaFin,FechaRealTermino,CveRevision,Archivo,FechaIng,CveUsuarioIng,CveEmpresa,CveUsuarioModifico,Avance">
<Columns>
<asp:TemplateField HeaderText="Folio">
<ItemTemplate>
<a target="_blank" href='<%# Eval("CveEvento","/OI/TareaDetalle.aspx?CveEvento={0}")%>' class="Widthallimp">
<asp:Label runat="server" Text='<%# Eval("Folio")%>'> </asp:Label>
</a>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Asunto">
<ItemTemplate>
<asp:Label runat="server" Text='<%# Eval("Asunto")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Descripción">
<ItemTemplate>
<asp:Label runat="server" Text='<%# Eval("Descripcion")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Para">
<ItemTemplate>
<asp:Label runat="server" Text='<%# Eval("UserPara")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Fecha Inicio">
<ItemTemplate>
<asp:Label runat="server" Text='<%# Eval("FechaInicio","{0:dd/MM/yyyy HH}:{0:mm}")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Fecha Fin">
<ItemTemplate>
<asp:Label runat="server" Text='<%# Eval("FechaFin","{0:dd/MM/yyyy HH}:{0:mm}")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Estatus">
<ItemTemplate>
<asp:Label runat="server" Text='<%# Eval("EventoEstatus")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
</asp:Panel>
<asp:Button ID="btnreloadTareas" OnClick="btnreloadTareas_Click" CssClass="hidden btnreloadTareas" UseSubmitBehavior="false" runat="server" Text="Button" />
<asp:GridView ID="GVTareas" runat="server" GridLines="None" CssClass="table table-hover table-striped ScrollAD Widthall" AutoGenerateColumns="False"
DataKeyNames="Titulo,NombreRegistro,CveEvento,CveTipoEvento,Folio,Asunto,Descripcion,Prioridad,CveUsuarioDe,CveUsuarioPara,CveEventoEstatus,FechaInicio,FechaFin,FechaRealTermino,CveRevision,Archivo,FechaIng,CveUsuarioIng,CveEmpresa,CveUsuarioModifico,Avance">
<Columns>
<asp:TemplateField HeaderText="Folio">
<ItemTemplate>
<a target="_blank" href='<%# Eval("CveEvento","/OI/TareaDetalle.aspx?CveEvento={0}")%>' class="Widthallimp">
<asp:Label runat="server" Text='<%# Eval("Folio")%>'> </asp:Label>
</a>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Asunto">
<ItemTemplate>
<asp:Label runat="server" Text='<%# Eval("Asunto")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Descripción">
<ItemTemplate>
<asp:Label runat="server" Text='<%# Eval("Descripcion")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Para">
<ItemTemplate>
<asp:Label runat="server" Text='<%# Eval("UserPara")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Fecha Inicio">
<ItemTemplate>
<asp:Label runat="server" Text='<%# Eval("FechaInicio","{0:dd/MM/yyyy HH}:{0:mm}")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Fecha Fin">
<ItemTemplate>
<asp:Label runat="server" Text='<%# Eval("FechaFin","{0:dd/MM/yyyy HH}:{0:mm}")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Estatus">
<ItemTemplate>
<asp:Label runat="server" Text='<%# Eval("EventoEstatus")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
</ContentTemplate>
</ajax:TabPanel>
<ajax:TabPanel ID="TabAgendas" Visible="false" runat="server" HeaderText="Agendas">
@@ -909,9 +910,11 @@
//Div[0].appendChild(boton)
});
}
function OnAddedTareaNueva() {
$('.btnreloadTareas').click();
}
function SetEditor() {
}
function GetContents() {

6
OI/MinutaDetalle.aspx.cs
View File

@@ -98,6 +98,7 @@ public partial class OI_MinutaDetalle : ClsPaginas
LnkEnviarMinuta.Visible = false;
TxtAsunto.Enabled = false;
TxtDescripcion.Enabled = false;
tareanueva.CveEventoPadre = RCveEvento;
//LnkUpFileVisible = true;
//LnkUpUsuariosVisible = true;
System.Data.DataRow drow = ObjOI_E.DtResultados.Rows[0];
@@ -1167,4 +1168,9 @@ public partial class OI_MinutaDetalle : ClsPaginas
ObjEventos.UpdateEventoMinuta(TxtAsunto.Text, TxtDescripcion.Text, TxtAcuerdos.Text.Replace("< ", "<"), new DateTime(1999, 1, 1), "-1", RCveEvento);
}
}
protected void btnreloadTareas_Click(object sender, EventArgs e)
{
cargarAgenda();
}
}

167
OI/TareaDetalle.aspx
View File

@@ -4,9 +4,16 @@
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
<style>
.GVVinculo a {
text-decoration: none;
color: #333;
font-size: 14px;
font-weight: 600;
}
tr[hide="1"] {
display: none;
background-color:rgb(4,71,103)
background-color: rgb(4,71,103)
}
.portlet {
@@ -174,12 +181,12 @@
</div>
<div class="portlet-body rowpadding">
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtAsunto" runat="server" CssClass="form-control" CausesValidation="true"></asp:TextBox>
<asp:TextBox ID="TxtAsunto" runat="server" CssClass="form-control TxtAsunto" CausesValidation="true"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVAsunto" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtAsunto" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Asunto''</b> es necesario, por favor ingréselo." ValidationGroup="GrpTarea"></asp:RequiredFieldValidator>
<asp:Label runat="server" Text="Asunto:" AssociatedControlID="TxtAsunto"></asp:Label>
</div>
<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtDescripcion" runat="server" CssClass="form-control" CausesValidation="true" TextMode="MultiLine" Rows="2"></asp:TextBox>
<asp:TextBox ID="TxtDescripcion" runat="server" CssClass="form-control TxtDescripcion" CausesValidation="true" TextMode="MultiLine" Rows="2"></asp:TextBox>
<asp:RequiredFieldValidator ID="RfvDescripcion" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtDescripcion" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Descripción''</b> es necesario, por favor ingréselo." ValidationGroup="GrpTarea"></asp:RequiredFieldValidator>
<asp:Label runat="server" Text="Descripción" AssociatedControlID="TxtDescripcion"></asp:Label>
</div>
@@ -211,10 +218,12 @@
</div>
</div>
</asp:Panel>
<asp:Literal ID="LtlVinculo" runat="server"></asp:Literal><asp:Literal ID="LtlVinculoLink" runat="server"></asp:Literal>
<div class="row">
<div class="col-sm-6">
<div class="input-group form-group form-md-line-input date date-picker " data-date-format="dd/mm/yyyy hh:mm" style="display: inline-block;">
<asp:TextBox ID="txtFechaI" runat="server" autocomplete="false" CssClass="form-control ADDateTimePicker" CausesValidation="true" MaxLength="18" Width="132px "></asp:TextBox>
<asp:TextBox ID="txtFechaI" runat="server" autocomplete="false" CssClass="form-control ADDateTimePicker" CausesValidation="true" MaxLength="18" Width="132px "></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVtxtFechaI" runat="server" ControlToValidate="txtFechaI" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha Inicio''</b> es necesario, por favor seleccione uno." ValidationGroup="GrpTarea"></asp:RequiredFieldValidator>
<asp:Label AssociatedControlID="txtFechaI" runat="server" Text="Fecha Inicio"></asp:Label>
<%--<ajax:MaskedEditExtender ID="MEEFechaI" runat="server" TargetControlID="txtFechaI" Mask="99/99/9999 99:99" MaskType="DateTime" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>--%>
@@ -269,20 +278,21 @@
<span class="caption-subject bold uppercase">CheckList <span id="Contador"></span></span>
</div>
<div class="tools">
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
<a href="javascript:;" class="expand" data-original-title="" title=""></a>
</div>
</div>
<div class="portlet-body rowpadding">
<div class="portlet-body rowpadding" style="display: none">
<div class="row">
<div class="col-md-8">
<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtActividad" runat="server" CssClass="form-control" CausesValidation="true"></asp:TextBox>
<asp:RequiredFieldValidator ID="Rfvactividadchklist" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtActividad" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''actividad''</b> es necesario, por favor ingréselo." ValidationGroup="GrpTareachklist"></asp:RequiredFieldValidator>
<asp:Label runat="server" Text="Actividad" AssociatedControlID="TxtActividad"></asp:Label>
</div>
</div>
<div class="col-md-4">
<asp:Button ID="LnkSinfuncion" OnClick="LnkSinfuncion_Click" UseSubmitBehavior="false" CssClass="btn btn-default LnkSinfuncion hidden" runat="server"></asp:Button>
<asp:LinkButton ID="LnkAgregarchklistitem" OnClick="LnkAgregarchklistitem_Click" CssClass="btn btn-default" runat="server">Agregar</asp:LinkButton>
<asp:LinkButton ID="LnkAgregarchklistitem" OnClick="LnkAgregarchklistitem_Click" ValidationGroup="GrpTareachklist" CssClass="btn btn-default" runat="server">Agregar</asp:LinkButton>
<%--<a class="btn btn-default">Agregar</a>--%>
</div>
</div>
@@ -339,10 +349,14 @@
<ContentTemplate>
<div class="form-group form-md-line-input">
<asp:DropDownList ID="DdlEventoEstatus" Visible="true" runat="server" DataValueField="CveEventoEstatus" CssClass="form-control select2me input-sm" Width="100%" DataTextField="EventoEstatus">
</asp:DropDownList>
<div style="display: none">
<asp:DropDownList ID="DdlEventoEstatus" Visible="true" runat="server" DataValueField="CveEventoEstatus" Style="display: none" CssClass="form-control select2me input-sm" Width="100%" DataTextField="EventoEstatus">
</asp:DropDownList>
</div>
<asp:Label runat="server" AssociatedControlID="DdlEventoEstatus">Estatus:</asp:Label>
</div>
<asp:Label ID="lblEstatus" Style="font-size: 25px" runat="server" Text="Label"></asp:Label>
<div class="DivAvance">
<asp:Label runat="server" CssClass="labelitem" AssociatedControlID="TxtAvance">Avance:</asp:Label>
<asp:TextBox ID="TxtAvance" runat="server" CssClass="form-control TxtAvance" CausesValidation="true"></asp:TextBox>
@@ -363,6 +377,39 @@
</div>
</asp:Panel>
<asp:Panel runat="server" ID="portletvinculos" Visible="false" class="portlet light smmallpadding bordered" Style="margin-bottom: 15px;">
<div class="portlet-title">
<div class="caption font-green">
<i class="icon-pin font-green"></i>
<span class="caption-subject bold uppercase">Vinculos</span>
</div>
<div class="tools">
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
</div>
</div>
<div class="portlet-body rowpadding">
<asp:UpdatePanel ID="UpVinculos" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:GridView ID="GVVinculo" runat="server" AutoGenerateColumns="false"
CssClass="table-hover Widthall GVVinculo" GridLines="None" ShowHeader="false">
<Columns>
<asp:TemplateField>
<HeaderTemplate></HeaderTemplate>
<ItemTemplate>
<asp:Literal runat="server" Text='<%# Eval("Vinculo") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</asp:Panel>
<asp:Panel runat="server" ID="portletArchivo" class="portlet light smmallpadding bordered">
<div class="portlet-title">
<div class="caption font-green">
@@ -427,8 +474,8 @@
<HeaderTemplate>
C. C. Para
<br />
<a id="chkAll" onclick="chkAll_OncLick(1);" class="linkCorreo" data-toggle="tooltip" title="Seleccionar todos(Visibles)"><i class="fa fa-check-square-o"></i></a>
<a id="UnchkAll" onclick="chkAll_OncLick(0);" class="linkCorreo" data-toggle="tooltip" title="Quitar seleccion todos(Visibles)"><i class="fa fa-square-o"></i></a>
<%--<a id="chkAll" onclick="chkAll_OncLick(1);" class="linkCorreo" data-toggle="tooltip" title="Seleccionar todos(Visibles)"><i class="fa fa-check-square-o"></i></a>
<a id="UnchkAll" onclick="chkAll_OncLick(0);" class="linkCorreo" data-toggle="tooltip" title="Quitar seleccion todos(Visibles)"><i class="fa fa-square-o"></i></a>--%>
</HeaderTemplate>
<ItemTemplate>
<asp:CheckBox ID="ChkCCP" CssClass="ChkOk" Checked="false" runat="server" />
@@ -468,53 +515,6 @@
</div>
</div>
<div class="portlet-body rowpadding" style="display: none;">
<%--<table class="Widthall table ">
<tbody>
<tr>
<td>19/04/2020 </td>
<td>comentario con archivo</td>
<td><a><i class="fa fa-download"></i></a></td>
</tr>
<tr>
<td>19/04/2020 </td>
<td>comentario</td>
</tr>
<tr>
<td>19/04/2020 </td>
<td>Se termino la activada y del checklist</td>
</tr>
<tr>
<td>19/04/2020 </td>
<td>Se termino la activada x del checklist</td>
</tr>
<tr>
<td>19/04/2020 </td>
<td>Se agrego la activada p al checklist</td>
</tr>
<tr>
<td>19/04/2020 </td>
<td>Se agrego la activada w al checklist</td>
</tr>
<tr>
<td>19/04/2020 </td>
<td>Se agrego la activada z al checklist</td>
</tr>
<tr>
<td>19/04/2020 </td>
<td>Se agrego la activada y al checklist</td>
</tr>
<tr>
<td>19/04/2020 </td>
<td>Se agrego la activada x al checklist</td>
</tr>
<tr>
<td>19/04/2020 </td>
<td>Se registro la tarea oi</td>
</tr>
</tbody>
</table>--%>
<asp:UpdatePanel ID="UpActividades" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:GridView ID="GvActividades" runat="server" AutoGenerateColumns="False" CssClass="table table-striped table-advance table-hover Widthall ScrollAD GvActividades"
@@ -562,13 +562,13 @@
<h4 class="modal-title" style="text-align: left">
<asp:Literal ID="LtlTituloUsuarios" runat="server">Actualizar miembros</asp:Literal></h4>
</div>
<div class="modal-body">
<div class="form-group form-md-line-input" style="display:none">
<div class="modal-body">
<div class="form-group form-md-line-input" style="display: none">
<asp:DropDownList runat="server" ID="DdlRoles" DataValueField="CveRol" DataTextField="Rol" CssClass="select2me form-control ddlrol" Width="100%" onchange="ddlRol_Onchange();" />
<asp:Label runat="server" Text="Perfil:" AssociatedControlID="DdlRoles"></asp:Label>
</div>
<div class="form-group form-md-line-input" style="display:none">
<div class="form-group form-md-line-input" style="display: none">
<asp:DropDownList runat="server" ID="DdlSucursales" DataValueField="CveProyecto" DataTextField="SubProyecto" CssClass="select2me form-control ddlsucursal" Width="100%" onchange="DdlSucursales_Onchange();" />
<asp:Label runat="server" Text="Sucursales:" AssociatedControlID="DdlSucursales"></asp:Label>
</div>
@@ -601,8 +601,8 @@
<HeaderTemplate>
C. C. Para
<br />
<a id="chkAll" onclick="chkAll_OncLick(1);" class="linkCorreo" data-toggle="tooltip" title="Seleccionar todos(Visibles)"><i class="fa fa-check-square-o"></i></a>
<a id="UnchkAll" onclick="chkAll_OncLick(0);" class="linkCorreo" data-toggle="tooltip" title="Quitar seleccion todos(Visibles)"><i class="fa fa fa-square-o"></i></a>
<%--<a id="chkAll" onclick="chkAll_OncLick(1);" class="linkCorreo" data-toggle="tooltip" title="Seleccionar todos(Visibles)"><i class="fa fa-check-square-o"></i></a>
<a id="UnchkAll" onclick="chkAll_OncLick(0);" class="linkCorreo" data-toggle="tooltip" title="Quitar seleccion todos(Visibles)"><i class="fa fa fa-square-o"></i></a>--%>
</HeaderTemplate>
<ItemTemplate>
<asp:CheckBox ID="ChkCCP" CssClass="ChkOk" Checked="false" runat="server" />
@@ -693,11 +693,26 @@
</div>
<div class="modal-body">
<div class="form-group form-md-line-input">
<asp:DropDownList ID="DDlEstatus" Visible="true" runat="server" DataValueField="CveEventoEstatus" CssClass="form-control select2me input-sm" Width="100%" DataTextField="EventoEstatus">
<asp:DropDownList ID="DDlEstatus" Visible="true" AutoPostBack="true" OnSelectedIndexChanged="DDlEstatus_SelectedIndexChanged" runat="server" DataValueField="CveEventoEstatus" CssClass="form-control select2me input-sm" Width="100%" DataTextField="EventoEstatus">
</asp:DropDownList>
<asp:Label runat="server" AssociatedControlID="DdlEventoEstatus">Estatus:</asp:Label>
</div>
<asp:Panel ID="pnlTerminarPadre" runat="server">
<div class="row">
<div class="col-sm-6">Terminar Padre</div>
<div class="col-sm-6">
<asp:CheckBox ID="chkTerminarPadre" runat="server" />
</div>
</div>
<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtComentarioTerminarpadre" runat="server" CssClass="form-control" CausesValidation="true" TextMode="MultiLine" Rows="1"></asp:TextBox>
<asp:Label runat="server" Text="Agregar Comentario" AssociatedControlID="TxtComentarioTerminarpadre"></asp:Label>
</div>
</asp:Panel>
</div>
<div class="modal-footer">
<asp:LinkButton ID="BtnCambiarEstatus" OnClick="BtnCambiarEstatus_Click" CssClass="btn btn-primary" ValidationGroup="GrpTarea" runat="server">Guardar</asp:LinkButton>
<button data-dismiss="modal" class="btn btn-danger">Cancelar</button>
@@ -728,7 +743,7 @@
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>
</div>
<%--<script>
Sys.Application.add_load(function (s, e) {
@@ -739,6 +754,7 @@
});
</script>--%>
<asp:TextBox ID="TxtIsnewtarea" CssClass=" hidden TxtIsnewtarea " runat="server"></asp:TextBox>
</asp:Content>
<asp:Content ID="Content8" ContentPlaceHolderID="JS" runat="Server">
@@ -817,6 +833,23 @@
//e.Row.Attributes.Add("data-sucursal", CveRol);
}
//TxtAsunto TxtDescripcion TxtIsnewtarea
function loadTxtAsunto() {
if ($('input.TxtIsnewtarea').val() == "1") {
let input = $('input.TxtAsunto:not(.CEvent)')
let TxtAsunto_Onchange = function () { let valor = $('input.TxtAsunto').val(); /*console.log(valor);*/ $('.TxtDescripcion').val(valor); }
input.bind({
copy: TxtAsunto_Onchange
, paste: TxtAsunto_Onchange
, cut: TxtAsunto_Onchange
, keydown: function (event) { if (event.which == 13) { event.preventDefault(); } TxtAsunto_Onchange(); }
, keyup: function (event) { if (event.which == 13) { event.preventDefault(); } TxtAsunto_Onchange(); }
});
input.addClass('CEvent');
}
}
function loadeventos() {
let input = $('input.TxtUsuario:not(.ConEvento)')
@@ -936,6 +969,7 @@
CargaPickers();
setchecklistitulo();
barraavance();
loadTxtAsunto();
//$('.GVcheklist input[type="checkbox"]:checked').addClass('icheck setclass');
});
$(document).ready(function () {
@@ -945,6 +979,7 @@
CargaPickers();
setchecklistitulo();
barraavance();
loadTxtAsunto();
//$('.GVUsuarios input[type="checkbox"]:not(.setclass)').addClass('icheck setclass');
});
</script>

166
OI/TareaDetalle.aspx.cs
View File

@@ -31,6 +31,7 @@ public partial class OI_TareaDetalle : ClsPaginas
public int RCveEvento { get { return ViewState["RCveEvento"] != null ? ViewState["RCveEvento"].ToString().ToEntero() : 0; } set { ViewState["RCveEvento"] = value; } }
public int Folio { get { return ViewState["Folio"] != null ? ViewState["Folio"].ToString().ToEntero() : 0; } set { ViewState["Folio"] = value; } }
public decimal Avance { get { return ViewState["Avance"] != null ? ViewState["Avance"].ToString().ToEntero() : 0; } set { ViewState["Avance"] = value; } }
public int CveEventoPadre { get { return ViewState["CveEventoPadre"].ToString().ToEntero(); } set { ViewState["CveEventoPadre"] = value; } }
public int CveUsuarioPara { get { return ViewState["CveUsuarioPara"].ToString().ToEntero(); } set { ViewState["CveUsuarioPara"] = value; } }
public int CveUsuarioDe { get { return ViewState["CveUsuarioDe"].ToString().ToEntero(); } set { ViewState["CveUsuarioDe"] = value; } }
public List<int> LCveUsuarioCCP { get { if (ViewState["LCveUsuarioCCP"] == null) { ViewState["LCveUsuarioCCP"] = new List<int>(); } return (List<int>)ViewState["LCveUsuarioCCP"]; } set { ViewState["LCveUsuarioCCP"] = value; } }
@@ -50,6 +51,8 @@ public partial class OI_TareaDetalle : ClsPaginas
if (!IsPostBack)
{
CveEventoPadre = 0;
portletvinculos.Visible = false;
LnkAgregarCheckListVisible = true;
LnkUpFileVisible = false;
LnkUpUsuariosVisible = false;
@@ -107,6 +110,7 @@ public partial class OI_TareaDetalle : ClsPaginas
}
else
{
TxtIsnewtarea.Text = "1";
portletActividades.Visible = false;
LnkcambiarEstatus.Visible = false;
LnkAgregarTema.Visible = false;
@@ -170,6 +174,11 @@ public partial class OI_TareaDetalle : ClsPaginas
TxtDescripcion.Enabled = Permisos.EdicionGeneral;
LnkUpFile.Visible = Permisos.EdicionGeneral && LnkUpFileVisible;
LnkUpUsuarios.Visible = Permisos.EdicionGeneral && LnkUpUsuariosVisible;
DdlPrioridad.Enabled = Permisos.EdicionGeneral;
DdlTema.Enabled = Permisos.EdicionGeneral;
DdlPrioridad.Enabled = Permisos.EdicionGeneral;
txtFechaF.Enabled = Permisos.EdicionGeneral;
txtFechaI.Enabled = Permisos.EdicionGeneral;
#endregion
#region Permisos.Bitacora
LnkAgregarActividad.Visible = Permisos.Bitacora;
@@ -181,7 +190,7 @@ public partial class OI_TareaDetalle : ClsPaginas
#region Permisos.Reasignar
LnkReasignar.Visible = Permisos.Reasignar;
#endregion
List<ListItem> itemremove= new List<ListItem>();
List<ListItem> itemremove = new List<ListItem>();
foreach (ListItem item in DDlEstatus.Items)
{
switch (item.Value.ToEntero())
@@ -201,15 +210,15 @@ public partial class OI_TareaDetalle : ClsPaginas
{
itemremove.Add(item);
//DDlEstatus.Items.Remove(item);
}
}
break;
}
}
foreach (ListItem item in itemremove)
foreach (ListItem item in itemremove)
{
DDlEstatus.Items.Remove(item);
}
LnkcambiarEstatus.Visible = LnkcambiarEstatus.Visible && (Permisos.Estatus1_2_3 || Permisos.Estatus4_5);
LnkcambiarEstatus.Visible = LnkcambiarEstatus.Visible && (Permisos.Estatus1_2_3 || Permisos.Estatus4_5);
UpAcciones.Update();
UpTitulo.Update();
@@ -343,7 +352,17 @@ public partial class OI_TareaDetalle : ClsPaginas
}
LtlPara.Text = StrPara.ToString();
LtlDeUser.Text = StrDeUser.ToString();
LtlCCPara.Text = StrCCPara.ToString();
int longitud = StrCCPara.ToString().Length;
if (longitud > 0)
{
LtlCCPara.Text = StrCCPara.ToString().Substring(0, longitud - 1);
}
else
{
LtlCCPara.Text = "";
}
}
@@ -371,6 +390,8 @@ public partial class OI_TareaDetalle : ClsPaginas
txtFechaF.Text = string.Format("{0:dd/MM/yyyy HH:mm}", drow["FechaFin"]);
DdlTema.SelectedValueExist(drow["CveRevision"].ToString());
DdlEventoEstatus.SelectedValueExist(drow["CveEventoEstatus"].ToString());
lblEstatus.Text = DdlEventoEstatus.SelectedItem.Text;
DDlEstatus.SelectedValueExist(drow["CveEventoEstatus"].ToString());
HypArchivo.Text = string.Format("{0}<br /><i class=\"fa fa-download\"></i>", drow["Archivo"].ToString());
HypArchivo.NavigateUrl = string.Format("~/OI/TareaDetalle.aspx?Archivo={0}&filename={1}", ModExtensiones.Encripta(string.Format("OIFiles\\{0}\\{1}", Folio, drow["Archivo"])), ModExtensiones.Encripta(drow["Archivo"].ToString()));
@@ -383,11 +404,83 @@ public partial class OI_TareaDetalle : ClsPaginas
CveUsuarioPara = drow["CveUsuarioPara"].ToString().ToEntero();
TxtAvance.Text = string.Format("{0:##0}", drow["Avance"]);
TxtUsuarioreg.Text = string.Format("{0}", drow["NombreRegistro"]);
TxtFechaIng.Text = string.Format("{0:dd/MM/yyyy}", drow["FechaIng"]);
TxtFechaIng.Text = string.Format("{0:dd/MM/yyyy HH}:{0:mm}", drow["FechaIng"]);
//OIE.[CveEvento], OIE.[CveTipoEvento], OIE.[Folio], OIE.[Asunto], OIE.[Descripcion], OIE.[Prioridad], OIE.[CveUsuarioDe], OIE.[CveUsuarioPara],
//OIE.[CveEventoEstatus], OIE.[FechaInicio], OIE.[FechaFin], OIE.[FechaRealTermino], OIE.[CveRevision], OIE.[Archivo], OIE.[FechaIng],
//OIE.[CveUsuarioIng], OIE.[CveEmpresa], OIE.[CveUsuarioModifico], OIE.[Avance]
LtlVinculo.Text = "";
LtlVinculoLink.Text = "";
CveEventoPadre = drow["CveEventoPadre"].ToString().ToEntero();
int CveCliente = drow["CveCliente"].ToString().ToEntero();
int CveVenta = drow["CveVenta"].ToString().ToEntero();
int CveProveedor = drow["CveProveedor"].ToString().ToEntero();
int CveCompra = drow["CveCompra"].ToString().ToEntero();
int CvePersonal = drow["CvePersonal"].ToString().ToEntero();
//int = drow[""].ToString().ToEntero();
string titulo = "";
string link = "";
if (CveCliente > 0)
{
titulo = "Cliente: ";
link = string.Format("<a href=\"/Ventas/Clientes.aspx?CveCliente={1}\" class=\"linkCorreo\">{0}</a>", drow["Cliente"], CveCliente);
}
else if (CveVenta > 0)
{
titulo = "Venta: ";
link = string.Format("<a href=\"/Ventas/Ventas.aspx?CveVenta={1}\" class=\"linkCorreo\">{0} </a>", drow["Venta"], CveVenta);
}
else if (CveProveedor > 0)
{
titulo = "proveedor: ";
link = string.Format("<a href=\"/Compras/Proveedores.aspx?CveProveedor={1}\" class=\"linkCorreo\">{0} </a>", drow["Proveedor"], CveProveedor);
}
else if (CveCompra > 0)
{
titulo = "Compra: ";
link = string.Format("<a href=\"/Compras/Proveedores.aspx?CveProveedor={1}\" class=\"linkCorreo\">{0} </a>", drow["Compra"], CveCompra);
}
else if (CvePersonal > 0)
{
titulo = "Personal: ";
link = string.Format("<a href=\"/RH/Personal.aspx?CvePersonal={1}\" class=\"linkCorreo\">{0} </a>", drow["NombreCompleto"], CvePersonal);
}
if(titulo.Length > 0)
{
LtlVinculo.Text= string.Format("<div class=\"panel panel-default\" style=\"margin-bottom: 5px;\"><div class=\"panel-heading\" style=\"display: inline-block; width: 19%; border-bottom-width: 0px; margin: 0px;\"><h3 class=\"panel-title\">{0}</h3></div><div class=\"panel-body\" style=\"display: inline-block; width: 79%;\">{1}</div></div>",
titulo, link);
}
titulo = "";
link = "";//EP.[CveTipoEvento] CveTipoEventoPadre,EP.Asunto AS AsuntoPadre
switch (drow["CveTipoEventoPadre"].ToString().ToEntero())
{
case (int)OITipoEventos.Proyecto:
titulo = "Proyecto: ";
link = string.Format("<a href=\"/OI/Proyecto.aspx?CveEvento={1}\" class=\"linkCorreo\">{0} </a>", drow["AsuntoPadre"], drow["CveEventoPadre"]);
break;
case (int)OITipoEventos.Minuta:
titulo = "Minuta: ";
link = string.Format("<a href=\"/OI/MinutaDetalle.aspx?CveEvento={1}\" class=\"linkCorreo\">{0} </a>", drow["AsuntoPadre"], drow["CveEventoPadre"]);
break;
default:
break;
}
if (titulo.Length > 0)
{
LtlVinculoLink.Text = string.Format("<div class=\"panel panel-default\" style=\"margin-bottom: 5px;\"><div class=\"panel-heading\" style=\"display: inline-block; width: 19%; border-bottom-width: 0px; margin: 0px;\"><h3 class=\"panel-title\">{0}</h3></div><div class=\"panel-body\" style=\"display: inline-block; width: 79%;\">{1}</div></div>",
titulo, link);
}
//,OIE.CveCliente,OIE.CveVenta,OIE.CveProveedor,OIE.CveCompra,OIE.CvePersonal
//,C.Nombre Cliente, CONCAT(V.SerieFolio, '(', CV.Nombre, ')') Venta ,Prov.NombreComercial AS Proveedor,
//CONCAT(Comp.SerieFolio, '(', CompProv.NombreComercial, ')') Compra,RH.NombreCompleto
LtlTitulo.Text = drow["Titulo"].ToString();
if (ObjOI_E.GetEventosUsuario2(RCveEvento, UsuarioActual.CveEmpresa))
{
@@ -402,6 +495,12 @@ public partial class OI_TareaDetalle : ClsPaginas
}
}
}
if (ObjOI_E.GetEventosVinculos(RCveEvento, UsuarioActual.CveEmpresa))
{
GVVinculo.DataSource = ObjOI_E.DtResultados;
GVVinculo.DataBind();
portletvinculos.Visible = (ObjOI_E.DtResultados.Rows.Count > 0);
}
if (ObjOI_E.Getcheklist(RCveEvento))
{
GVcheklist.DataSource = ObjOI_E.DtResultados;
@@ -715,38 +814,45 @@ public partial class OI_TareaDetalle : ClsPaginas
CheckListNew.Columns.Add("FechaIng", typeof(DateTime));
}
TxtActividad.Focus();
RegistraScript("$('#C_portletChekList .expand').removeClass('expand').addClass('collapse');$('#C_portletChekList .portlet-body').show();");
UpChkList.Update();
}
protected void LnkAgregarchklistitem_Click(object sender, EventArgs e)
{
if (RCveEvento > 0)
if (TxtActividad.Text.Trim().Length > 0)
{
using (ClsOIEventos objOI = new ClsOIEventos())
if (RCveEvento > 0)
{
if (objOI.Addcheklist(RCveEvento, TxtActividad.Text, UsuarioActual.CveUsuario))
using (ClsOIEventos objOI = new ClsOIEventos())
{
Alert("Se agregó la actividad", ModExtensiones.TipoMensaje.ToastInformacion);
if (objOI.Getcheklist(RCveEvento))
if (objOI.Addcheklist(RCveEvento, TxtActividad.Text, UsuarioActual.CveUsuario))
{
GVcheklist.DataSource = objOI.DtResultados;
GVcheklist.DataBind();
cargaActividades(objOI);
Alert("Se agregó la actividad", ModExtensiones.TipoMensaje.ToastInformacion);
if (objOI.Getcheklist(RCveEvento))
{
GVcheklist.DataSource = objOI.DtResultados;
GVcheklist.DataBind();
cargaActividades(objOI);
}
}
}
}
}
else
{
System.Data.DataRow drow = CheckListNew.NewRow();
drow["CveEventoCheckList"] = chklistitemindex++;
drow["EventoComentario"] = TxtActividad.Text;
drow["Estatus"] = false;
//CveEventoCheckList,CveEvento,CveTipoEvento,EventoComentario,Estatus,CveUsuario,Usuario,FechaIng
CheckListNew.Rows.Add(drow);
GVcheklist.DataSource = CheckListNew;
GVcheklist.DataBind();
}
}
else
{
System.Data.DataRow drow = CheckListNew.NewRow();
drow["CveEventoCheckList"] = chklistitemindex++;
drow["EventoComentario"] = TxtActividad.Text;
drow["Estatus"] = false;
//CveEventoCheckList,CveEvento,CveTipoEvento,EventoComentario,Estatus,CveUsuario,Usuario,FechaIng
CheckListNew.Rows.Add(drow);
GVcheklist.DataSource = CheckListNew;
GVcheklist.DataBind();
}
TxtActividad.Focus();
TxtActividad.Text = "";
}
protected void LnkSinfuncion_Click(object sender, EventArgs e)
@@ -793,8 +899,9 @@ public partial class OI_TareaDetalle : ClsPaginas
//if (DdlEventoEstatus.SelectedValue.ToEntero == 3 | DdlEventoEstatus.SelectedValue.ToEntero == 1)
// EnviarCorreoCambioEstatus(false);
//CargaDatos();
string mensaje = string.Format("Se cambio el Estatus de \"{0}\" a \"{1}\"", DdlEventoEstatus.SelectedItem.Text, DDlEstatus.SelectedItem.Text);
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();
this.RegistraScript(string.Format("$('#{0}').modal('hide')", iddivCambiarEstatus));
Alert(mensaje, ModExtensiones.TipoMensaje.ToastInformacion);
@@ -1561,4 +1668,9 @@ public partial class OI_TareaDetalle : ClsPaginas
#endregion
protected void DDlEstatus_SelectedIndexChanged(object sender, EventArgs e)
{
pnlTerminarPadre.Visible = (DDlEstatus.SelectedValue.ToEntero() > 3 && CveEventoPadre > 0);
}
}

270
OI/TareaNueva.ascx
View File

@@ -1,270 +0,0 @@
<%@ Control Language="C#" AutoEventWireup="true" CodeFile="TareaNueva.ascx.cs" Inherits="OI_TareaNueva" %>
<style>
.fileTarea .mypaste:before {
content: "Pegar aquí";
font-size: 20px;
margin-left: 10px;
padding-left: 13px;
padding-top: 5px;
}
.fileTarea .addropzone {
margin-bottom: 10px;
min-height: 100px;
}
.fileTarea .addropzone.dz-clickable:before {
position: absolute;
content: "Arrastre el archivo";
color: #808080;
font-size: 20px;
margin-top: 30px;
}
.fileTarea .addropzone .dz-preview, .fileTarea .dropzone-previews .dz-preview {
margin-top: 5px;
margin-bottom: 3px;
}
.fileTarea .btn-sm, .fileTarea .btn-xs {
padding: 4px 10px 5px 10px;
font-size: 10px;
line-height: 1.5;
}
.fileTarea .addropzone .dz-preview .dz-details, .fileTarea .dropzone-previews .dz-preview .dz-details {
height: 60px;
padding: 5px;
margin-bottom: 5px;
}
.fileTarea .addropzone .dz-preview, .fileTarea .dropzone-previews .dz-preview {
font-size: 10px;
}
</style>
<div id='<%= iddivAgregarTarea %>' class="modal ADS fade" role="dialog">
<div class="modal-dialog modal-lg">
<asp:UpdatePanel ID="UpModalProyecto" class="modal-content " tabindex="-1" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<div class="modal-header">
<button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span> </button>
<h4 class="modal-title" style="text-align: left">
<asp:Literal ID="LtlTituloNewProyecto" runat="server">Agregar Tarea</asp:Literal></h4>
</div>
<div class="modal-body">
<asp:Panel runat="server" ID="portletTarea" class="portlet light smmallpadding bordered">
<div class="portlet-title">
<div class="caption font-green">
<i class="icon-pin font-green"></i>
<span class="caption-subject bold uppercase">Nuevo</span>
</div>
<div class="tools">
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
</div>
</div>
<div class="portlet-body rowpadding">
<div class="row">
<div class="col-md-6">
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtAsunto" runat="server" CssClass="form-control" CausesValidation="true"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVAsunto" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtAsunto" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Asunto''</b> es necesario, por favor ingréselo." ValidationGroup="GrpTarea"></asp:RequiredFieldValidator>
<asp:Label runat="server" Text="Asunto:" AssociatedControlID="TxtAsunto"></asp:Label>
</div>
<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtDescripcion" runat="server" CssClass="form-control" CausesValidation="true" TextMode="MultiLine" Rows="4"></asp:TextBox>
<asp:RequiredFieldValidator ID="RfvDescripcion" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtDescripcion" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Descripción''</b> es necesario, por favor ingréselo." ValidationGroup="GrpTarea"></asp:RequiredFieldValidator>
<asp:Label runat="server" Text="Descripción" AssociatedControlID="TxtDescripcion"></asp:Label>
</div>
<div class="form-group form-md-line-input">
<asp:DropDownList ID="DdlPara" runat="server" CssClass="form-control select2me input-sm" DataValueField="CveUsuario" DataTextField="Nombre" Width="100%">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
</asp:DropDownList>
<asp:Label runat="server" AssociatedControlID="DdlPara">Para:</asp:Label>
</div>
<div class="row">
<div class="col-sm-6">
<div class="input-group form-group form-md-line-input date date-picker " data-date-format="dd/mm/yyyy hh:mm" style="display: inline-block;">
<asp:TextBox ID="txtFechaI" runat="server" autocomplete="false" CssClass="form-control ADDateTimePicker" CausesValidation="true" MaxLength="18" Width="132px "></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVtxtFechaI" runat="server" ControlToValidate="txtFechaI" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha Inicio''</b> es necesario, por favor seleccione uno." ValidationGroup="GrpTarea"></asp:RequiredFieldValidator>
<asp:Label AssociatedControlID="txtFechaI" runat="server" Text="Fecha Inicio"></asp:Label>
<%--<ajax:MaskedEditExtender ID="MEEFechaI" runat="server" TargetControlID="txtFechaI" Mask="99/99/9999 99:99" MaskType="DateTime" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>--%>
<ajax:ValidatorCalloutExtender ID="VcoFechaI" runat="server" HighlightCssClass="vco" TargetControlID="RFVtxtFechaI" Width="350px"></ajax:ValidatorCalloutExtender>
</div>
</div>
<div class="col-sm-6">
<div class="input-group form-group form-md-line-input date date-picker " data-date-format="dd/mm/yyyy hh:mm" style="display: inline-block;">
<asp:TextBox ID="txtFechaF" runat="server" autocomplete="false" CssClass="form-control ADDateTimePicker" CausesValidation="true" MaxLength="18" Width="132px " placeholder=""></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVtxtFechaF" runat="server" ControlToValidate="txtFechaF" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha Fin''</b> es necesario, por favor seleccione uno." ValidationGroup="GrpTarea"></asp:RequiredFieldValidator>
<asp:Label AssociatedControlID="txtFechaF" runat="server" Text="Fecha Fin"></asp:Label>
<%--<ajax:MaskedEditExtender ID="MEEFechaI" runat="server" TargetControlID="txtFechaI" Mask="99/99/9999 99:99" MaskType="DateTime" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>--%>
<ajax:ValidatorCalloutExtender ID="VcoFechaF" runat="server" HighlightCssClass="vco" TargetControlID="RFVtxtFechaF" Width="350px"></ajax:ValidatorCalloutExtender>
</div>
</div>
</div>
<div class="row">
<div class="col-sm-6">
<div class="form-group form-md-line-input">
<asp:DropDownList ID="DdlPrioridad" runat="server" CssClass="form-control select2me input-sm" Width="100%">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
<asp:ListItem Text="Baja" Value="1" class="itembaja"></asp:ListItem>
<asp:ListItem Text="Media" Value="2" class="itemmedia"></asp:ListItem>
<asp:ListItem Text="Alta" Value="3" class="itemalta"></asp:ListItem>
</asp:DropDownList>
<asp:RequiredFieldValidator ID="RFVPrioridad" runat="server" ControlToValidate="DdlPrioridad" Display="None" ErrorMessage="El campo <b>''Prioridad''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpTarea"></asp:RequiredFieldValidator>
<asp:Label runat="server" AssociatedControlID="DdlPrioridad">Prioridad:</asp:Label>
<ajax:ValidatorCalloutExtender ID="VCOPrioridad" runat="server" TargetControlID="RFVPrioridad" HighlightCssClass="vco" Width="300px"></ajax:ValidatorCalloutExtender>
</div>
</div>
<div class="col-sm-6">
<div class="form-group form-md-line-input">
<asp:DropDownList ID="DdlTema" runat="server" CssClass="form-control select2me input-sm" DataValueField="CveRevision" DataTextField="Revision" Width="100%">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
</asp:DropDownList>
<asp:Label runat="server" AssociatedControlID="DdlTema">Tema:</asp:Label>
</div>
</div>
</div>
</div>
<div class="col-md-6">
<div class="fileTarea">
<asp:TextBox ID="TxtArchivo" CssClass="ADSdropzone hidden" runat="server"></asp:TextBox>
</div>
<div class="text-right" style="">
<asp:TextBox ID="TxtUsuarioB" runat="server" CssClass="form-control input-sm TxtUsuarioB" Style="display: inline-block; margin-right: -20px; width: 150px;" CausesValidation="true"></asp:TextBox>
<a href="javascript:;" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</div>
<asp:GridView ID="GVUsuarios_TareaNueva" runat="server" AutoGenerateColumns="false" DataKeyNames="CveUsuario,Nombre,Correo,Empresa,CveRol,CveSubProyecto"
CssClass="table table-striped table-advance table-hover Widthall ScrollAD GVUsuarios_TareaNueva" GridLines="None" data-height="200"
OnRowDataBound="GVUsuarios_TareaNueva_RowDataBound">
<Columns>
<asp:TemplateField>
<ItemStyle HorizontalAlign="Center" Width="50px" />
<HeaderTemplate>
CCP
<%--<br />
<a id="chkAll" onclick="chkAllB_OncLick(1);" class="linkCorreo" data-toggle="tooltip" title="Seleccionar todos(Visibles)"><i class="fa fa fa-check-square-o"></i></a>
<a id="UnchkAll" onclick="chkAllB_OncLick(0);" class="linkCorreo" data-toggle="tooltip" title="Quitar seleccion todos(Visibles)"><i class="fa fa-square-o"></i></a>--%>
</HeaderTemplate>
<ItemTemplate>
<asp:CheckBox ID="ChkOk" CssClass="ChkOk" Checked="false" runat="server" />
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Usuario</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlNombre" runat="server" Text='<%# Eval("Nombre") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Rol</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlRol" runat="server" Text='<%# Eval("Rol") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
</div>
</div>
</div>
</asp:Panel>
<asp:TextBox ID="TxtCveTipoEvento" CssClass="hidden TxtCveTipoEvento" runat="server"></asp:TextBox>
<asp:TextBox ID="txtCveEventoPadre" CssClass="hidden txtCveEventoPadre" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtCveActivoFijo" CssClass="hidden TxtTareaNuevaCveActivoFijo" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtCveIE" CssClass="hidden TxtTareaNuevaCveIE" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtCveProspecto" CssClass="hidden TxtTareaNuevaCveProspecto" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtCveCliente" CssClass="hidden TxtTareaNuevaCveCliente" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtCveOS" CssClass="hidden TxtTareaNuevaCveOS" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtCveOC" CssClass="hidden TxtTareaNuevaCveOC" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtCvePersonal" CssClass="hidden TxtTareaNuevaCvePersonal" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtCveProveedor" CssClass="hidden TxtTareaNuevaCveProveedor" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtCveCompra" CssClass="hidden TxtTareaNuevaCveCompra" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtCveVenta" CssClass="hidden TxtTareaNuevaCveVenta" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtCveContrato" CssClass="hidden TxtTareaNuevaCveContrato" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtCveSubProyecto" CssClass="hidden TxtTareaNuevaCveSubProyecto" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtCveMovimientoAlmacen" CssClass="hidden TxtTareaNuevaCveMovimientoAlmacen" runat="server"></asp:TextBox>
<asp:Button ID="BtnopenmodalConPadre" OnClick="BtnopenmodalConPadre_Click" CssClass="hidden BtnopenmodalConPadre" UseSubmitBehavior="false" runat="server" Text="Button" />
</div>
<div class="modal-footer">
<asp:LinkButton ID="BtnGuardarTarea" OnClick="BtnGuardarTarea_Click" CssClass="btn btn-primary" runat="server">Guardar</asp:LinkButton>
<button data-dismiss="modal" class="btn btn-danger">Cancelar</button>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>
<script>
function OpenModalNewTareaUserControl(CveTipoEvento, CveEventoPadre,obji/*, CveActivoFijo, CveIE, CveProspecto, CveCliente, CveOS,
CveOC, CvePersonal, CveProveedor, CveCompra, CveVenta, CveContrato, CveSubProyecto, CveMovimientoAlmacen*/) {
$('.TxtCveTipoEvento').val(CveTipoEvento);
$('.txtCveEventoPadre').val(CveEventoPadre);
$('.TxtTareaNuevaCveActivoFijo').val(obji.CveActivoFijo);
$('.TxtTareaNuevaCveIE').val(obji.CveIE);
$('.TxtTareaNuevaCveProspecto').val(obji.CveProspecto);
$('.TxtTareaNuevaCveCliente').val(obji.CveCliente);
$('.TxtTareaNuevaCveOS').val(obji.CveOS);
$('.TxtTareaNuevaCveOC').val(obji.CveOC);
$('.TxtTareaNuevaCvePersonal').val(obji.CvePersonal);
$('.TxtTareaNuevaCveProveedor').val(obji.CveProveedor);
$('.TxtTareaNuevaCveCompra').val(obji.CveCompra);
$('.TxtTareaNuevaCveVenta').val(obji.CveVenta);
$('.TxtTareaNuevaCveContrato').val(obji.CveContrato);
$('.TxtTareaNuevaCveSubProyecto').val(obji.CveSubProyecto);
$('.TxtTareaNuevaCveMovimientoAlmacen').val(obji.CveMovimientoAlmacen);
//alert(obji.CveCliente);
//$('#iddivAgregarTarea').modal();
$('.BtnopenmodalConPadre').click();
}
function CargaPickerstareanueva() {
$.datetimepicker.setLocale('es');
$('input.ADDateTimePicker').each(function () {
var TThis = $(this);
TThis.datetimepicker({
dayOfWeekStart: 1,
lang: 'es',
format: 'd/m/Y H:i',
formatDate: 'd/m/Y H:i',
step: 30
});
var Div = TThis.parent()
var boton = document.createElement('span');
boton.className = "input-group-btn"
var subboton = document.createElement('a')
subboton.className = "btn default btnCalendar"
subboton.innerHTML = "<i class='fa fa-calendar'></i>"
subboton.addEventListener('click', function () {
TThis.datetimepicker('show')
});
boton.appendChild(subboton)
var agregar = true;
for (var i = 0; i < Div[0].children.length; i++) {
if (Div[0].children[i].isEqualNode(boton)) {
agregar = false;
}
}
if (agregar) {
Div[0].appendChild(boton);
}
//Div[0].appendChild(boton)
});
}
Sys.Application.add_load(function (s, e) {
CargaPickerstareanueva();
});
$(document).ready(function () {
CargaPickerstareanueva();
});
</script>

4
RH/Personal.aspx
View File

@@ -3574,7 +3574,9 @@
<span class="caption-subject bold">Agregar</span>
</div>--%>
<asp:HyperLink ID="ImgAddObs" CssClass="caption-subject bold" data-toggle="modal" data-target="#ModalBitacora" runat="server" Text=" <i class='fa fa-commenting font-green' style='font-weight: 700 !important;' ><span class='caption-subject bold'>Agregar</span></i>" Style="cursor: pointer;" ToolTip="Observaciones"></asp:HyperLink><br />
<asp:HyperLink ID="HlEvento" CssClass="thickbox caption-subject bold" runat="server" Text=" <i class='fa fa-calendar-plus-o font-green' style='font-weight: 700 !important;' >Agendar</i>" Visible="false" Style="cursor: pointer;" ToolTip="Agendar"></asp:HyperLink>
<asp:HyperLink ID="HlEvento" CssClass="thickbox caption-subject bold" runat="server" Text=" <i class='fa fa-calendar-plus-o font-green' style='font-weight: 700 !important;' >Agendar</i>" Visible="false" Style="cursor: pointer;" ToolTip="Agendar"></asp:HyperLink><br />
<asp:Literal ID="LtlTareaNueva" runat="server"></asp:Literal>
<UserControl:TareaNueva runat="server" id="TareaNueva" />
</div>
</div>
</div>

2
RH/Personal.aspx.vb
View File

@@ -754,6 +754,8 @@ Partial Class RH_Personal
End If
End If
CargaLicencias()
LtlTareaNueva.Text = String.Format("<a class=""caption-subject bold font-green"" onclick=""OpenModalNewTareaUserControl(1,-1,{{CvePersonal:{0}}});""> <i class=""fa fa-plus""'></i> Tarea</a>", CvePersonal)
End If
AgregarEventosAsincronosGvVacaciones()
End Sub

322
UserControl/TareaNueva.ascx Normal file
View File

@@ -0,0 +1,322 @@
<%@ Control Language="C#" AutoEventWireup="true" CodeFile="TareaNueva.ascx.cs" Inherits="UserControl_TareaNueva" %>
<style>
.fileTarea .mypaste:before {
content: "Pegar aquí";
font-size: 20px;
margin-left: 10px;
padding-left: 13px;
padding-top: 5px;
}
.fileTarea .addropzone {
margin-bottom: 10px;
min-height: 100px;
}
.fileTarea .addropzone.dz-clickable:before {
position: absolute;
content: "Arrastre el archivo";
color: #808080;
font-size: 20px;
margin-top: 30px;
}
.fileTarea .addropzone .dz-preview, .fileTarea .dropzone-previews .dz-preview {
margin-top: 5px;
margin-bottom: 3px;
}
.fileTarea .btn-sm, .fileTarea .btn-xs {
padding: 4px 10px 5px 10px;
font-size: 10px;
line-height: 1.5;
}
.fileTarea .addropzone .dz-preview .dz-details, .fileTarea .dropzone-previews .dz-preview .dz-details {
height: 60px;
padding: 5px;
margin-bottom: 5px;
}
.fileTarea .addropzone .dz-preview, .fileTarea .dropzone-previews .dz-preview {
font-size: 10px;
}
</style>
<asp:UpdatePanel ID="UpModalTareaNueva" class=" " tabindex="-1" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:Panel runat="server" ID="iddivAgregarTarea" CssClass="modal ADS fade" role="dialog">
<asp:Panel ID="iddivAgregarTareamodaldialog" runat="server" CssClass="modal-dialog modal-lg">
<asp:Panel runat="server" ID="iddivAgregarTareamodalcontent" CssClass="modal-content">
<asp:Panel runat="server" ID="iddivAgregarTareamodalheader" CssClass="modal-header">
<button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span> </button>
<h4 class="modal-title" style="text-align: left">
<asp:Literal ID="LtlTituloNewProyecto" runat="server">Agregar Tarea</asp:Literal></h4>
</asp:Panel>
<asp:Panel runat="server" ID="iddivAgregarTareamodalbody" CssClass="modal-body">
<asp:Panel runat="server" ID="portletTarea" class="portlet light smmallpadding bordered">
<div class="portlet-title">
<div class="caption font-green">
<i class="icon-pin font-green"></i>
<span class="caption-subject bold uppercase">Tarea Nueva</span>
</div>
<div class="tools">
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
</div>
<asp:Panel runat="server" CssClass="actions">
<div class="btn-group">
<asp:LinkButton ID="LnkAgregarTarea" OnClick="BtnGuardarTarea_Click" CssClass="btn btn-default" runat="server">Agregar</asp:LinkButton>
</div>
</asp:Panel>
</div>
<div class="portlet-body rowpadding">
<div class="row">
<div class="col-md-6">
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtAsunto" runat="server" CssClass="form-control TxtTareaAsunto" CausesValidation="true"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVAsunto" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtAsunto" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Asunto''</b> es necesario, por favor ingréselo." ValidationGroup="GrpTarea"></asp:RequiredFieldValidator>
<asp:Label runat="server" Text="Asunto:" AssociatedControlID="TxtAsunto"></asp:Label>
</div>
<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtDescripcion" runat="server" CssClass="form-control TxtTareaDescripcion" CausesValidation="true" TextMode="MultiLine" Rows="4"></asp:TextBox>
<asp:RequiredFieldValidator ID="RfvDescripcion" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtDescripcion" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Descripción''</b> es necesario, por favor ingréselo." ValidationGroup="GrpTarea"></asp:RequiredFieldValidator>
<asp:Label runat="server" Text="Descripción" AssociatedControlID="TxtDescripcion"></asp:Label>
</div>
<div class="form-group form-md-line-input">
<asp:DropDownList ID="DdlPara" runat="server" CssClass="form-control select2me input-sm" DataValueField="CveUsuario" DataTextField="Nombre" Width="100%">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
</asp:DropDownList>
<asp:Label runat="server" AssociatedControlID="DdlPara">Para:</asp:Label>
</div>
<div class="row">
<div class="col-sm-6">
<div class="input-group form-group form-md-line-input date date-picker " data-date-format="dd/mm/yyyy hh:mm" style="display: inline-block;">
<asp:TextBox ID="txtFechaI" runat="server" autocomplete="false" CssClass="form-control ADDateTimePickerUC" CausesValidation="true" MaxLength="18" Width="132px "></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVtxtFechaI" runat="server" ControlToValidate="txtFechaI" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha Inicio''</b> es necesario, por favor seleccione uno." ValidationGroup="GrpTarea"></asp:RequiredFieldValidator>
<asp:Label AssociatedControlID="txtFechaI" runat="server" Text="Fecha Inicio"></asp:Label>
<%--<ajax:MaskedEditExtender ID="MEEFechaI" runat="server" TargetControlID="txtFechaI" Mask="99/99/9999 99:99" MaskType="DateTime" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>--%>
<ajax:ValidatorCalloutExtender ID="VcoFechaI" runat="server" HighlightCssClass="vco" TargetControlID="RFVtxtFechaI" Width="350px"></ajax:ValidatorCalloutExtender>
</div>
</div>
<div class="col-sm-6">
<div class="input-group form-group form-md-line-input date date-picker " data-date-format="dd/mm/yyyy hh:mm" style="display: inline-block;">
<asp:TextBox ID="txtFechaF" runat="server" autocomplete="false" CssClass="form-control ADDateTimePickerUC" CausesValidation="true" MaxLength="18" Width="132px " placeholder=""></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVtxtFechaF" runat="server" ControlToValidate="txtFechaF" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha Fin''</b> es necesario, por favor seleccione uno." ValidationGroup="GrpTarea"></asp:RequiredFieldValidator>
<asp:Label AssociatedControlID="txtFechaF" runat="server" Text="Fecha Fin"></asp:Label>
<%--<ajax:MaskedEditExtender ID="MEEFechaI" runat="server" TargetControlID="txtFechaI" Mask="99/99/9999 99:99" MaskType="DateTime" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>--%>
<ajax:ValidatorCalloutExtender ID="VcoFechaF" runat="server" HighlightCssClass="vco" TargetControlID="RFVtxtFechaF" Width="350px"></ajax:ValidatorCalloutExtender>
</div>
</div>
</div>
<div class="row">
<div class="col-sm-6">
<div class="form-group form-md-line-input">
<asp:DropDownList ID="DdlPrioridad" runat="server" CssClass="form-control select2me input-sm" Width="100%">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
<asp:ListItem Text="Baja" Value="1" class="itembaja"></asp:ListItem>
<asp:ListItem Text="Media" Value="2" class="itemmedia"></asp:ListItem>
<asp:ListItem Text="Alta" Value="3" class="itemalta"></asp:ListItem>
</asp:DropDownList>
<asp:RequiredFieldValidator ID="RFVPrioridad" runat="server" ControlToValidate="DdlPrioridad" Display="None" ErrorMessage="El campo <b>''Prioridad''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpTarea"></asp:RequiredFieldValidator>
<asp:Label runat="server" AssociatedControlID="DdlPrioridad">Prioridad:</asp:Label>
<ajax:ValidatorCalloutExtender ID="VCOPrioridad" runat="server" TargetControlID="RFVPrioridad" HighlightCssClass="vco" Width="300px"></ajax:ValidatorCalloutExtender>
</div>
</div>
<div class="col-sm-5">
<div class="form-group form-md-line-input">
<asp:DropDownList ID="DdlTema" runat="server" CssClass="form-control select2me input-sm" DataValueField="CveRevision" DataTextField="Revision" Width="100%">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
</asp:DropDownList>
<asp:Label runat="server" AssociatedControlID="DdlTema">Tema:</asp:Label>
</div>
</div>
<div class="col-sm-1">
<asp:LinkButton ID="LnkAddTtemaB" OnClick="LnkAddTtemaB_Click" runat="server" CssClass="btn btn-default" Style="margin-top: 15px;"><i class="fa fa-plus"></i></asp:LinkButton>
</div>
</div>
</div>
<div class="col-md-6">
<div class="fileTarea">
<asp:TextBox ID="TxtArchivo" CssClass="ADSdropzone hidden" runat="server"></asp:TextBox>
</div>
<div class="text-right" style="">
<asp:TextBox ID="TxtUsuarioB" runat="server" CssClass="form-control input-sm TxtUsuarioB" Style="display: inline-block; margin-right: -20px; width: 150px;" CausesValidation="true"></asp:TextBox>
<a href="javascript:;" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</div>
<asp:GridView ID="GVUsuarios_TareaNueva" runat="server" AutoGenerateColumns="false" DataKeyNames="CveUsuario,Nombre,Correo,Empresa,CveRol,CveSubProyecto"
CssClass="table table-striped table-advance table-hover Widthall ScrollAD GVUsuarios_TareaNueva" GridLines="None" data-height="200"
OnRowDataBound="GVUsuarios_TareaNueva_RowDataBound">
<Columns>
<asp:TemplateField>
<ItemStyle HorizontalAlign="Center" Width="50px" />
<HeaderTemplate>
CCP
<%--<br />
<a id="chkAll" onclick="chkAllB_OncLick(1);" class="linkCorreo" data-toggle="tooltip" title="Seleccionar todos(Visibles)"><i class="fa fa fa-check-square-o"></i></a>
<a id="UnchkAll" onclick="chkAllB_OncLick(0);" class="linkCorreo" data-toggle="tooltip" title="Quitar seleccion todos(Visibles)"><i class="fa fa-square-o"></i></a>--%>
</HeaderTemplate>
<ItemTemplate>
<asp:CheckBox ID="ChkOk" CssClass="ChkOk" Checked="false" runat="server" />
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Usuario</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlNombre" runat="server" Text='<%# Eval("Nombre") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Rol</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlRol" runat="server" Text='<%# Eval("Rol") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
</div>
</div>
</div>
</asp:Panel>
<asp:TextBox ID="TxtCveTipoEvento" CssClass="hidden TxtCveTipoEvento" runat="server"></asp:TextBox>
<asp:TextBox ID="txtCveEventoPadre" CssClass="hidden txtCveEventoPadre" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtCveActivoFijo" CssClass="hidden TxtTareaNuevaCveActivoFijo" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtCveIE" CssClass="hidden TxtTareaNuevaCveIE" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtCveProspecto" CssClass="hidden TxtTareaNuevaCveProspecto" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtCveCliente" CssClass="hidden TxtTareaNuevaCveCliente" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtCveOS" CssClass="hidden TxtTareaNuevaCveOS" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtCveOC" CssClass="hidden TxtTareaNuevaCveOC" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtCvePersonal" CssClass="hidden TxtTareaNuevaCvePersonal" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtCveProveedor" CssClass="hidden TxtTareaNuevaCveProveedor" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtCveCompra" CssClass="hidden TxtTareaNuevaCveCompra" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtCveVenta" CssClass="hidden TxtTareaNuevaCveVenta" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtCveContrato" CssClass="hidden TxtTareaNuevaCveContrato" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtCveSubProyecto" CssClass="hidden TxtTareaNuevaCveSubProyecto" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtCveMovimientoAlmacen" CssClass="hidden TxtTareaNuevaCveMovimientoAlmacen" runat="server"></asp:TextBox>
<asp:Button ID="BtnopenmodalConPadre" OnClick="BtnopenmodalConPadre_Click" CssClass="hidden BtnopenmodalConPadre" UseSubmitBehavior="false" runat="server" Text="Button" />
</asp:Panel>
<asp:Panel runat="server" ID="iddivAgregarTareamodalfooter" CssClass="modal-footer">
<asp:LinkButton ID="BtnGuardarTarea" OnClick="BtnGuardarTarea_Click" CssClass="btn btn-primary" runat="server">Guardar</asp:LinkButton>
<button data-dismiss="modal" class="btn btn-danger">Cancelar</button>
</asp:Panel>
</asp:Panel>
</asp:Panel>
</asp:Panel>
<div id='<%= iddivAgregarTema %>' class="modal ADS fade" role="dialog">
<div class="modal-dialog">
<asp:UpdatePanel ID="UpdatePanel1" class="modal-content " tabindex="-1" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<div class="modal-header">
<button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span> </button>
<h4 class="modal-title" style="text-align: left">
<asp:Literal ID="Literal2" runat="server">Agregar Actividad</asp:Literal></h4>
</div>
<div class="modal-body">
<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtTema" runat="server" CssClass="form-control" CausesValidation="true" TextMode="MultiLine" Rows="1"></asp:TextBox>
<asp:Label runat="server" Text="Tema" AssociatedControlID="TxtTema"></asp:Label>
</div>
</div>
<div class="modal-footer">
<asp:LinkButton ID="BtnAgregarTema" OnClick="BtnAgregarTema_Click" CssClass="btn btn-primary" runat="server">Agregar</asp:LinkButton>
<button data-dismiss="modal" class="btn btn-danger">Cancelar</button>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
<script>
function OpenModalNewTareaUserControl(CveTipoEvento, CveEventoPadre, obji/*, CveActivoFijo, CveIE, CveProspecto, CveCliente, CveOS,
CveOC, CvePersonal, CveProveedor, CveCompra, CveVenta, CveContrato, CveSubProyecto, CveMovimientoAlmacen*/) {
$('.TxtCveTipoEvento').val(CveTipoEvento);
$('.txtCveEventoPadre').val(CveEventoPadre);
$('.TxtTareaNuevaCveActivoFijo').val(obji.CveActivoFijo);
$('.TxtTareaNuevaCveIE').val(obji.CveIE);
$('.TxtTareaNuevaCveProspecto').val(obji.CveProspecto);
$('.TxtTareaNuevaCveCliente').val(obji.CveCliente);
$('.TxtTareaNuevaCveOS').val(obji.CveOS);
$('.TxtTareaNuevaCveOC').val(obji.CveOC);
$('.TxtTareaNuevaCvePersonal').val(obji.CvePersonal);
$('.TxtTareaNuevaCveProveedor').val(obji.CveProveedor);
$('.TxtTareaNuevaCveCompra').val(obji.CveCompra);
$('.TxtTareaNuevaCveVenta').val(obji.CveVenta);
$('.TxtTareaNuevaCveContrato').val(obji.CveContrato);
$('.TxtTareaNuevaCveSubProyecto').val(obji.CveSubProyecto);
$('.TxtTareaNuevaCveMovimientoAlmacen').val(obji.CveMovimientoAlmacen);
//alert(obji.CveCliente);
//$('#iddivAgregarTarea').modal();
$('.BtnopenmodalConPadre').click();
}
function loadTxtAsunto() {
let input = $('input.TxtTareaAsunto:not(.CEvent)')
let TxtAsunto_Onchange = function () { input.parent().parent().find('.TxtTareaDescripcion').val(input.val()) }
input.bind({
copy: TxtAsunto_Onchange
, paste: TxtAsunto_Onchange
, cut: TxtAsunto_Onchange
, keydown: function (event) { if (event.which == 13) { event.preventDefault(); } TxtAsunto_Onchange(); }
, keyup: function (event) { if (event.which == 13) { event.preventDefault(); } TxtAsunto_Onchange(); }
});
input.addClass('CEvent');
}
function CargaPickerstareanueva() {
$.datetimepicker.setLocale('es');
$('input.ADDateTimePickerUC').each(function () {
var TThis = $(this);
TThis.datetimepicker({
dayOfWeekStart: 1,
lang: 'es',
format: 'd/m/Y H:i',
formatDate: 'd/m/Y H:i',
step: 30
});
var Div = TThis.parent()
var boton = document.createElement('span');
boton.className = "input-group-btn"
var subboton = document.createElement('a')
subboton.className = "btn default btnCalendar"
subboton.innerHTML = "<i class='fa fa-calendar'></i>"
subboton.addEventListener('click', function () {
TThis.datetimepicker('show')
});
boton.appendChild(subboton)
var agregar = true;
for (var i = 0; i < Div[0].children.length; i++) {
if (Div[0].children[i].isEqualNode(boton)) {
agregar = false;
}
}
if (agregar) {
Div[0].appendChild(boton);
}
//Div[0].appendChild(boton)
});
}
Sys.Application.add_load(function (s, e) {
CargaPickerstareanueva();
loadTxtAsunto();
});
$(document).ready(function () {
CargaPickerstareanueva();
loadTxtAsunto();
});
</script>

83
OI/TareaNueva.ascx.cs → UserControl/TareaNueva.ascx.cs
View File

@@ -6,11 +6,17 @@ using System.Web.UI;
using System.Web.UI.WebControls;
using Extensiones;
public partial class OI_TareaNueva : System.Web.UI.UserControl
public partial class UserControl_TareaNueva : System.Web.UI.UserControl
{
public const string iddivAgregarTarea = "iddivAgregarTarea";
//public const string iddivAgregarTarea = "iddivAgregarTarea";
public Usuario UsuarioActual { get { if (Context.Session["UsuarioSIG"] == null) { return null; } else { return (Usuario)Context.Session["UsuarioSIG"]; } } }
public int CveEventoPadre { get { return ViewState["CveEventoPadre"] != null ? ViewState["CveEventoPadre"].ToString().ToEntero() : 0; } set { ViewState["CveEventoPadre"] = value; } }
public OITipoEventos cveTipoEvento { get { return ViewState["cveTipoEvento"] != null ? (OITipoEventos)ViewState["cveTipoEvento"] : OITipoEventos.Tarea; } set { ViewState["cveTipoEvento"] = value; } }
//OITipoEventos cveTipoEvento = OITipoEventos.Tarea;
public bool Ismodal { get { return ViewState["Ismodal"] != null ? (bool)ViewState["Ismodal"] : true; } set { ViewState["Ismodal"] = value; } }
public string OnAddedTareaNueva { get { return ViewState["OnAddedTareaNueva"] != null ? ViewState["OnAddedTareaNueva"].ToString() : "OnAddedTareaNueva"; } set { ViewState["OnAddedTareaNueva"] = value; } }
public const string iddivAgregarTema = "divModalAgregartema";
protected System.Data.DataTable get_GlobalDTUsuarios(int CveUsuario = -1, int CveEmpresa = -1)
{
@@ -50,9 +56,24 @@ public partial class OI_TareaNueva : System.Web.UI.UserControl
{
if (!IsPostBack)
{
CveEventoPadre = -1;
txtCveEventoPadre.Text = "-1";
if (!Ismodal)
{
iddivAgregarTarea.CssClass = "";
iddivAgregarTareamodaldialog.CssClass = "";
iddivAgregarTareamodalbody.CssClass = "";
iddivAgregarTareamodalcontent.CssClass = "";
iddivAgregarTareamodalheader.Visible = false;
iddivAgregarTareamodalfooter.Visible = false;
}
if (CveEventoPadre > 0)
{
txtCveEventoPadre.Text = CveEventoPadre.ToString();
}
else
{
CveEventoPadre = -1;
txtCveEventoPadre.Text = "-1";
}
GVUsuarios_TareaNueva.DataSource = get_GlobalDTUsuarios(CveEmpresa: UsuarioActual.CveEmpresa).FiltraParametros("Estatus =1 ", "Rol ASC");
DdlPara.DataSource = GVUsuarios_TareaNueva.DataSource;
@@ -68,7 +89,11 @@ public partial class OI_TareaNueva : System.Web.UI.UserControl
protected void BtnopenmodalConPadre_Click(object sender, EventArgs e)
{
CveEventoPadre = txtCveEventoPadre.Text.ToEntero();
this.RegistraScript(string.Format("$('#{0}').modal()", iddivAgregarTarea));
if (Ismodal)
{
this.RegistraScript(string.Format("$('#{0}').modal()", iddivAgregarTarea.ClientID));
}
}
protected void BtnGuardarTarea_Click(object sender, EventArgs e)
@@ -105,7 +130,7 @@ public partial class OI_TareaNueva : System.Web.UI.UserControl
}
}
}
OITipoEventos cveTipoEvento = OITipoEventos.Proyecto;
//OITipoEventos cveTipoEvento = OITipoEventos.Tarea;
string asunto = TxtAsunto.Text;
string descripcion = TxtDescripcion.Text;
int prioridad = DdlPrioridad.SelectedValue.ToEntero();
@@ -229,7 +254,11 @@ public partial class OI_TareaNueva : System.Web.UI.UserControl
TxtDescripcion.Text = "";
txtFechaF.Text = "";
txtFechaI.Text = "";
this.RegistraScript("if(OnAddedTareaNueva){OnAddedTareaNueva();}");
if (Ismodal)
{
this.RegistraScript(string.Format("$('#{0}').modal('hide')", iddivAgregarTarea.ClientID));
}
this.RegistraScript(string.Format("if({0}){0}();", OnAddedTareaNueva));
}
}
else
@@ -256,4 +285,42 @@ public partial class OI_TareaNueva : System.Web.UI.UserControl
e.Row.Attributes.Add("data-sucursal", CveRol);
}
}
protected void LnkAddTtemaB_Click(object sender, EventArgs e)
{
this.RegistraScript(string.Format("$('#{0}').modal()", iddivAgregarTema));
}
private void CargaTemas()
{
DdlTema.DataSource = get_GlobalDTOIRevision(UsuarioActual.CveEmpresa).FiltraParametros(string.Format("CveUsuario = {0}", UsuarioActual.CveUsuario));
DdlTema.DataBind();
DdlTema.Items.Insert(0, new ListItem("Seleccione", "-1"));
}
protected void BtnAgregarTema_Click(object sender, EventArgs e)
{
using (ClsOIEventos objoi = new ClsOIEventos())
{
if (objoi.AddRevisionesEventos(TxtTema.Text.Trim(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa))
{
this.Alert("Tema agregada con éxito.", ModExtensiones.TipoMensaje.MsgInformacion);
this.RegistraScript(string.Format("$('#{0}').modal('hide')", iddivAgregarTema));
if (Ismodal)
{
this.RegistraScript(string.Format("$('#{0}').modal()", iddivAgregarTarea.ClientID));
}
TxtTema.Text = "";
//set_GlobalDTOIRevision(-1, objoi.DtResultados);
Application["GlobalDTOIRevision"] = objoi.DtResultados;
CargaTemas();
UpModalTareaNueva.Update();
}
else { this.Alert("Ocurrió un error al agregar la revisión. Por favor vuelva a intentar.", ModExtensiones.TipoMensaje.MsgError); }
}
}
}

3
Ventas/Clientes.aspx
View File

@@ -2,7 +2,6 @@
<%@ Register Assembly="TimePicker" Namespace="MKB.TimePicker" TagPrefix="cc1" %>
<%@ Register Assembly="eWorld.UI" Namespace="eWorld.UI" TagPrefix="ew" %>
<%@ Register Src="~/OI/TareaNueva.ascx" TagPrefix="uc1" TagName="TareaNueva" %>
<asp:Content ID="Content4" ContentPlaceHolderID="Css" runat="Server">
@@ -4441,7 +4440,7 @@
<asp:HyperLink ID="ImgAddObs" CssClass="caption-subject bold" data-toggle="modal" data-target="#ModalBitacora" runat="server" Text=" <i class='fa fa-commenting font-green' style='font-weight: 700 !important;' ><span class='caption-subject bold'>Agregar</span></i>" Style="cursor: pointer;" ToolTip="Observaciones"></asp:HyperLink><br />
<asp:HyperLink ID="HlEvento" CssClass="thickbox caption-subject bold" runat="server" Text=" <i class='fa fa-calendar-plus-o font-green' style='font-weight: 700 !important;' >Agendar</i>" Visible="false" Style="cursor: pointer;" ToolTip="Agendar"></asp:HyperLink><br />
<asp:Literal ID="LtlTareaNueva" runat="server"></asp:Literal>
<uc1:TareaNueva runat="server" id="TareaNueva" />
<UserControl:TareaNueva runat="server" id="TareaNueva" />
</div>
</div>
</div>

202
Ventas/PV.aspx.vb
View File

@@ -1276,6 +1276,7 @@ Partial Class PV
TmpDT.Columns.Add("EntregaDirecta", GetType(Integer))
TmpDT.Columns.Add("CveMovimientoDetallePedido", GetType(Integer))
TmpDT.Columns.Add("ConsecPSPadre", GetType(Integer))
GvPS.DataSource = TmpDT
GvPS.DataBind()
@@ -1656,8 +1657,8 @@ Partial Class PV
'SI EL DETALLE NO TIENE MOVIMIENTOS DE INVENTARIO ES VISIBLE
Dim CantidadFacturadaRemision = 0.0
For Each Gvr As GridViewRow In GvPS.Rows
Gvr.FCLinkButton("imgE").Visible = Not Gvr.DataKey("CantidadFacturadaRem").ToString.ToDouble > 0 AndAlso Gvr.DataKey("EsCargo") = "True"
Gvr.FCLinkButton("imgD").Visible = Not Gvr.DataKey("CantidadInventario").ToString.ToDouble > 0 AndAlso Gvr.DataKey("EsCargo") = "True"
Gvr.FCLinkButton("imgE").Visible = Not Gvr.DataKey("CantidadFacturadaRem").ToString.ToDouble > 0 AndAlso Gvr.DataKey("EsCargo") = "False"
Gvr.FCLinkButton("imgD").Visible = Not Gvr.DataKey("CantidadInventario").ToString.ToDouble > 0 AndAlso Gvr.DataKey("EsCargo") = "False"
CantidadFacturadaRemision += Gvr.DataKey("CantidadFacturadaRem").ToString.ToDouble
Next
@@ -1694,6 +1695,8 @@ Partial Class PV
Dim ObjConta As New ClsContabilidad(ObjVentas.IniciaTransacSQL())
Dim ObjBancos As New ClsBancos(ObjVentas.IniciaTransacSQL())
Dim ObjCGame As New ClsCGame(ObjVentas.IniciaTransacSQL())
Dim ObjAcum As New ClsAcumuladores(ObjVentas.IniciaTransacSQL())
Dim ObjAC As ClsContPAQi = Nothing
Dim Moneda As Integer = DdlMoneda.SelectedValue.ToEntero
@@ -1701,8 +1704,8 @@ Partial Class PV
Try
'CONVERTIR REMISION - TIPO MONEDA -DOLARES A PESOS
If DdlMoneda.SelectedValue.ToEntero <> 2 AndAlso ChkConvertirDolares.Checked Then
For Each Row As DataRow In TmpDT.Rows
Dim TmpDTTotales As DataTable = TmpDT.FiltraParametros("EliminarDB = False")
For Each Row As DataRow In TmpDTTotales.Rows
Row("PU") = Math.Round(Row("PU").ToString.ToDecimal / TxtTipoCambioDlls.Text.Trim.ToDecimal, 6)
Row("Total") = Math.Round(Row("Cantidad").ToString.ToDecimal * Row("PU").ToString.ToDecimal, NumeroDecimales)
Row("TotalImporte") = Math.Round(Row("Cantidad").ToString.ToDecimal * Row("PU").ToString.ToDecimal, NumeroDecimales)
@@ -1721,13 +1724,13 @@ Partial Class PV
End If
Next
TxtSubTotal.Text = TmpDT.SUM("Total").ToDecimal.FormatoNumero
LblDescuentos.Text = TmpDT.SUM("Descuento").ToDecimal.FormatoNumero
TxtSubTotal.Text = TmpDTTotales.SUM("Total").ToDecimal.FormatoNumero
LblDescuentos.Text = TmpDTTotales.SUM("Descuento").ToDecimal.FormatoNumero
LblAmortizacion.Text = Math.Round(LblAmortizacion.Text.Trim.ToDecimal / TxtTipoCambioDlls.Text.Trim.ToDecimal, NumeroDecimales).FormatoNumero
TxtIVA.Text = TmpDT.SUM("ImporteIVA").ToDecimal.FormatoNumero
TxtRetIVA.Text = TmpDT.SUM("ImporteRetIVA").ToDecimal.FormatoNumero
TxtRetISR.Text = TmpDT.SUM("ImporteRetISR").ToDecimal.FormatoNumero
TxtIEPS.Text = TmpDT.SUM("ImporteIEPS").ToDecimal.FormatoNumero
TxtIVA.Text = TmpDTTotales.SUM("ImporteIVA").ToDecimal.FormatoNumero
TxtRetIVA.Text = TmpDTTotales.SUM("ImporteRetIVA").ToDecimal.FormatoNumero
TxtRetISR.Text = TmpDTTotales.SUM("ImporteRetISR").ToDecimal.FormatoNumero
TxtIEPS.Text = TmpDTTotales.SUM("ImporteIEPS").ToDecimal.FormatoNumero
TxtTotal.Text = (TxtSubTotal.Text.ToDecimal - LblDescuentos.Text.ToDecimal - LblAmortizacion.Text.ToDecimal + TxtIVA.Text.ToDecimal + TxtIEPS.Text.ToDecimal - TxtRetIVA.Text.ToDecimal - TxtRetISR.Text.ToDecimal - ImpuestosLocales).ToDecimal.FormatoNumero
TipoCambio = TxtTipoCambioDlls.Text.Trim.ToDecimal
@@ -1736,9 +1739,10 @@ Partial Class PV
'CONVERTIR REMISION - TIPO MONEDA -PESO A DOLARES
If DdlMoneda.SelectedValue.ToEntero <> 1 AndAlso ChkConvertirDoctoPesos.Checked Then
Dim TmpDTTotales As DataTable = TmpDT.FiltraParametros("EliminarDB = False")
Dim Importe As Decimal
Dim TCC As Decimal = TxtTipoCambio.Text.Trim.ToDecimal
For Each Row As DataRow In TmpDT.Rows
For Each Row As DataRow In TmpDTTotales.Rows
Row("PU") = Math.Round(Row("PU").ToString.ToDecimal * TCC, 6)
Row("Total") = Math.Round(Row("Cantidad").ToString.ToDecimal * Row("PU").ToString.ToDecimal, NumeroDecimales)
Row("TotalImporte") = Math.Round(Row("Cantidad").ToString.ToDecimal * Row("PU").ToString.ToDecimal, NumeroDecimales)
@@ -1758,13 +1762,13 @@ Partial Class PV
End If
Next
TxtSubTotal.Text = TmpDT.SUM("Total").ToDecimal.FormatoNumero
LblDescuentos.Text = TmpDT.SUM("Descuento").ToDecimal.FormatoNumero
TxtSubTotal.Text = TmpDTTotales.SUM("Total").ToDecimal.FormatoNumero
LblDescuentos.Text = TmpDTTotales.SUM("Descuento").ToDecimal.FormatoNumero
LblAmortizacion.Text = Math.Round(LblAmortizacion.Text.Trim.ToDecimal * TxtTipoCambio.Text.Trim.ToDecimal, NumeroDecimales).FormatoNumero
TxtIVA.Text = TmpDT.SUM("ImporteIVA").ToDecimal.FormatoNumero
TxtRetIVA.Text = TmpDT.SUM("ImporteRetIVA").ToDecimal.FormatoNumero
TxtRetISR.Text = TmpDT.SUM("ImporteRetISR").ToDecimal.FormatoNumero
TxtIEPS.Text = TmpDT.SUM("ImporteIEPS").ToDecimal.FormatoNumero
TxtIVA.Text = TmpDTTotales.SUM("ImporteIVA").ToDecimal.FormatoNumero
TxtRetIVA.Text = TmpDTTotales.SUM("ImporteRetIVA").ToDecimal.FormatoNumero
TxtRetISR.Text = TmpDTTotales.SUM("ImporteRetISR").ToDecimal.FormatoNumero
TxtIEPS.Text = TmpDTTotales.SUM("ImporteIEPS").ToDecimal.FormatoNumero
TxtTotal.Text = (TxtSubTotal.Text.ToDecimal - LblDescuentos.Text.ToDecimal - LblAmortizacion.Text.ToDecimal + TxtIVA.Text.ToDecimal + TxtIEPS.Text.ToDecimal - TxtRetIVA.Text.ToDecimal - TxtRetISR.Text.ToDecimal - ImpuestosLocales).ToDecimal.FormatoNumero
@@ -1802,32 +1806,99 @@ Partial Class PV
Exit For
Else
TmpDT.Rows(index)("CveVentaDetalle") = ObjVentas.CveVentaDetalle
If TmpDTRecepcionUsados IsNot Nothing Then
If TmpDTRecepcionUsados.Select($"CvePS={Row("CvePS").ToString.ToEntero}").Length > 0 Then
Dim rowInv As DataRow = TmpDTRecepcionUsados.Select($"CvePS={Row("CvePS").ToString.ToEntero}")(0)
rowInv("CveVentaDetalle") = ObjVentas.CveVentaDetalle
End If
End If
If TmpDTAjustes IsNot Nothing AndAlso TmpDTAjustes.Rows.Count > 0 Then
If TmpDTAjustes.Select($"ConsecutivoVenta={Row("Consec").ToString.ToEntero}").Length > 0 Then
Dim DrAju As DataRow = TmpDTAjustes.Select($"ConsecutivoVenta={Row("Consec").ToString.ToEntero}")(0)
DrAju("CveVentaDetalle") = ObjVentas.CveVentaDetalle
End If
End If
If TmpDTPolizaVirtual IsNot Nothing Then
If TmpDTPolizaVirtual.Select($"CvePS={Row("CvePS").ToString.ToEntero}").Length > 0 Then
Dim RowPoliza As DataRow = TmpDTPolizaVirtual.Select($"CvePS={Row("CvePS").ToString.ToEntero}")(0)
RowPoliza("CveVentaDetalle") = ObjVentas.CveVentaDetalle
End If
End If
End If
End If
index = index + 1
Next
End If
ObjFactura.DtDetalle = TmpDT
'ELIMINA LOS DETALLES
If Not OcurrioError Then
Dim DtEliminados As New DataTable
If ObjVentas.GetVentaDetalle(CveVenta) Then
DtEliminados = ObjVentas.DtResultados.FiltraParametros("", "", {"CveVentaDetalle"})
For Each Dr1 As DataRow In DtEliminados.Rows
If TmpDT.FiltraParametros($"CveVentaDetalle = {Dr1("CveVentaDetalle")}").Rows.Count = 0 Then
If Not ObjVentas.RemoveVentasDetalle(CveVenta, Dr1("CveVentaDetalle").ToString.ToEntero) Then
OcurrioError = True
End If
End If
Next
Else
OcurrioError = True
End If
Dim DtEliminados As DataTable = TmpDT.FiltraParametros("EliminarDB = True AND CveVentaDetalle > 0", "", {"CveVentaDetalle"})
For Each Dr1 As DataRow In DtEliminados.Rows
If Not ObjVentas.RemoveVentasDetalle(CveVenta, Dr1("CveVentaDetalle").ToString.ToEntero) Then
OcurrioError = True
End If
Next
End If
'OcurrioError = ProcesoPrepolizas(ObjConta, ObjFactura, -1, TmpDT, ObjAC, 1, ObjBancos, ObjVentas)
'RECARGA LOS DATOS
If ObjVentas.GetVentaDetalle(CveVenta) Then
TmpDT = ObjVentas.DtResultados.Copy()
ObjFactura.DtDetalle = TmpDT
Else
OcurrioError = True
End If
'GUARDA USADOS
If Not ObjVentas.EliminarUsados(CveVenta) Then
OcurrioError = True
End If
If TmpDTRecepcionUsados IsNot Nothing Then
For Each drow As DataRow In TmpDTRecepcionUsados.Rows
If Not ObjVentas.AddVentaUsado(CveVenta, drow("CvePS").ToString.ToEntero, drow("Cantidad").ToString.ToDecimal, drow("PU").ToString.ToDecimal, drow("CveBCIUsado").ToString.ToEntero, drow("CveModeloAuto").ToString.ToEntero) Then
OcurrioError = True
Exit For
End If
Next
End If
'GUARDAR AJUSTES'
If Not ObjAcum.EliminarGarantiasDetalle(CveVenta) Then
OcurrioError = True
End If
If TmpDTAjustes IsNot Nothing AndAlso TmpDTAjustes.Rows.Count > 0 Then
For Each Dr As DataRow In TmpDTAjustes.Rows
If Not ObjAcum.AddGarantiasDetalle(Dr("CveVentaDetalle").ToString.ToEntero, Dr("CvePS").ToString.ToEntero, Dr("CveFolioGarantia").ToString.ToEntero, Dr("CveTipoUso").ToString.ToEntero,
Dr("CodigoEnsamble").ToString, Dr("CodigoLinea").ToString, Dr("CodigoInspeccion").ToString, Dr("CveTipoDefecto").ToString.ToEntero,
Dr("NumPoliza").ToString, Dr("Importe").ToString.ToDouble, Dr("Consecutivo").ToString, Dr("FechaAjuste").ToString.ToDateTime()) Then
ErrorList.Add("Ocurrió un error al agregar la garantia detalle.")
End If
Next
End If
'GUARDAR POLIZA VIRTUAL
If Not ObjAcum.EliminarPolizaVirtual(CveVenta) Then
OcurrioError = True
End If
If TmpDTPolizaVirtual IsNot Nothing Then
For Each drow As DataRow In TmpDTPolizaVirtual.Rows
If ObjAcum.AddPolizaVirtual(CveVenta, drow("CveVentaDetalle").ToString().ToEntero(), drow("CvePS").ToString.ToEntero, drow("Cantidad").ToString.ToDecimal, drow("PU").ToString.ToDecimal, drow("Descuento").ToString.ToDecimal,
drow("Total").ToString.ToDecimal, drow("TipoServicio").ToString.ToEntero, drow("TipoPoliza").ToString.ToEntero, drow("CveModeloAuto").ToString.ToEntero, drow("AnioVehiculo").ToString.ToEntero, CBool(drow("TieneUsado").ToString),
drow("FechaUsado").ToString().ToDateTime, drow("CvePSUsado").ToString.ToEntero, drow("CveBCIUsado").ToString.ToEntero) Then
Else
OcurrioError = True
Exit For
End If
Next
End If
'Actualizo impuestos locales
If Not OcurrioError Then
@@ -2695,7 +2766,7 @@ Partial Class PV
TmpDT.Rows.Remove(DbRow)
GvPS.DataSource = TmpDT
GvPS.DataSource = TmpDT.FiltraParametros("EliminarDB = False")
DtInv = TmpDT.Copy.FiltraParametros("CveTipoPS = 2")
GvPS.DataBind()
CargaGVInv(DtInv)
@@ -2751,7 +2822,7 @@ Partial Class PV
TmpDT = resultados.CopyToDataTable
CalculaTotalesVenta()
GvPS.DataSource = TmpDT
GvPS.DataSource = TmpDT.FiltraParametros("EliminarDB = False")
GvPS.DataBind()
UpPS.Update()
@@ -2857,7 +2928,7 @@ Partial Class PV
GvInv.Columns(5).Visible = DtTemporal.MAX("Lote", "Lote <> ''") <> ""
GvInv.Columns(6).Visible = DtTemporal.MAX("Lote", "Lote <> ''") <> ""
GvInv.DataSource = DtTemporal
GvInv.DataSource = DtTemporal.FiltraParametros("EliminarDB = False")
GvInv.DataBind()
UpINV.Update()
@@ -3806,6 +3877,9 @@ Partial Class PV
TmpDT.Columns.Add("PUOriginal", GetType(Decimal))
TmpDT.Columns.Add("ConsecPSPadre", GetType(Integer))
TmpDT.Columns.Add("EliminarDB", GetType(Boolean))
TmpDT.Columns("EliminarDB").DefaultValue = False
End Sub
Private Sub CreaDTmpC()
@@ -3878,7 +3952,7 @@ Partial Class PV
Row("TiempoEntrega") = TiempoEntrega
TmpDT.Rows.Add(Row)
GvPS.DataSource = TmpDT
GvPS.DataSource = TmpDT.FiltraParametros("EliminarDB = False")
GvPS.DataBind()
DtInv = TmpDT.Copy.FiltraParametros("CveTipoPS = 2")
@@ -3999,7 +4073,7 @@ Partial Class PV
Optional CveContratoDetalle As Integer = 0, Optional CveVentaDetalle As Integer = 0, Optional CveMovimientoDetallePedido As Integer = 0,
Optional CveOrdenCompraDetalle As Integer = 0, Optional CveVentaDetalleRemision As Integer = 0, Optional CveVentaDetalleCotizacion As Integer = 0,
Optional CuentaPredial As String = "", Optional RegeneraIEPS As Boolean = True, Optional CveVentaDetallePedido2 As Integer = 0, Optional EsCargo As Boolean = False,
Optional ConsecPSPadre As Integer = -1) As Integer
Optional ConsecPSPadre As Integer = -1, Optional EliminarDB As Boolean = False) As Integer
Dim Retorno As Integer = -1
If Not CvePS > 0 Then
@@ -4170,6 +4244,8 @@ Partial Class PV
Row("ConsecPSPadre") = ConsecPSPadre
End If
Row("EliminarDB") = EliminarDB
If UsuarioActual.CveEmpresa = 119 Then
If Not RemisionesLista.Count > 0 Then 'SI VIENE DE REMISION NO SE CONSIDERA
@@ -4477,8 +4553,8 @@ Partial Class PV
Else
If Me.CveVentaDetalle > 0 Then
For Each Gvr As GridViewRow In GvPS.Rows
Gvr.FCLinkButton("imgE").Visible = Not Gvr.DataKey("CantidadFacturadaRem").ToString.ToDouble > 0 AndAlso Gvr.DataKey("EsCargo") = "True"
Gvr.FCLinkButton("imgD").Visible = Not Gvr.DataKey("CantidadInventario").ToString.ToDouble > 0 AndAlso Gvr.DataKey("EsCargo") = "True"
Gvr.FCLinkButton("imgE").Visible = Not Gvr.DataKey("CantidadFacturadaRem").ToString.ToDouble > 0 AndAlso Gvr.DataKey("EsCargo") = "False"
Gvr.FCLinkButton("imgD").Visible = Not Gvr.DataKey("CantidadInventario").ToString.ToDouble > 0 AndAlso Gvr.DataKey("EsCargo") = "False"
Next
End If
UpVenta.Update()
@@ -4530,7 +4606,12 @@ Partial Class PV
If ListaPSCargo.Count > 0 Then
CalculaRecepcionUsados(GvRecepcionUsados, CvePS, ListaPSCargo)
End If
ElseIf CveVentaDetalle > 0 AndAlso Not EsCargo Then
EliminarUsados()
Dim ListaPSCargo = CalculaUsados(Consec, LimpiarUsados:=False)
If ListaPSCargo.Count > 0 Then
CalculaRecepcionUsados(GvRecepcionUsados, CvePS, ListaPSCargo)
End If
End If
Return True
@@ -4662,6 +4743,7 @@ Partial Class PV
#Region "CALCULA TOTALES"
Private Sub CalculaTotalesVenta(Optional RecalculaImpuestosLocales As Boolean = True)
Dim TmpDT = Me.TmpDT.FiltraParametros("EliminarDB = False", Orderby:="Consec")
Dim TotalSubTotal As Decimal = TmpDT.SUM("TotalImporte").ToDecimal
Dim TotalDescuentos As Decimal = TmpDT.SUM("Descuento").ToDecimal
@@ -4715,9 +4797,7 @@ Partial Class PV
'JJMQ 20160506: Se agrego para la validacion de pago de contado.
'CVImporteContado.ValueToCompare = Total.ToString
Dim view As DataView = New DataView(TmpDT)
view.Sort = "Consec"
GvPS.DataSource = view
GvPS.DataSource = TmpDT
GvPS.DataBind()
'RECARGA GV INVENTARIO
@@ -6325,7 +6405,7 @@ Partial Class PV
Dim Total As Decimal = ((Cantidad * PU) - Descuento).RoundSQL(2)
Dim TipoServicio As Integer = DdlTipoServicio.SelectedValue.ToEntero()
Dim FechaUsado As DateTime = TxtFechaAjuste.Text.ToDateTime()
Dim FechaUsado As DateTime = If(TxtFechaAjuste.Text.ToDateTime() < MinFecha, Now, TxtFechaAjuste.Text.ToDateTime())
Dim CveModeloAuto As Integer = DdlModeloAuto.SelectedValue.ToEntero()
Dim AnioVehiculo As Integer = TxtAnioVehiculo.Text.ToEntero()
Dim TipoPoliza As Integer = 1 'VENTA
@@ -6376,6 +6456,7 @@ Partial Class PV
Return Retorno
End Function
#End Region
#Region "U S A D O S"
Private Sub CreaDTmpDTRecepcionUsados()
@@ -6388,6 +6469,8 @@ Partial Class PV
TmpDTRecepcionUsados.Columns.Add("PU", GetType(Double))
TmpDTRecepcionUsados.Columns.Add("CveBCIUsado", GetType(Integer))
TmpDTRecepcionUsados.Columns.Add("CveModeloAuto", GetType(Integer))
TmpDTRecepcionUsados.Columns.Add("EliminarDB", GetType(Boolean))
TmpDTRecepcionUsados.Columns("EliminarDB").DefaultValue = False
End Sub
@@ -6453,7 +6536,7 @@ Partial Class PV
' Exit Sub
'End If
For Each Dr As DataRow In TmpDT.FiltraParametros($"EsCargo = True AND CvePS IN ({StrCargos})").Rows
For Each Dr As DataRow In TmpDT.FiltraParametros($"EsCargo = True AND EliminarDB = False AND CvePS IN ({StrCargos})").Rows
Dim TotalAnterior As Decimal = Dr("Cantidad").ToString.ToDecimal * Dr("PU").ToString.ToDecimal
Dim PUActual As Decimal = (TotalAnterior - TotalCargos) / Dr("Cantidad").ToString.ToDecimal
@@ -6485,7 +6568,7 @@ Partial Class PV
Next
TmpDT.AcceptChanges()
If TotalCargos > 0 Then ' cuando se entrega más valor de usados, que los cargos hechos, se descuenta sobre el PU del producto de venta
For Each Dr As DataRow In TmpDT.FiltraParametros($"EsCargo = False AND CvePS={CvePS}").Rows
For Each Dr As DataRow In TmpDT.FiltraParametros($"EsCargo = False AND EliminarDB = False AND CvePS={CvePS}").Rows
Dim PUAnterior As Decimal = Dr("Cantidad").ToString.ToDecimal * Dr("PU").ToString.ToDecimal
Dim PUActual As Decimal = PUAnterior - (TotalCargos / Dr("Cantidad").ToString.ToDecimal)
@@ -6522,8 +6605,8 @@ Partial Class PV
CalculaTotalesVenta()
End Sub
Private Function CalculaUsados(Consec As Integer) As List(Of Integer)
If Modalidad = "U" Then
Private Function CalculaUsados(Consec As Integer, Optional LimpiarUsados As Boolean = True) As List(Of Integer)
If Modalidad = "U" AndAlso LimpiarUsados Then
EliminarUsados(Consec)
End If
@@ -6556,6 +6639,8 @@ Partial Class PV
DTPSTemp.Columns.Add("CveSubProyecto", GetType(Integer))
DTPSTemp.Columns.Add("SubProyecto", GetType(String))
DTPSTemp.Columns.Add("ConsecPSPadre", GetType(Integer))
DTPSTemp.Columns.Add("EliminarDB", GetType(Boolean))
DTPSTemp.Columns("EliminarDB").DefaultValue = False
Dim ObjProductosServicios As New ClsProductosServicios()
For Each DrowPartidas As DataRow In TmpDT.Select($"Consec = {Consec}")
@@ -6628,7 +6713,7 @@ Partial Class PV
Dim Concec = AgregarProductoServicio(drowPsTamaños("Cantidad").ToString.ToEntero, drowPsTamaños("CveUnidadMedida").ToString.ToEntero, drowPsTamaños("UnidadMedida").ToString,
drowPsTamaños("CveClasificacion").ToString.ToEntero, drowPsTamaños("Clasificacion").ToString, drowPsTamaños("CvePS").ToString.ToEntero,
drowPsTamaños("PS").ToString, "", drowPsTamaños("PU").ToString.ToDecimal, 0, -1, "", drowPsTamaños("CveSubProyecto").ToString.ToEntero,
drowPsTamaños("SubProyecto").ToString, EsCargo:=True, ConsecPSPadre:=drowPsTamaños("ConsecPSPadre").ToString.ToEntero)
drowPsTamaños("SubProyecto").ToString, EsCargo:=True, ConsecPSPadre:=drowPsTamaños("ConsecPSPadre").ToString.ToEntero, EliminarDB:=CBool(drowPsTamaños("EliminarDB").ToString()))
If Consec > 0 Then
ListaPScargo.Add(drowPsTamaños("CvePS").ToString.ToEntero)
End If
@@ -6655,6 +6740,25 @@ Partial Class PV
Next
Next
TmpDT.AcceptChanges()
TmpDTRecepcionUsados.AcceptChanges()
End Sub
Private Sub EliminarUsados()
'ELIMINAR EL USADO EXTRAS
For Each drow As DataRow In TmpDT.Select("EsCargo = True")
drow("EliminarDB") = True
Next
'ELIMINAR LOS USADOS QUE SE MANDAN A RECEPCION
For Each drow As DataRow In TmpDT.Select("EsCargo = True")
For Each RowRecepcionUsados As DataRow In TmpDTRecepcionUsados.Rows
If (RowRecepcionUsados("CvePSRelacionado").ToString() = drow("CvePS").ToString()) Then
RowRecepcionUsados.Delete()
End If
Next
Next
TmpDT.AcceptChanges()
TmpDTRecepcionUsados.AcceptChanges()
End Sub

4
Ventas/Ventas.aspx
View File

@@ -4130,7 +4130,9 @@
<span class="caption-subject bold">Agregar</span>
</div>--%>
<asp:HyperLink ID="ImgAddObs" CssClass="caption-subject bold" data-toggle="modal" data-target="#ModalBitacora" runat="server" Text=" <i class='fa fa-commenting font-green' style='font-weight: 700 !important;' ><span class='caption-subject bold'>Agregar</span></i>" Style="cursor: pointer;" ToolTip="Observaciones"></asp:HyperLink><br />
<asp:HyperLink ID="HlEvento" CssClass="thickbox caption-subject bold" runat="server" Visible="false" Style="cursor: pointer; text-decoration: none;" ToolTip="Agendar"><i class='fa fa-calendar-plus-o font-green' style='font-weight: 700 !important;' ></i> <span class="caption-subject bold font-green">Agendar</span></asp:HyperLink>
<asp:HyperLink ID="HlEvento" CssClass="thickbox caption-subject bold" runat="server" Visible="false" Style="cursor: pointer; text-decoration: none;" ToolTip="Agendar"><i class='fa fa-calendar-plus-o font-green' style='font-weight: 700 !important;' ></i> <span class="caption-subject bold font-green">Agendar</span></asp:HyperLink><br />
<asp:Literal ID="LtlTareaNueva" runat="server"></asp:Literal>
<UserControl:TareaNueva runat="server" id="TareaNueva" />
</div>
</div>

4445
Ventas/Ventas.aspx.vb
View File

File diff suppressed because it is too large Load Diff