From 766873b1b0450b4b0d438fee6f62dc03d8d48ba8 Mon Sep 17 00:00:00 2001 From: JORGE LUIS CAUDILLO ESPARZA Date: Wed, 20 May 2020 19:55:26 -0700 Subject: [PATCH] --- App_Code/ClsOIEventos.vb | 162 ++++++++++++++++--- Bin/APP_Code_CSharp.dll | Bin 296960 -> 296960 bytes Bin/APP_Code_CSharp.pdb | Bin 595456 -> 595456 bytes General/PopUpPaqueteriasGuias.aspx | 4 +- Inicio.aspx | 154 ++++++++++++++---- Inicio.aspx.vb | 40 +++++ OI/ConvocatoriaDetalle.aspx | 75 ++++----- OI/ConvocatoriaDetalle.aspx.cs | 5 +- OI/MinutaDetalle.aspx | 69 +++++++- OI/MinutaDetalle.aspx.cs | 60 ++++++- OI/TableroDetalle.aspx | 118 ++++++++------ OI/TareaDetalle.aspx | 67 ++++---- OI/TareaDetalle.aspx.cs | 244 ++++++++++++++++------------- OI/UnoaUno.aspx | 173 +++++++++++++++----- OI/UnoaUno.aspx.cs | 101 +++++++++++- Scripts/custom.js | 67 ++++++-- UserControl/TareaNueva.ascx | 2 +- UserControl/TareaNueva.ascx.cs | 4 +- vwd.webinfo | 2 + 19 files changed, 1005 insertions(+), 342 deletions(-) diff --git a/App_Code/ClsOIEventos.vb b/App_Code/ClsOIEventos.vb index 5bf90db2e..2a9ab0bf8 100644 --- a/App_Code/ClsOIEventos.vb +++ b/App_Code/ClsOIEventos.vb @@ -17,7 +17,21 @@ Public Enum OITipoEventos Gastos_Mes = 10 Convocatorias = 11 End Enum - +Public Enum OITipoEventosRelacion + Activo_Fijo = 1 + Cliente = 2 + Personal = 3 + Proveedor = 4 + Ventas = 5 + Compras = 6 + Bancos = 7 + Prospectos = 8 + OrdendeServicio = 9 + OrdendeCompra = 10 + Proyecto = 11 + Almacen = 12 + Contrato = 12 +End Enum Public Class ObjEventosCorreo Public Sub New(AsuntoCorreo As String, mailPara As String, ListPara As List(Of String), Folio As Integer, Link As String, Asunto As String, Descripcion As String, Fechai As String, Fechaf As String, Prioridad As String, Tema As String, Actividad As String, Estatus As String) Me.AsuntoCorreo = AsuntoCorreo @@ -162,6 +176,7 @@ Public Class ClsOIEventos .CommandText = StrSQL .CommandType = TipoComando End With + objCorreo = Nothing Data = New DataTable If SqlTransacc IsNot Nothing Then SqlAdapter.SelectCommand.Transaction = SqlTransacc End Sub @@ -671,6 +686,102 @@ Public Class ClsOIEventos #End Region #Region "oieventos2.0" + Public Function GetOiInicio(CveEmpresa As Integer, CveUsuario As Integer) As Boolean + Dim retorno As Boolean = False + DataAdapter("PA_OI_InicioReport", CommandType.StoredProcedure) + With SqlAdapter.SelectCommand.Parameters + .Add("@CveUsuario", SqlDbType.Int).Value = (CveUsuario) + .Add("@CveEmpresa", SqlDbType.Int).Value = (CveEmpresa) + End With + Try + SqlAdapter.Fill(Data) + retorno = True + Catch ex As Exception + OnError("Ocurrió un error al actualizar la relación.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) + End Try + Return retorno + End Function + Public Function OrdenaTareas(ListAsistentes As List(Of String), CveEmpresa As Integer, CveUsuarioIng As Integer) As Boolean + Dim retorno As Boolean = False + Dim xmlAsistentes As System.Xml.Linq.XDocument = Nothing + If ListAsistentes IsNot Nothing AndAlso ListAsistentes.Count > 0 Then + xmlAsistentes = New System.Xml.Linq.XDocument(New System.Xml.Linq.XElement("OrdenList", ListAsistentes.[Select](Function(x) New System.Xml.Linq.XElement("Cve_Orden", x)))) + End If + DataAdapter("PA_OI_OrdenaTareasUP", CommandType.StoredProcedure) + With SqlAdapter.SelectCommand.Parameters + .Add("@xmlOrdenado", SqlDbType.Xml).Value = If(xmlAsistentes Is Nothing, DBNull.Value, DirectCast(xmlAsistentes.ToString(), Object)) + .Add("@CveUsuarioIng", SqlDbType.Int).Value = (CveUsuarioIng) + .Add("@CveEmpresa", SqlDbType.Int).Value = (CveEmpresa) + End With + Try + SqlAdapter.Fill(Data) + retorno = True + Catch ex As Exception + OnError("Ocurrió un error al actualizar la relación.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) + End Try + Return retorno + End Function + Public Function OrdenaListas(ListAsistentes As List(Of String), CveEmpresa As Integer, CveUsuarioIng As Integer) As Boolean + Dim retorno As Boolean = False + Dim xmlAsistentes As System.Xml.Linq.XDocument = Nothing + If ListAsistentes IsNot Nothing AndAlso ListAsistentes.Count > 0 Then + xmlAsistentes = New System.Xml.Linq.XDocument(New System.Xml.Linq.XElement("OrdenList", ListAsistentes.[Select](Function(x) New System.Xml.Linq.XElement("Cve_Orden", x)))) + End If + DataAdapter("PA_OI_OrdenaListasUP", CommandType.StoredProcedure) + With SqlAdapter.SelectCommand.Parameters + .Add("@xmlOrdenado", SqlDbType.Xml).Value = If(xmlAsistentes Is Nothing, DBNull.Value, DirectCast(xmlAsistentes.ToString(), Object)) + .Add("@CveUsuarioIng", SqlDbType.Int).Value = (CveUsuarioIng) + .Add("@CveEmpresa", SqlDbType.Int).Value = (CveEmpresa) + End With + Try + SqlAdapter.Fill(Data) + retorno = True + Catch ex As Exception + OnError("Ocurrió un error al actualizar la relación.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) + End Try + Return retorno + End Function + Public Function UPEventosVinculo(CveEvento As Integer, CveTipoRelacion As Integer, CveRelacion As Integer, CveEmpresa As Integer, CveUsuarioIng As Integer) As Boolean + Dim retorno As Boolean = False + DataAdapter("PA_OI_EventosVinculoUP", CommandType.StoredProcedure) + With SqlAdapter.SelectCommand.Parameters + .Add("@CveEvento", SqlDbType.Int).Value = (CveEvento) + .Add("@CveTipoRelacion", SqlDbType.Int).Value = (CveTipoRelacion) + .Add("@CveRelacion", SqlDbType.Int).Value = (CveRelacion) + .Add("@CveUsuarioIng", SqlDbType.Int).Value = (CveUsuarioIng) + .Add("@CveEmpresa", SqlDbType.Int).Value = (CveEmpresa) + End With + Try + SqlAdapter.Fill(Data) + retorno = True + Catch ex As Exception + OnError("Ocurrió un error al actualizar la relación.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) + End Try + Return retorno + End Function + Public Function UPMinutasAsistentes(CveEvento As Integer, CveEmpresa As Integer, Asistencia As String, CveUsuarioIng As Integer, ListAsistentes As List(Of Integer)) As Boolean + Dim retorno As Boolean = False + + Dim xmlAsistentes As System.Xml.Linq.XDocument = Nothing + If ListAsistentes IsNot Nothing AndAlso ListAsistentes.Count > 0 Then + xmlAsistentes = New System.Xml.Linq.XDocument(New System.Xml.Linq.XElement("Asistentes", ListAsistentes.[Select](Function(x) New System.Xml.Linq.XElement("CveUsuario", x)))) + End If + DataAdapter("PA_OI_MinutasUpAsistentes", CommandType.StoredProcedure) + With SqlAdapter.SelectCommand.Parameters + .Add("@CveEvento", SqlDbType.Int).Value = (CveEvento) + .Add("@xmlAsistentes", SqlDbType.Xml).Value = If(xmlAsistentes Is Nothing, DBNull.Value, DirectCast(xmlAsistentes.ToString(), Object)) + .Add("@Asistencia", SqlDbType.VarChar).Value = (Asistencia) + .Add("@CveUsuarioIng", SqlDbType.Int).Value = (CveUsuarioIng) + .Add("@CveEmpresa", SqlDbType.Int).Value = (CveEmpresa) + End With + Try + SqlAdapter.Fill(Data) + retorno = True + Catch ex As Exception + OnError("Ocurrió un error al actualizar la asistencia de usuarios.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) + End Try + Return retorno + End Function Public Function UpEventosVinculos(cveEvento As Int32, cveActivoFijo As Int32, cveIE As Int32, cveProspecto As Int32, cveCliente As Int32, cveOS As Int32, cveOC As Int32, cvePersonal As Int32, cveProveedor As Int32, cveCompra As Int32, cveVenta As Int32, cveContrato As Int32, cveSubProyecto As Int32, cveMovimientoAlmacen As Int32, cveEmpresaCRM As Int32) As Boolean @@ -819,7 +930,7 @@ Public Class ClsOIEventos Optional CveActivoFijo As Integer = -1, Optional CveIE As Integer = -1, Optional CveProspecto As Integer = -1, Optional CveCliente As Integer = -1, Optional CveOS As Integer = -1, Optional CveOC As Integer = -1, Optional CvePersonal As Integer = -1, Optional CveProveedor As Integer = -1, Optional CveCompra As Integer = -1, Optional CveVenta As Integer = -1, Optional CveContrato As Integer = -1, Optional CveSubProyecto As Integer = -1, - Optional CveMovimientoAlmacen As Integer = -1, Optional CorreoExterno As String = "", Optional CveTableroLista As Integer = -1, Optional Lugar As String = "") As Boolean + Optional CveMovimientoAlmacen As Integer = -1, Optional CorreoExterno As String = "", Optional CveTableroLista As Integer = -1, Optional Lugar As String = "", Optional Asistencia As String = "", Optional Duracion As String = "") As Boolean Dim retorno As Boolean = False Dim xmlMiembros As System.Xml.Linq.XDocument = Nothing @@ -877,6 +988,8 @@ Public Class ClsOIEventos .Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto .Add("@CveMovimientoAlmacen", SqlDbType.Int).Value = CveMovimientoAlmacen .Add("@CorreoExterno", SqlDbType.VarChar).Value = CorreoExterno + .Add("@Duracion", SqlDbType.VarChar).Value = Duracion + .Add("@Asistencia", SqlDbType.VarChar).Value = Asistencia .Add("@Lugar", SqlDbType.VarChar).Value = Lugar .Add("@CveTableroLista", SqlDbType.VarChar).Value = CveTableroLista @@ -918,9 +1031,9 @@ Public Class ClsOIEventos End Try Try If retorno AndAlso lPara.Count > 0 AndAlso drow IsNot Nothing Then - 'Notificaciones.AlertaVentana(String.Format("Folio :{1}", GetDominio(), Folio, CveEvento), lPara, "NUEVA TAREA ASIGNADA") - objCorreo = New ObjEventosCorreo("Nueva Tarea asignada", mailPara, lPara, Folio, String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), asunto, descripcion, String.Format("{0:dd/MM/yyyy HH:mm}", fechaInicio.ToDateTime()), String.Format("{0:dd/MM/yyyy HH:mm}", fechaFin.ToDateTime()), drow("Prioridad").ToString(), drow("Tema").ToString(), "", "") - 'mailbody = MailgetBodyNuevatarea(Folio, String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), asunto, descripcion, String.Format("{0:dd/MM/yyyy HH:mm}", fechaInicio.ToDateTime()), String.Format("{0:dd/MM/yyyy HH:mm}", fechaFin.ToDateTime()), drow("Prioridad").ToString(), drow("Tema").ToString()) + 'Notificaciones.AlertaVentana(String.Format("Folio :{1}", GetDominio(), Folio, CveEvento), lPara, "NUEVA TAREA ASIGNADA") + objCorreo = New ObjEventosCorreo("Nueva Tarea asignada", mailPara, lPara, Folio, String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), asunto, descripcion, String.Format("{0:dd/MM/yyyy HH:mm}", fechaInicio.ToDateTime()), String.Format("{0:dd/MM/yyyy HH:mm}", fechaFin.ToDateTime()), drow("Prioridad").ToString(), drow("Tema").ToString(), "", "") + 'mailbody = MailgetBodyNuevatarea(Folio, String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), asunto, descripcion, String.Format("{0:dd/MM/yyyy HH:mm}", fechaInicio.ToDateTime()), String.Format("{0:dd/MM/yyyy HH:mm}", fechaFin.ToDateTime()), drow("Prioridad").ToString(), drow("Tema").ToString()) 'Dim mailAsunto As String = "Nueva Tarea asignada" ',cveUsuarioPara 'Dim mailArrayCC As String = "" 'EnviarCorreo(oempresa, mailAsunto, mailbody, mailPara, mailArrayCC) @@ -977,9 +1090,9 @@ Public Class ClsOIEventos End Try If retorno AndAlso lPara.Count > 0 AndAlso drow IsNot Nothing Then - objCorreo = New ObjEventosCorreo("Tarea Actualizada", mailPara, lPara, Folio, String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), asunto, descripcion, String.Format("{0:dd/MM/yyyy HH:mm}", fechaInicio.ToDateTime()), String.Format("{0:dd/MM/yyyy HH:mm}", fechaFin.ToDateTime()), drow("Prioridad").ToString(), drow("Tema").ToString(), "", "") - 'Notificaciones.AlertaVentana(String.Format("Folio :{1}", GetDominio(), Folio, CveEvento), lPara, "TAREA ACTUALIZADA") - 'mailbody = MailgetBodyActualizartarea(Folio, String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), asunto, descripcion, String.Format("{0:dd/MM/yyyy HH:mm}", fechaInicio.ToDateTime()), String.Format("{0:dd/MM/yyyy HH:mm}", fechaFin.ToDateTime()), drow("Prioridad").ToString(), drow("Tema").ToString()) + objCorreo = New ObjEventosCorreo("Tarea Actualizada", mailPara, lPara, Folio, String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), asunto, descripcion, String.Format("{0:dd/MM/yyyy HH:mm}", fechaInicio.ToDateTime()), String.Format("{0:dd/MM/yyyy HH:mm}", fechaFin.ToDateTime()), drow("Prioridad").ToString(), drow("Tema").ToString(), "", "") + 'Notificaciones.AlertaVentana(String.Format("Folio :{1}", GetDominio(), Folio, CveEvento), lPara, "TAREA ACTUALIZADA") + 'mailbody = MailgetBodyActualizartarea(Folio, String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), asunto, descripcion, String.Format("{0:dd/MM/yyyy HH:mm}", fechaInicio.ToDateTime()), String.Format("{0:dd/MM/yyyy HH:mm}", fechaFin.ToDateTime()), drow("Prioridad").ToString(), drow("Tema").ToString()) 'Dim mailAsunto As String = "Tarea Actualizada" ',cveUsuarioPara 'Dim mailArrayCC As String = "" 'EnviarCorreo(oempresa, mailAsunto, mailbody, mailPara, mailArrayCC) @@ -988,7 +1101,7 @@ Public Class ClsOIEventos End Function - Public Function UpdateEstatusEvento2(CveEventoEstatus As Integer, CveComentario As Integer, CveEvento As Integer, CveUsuario As Integer, cveEmpresa As Int32) As Boolean + Public Function UpdateEstatusEvento2(CveEventoEstatus As Integer, CveComentario As Integer, CveEvento As Integer, CveUsuario As Integer, cveEmpresa As Int32, Optional ExtraComentario As String = "") As Boolean Dim Retorno As Boolean = False DataAdapter("PA_OI_EventosEstatusUpdate2") @@ -1006,6 +1119,7 @@ Public Class ClsOIEventos .Add("@pCveEvento", SqlDbType.Int).Value = CveEvento .Add("@pCveUsuario", SqlDbType.Int).Value = CveUsuario .Add("@CveEmpresa", SqlDbType.Int).Value = cveEmpresa + .Add("@ExtraComentario", SqlDbType.VarChar).Value = ExtraComentario End With Try SqlAdapter.Fill(ds) @@ -1029,9 +1143,9 @@ Public Class ClsOIEventos End Try If Retorno AndAlso lPara.Count > 0 AndAlso drow IsNot Nothing Then - objCorreo = New ObjEventosCorreo("Tarea Cambio de estatus", mailPara, lPara, drow("Folio").ToString().ToEntero(), String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString(), "", drow("Estatus").ToString()) - 'Notificaciones.AlertaVentana(String.Format("Folio :{1}", GetDominio(), drow("Folio").ToString().ToEntero(), CveEvento), lPara, String.Format("CAMBIÓ ESTADO EN TAREA A '{0}'", drow("Estatus"))) - 'mailbody = MailgetBodyActualizarEstado(drow("Estatus").ToString(), drow("Folio").ToString().ToEntero(), String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString()) + objCorreo = New ObjEventosCorreo("Tarea Cambio de estatus", mailPara, lPara, drow("Folio").ToString().ToEntero(), String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString(), "", drow("Estatus").ToString()) + 'Notificaciones.AlertaVentana(String.Format("Folio :{1}", GetDominio(), drow("Folio").ToString().ToEntero(), CveEvento), lPara, String.Format("CAMBIÓ ESTADO EN TAREA A '{0}'", drow("Estatus"))) + 'mailbody = MailgetBodyActualizarEstado(drow("Estatus").ToString(), drow("Folio").ToString().ToEntero(), String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString()) 'Dim mailAsunto As String = "Tarea Cambio de estatus" ',cveUsuarioPara 'Dim mailArrayCC As String = "" 'EnviarCorreo(oempresa, mailAsunto, mailbody, mailPara, mailArrayCC) @@ -1115,9 +1229,9 @@ Public Class ClsOIEventos If retorno AndAlso lPara.Count > 0 AndAlso drow IsNot Nothing Then - objCorreo = New ObjEventosCorreo(String.Format("Actividad {0}", If(estatus, "Terminada", "Pendiente")), mailPara, lPara, drow("Folio").ToString().ToEntero(), String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), cveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString(), String.Format("Actividad {0}", If(estatus, "Terminada", "Pendiente")), "") - 'Notificaciones.AlertaVentana(String.Format("Folio :{1}", GetDominio(), drow("Folio").ToString().ToEntero(), cveEvento), lPara, "TAREA ACTUALIZADA(Nuevo Archivo)") - 'mailbody = MailgetBodyTareaCheckList(String.Format("Actividad {0}", If(estatus, "Terminada", "Pendiente")), drow("Folio").ToString().ToEntero(), String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), cveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString()) + objCorreo = New ObjEventosCorreo(String.Format("Actividad {0}", If(estatus, "Terminada", "Pendiente")), mailPara, lPara, drow("Folio").ToString().ToEntero(), String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), cveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString(), String.Format("Actividad {0}", If(estatus, "Terminada", "Pendiente")), "") + 'Notificaciones.AlertaVentana(String.Format("Folio :{1}", GetDominio(), drow("Folio").ToString().ToEntero(), cveEvento), lPara, "TAREA ACTUALIZADA(Nuevo Archivo)") + 'mailbody = MailgetBodyTareaCheckList(String.Format("Actividad {0}", If(estatus, "Terminada", "Pendiente")), drow("Folio").ToString().ToEntero(), String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), cveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString()) 'Dim mailAsunto As String = String.Format("Actividad {0}", If(estatus, "Terminada", "Pendiente")) 'Dim mailArrayCC As String = "" 'EnviarCorreo(oempresa, mailAsunto, mailbody, mailPara, mailArrayCC) @@ -1185,9 +1299,9 @@ Public Class ClsOIEventos End Try If Retorno AndAlso lPara.Count > 0 AndAlso drow IsNot Nothing Then - objCorreo = New ObjEventosCorreo("Tarea Archivo actualizado", mailPara, lPara, drow("Folio").ToString().ToEntero(), String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString(), "", "") - 'Notificaciones.AlertaVentana(String.Format("Folio :{1}", GetDominio(), drow("Folio").ToString().ToEntero(), CveEvento), lPara, "TAREA ACTUALIZADA(Nuevo Archivo)") - 'mailbody = MailgetBodyActualizararchivo(drow("Folio").ToString().ToEntero(), String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString()) + objCorreo = New ObjEventosCorreo("Tarea Archivo actualizado", mailPara, lPara, drow("Folio").ToString().ToEntero(), String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString(), "", "") + 'Notificaciones.AlertaVentana(String.Format("Folio :{1}", GetDominio(), drow("Folio").ToString().ToEntero(), CveEvento), lPara, "TAREA ACTUALIZADA(Nuevo Archivo)") + 'mailbody = MailgetBodyActualizararchivo(drow("Folio").ToString().ToEntero(), String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString()) 'Dim mailAsunto As String = "Tarea Archivo actualizado" ',cveUsuarioPara 'Dim mailArrayCC As String = "" 'EnviarCorreo(oempresa, mailAsunto, mailbody, mailPara, mailArrayCC) @@ -1239,9 +1353,9 @@ Public Class ClsOIEventos End Try If Retorno AndAlso lPara.Count > 0 AndAlso drow IsNot Nothing Then - objCorreo = New ObjEventosCorreo("Tarea cambio Avance", mailPara, lPara, drow("Folio").ToString().ToEntero(), String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString(), "", "") - 'Notificaciones.AlertaVentana(String.Format("Folio :{1}", GetDominio(), drow("Folio").ToString().ToEntero(), CveEvento), lPara, "TAREA ACTUALIZADA(Nuevo Archivo)") - 'mailbody = MailgetBodyActualizarAvance(drow("Folio").ToString().ToEntero(), String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString()) + objCorreo = New ObjEventosCorreo("Tarea cambio Avance", mailPara, lPara, drow("Folio").ToString().ToEntero(), String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString(), "", "") + 'Notificaciones.AlertaVentana(String.Format("Folio :{1}", GetDominio(), drow("Folio").ToString().ToEntero(), CveEvento), lPara, "TAREA ACTUALIZADA(Nuevo Archivo)") + 'mailbody = MailgetBodyActualizarAvance(drow("Folio").ToString().ToEntero(), String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString()) 'Dim mailAsunto As String = "Tarea cambio Avance" ',cveUsuarioPara 'Dim mailArrayCC As String = "" 'EnviarCorreo(oempresa, mailAsunto, mailbody, mailPara, mailArrayCC) @@ -1296,9 +1410,9 @@ Public Class ClsOIEventos End Try If Retorno > 0 AndAlso lPara.Count > 0 AndAlso drow IsNot Nothing Then - objCorreo = New ObjEventosCorreo("Nuevo comentario en tarea", mailPara, lPara, drow("Folio").ToString().ToEntero(), String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString(), "", "") - 'Notificaciones.AlertaVentana(String.Format("Folio :{1}", GetDominio(), drow("Folio").ToString().ToEntero(), CveEvento), lPara, "TAREA ACTUALIZADA(Nuevo Archivo)") - 'mailbody = MailgetBodyTareaComentario(drow("Folio").ToString().ToEntero(), String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString()) + objCorreo = New ObjEventosCorreo("Nuevo comentario en tarea", mailPara, lPara, drow("Folio").ToString().ToEntero(), String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString(), "", "") + 'Notificaciones.AlertaVentana(String.Format("Folio :{1}", GetDominio(), drow("Folio").ToString().ToEntero(), CveEvento), lPara, "TAREA ACTUALIZADA(Nuevo Archivo)") + 'mailbody = MailgetBodyTareaComentario(drow("Folio").ToString().ToEntero(), String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString()) 'Dim mailAsunto As String = "Nuevo comentario en tarea" ',cveUsuarioPara 'Dim mailArrayCC As String = "" 'EnviarCorreo(oempresa, mailAsunto, mailbody, mailPara, mailArrayCC) diff --git a/Bin/APP_Code_CSharp.dll b/Bin/APP_Code_CSharp.dll index 133af1af32ea64421c8774a1d16d1409729f3424..d7e9dd04b9f1aa16b76684a04c7d5a8d9eccf45c 100644 GIT binary patch delta 102 zcmZpeAk;8HXhH|`Z=)lP-L2h>t=&wm-OO9NSvcbb>V8D5E}E+C)akg+c=ZR)r`wmr zv(zZ)0F}lu009#a%P=x9Sj=N#uxMam2nu!yE^1ohoP0aMY4e-?90mp)THAdZShlbO E0Lq9YD*ylh delta 102 zcmZpeAk;8HXhH|`S>c_H-L2h>t=&wm-OO9NSvcbb7H+Y=CFHrnZC!VU*$GYawCzjc zS!xt?fJ);SfPe{zWf&P4EatH=STwLO1O>YUN9lM>C{x<+&@X>d_i6TR*6ltGEL+$C DPf;R> diff --git a/Bin/APP_Code_CSharp.pdb b/Bin/APP_Code_CSharp.pdb index 54e2a37d6516ac649a4114a050a04f4870c43715..5e43300c0bbb7d818a1f92c00530f857453b1be9 100644 GIT binary patch delta 19809 zcmaK!34Bz=9mi)ENFJ9UN16-54RR%10TCMTLJS&EiqupCIL_fz@+EZj;j;8yAg;&u`s#ZzS@> z$ovOK^j25VDW@~wYt}oK{hjo34t}oN|<+}c?uD_t`>vjDVU4LEI-`4dV zy1q}>t9AW^uAkBMuXO!8U2o_-k!58!5X~-gp2@JXDE^8pE2n|TQT3?kq&xI94gGY( z<)&eTZn(}gl<01MA+;X2g`MK7cX`)|W5`QzVpmk$;c!yBUO4LU9 zv{62-gla!X^nA|ObB(X(2A}q-PuuF#-Z5IdOMC0_k_^OM`Wu|68Ikg-;hX3itm zUIyG|z`f<=%*9{^d>?>&y`Tj2Lk4;naK`~>p9bKU06Y)41_j|W+JrREj3)D!S+oLR zmLD|9yUWxOa6JH5P!P}PZ1s!SX-^GIhTK$$G-FRurL7{(gv_DVph07IK`k9#gJ;>oMh;{6QjJdvPt@CecL0#TEd}09<>(b!A*) z7sw3z0B|4!bwcjU3F}k zyIjqak~<5FJ?2t#3cAa0jKUd1CG&aOGZyz*&3#sBpG`rZYU+DT$H9HJ4i;i-Dz7bH=~EWl zK$_X=T-yk^t$=&i2H;Kr9spbo;67noB7d2EEdak^pm%020xoS=_>4B+Mdv4MO4|Z3 zm$Wdh3*dSMIGw-DegFW620)d+Vp(X-w3K(!Y;O3;@-0@`=3jlau z3Q*=RxrYJwYrrj2oXVePzXE{If&te6ZhcCQ#+O;V3c%M>f{J?wa616E-*7U2o_#d{ zKQ>?r?hN3*4&iK>{dWLtv^)I#HX|+U7`6diPLi_&*>?tD&mJ{ECBW%eZ^y0^k~c5T0OD z((JJF+Zuq`q=j*v0C!oCQ~ArC-w%L8f?(pri~!syz?Hb1o`1gf696~~4ESTf%}T|| z@n!aR1MnBAK+Qb}xW@qZq~_fGdG>z*;2*(&&jYS9HD|lozYM_5sX>=}3vllPZf}C4 z{CW0=0eCzC2D#IK`!bA^_y2hSHrNw>ew&aMb_`nqF3ZE&Jo}CS?BM}9R{*%d;hY^S z0^qgbVC+V~{Qz*c`8fLiuWwR!L)`(unLg0Zl>zQvz&&6C@KFFh0l23Cw~BH4{!^FG zUjev|f!e(K$XAb&H*mEH~jcE zCe1SQ&$GW2fSD51^Ut{sfa{)ubH|riDeQjW4s955S+N1QmBb;C=D{$|32>VL_aQ%bac=1aNiXoE`fHfc4>EEbTz})qM$RVZYXE>*Lt# zzjgrZ;sgEPetQFM0N}2$0eB?9E2nfd3(=^X&>1Ox5|Tulnj9babg zF#u~*fHHr{eI3fRsl4dnT8K84$vxAive7~J_^SN5*qlUje!130fvy+Vask&lB}d~& zD6(Dv?4J@;+)%)c1l(xD$^3a1V*xnPfGN1ifSVq|(d)l9m9qi3AOw`$BEUTixFt!> z4rITK#6fze@R@lBXctK<)}N>1+~_JHrl!=cZ&SJEaPl)#9Na`&c}OtBj>x4`56L;3 zt`B@JWfJvit^2gpr7UDD^GGwBTxw3sV*U9RDu>Em>LL3sroQHN3inyceaf}ZilEPG z;PW@`Q>T5JjS0l_2JqR&eWnmEKS%V7pwCg@bCUb)&_1VwKJ~ySy_(JQh#OQqKcbS& zb35uAHqTwTPo?&GFX%IY`nJ>S$JeWjv;vRjbhuH)GmJ_WPuChDMtb_{r|$lVk>>NM z&^~K}KFyB`F)GAoJZa-R+V4tKIJs1^a4z{!h|Zp_`l%aEKhoNJG-s~%SrYV_M}5sS zUusOKjL_FY(#)}tnp2~FE(Cp+0w0I8LhbGPj2)};nn@+gtBQ@OF*lxLYz$|M_NfZ` zoC7`)`kb3LXQyDCif0U!ES^m2>zxB{JbBz_mG;>b^eF^B!?{n(n^Zi#sbukt2R^0T zr(FB22>Q$iJ`1@|o%U&Vb0D4y;Nx(gDa1$R^+Tm?W>W377pdrOB1@GG2NR4|tpfy+zG#a1rMRS}UW7(-(i(n zGMHhr++bdIo|xqZv&9)sPoz?zllwKBlvX*{gaz@Uw+RABIHJ7$|S!`lma&o(}?K_z?vzxd!9dNS&x4_Hs z-)b)c;KN>!1-b-q%K&FD2jH^+d;xIl0r!fZ^Z!=+bpXEY2Yt894#4dLTy-5?bLL?2 z^*sT=Gho240QVhf_v_>9j+dh=^6I+pY%-W`w7$;RGIg!Yq;jbDUKL^)^)(w)_BB_6 z^jSfg`T0U>@hxT6f1t&$!*;7D6~)`>n}AtV z^)2{f??_@51|%i-n?R#Jk;HZ&%~?q}xoix&3GW zdgYSyK_HgvfJ+H;nL{|O^kYGn7;u@zT&k7J`Jl@~z~wRKQnJU5Wd;>&cK-xio@Xwb zmCK=^%NF4B7IVqp>&8+{1&iefa5>IgRw|c`L6-}_r9r-bzqHur#?p%l7E3nu47;T| zG8bF9EDyR20WL+%rB=B#-5-c$0&uyFxlATp-Y-FyyMfES%w@ZBITdty61Y6YT#633 zv6NE5X15Z!#F@)F<+3g4@;-3c!(8$Xy0KhA1&if0aQT9{ELARRf-X%8!uQLiq1nbb4vmdax;waTSwbs&~P;4+-KOeS33FF}{_z@?PAY*#L)f-duc%R=T-RO7}{ zN(GzU3gF@}mvzczThQf2;PMi4$vf)Cas?GEmiK_mZsxL7xvUAgdEM_kGAGxs?6da!ieav12gXp%BoDQf;4kok>+eCBl0^% z1)IuB>S^Av<1U*?lkXD9hjc0W*mWtTg1OWImwM*1PPuFgx(pahZ=kB-67P1(s?2B< zX&Ff^p7)7W6ro?~9HRENx_z)NWg(e5(#$My?Hkg}A>>*;Y36TUaV=*^L}cl4hB${$ zT8l;taT7I~iSo>h8^koyOb}eVi!>7iY4K-2wZ3Q+5pk!^nw1{Xhi&eS= zm+h6`_K#ts<7EyaNd$D1s#Ts1}g)f6ke?cjkZY{Kii_cg}yl-}C>U zIWx)JTvEQSbNRZ?8|pV|^S73pCRjp)1y2>{FD}lv=qruB>d{yIcyWG%V>M~76fe%niN$kr(%;_e2vM0UL^>(u zmZlr^e>u!)irHQtkDUkHmw>w*D*q04^^VfZf7iyzYzi{_VUB z#w{DxvQSRZIQsfjzF?c|8bWjS=bU69Uf#rhwjR~ot9^8tMHGuFa|qyW1Kg+}$LD-3 z0Ly})NN%#a`zaQc=))9?S~$);04@aJlYn~$a1~)LS--5p1>h=*RnswYXK5Z~tj;e~Guh+}mH_?Z52pzv}I8^!7J- z`|o=D?|b`uz5T=9ewDX>*4w}6?SJF#fA8(rcb8?_S@mK~ZggL2ZD&&c6`6K+y;!#1 zPm6W*4(Q=`^!7Ri`W?ky#|Xcp)a$s%@0g%E(qa#}W3ts8RcG1RG}KjU(qbQ|-n7_0 z_f(dOj?R|d)oM2__L@%F#<_OGe^SS;3q){1Lo+pS}E zLP{4RrcNsTkJdwM0LAj1d!k(>~Ph4I#%?B13mUg(=lxv{?j^mQXv zQ_N49$NosM8|BTGHXhs8FWPy8Vo9g}J&Pokm^Znag3Xmuh$dp%eD9@-T?$Bf?7M)J z$3#&w86Hb_DClRygBbv94Y+oI>%zE1{j&O=0PM@a;LHpL+z$a)QbhMHx*w{ISAQ1( z?*#)+2HZ4*%hH3(>gO=ft?X)N4f@A)FF$!B7s1ojRD@%T19BO23%k*GYidVP%RDaz z#^Rne+_T#AY%x7mbnIy_LGIb!Ux@83bWr8fth>%9pIVmBJ5z=D;FjdEo>JBP%&S7Y zlbejW<(_9HwN7{r*6mBK_3K1IXzpI8n7`C{Y%}1t1MUL{fcpS=6mZpm`;2jc>qm$h z0DjBB;0#{_Tx@^zj5gg**H6@xwgO-d#iF>*fXg#DuYP%L^a0=?1Jw0P?iRp}1l$A>dm3=R1l)4X>H2x~D*^a27;r7%Hm2lg zd|AcY0DLzksJWeh+Y7iOJ}2wv)mH)VQy)yhT?E|UBREG^|2+U39EiStn@}w3GQ1ve z*-6eZs_z8A9!b#PZUWrENRH-z7yw5^ftCoY1$}R{{9HVKBsP0^Byhy?=ntzyAXqzYO;P@GuzgB;d|+PG0|V zlb7Ka0Q`o7iqhOwz}5dKy1>R1bE2-_mH^D6SQOV0a5tKqu3uK)8-N2$P}MKFV!#at zT&d!``RC_;8~`VP0Ure1%v78lUsmx503S~UdfZchdk%2Vdz`ADSO04O{ss*A3g9-R z<{VZ1TL9de8dThSfZGkYLkW)R=hdG8;F$zyau)#ibrdJ({|W%>9gMzy8&NFkGHe03 z%mC-`>N^0idjRBIA>jH)bB-7az#m0};!eQ*7;yK6I4As!_W%HAgupO2A8?NW?q?1F zp9SDDz`X#t)r?cuKdnJ^IsFlU>lr8+xyhSX9B}Ud?ym;}@1O7m^)~<>1OrwA?h}La z>X%iV2jEu*C~Mc%Uj|&-q3FxEA;oNe{(1Gy0oX=@dVJ&N)gEx&QgCW~S$zQji&B7o z^*;dIZGgK&bGm+B{a6701PpjT;HIbKXna}yJOKVQC8)V40rv~QRrs8&pI84s09@sR zDY!oX?zIR`J^%e50RJ2T%31ph;64Q0M@i0n{yPr9(@D^nwa)?fWh6)Q{|^9Khoi4w zn_^LyVKczp5ajstUoHT<20`}x*9&m{0Ot$=;H>~01-QEbR~F{N&wo<@_;45uJ^#%G z+(N*WAExskbq=2a;8HN43%Hj!C$E3G$;;{Y0Q?gN6{Wd10k;Kk|4*^RXAbyHXcqtv zfB}yI?qieF^~>td0q~Lus`@4O9pJ=~=*u^qVmAH!p*CK91^`a9vVya(r1u zPXP8!1$x|I!2J+#B_5~h=hfc@zgUz} z3V<&rK$BYoxOGvSoc}ifxH$?WZU^8#0NnlnXFUHM1>mUw$Y<>{z|}@`j`$XUbsDce4Y)TL5@F;Kl&%Ul^yZe_BiGa+(Cd ze`TO#669dK_0ZoB0C z`RA9@P5|x$10DffbqY?6FRT9)fHf&Vzxuxe?plD$kbt+z@fsXcm#?m$2b)sRzkYe_ zdJQTSkL3WaQ%a7;m)Yb2@TQcY<^}<77~n?woUET$F&cp5eJ}+#5pYu@IQ9HD3xEqE zKsjrR0QWTDmLxgHsD3#G`;lC3d}eln*folk$gEOuBP)fNk}`I?5Nl5)KQqM#+(NN( zr8JWnd@|W5Id{wL^tqIu4)YFI>uLfW)6(l`Cc?3~6!RCkjJeH9=<_Yq=2Oc&i|JVZ zIfZ+ca!AuENIyUp`dnx4zRW6|f_f;GE^V{|^FsAc)Ip<{z{5X>i+dscg%EvBakc!qFK zv%7RY`P8y}#sW_n_mq2{m8NGN@GRt>TF=wuZX=%x;BmQU67h2VJWj0>UTd$>vA+(i zk>otTv3tZP$#c*`ysbLPz$f4$AhBf5=I{=ZxR;h2QhF z-*YvgnKR4Is!t!su5o`b({4ka7Vg|xb|!UYCAvEJT{kAW3jMADiLRl3*YHHwoqpH2 zMAv5lHaWRn5>u;B z(L{>*D~ZRZ0&W)I76dsOKe5TPxd?zy2f+lT6I}wh<$!Zm0Ptl1z6!XFfZG)2lJ(2# z-v!|NVK7m@IHeA|5cuW3~2q@QfZc*1OSBi@iU8*f0pM)_90jC~{<{VlM(!Yo_0<+y3t1}yI}OTi(PO9?eBmy^J9hFMl=%VyJZ6PVU^!|TP-mKCO@4ILS^>T;Q-Mq3(J8Mzbz%MfOnNVvSen3l1?QpPNMwB@{M znFlNjnPq6T%B74NHoFzT;xfy6ZP{g7UIUglnI-p>%H?KiSS}v|%K>Itsx50x%jdvy ziCOBjCHrF|7yG8@^^!rc;9Y7q;qv}sTDk&DPiCpomMf;^R$wV%meSKIm+927*_{F` z)0kzewj4Jt<-oF-SqeT;xs*`Da(M|@)-cN|ZP`rCZQ&=WEx@uPYzaJ_S#I_j`s*f^ z*ze9gL+`d(;+Wf(URahpTL;dmeG1h2M||h^)Ty3yS{r>VvDWQy#%|Tg5*uk}uzc>L z&3{squPyrTVqZ%vQ3uihrDxU1Tih{c?M$*<>t~5cGI&GYgd$7aBq7@R3Hh9s_l zn1A!4n7fBGR(JP2H3P#(ZlELmU-fazR*E(EtkN>{Q)MZmhFNNXrH)zFYs)Uv(x<;A zu1}8Vz0&U}45wJ@WGtThnLX5U^2BlK_upgguios?2U#Ld)Kbi!1s?mBV*Vw`V|5hs z|0Gv9CPelCOZaa|4{%SMvlorb6L(RkKT!i&68BTgPlCrDrkI}u#o{l2ZhzIlvf^&7 RJu^M>54pv2zOz4R`%i#8Cbj?o diff --git a/General/PopUpPaqueteriasGuias.aspx b/General/PopUpPaqueteriasGuias.aspx index afa0f5773..2a677b59d 100644 --- a/General/PopUpPaqueteriasGuias.aspx +++ b/General/PopUpPaqueteriasGuias.aspx @@ -15,7 +15,7 @@ - Paqueterías Guías + <%--Paqueterías Guías--%>Entrega Local @@ -30,7 +30,7 @@ - + "); StrMail.Append(" "); StrMail.Append("
Guías Vinculadas<%--Guías Vinculadas--%> Entrega Local
diff --git a/Inicio.aspx b/Inicio.aspx index 6ccfe6a7b..603783288 100644 --- a/Inicio.aspx +++ b/Inicio.aspx @@ -3,6 +3,11 @@ + Convocatoria - -
  • Actualizar Participantes
  • + +
  • + Actualizar Participantes
  • @@ -141,10 +143,10 @@ - +
    -
    +
    @@ -159,7 +161,7 @@
    - +
    @@ -189,6 +191,12 @@
    + +
    + + + +
    <%----%> @@ -214,13 +222,13 @@
    -
    + +
    Guardar Enviar Minuta @@ -730,15 +733,73 @@
    + + - + diff --git a/OI/TareaDetalle.aspx b/OI/TareaDetalle.aspx index 117bb5418..49dd5cb8c 100644 --- a/OI/TareaDetalle.aspx +++ b/OI/TareaDetalle.aspx @@ -149,7 +149,7 @@
  • Cambiar Estatus
  • - Agregar Comentario
  • + Agregar bitácora
  • Agregar Tema
  • @@ -245,19 +245,20 @@
  • -
    +
    - - - + + + Prioridad:
    +
    @@ -282,10 +283,10 @@ CheckList
    - +
    -
    "); - StrMail.Append("
    "); + StrMail.Append("
    "); StrMail.Append(""); StrMail.Append("
    "); StrMail.Append(" @Asunto@"); @@ -1633,7 +1629,7 @@ public partial class OI_TareaDetalle : ClsPaginas StrMail.Append("
    "); StrMail.Append("
    "); StrMail.Append("
    "); - StrMail.Append(" "); + StrMail.Append("
    "); StrMail.Append(" "); StrMail.Append(" "); StrMail.Append("
    Inicia:"); @@ -1651,6 +1647,7 @@ public partial class OI_TareaDetalle : ClsPaginas StrMail.Append(" "); StrMail.Append(" "); StrMail.Append(" "); + StrMail.Append(""); return StrMail.ToString().Replace("@Folio@", Folio.ToString()).Replace("@Link@", Link).Replace("@Asunto@", Asunto).Replace("@Descripcion@", Descripcion) .Replace("@Fechai@", Fechai).Replace("@Fechaihora@", Fechaihora).Replace("@Fechaf@", Fechaf).Replace("@Fechafhora@", Fechafhora) .Replace("@Prioridad@", Prioridad.ToUpper()).Replace("@Tema@", Tema).Replace("@UsuarioDeAbr@", UsuarioDeAbr) @@ -2058,6 +2055,41 @@ public partial class OI_TareaDetalle : ClsPaginas protected void LnkUpRelacion_Click(object sender, EventArgs e) { - Alert("ocurrio un error al actualizar lla relación "); + int TipoVinculo = DdlViculos.SelectedValue.ToEntero(); + if (TipoVinculo > 0) + { + int cveRelacion = -1; + switch (TipoVinculo) + { + case (int)OITipoEventosRelacion.Cliente: + cveRelacion = DdlCliente.SelectedValue.ToEntero(); + break; + case (int)OITipoEventosRelacion.Proveedor: + cveRelacion = DdlProveedores.SelectedValue.ToEntero(); + break; + case (int)OITipoEventosRelacion.Personal: + cveRelacion = DdlPersonal.SelectedValue.ToEntero(); + break; + + default: + break; + } + + using (ClsOIEventos ev = new ClsOIEventos()) + { + if (ev.UPEventosVinculo(RCveEvento, TipoVinculo, cveRelacion, UsuarioActual.CveEmpresa, UsuarioActual.CveUsuario)) + { + LoadTarea(); + Alert("la relacion se ha actualizado correctamente", ModExtensiones.TipoMensaje.ToastInformacion); + RegistraScript(string.Format("$('#{0}').modal('hide');", idUpVinculo)); + UpContenido.Update(); + } + } + + } + else + { + Alert("Debe seleccionar el tipo de vinculo", ModExtensiones.TipoMensaje.MsgAdvertencia); + } } } diff --git a/OI/UnoaUno.aspx b/OI/UnoaUno.aspx index 084ef99db..c841d4ac4 100644 --- a/OI/UnoaUno.aspx +++ b/OI/UnoaUno.aspx @@ -20,9 +20,24 @@ } .lnkUsergray { - color:#999b9b; + color: #999b9b; font-size: 11px; } + + .unoaunoold { + color: #999b9b; + font-size: 11px; + } + + .tituloFecha { + font-weight: 600; + font-size: 16px; + } + + .msgAyuda { + color: cadetblue; + font-size: 10px; + } @@ -66,14 +81,19 @@ -
    +
    - + + + + + +
    - +
    @@ -96,12 +116,17 @@
    -
    - +
    + + + + + + - + @@ -156,9 +181,13 @@

    -

    + +
    + + +
    @@ -166,7 +195,7 @@

    - Guardar + Guardar
    @@ -188,7 +217,7 @@
    -
    -
    -
    - - Pregunta: - - -
    -
    -
    -
    - - Vinculo: -
    -
    +
    + + Pregunta: + +
    -
    +
    Si las preguntas que vas a hacer no se encuentran en el listado, agrégalas.
    +
    + + Vinculo: +
    +
    Le recordará al usuario la respuesta del día anterior a la pegunta seleccionada (Ej. Si nuestro día actual es Viernes, recordará lo que se respondió en su pregunta el día jueves)
    +
    +
    Guardar Cancelar
    @@ -265,6 +291,7 @@
    Cuestionario +
    Selecciona un cuestionario existente, o bien, genera uno nuevo
    @@ -274,6 +301,8 @@
    <%----%> +
    +
    Cuestionario: @@ -412,32 +441,61 @@
    - +
    - +
    diff --git a/UserControl/TareaNueva.ascx.cs b/UserControl/TareaNueva.ascx.cs index eabbd1f5c..09fc26433 100644 --- a/UserControl/TareaNueva.ascx.cs +++ b/UserControl/TareaNueva.ascx.cs @@ -249,7 +249,7 @@ public partial class UserControl_TareaNueva : System.Web.UI.UserControl ruta = string.Format("{0}{1}", ruta, archivoname);//, ArchivoExtencion); System.IO.File.Move(rutaarchivoOri, ruta); } - this.Alert("Se ha agregadó la nueva tarea", ModExtensiones.TipoMensaje.ToastInformacion); + this.Alert("Se ha agregado la nueva tarea", ModExtensiones.TipoMensaje.ToastInformacion); TxtAsunto.Text = ""; TxtDescripcion.Text = ""; @@ -307,7 +307,7 @@ public partial class UserControl_TareaNueva : System.Web.UI.UserControl { if (objoi.AddRevisionesEventos(TxtTema.Text.Trim(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)) { - this.Alert(string.Format("El Tema \"{0}\" fue agregada con éxito.", TxtTema.Text.Trim()), ModExtensiones.TipoMensaje.MsgInformacion); + this.Alert(string.Format("El Tema \"{0}\" fue agregado con éxito.", TxtTema.Text.Trim()), ModExtensiones.TipoMensaje.MsgInformacion); this.RegistraScript(string.Format("$('#{0}').modal('hide')", iddivAgregarTema)); if (Ismodal) diff --git a/vwd.webinfo b/vwd.webinfo index 8dd65e0da..7db700c64 100644 --- a/vwd.webinfo +++ b/vwd.webinfo @@ -60,6 +60,8 @@ + +