Merge branch 'master' of http://192.168.10.111:8383/SIG

App_Code/ClsClasificaciones.vb

@@ -346,6 +346,8 @@ Public Class ClsClasificaciones
         Catch Ex1 As SqlException
             If Ex1.Message.Contains("Número: 2627;") Then
                 Alert("Ya existe una clasificación con el mismo nombre: " & Clasificacion & ".", TipoMensaje.MsgAdvertencia)
+            ElseIf Ex1.Message.Contains("TR_ClasificacionesUpCuenta") Then
+                Alert("No se puede registrar una prepóliza en un periodo cerrado. " & Clasificacion & ".", TipoMensaje.MsgAdvertencia)
             Else
                 Me.OnError("Ocurrió un error al guardar los cambios en la Clasificación", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
             End If

App_Code/ClsContabilidad.vb

@@ -3861,6 +3861,7 @@ Public Class ClsContabilidad
         Return Retorno
     End Function
 
+
     Public Function GetAnexoCatalogo(IdCuenta As Integer, FechaI As Date, FechaF As Date, OpcionCuentas As Integer, CveSubProyecto As String, CveEmpresa As Integer, Optional TipoMovtos As Integer = -1, Optional SAT As Integer = 0) As Boolean
         Dim Retorno = False
 
@@ -6365,8 +6366,10 @@ Public Class ClsContabilidad
 
         Return Retorno
     End Function
-    Public Function UpdatePeriodosBloqueo(CveEmpresa As Integer, Ejercicio As Integer, Mes1 As Integer, Mes2 As Integer, Mes3 As Integer, Mes4 As Integer, Mes5 As Integer, Mes6 As Integer, Mes7 As Integer, Mes8 As Integer, Mes9 As Integer, Mes10 As Integer, Mes11 As Integer, Mes12 As Integer, CveUsuario As Integer) As Boolean
-        Dim Retorno = False
+    Public Function UpdatePeriodosBloqueo(CveEmpresa As Integer, Ejercicio As Integer, Mes1 As Boolean, Mes2 As Boolean, Mes3 As Boolean, Mes4 As Boolean, Mes5 As Boolean,
+                                          Mes6 As Boolean, Mes7 As Boolean, Mes8 As Boolean, Mes9 As Boolean, Mes10 As Boolean, Mes11 As Boolean, Mes12 As Boolean,
+                                          CveUsuario As Integer) As String
+        Dim Retorno = ""
 
         DataAdapter("PA_Conta_EmpresasBloqueoMesesUpdate")
         With SqlAdapter.SelectCommand.Parameters
@@ -6385,16 +6388,19 @@ Public Class ClsContabilidad
             .Add("@Mes11", SqlDbType.Bit).Value = Mes11
             .Add("@Mes12", SqlDbType.Bit).Value = Mes12
             .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
+            .Add("@MensajeError", SqlDbType.VarChar, 500).Direction = ParameterDirection.Output
         End With
 
         Try
             SqlAdapter.Fill(Data)
-            Retorno = True
+            Retorno = SqlAdapter.SelectCommand.Parameters("@MensajeError").Value.ToString
         Catch ex As Exception
             Me.OnError("Ocurrió un error al actualizar el Periodo de Bloqueo.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+            Retorno = ""
         End Try
 
         Return Retorno
+
     End Function
     Public Function RemovePeriodosBloqueo(CveEmpresa As Integer, Ejercicio As Integer) As Boolean
         Dim Retorno = False

App_Code/ClsOIEventos.vb

@@ -184,9 +184,9 @@ Public Class ClsOIEventos
 
 #Region "oieventos2.0"
 
-    Public Function GetOI_Eventos2(cveEvento As Int32, CveEmpresa As Integer) As Boolean
+    Public Function GetEventos2(cveEvento As Int32, CveEmpresa As Integer) As Boolean
         Dim retorno As Boolean = False
-        DataAdapter("PA_GetOI_Eventos2", CommandType.StoredProcedure)
+        DataAdapter("PA_OI_Eventos2Get", CommandType.StoredProcedure)
         With SqlAdapter.SelectCommand.Parameters
             .Add("@CveEvento", SqlDbType.Int).Value = cveEvento
             .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
@@ -205,7 +205,7 @@ Public Class ClsOIEventos
     Public Function AddOI_Eventos2(cveTipoEvento As OITipoEventos, asunto As String, descripcion As String, prioridad As Int32, cveUsuarioDe As Int32, cveUsuarioPara As Int32,
                                    fechaInicio As String, fechaFin As String, cveRevision As Int32, archivo As String, cveUsuarioIng As Int32, cveEmpresa As Int32) As Boolean
         Dim retorno As Boolean = False
-        DataAdapter("PA_AddOI_Eventos2", CommandType.StoredProcedure)
+        DataAdapter("PA_OI_Eventos2Add", CommandType.StoredProcedure)
         With SqlAdapter.SelectCommand.Parameters
             .Add("@CveEvento", SqlDbType.Int).Direction = ParameterDirection.Output
             .Add("@Folio", SqlDbType.Int).Direction = ParameterDirection.Output

App_Code/ClsPaginas.vb

@@ -34,6 +34,18 @@ Public Class ClsPaginas
 
     Public Shared Property EmpresaNotificaciones() As Empresa
 
+
+
+    Public ReadOnly Property EsProduccion As Boolean
+        Get
+            If IsNothing(System.Configuration.ConfigurationManager.AppSettings("EsProduccion")) Then
+                Return False
+            Else
+                Return (System.Configuration.ConfigurationManager.AppSettings("EsProduccion").ToString() = "1")
+            End If
+        End Get
+    End Property
+
 #Region "Propiedades"
 
     Public Shared ReadOnly Property UrlSitio As String
@@ -3978,6 +3990,7 @@ Public Class ClsPaginas
             PaginaDict.Add("/Ventas/RepTopClientesVentas.aspx".ToUpper(), 755)
             PaginaDict.Add("/OI/Circular.aspx".ToUpper(), 756)
             PaginaDict.Add("/OI/CircularDetalle.aspx".ToUpper(), 757)
+            PaginaDict.Add("/OI/CircularDetalleB.aspx".ToUpper(), 757)
 
 #End Region
 
@@ -5147,80 +5160,111 @@ Public Class ClsPaginas
         'limpio ReportViwer   
         Dim sw As New System.Diagnostics.Stopwatch()
         sw.Start()
-        Dim bdir As String = AppDomain.CurrentDomain.BaseDirectory
-        RutaReporte.Replace("/", "\")
-        If Not RutaReporte.ToUpper().StartsWith(bdir.ToUpper()) Then
-            RutaReporte = String.Format("{0}{1}", bdir, RutaReporte)
-        End If
-        Dim CveUsuario As Integer = 0
-        Dim CveEmpresa As Integer = 0
-        If Context.Session("UsuarioSIG") IsNot Nothing Then
-            CveUsuario = UsuarioActual.CveUsuario
-            CveEmpresa = UsuarioActual.CveEmpresa
-
-        End If
         Dim Bytes As Byte() = Nothing
-        Dim wsreport As New WSRDLC.WebServiceSoapClient
-        Dim params As New List(Of WSRDLC.ReportParameter)
-        Dim ds As New DataSet
-        For Each rpds As ReportDataSource In DataSource
-            Dim dt As DataTable = DirectCast(rpds.Value, Data.DataTable)
-            If dt Is Nothing Then
-                dt = New DataTable()
-            Else
-                dt = dt.Copy()
+        If EsProduccion Then
+
+            Dim bdir As String = AppDomain.CurrentDomain.BaseDirectory
+            RutaReporte.Replace("/", "\")
+            If Not RutaReporte.ToUpper().StartsWith(bdir.ToUpper()) Then
+                RutaReporte = String.Format("{0}{1}", bdir, RutaReporte)
             End If
-            dt.TableName = rpds.Name
-            ds.Tables.Add(dt)
-        Next
-        For Each rpds As ReportParameter In Parametros
-            Dim param As New WSRDLC.ReportParameter
-            param.Name = rpds.Name
-            param.Values = {rpds.Values(0)}
-            params.Add(param)
-        Next
-        Bytes = wsreport.StreamPDFBytes(RutaReporte, ds, params.ToArray(), NombreArchivo, Formato, CveEmpresa, CveUsuario)
-        'Dim ruta = wsreport.StreamPDF(RutaReporte, ds, params.ToArray(), NombreArchivo, Formato, CveEmpresa, CveUsuario)
-        'If File.Exists(ruta) Then
-        '    Bytes = File.ReadAllBytes(ruta)
-        '    File.Delete(ruta)
-        'End If
-        'Dim setup As AppDomainSetup = New AppDomainSetup
-        'With setup
-        '    .ApplicationBase = Environment.CurrentDirectory
-        '    .LoaderOptimization = LoaderOptimization.MultiDomainHost
-        'End With
-        'setup.SetCompatibilitySwitches({"NetFx40_LegacySecurityPolicy"})
-        'Dim _casPolicyEnabledDomain As AppDomain = AppDomain.CreateDomain("Full Trust", Nothing, setup)
-        'Dim fllreport As ADSReportLib.FullTrustReportviewer = Nothing
-        'Try
+            Dim CveUsuario As Integer = 0
+            Dim CveEmpresa As Integer = 0
+            If Context.Session("UsuarioSIG") IsNot Nothing Then
+                CveUsuario = UsuarioActual.CveUsuario
+                CveEmpresa = UsuarioActual.CveEmpresa
+            End If
+            Dim wsreport As New WSRDLC.WebServiceSoapClient
+            Dim params As New List(Of WSRDLC.ReportParameter)
+            Dim ds As New DataSet
+            For Each rpds As ReportDataSource In DataSource
+                Dim dt As DataTable = DirectCast(rpds.Value, Data.DataTable)
+                If dt Is Nothing Then
+                    dt = New DataTable()
+                Else
+                    dt = dt.Copy()
+                End If
+                dt.TableName = rpds.Name
+                ds.Tables.Add(dt)
+            Next
+            For Each rpds As ReportParameter In Parametros
+                Dim param As New WSRDLC.ReportParameter
+                param.Name = rpds.Name
+                param.Values = {rpds.Values(0)}
+                params.Add(param)
+            Next
+            Bytes = wsreport.StreamPDFBytes(RutaReporte, ds, params.ToArray(), NombreArchivo, Formato, CveEmpresa, CveUsuario)
+        Else
+            If IsNothing(MR) Then MR = New ReportViewer
+            Try
+                ' MasterReporteador.LocalReport.DataSources.Clear()
+                For Each RDS As ReportDataSource In DataSource
+                    MR.LocalReport.DataSources.Add(RDS)
+                Next
 
-        '    fllreport = CType(_casPolicyEnabledDomain.CreateInstanceFromAndUnwrap(GetType(ADSReportLib.FullTrustReportviewer).Assembly.CodeBase, GetType(ADSReportLib.FullTrustReportviewer).FullName), ADSReportLib.FullTrustReportviewer)
+                MR.LocalReport.ReportPath = RutaReporte
+                MR.ProcessingMode = ProcessingMode.Local
+                MR.LocalReport.EnableExternalImages = True
+                MR.LocalReport.SetParameters(Parametros)
+                MR.LocalReport.Refresh()
+                Dim Warnings As Warning() = Nothing
+                Dim StreamIds As String() = Nothing
+                Dim MimeType As String = Nothing
+                Dim Encoding As String = Nothing
+                Dim Extension As String = Nothing
+                Bytes = MR.LocalReport.Render(Formato, Nothing, MimeType, Encoding, Extension, StreamIds, Warnings)
+            Catch ex As Microsoft.Reporting.WebForms.ScriptManagerNotFoundException
+                GuardaLog($"Error: { If(ex.InnerException.Message IsNot Nothing, ex.InnerException.Message, ex.Message) }  | Descripcion: {If(ex.InnerException IsNot Nothing AndAlso ex.InnerException.InnerException IsNot Nothing AndAlso ex.InnerException.InnerException.Message IsNot Nothing, ex.InnerException.InnerException.Message, If(ex.InnerException IsNot Nothing AndAlso ex.InnerException.Message IsNot Nothing, ex.InnerException.Message, "Sin descripcion"))} - Ruta {RutaReporte}")
+                'HAY QUE VALIDAR QUE LOS OBJETOS QUE SE USAN PARA GUARDAR LOG EXISTEN!!! IPP 14 AGOSTO 2017
+                'GuardaLog($"Error: {ex.InnerException.Message} | Descripcion: {If(ex.InnerException.InnerException IsNot Nothing, ex.InnerException.InnerException.Message, "Sin descripcion")} - Ruta {RutaReporte}")
+            Catch ex As Exception
+                GuardaLog($"Error: { If(ex.InnerException.Message IsNot Nothing, ex.InnerException.Message, ex.Message) }  | Descripcion: {If(ex.InnerException IsNot Nothing AndAlso ex.InnerException.InnerException IsNot Nothing AndAlso ex.InnerException.InnerException.Message IsNot Nothing, ex.InnerException.InnerException.Message, If(ex.InnerException IsNot Nothing AndAlso ex.InnerException.Message IsNot Nothing, ex.InnerException.Message, "Sin descripcion"))} - Ruta {RutaReporte}")
+                'HAY QUE VALIDAR QUE LOS OBJETOS QUE SE USAN PARA GUARDAR LOG EXISTEN!!! IPP 14 AGOSTO 2017
+                'GuardaLog($"Error {ex.InnerException.Message} | Descripcion: {If(ex.InnerException.InnerException IsNot Nothing, ex.InnerException.InnerException.Message, "Sin descripcion")} - Ruta {RutaReporte}")
+            End Try
+            MR.Dispose()
+            'Dim ruta = wsreport.StreamPDF(RutaReporte, ds, params.ToArray(), NombreArchivo, Formato, CveEmpresa, CveUsuario)
+            'If File.Exists(ruta) Then
+            '    Bytes = File.ReadAllBytes(ruta)
+            '    File.Delete(ruta)
+            'End If
+            'Dim setup As AppDomainSetup = New AppDomainSetup
+            'With setup
+            '    .ApplicationBase = Environment.CurrentDirectory
+            '    .LoaderOptimization = LoaderOptimization.MultiDomainHost
+            'End With
+            'setup.SetCompatibilitySwitches({"NetFx40_LegacySecurityPolicy"})
+            'Dim _casPolicyEnabledDomain As AppDomain = AppDomain.CreateDomain("Full Trust", Nothing, setup)
+            'Dim fllreport As ADSReportLib.FullTrustReportviewer = Nothing
+            'Try
 
-        '    fllreport.Initialize("DisplayName", RutaReporte, Parametros.AsEnumerable(), New List(Of String()), True)
-        '    For Each RDS As ReportDataSource In DataSource
-        '        fllreport.AddDataSources(RDS.Name, DirectCast(RDS.Value, DataTable))
-        '    Next
-        '    Dim Warnings As Warning() = Nothing
-        '    Dim StreamIds As String() = Nothing
-        '    Dim MimeType As String = Nothing
-        '    Dim Encoding As String = Nothing
-        '    Dim Extension As String = Nothing
-        '    Bytes = fllreport.Render(Formato, Nothing, MimeType, Encoding, Extension, StreamIds)
-        '    fllreport = Nothing
-        'Catch ex As Microsoft.Reporting.WebForms.ScriptManagerNotFoundException
-        '    GuardaLog($"Error: { If(ex.InnerException.Message IsNot Nothing, ex.InnerException.Message, ex.Message) }  | Descripcion: {If(ex.InnerException IsNot Nothing AndAlso ex.InnerException.InnerException IsNot Nothing AndAlso ex.InnerException.InnerException.Message IsNot Nothing, ex.InnerException.InnerException.Message, If(ex.InnerException IsNot Nothing AndAlso ex.InnerException.Message IsNot Nothing, ex.InnerException.Message, "Sin descripcion"))} - Ruta {RutaReporte}")
-        '    'HAY QUE VALIDAR QUE LOS OBJETOS QUE SE USAN PARA GUARDAR LOG EXISTEN!!! IPP 14 AGOSTO 2017
-        '    'GuardaLog($"Error: {ex.InnerException.Message} | Descripcion: {If(ex.InnerException.InnerException IsNot Nothing, ex.InnerException.InnerException.Message, "Sin descripcion")} - Ruta {RutaReporte}")
-        'Catch ex As Exception
-        '    GuardaLog($"Error: { If(ex.InnerException.Message IsNot Nothing, ex.InnerException.Message, ex.Message) }  | Descripcion: {If(ex.InnerException IsNot Nothing AndAlso ex.InnerException.InnerException IsNot Nothing AndAlso ex.InnerException.InnerException.Message IsNot Nothing, ex.InnerException.InnerException.Message, If(ex.InnerException IsNot Nothing AndAlso ex.InnerException.Message IsNot Nothing, ex.InnerException.Message, "Sin descripcion"))} - Ruta {RutaReporte}")
-        '    'HAY QUE VALIDAR QUE LOS OBJETOS QUE SE USAN PARA GUARDAR LOG EXISTEN!!! IPP 14 AGOSTO 2017
-        '    'GuardaLog($"Error {ex.InnerException.Message} | Descripcion: {If(ex.InnerException.InnerException IsNot Nothing, ex.InnerException.InnerException.Message, "Sin descripcion")} - Ruta {RutaReporte}")
-        'Finally
-        '    AppDomain.Unload(_casPolicyEnabledDomain)
-        'End Try
-        'If fllreport IsNot Nothing Then fllreport.liberarecursos()
+            '    fllreport = CType(_casPolicyEnabledDomain.CreateInstanceFromAndUnwrap(GetType(ADSReportLib.FullTrustReportviewer).Assembly.CodeBase, GetType(ADSReportLib.FullTrustReportviewer).FullName), ADSReportLib.FullTrustReportviewer)
 
+            '    fllreport.Initialize("DisplayName", RutaReporte, Parametros.AsEnumerable(), New List(Of String()), True)
+            '    For Each RDS As ReportDataSource In DataSource
+            '        fllreport.AddDataSources(RDS.Name, DirectCast(RDS.Value, DataTable))
+            '    Next
+            '    Dim Warnings As Warning() = Nothing
+            '    Dim StreamIds As String() = Nothing
+            '    Dim MimeType As String = Nothing
+            '    Dim Encoding As String = Nothing
+            '    Dim Extension As String = Nothing
+            '    Bytes = fllreport.Render(Formato, Nothing, MimeType, Encoding, Extension, StreamIds)
+            '    fllreport = Nothing
+            'Catch ex As Microsoft.Reporting.WebForms.ScriptManagerNotFoundException
+            '    GuardaLog($"Error: { If(ex.InnerException.Message IsNot Nothing, ex.InnerException.Message, ex.Message) }  | Descripcion: {If(ex.InnerException IsNot Nothing AndAlso ex.InnerException.InnerException IsNot Nothing AndAlso ex.InnerException.InnerException.Message IsNot Nothing, ex.InnerException.InnerException.Message, If(ex.InnerException IsNot Nothing AndAlso ex.InnerException.Message IsNot Nothing, ex.InnerException.Message, "Sin descripcion"))} - Ruta {RutaReporte}")
+            '    'HAY QUE VALIDAR QUE LOS OBJETOS QUE SE USAN PARA GUARDAR LOG EXISTEN!!! IPP 14 AGOSTO 2017
+            '    'GuardaLog($"Error: {ex.InnerException.Message} | Descripcion: {If(ex.InnerException.InnerException IsNot Nothing, ex.InnerException.InnerException.Message, "Sin descripcion")} - Ruta {RutaReporte}")
+            'Catch ex As Exception
+            '    GuardaLog($"Error: { If(ex.InnerException.Message IsNot Nothing, ex.InnerException.Message, ex.Message) }  | Descripcion: {If(ex.InnerException IsNot Nothing AndAlso ex.InnerException.InnerException IsNot Nothing AndAlso ex.InnerException.InnerException.Message IsNot Nothing, ex.InnerException.InnerException.Message, If(ex.InnerException IsNot Nothing AndAlso ex.InnerException.Message IsNot Nothing, ex.InnerException.Message, "Sin descripcion"))} - Ruta {RutaReporte}")
+            '    'HAY QUE VALIDAR QUE LOS OBJETOS QUE SE USAN PARA GUARDAR LOG EXISTEN!!! IPP 14 AGOSTO 2017
+            '    'GuardaLog($"Error {ex.InnerException.Message} | Descripcion: {If(ex.InnerException.InnerException IsNot Nothing, ex.InnerException.InnerException.Message, "Sin descripcion")} - Ruta {RutaReporte}")
+            'Finally
+            '    AppDomain.Unload(_casPolicyEnabledDomain)
+            'End Try
+            'If fllreport IsNot Nothing Then fllreport.liberarecursos()
+
+        End If
         sw.Stop()
         If sw.Elapsed.TotalSeconds > 5 Then
             GuardaLog($"Reporte:{RutaReporte} | Tiempo Renderizado Milisegundos: {sw.ElapsedMilliseconds},Total Segundos: {sw.Elapsed.TotalSeconds}   ")

App_Code/Modelos.vb

@@ -3186,8 +3186,9 @@ Namespace Modelos
                     Next
                 End If
 
-                'Si es Facturacion de una remision cancelamos, traspasamos saldos y agregamos evento a la bitacora
-                If (DtRemisionesRelacionadas IsNot Nothing AndAlso DtRemisionesRelacionadas.Rows.Count > 0) OrElse ObjFactura.RemisionesLista.Count > 0 Then
+                'SI ES FACTURACION DE UNA REMISION CANCELAMOS, TRASPASAMOS SALDOS Y AGREGAMOS EVENTO A LA BITACORA
+                'NO DEBE ENTRAR SI SE ESTA CANCELANDO UNA FACTURA
+                If ValorMultiplicador <> -1 AndAlso (DtRemisionesRelacionadas IsNot Nothing AndAlso DtRemisionesRelacionadas.Rows.Count > 0) OrElse ObjFactura.RemisionesLista.Count > 0 Then
 
                     If Not ObjFactura.TipoDocto.Contiene("Ing", "Ant") Then
                         ErrorPrepoliza = True

CRM/CatEtapasProceso.aspx

@@ -22,6 +22,10 @@
                 <asp:LinkButton ID="LnkImprimirExcel" OnClick="LnkImprimirExcel_Click" runat="server"><i class="fa fa-file-excel-o"></i><span style="padding-left:5px;">Excel</span></asp:LinkButton>
             </li>
         </ContentTemplate>
+        <Triggers>
+            <asp:PostBackTrigger ControlID="LnkImprimir"/>
+            <asp:PostBackTrigger ControlID="LnkImprimirExcel"/>
+        </Triggers>
     </asp:UpdatePanel>
 </asp:Content>
 <asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server">

CRM/CatProbabilidadAcercamiento.aspx

@@ -22,6 +22,10 @@
                 <asp:LinkButton ID="LnkImprimirExcel" OnClick="LnkImprimirExcel_Click" runat="server"><i class="fa fa-file-excel-o"></i><span style="padding-left:5px;">Excel</span></asp:LinkButton>
             </li>
         </ContentTemplate>
+        <Triggers>
+            <asp:PostBackTrigger ControlID="LnkImprimir"/>
+            <asp:PostBackTrigger ControlID="LnkImprimirExcel"/>
+        </Triggers>
     </asp:UpdatePanel>
 </asp:Content>
 <asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server">

CRM/CatProbabilidadAcercamiento.aspx.cs

@@ -225,6 +225,6 @@ public partial class CRM_CatProbabilidadAcercamiento : ClsPaginas
         param.Add(new ReportParameter("UsuarioImprimio", UsuarioActual.Nombre));
         param.Add(new ReportParameter("FechaImpresion", DateTime.Today.ToString()));
 
-        ImprimirPDF("Empresas/Grales/Formatos/RepCatProbabilidadAcercamiento", TmpDT, param, "Report Cat Etapas Proceso", formato);
+        ImprimirPDF("Empresas/Grales/Formatos/RepCatProbabilidadAcercamiento.rdlc", TmpDT, param, "Report Cat Etapas Proceso", formato);
     }
 }

CRM/CatTipoProceso.aspx

@@ -15,7 +15,17 @@
             <li>
                 <asp:LinkButton ID="LnkAgregarTipoProceso" OnClick="LnkAgregarTipoProceso_Click" runat="server"><i class="fa fa-plus"></i><span style="padding-left:5px;">Agregar Tipo de Proceso</span></asp:LinkButton>
             </li>
+            <li>
+                <asp:LinkButton ID="LnkImprimir" OnClick="LnkImprimir_Click" runat="server"><i class="fa fa-file-pdf-o"></i><span style="padding-left:5px;">PDF</span></asp:LinkButton>
+            </li>
+            <li>
+                <asp:LinkButton ID="LnkImprimirExcel" OnClick="LnkImprimirExcel_Click" runat="server"><i class="fa fa-file-excel-o"></i><span style="padding-left:5px;">Excel</span></asp:LinkButton>
+            </li>
         </ContentTemplate>
+        <Triggers>
+            <asp:PostBackTrigger ControlID="LnkImprimir"/>
+            <asp:PostBackTrigger ControlID="LnkImprimirExcel"/>
+        </Triggers>
     </asp:UpdatePanel>
 </asp:Content>
 <asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server">

CRM/CatTipoProceso.aspx.cs

@@ -5,7 +5,7 @@ using System.Web;
 using System.Web.UI;
 using System.Web.UI.WebControls;
 using System.Data;
-
+using Microsoft.Reporting.WebForms;
 using Extensiones;
 
 public partial class CRM_CatTipoProceso : ClsPaginas
@@ -183,4 +183,36 @@ public partial class CRM_CatTipoProceso : ClsPaginas
     }
 
     #endregion
+
+    protected void LnkImprimir_Click(object sender, EventArgs e)
+    {
+        Imprimir("PDF");
+    }
+
+    protected void LnkImprimirExcel_Click(object sender, EventArgs e)
+    {
+        Imprimir("EXCEL");
+    }
+
+    public void Imprimir(string formato)
+    {
+        System.IO.FileInfo Image = new System.IO.FileInfo(String.Format("{0}/Logo.png", UsuarioActual.Empresa.Ruta));
+        string logouri = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa);
+
+        List<ReportParameter> param = new List<ReportParameter>();
+
+        param.Add(new ReportParameter("NombreEmpresa", UsuarioActual.Empresa.Empresa));
+        if (Image.Exists)
+        {
+            param.Add(new ReportParameter("LogoPath", logouri));
+        }
+        else
+        {
+            param.Add(new ReportParameter("LogoPath", ""));
+        }
+        param.Add(new ReportParameter("UsuarioImprimio", UsuarioActual.Nombre));
+        param.Add(new ReportParameter("FechaImpresion", DateTime.Today.ToString()));
+
+        ImprimirPDF("Empresas/Grales/Formatos/RepCatTipoProceso.rdlc", TmpDT, param, "Report Cat Tipo Proceso", formato, RDSName: "DataSet1");
+    }
 }

CRM/EmpresaCRM.aspx.cs

@@ -574,8 +574,8 @@ public partial class CRM_EmpresaCRM : ClsPaginas
 
     protected void CargaSucursales()
     {
-        //DdlSucursales.DataSource = get_GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1, 1);
-        //DdlSucursales.DataBind();
+        DdlSucursales.DataSource = get_GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1, 1);
+        DdlSucursales.DataBind();
         DdlSucursales.Items.Insert(0, new ListItem("Todos ", "-1"));
     }
 

Contabilidad/CatPeriodosBloqueo.aspx.vb

@@ -1,7 +1,6 @@
 Imports System.Data
 Imports Extensiones
 
-
 Partial Class Contabilidad_CatPeriodosBloqueo
     Inherits ClsPaginas
 
@@ -129,8 +128,8 @@ Partial Class Contabilidad_CatPeriodosBloqueo
                 Alert("Ocurrió un error al guardar el Periodo de Bloqueo", TipoMensaje.MsgError)
             End If
         Else
-
-            If ObjConta.UpdatePeriodosBloqueo(UsuarioActual.CveEmpresa, TxtEjercicio.Text, ChkM1.Checked, ChkM2.Checked, ChkM3.Checked, ChkM4.Checked, ChkM5.Checked, ChkM6.Checked, ChkM7.Checked, ChkM8.Checked, ChkM9.Checked, ChkM10.Checked, ChkM11.Checked, ChkM12.Checked, UsuarioActual.CveUsuario) Then
+            Dim AplicarBloqueso As String = ObjConta.UpdatePeriodosBloqueo(UsuarioActual.CveEmpresa, TxtEjercicio.Text, ChkM1.Checked, ChkM2.Checked, ChkM3.Checked, ChkM4.Checked, ChkM5.Checked, ChkM6.Checked, ChkM7.Checked, ChkM8.Checked, ChkM9.Checked, ChkM10.Checked, ChkM11.Checked, ChkM12.Checked, UsuarioActual.CveUsuario)
+            If AplicarBloqueso.Length = 0 Then
 
                 CargadatosGvPeriodosBloqueo()
                 UpModalPeriodosBloqueo.Update()
@@ -140,7 +139,8 @@ Partial Class Contabilidad_CatPeriodosBloqueo
                 UpGral.Update()
                 Alert("Bloqueo Actualizado Correctamente", TipoMensaje.MsgInformacion)
             Else
-                Alert("Ocurrió un error al Actualizar el Periodo de Bloqueo", TipoMensaje.MsgError)
+                Dim mensajeAlerta As String = AplicarBloqueso.Replace(";", Environment.NewLine)
+                Alert("Ocurrió un error al Actualizar el Periodo de Bloqueo " & Environment.NewLine & mensajeAlerta, TipoMensaje.MsgError)
             End If
         End If
 

Contabilidad2/RepBalanceGeneralHorizontal.aspx

@@ -722,7 +722,7 @@
                                             
                                             <asp:TemplateField HeaderText="Acumulado">
                                                 <ItemTemplate>
-                                                    <asp:HyperLink ID="HLAnterior" runat="server" Text='<%# Eval("ImporteAcumulado", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>                                                    
+                                                    <asp:HyperLink ID="HLAnterior" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>                                                    
                                                 </ItemTemplate>
                                                 <ItemStyle Width="150px" HorizontalAlign="Right" />
                                             </asp:TemplateField>
@@ -828,11 +828,11 @@
                                            <%-- <asp:BoundField HeaderText="%" DataField="PorcentajeActual" DataFormatString="{0:N2}" ItemStyle-Width="100px" />--%>
                                             <asp:TemplateField HeaderText="Acumulado">
                                                 <ItemTemplate>
-                                                    <asp:HyperLink ID="HLAnterior" runat="server" Text='<%# Eval("ImporteAcumulado", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
+                                                    <asp:HyperLink ID="HLAnterior" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
                                                 </ItemTemplate>
                                                 <ItemStyle Width="150px" HorizontalAlign="Right" />
                                             </asp:TemplateField>
-                                            <asp:BoundField HeaderText="%" DataField="PorcentajeAcumulado" DataFormatString="{0:N2}" ItemStyle-Width="100px" />
+                                            <asp:BoundField HeaderText="%" DataField="PorcentajeAcumulado" DataFormatString="{0:N2}" ItemStyle-Width="100px" Visible="false" />
                                         </Columns>
 
                                     </asp:GridView>
@@ -1053,17 +1053,18 @@
                                             </asp:TemplateField>--%>
 
                                             <%--<asp:BoundField HeaderText="%" DataField="PorcentajeActual" DataFormatString="{0:N2}" ItemStyle-Width="100px" />--%>
-                                            <asp:TemplateField HeaderText="Acumulado">
+                                            <asp:TemplateField HeaderText="Importe Actual">
                                                 <ItemTemplate>
-                                                    <asp:HyperLink ID="HLAnterior" runat="server" Text='<%# Eval("ImporteAcumulado", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
+                                                    <asp:HyperLink ID="HLAnterior" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
                                                 </ItemTemplate>
                                                 <ItemStyle Width="150px" HorizontalAlign="Right" />
                                             </asp:TemplateField>
-                                            <asp:BoundField HeaderText="%" DataField="PorcentajeAcumulado" DataFormatString="{0:N2}" ItemStyle-Width="100px" />
+                                            <asp:BoundField HeaderText="%" DataField="PorcentajeAcumulado" DataFormatString="{0:N2}" ItemStyle-Width="100px" Visible="false" />
                                         </Columns>
                                     </asp:GridView>
                                     <br />
                                     <br />
+
                                     <asp:GridView ID="GvGastosAnualH" runat="server" AutoGenerateColumns="False" DataKeyNames="CveCuenta,FechaInicial,FechaFActual,CveSubProyecto,CountDinamico" OnRowDataBound="GvGastosAnualH_RowDataBound" ShowHeaderWhenEmpty="true" CssClass="table table-striped table-hover Widthall" Style="margin-top: -10px; text-align: center;" GridLines="None">
                                         <Columns>
 
@@ -1119,7 +1120,7 @@
                                                 </ItemTemplate>
                                                 <ItemStyle Width="150px" HorizontalAlign="Right" />
                                             </asp:TemplateField>
-                                            <asp:BoundField HeaderText="%" DataField="PorcentajeAcumulado" DataFormatString="{0:N2}" ItemStyle-Width="100px" />
+                                            <asp:BoundField HeaderText="%" DataField="PorcentajeAcumulado" DataFormatString="{0:N2}" ItemStyle-Width="100px" Visible="false" />
                                         </Columns>
 
                                     </asp:GridView>
@@ -1273,20 +1274,26 @@
                                             <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="100px" />
 
 
-                                            <%--<asp:TemplateField HeaderText="Período Actual">
+                                            <asp:TemplateField HeaderText="Sin SubProyecto">
                                                 <ItemTemplate>
-                                                    <asp:HyperLink ID="HLActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>                                                    
+                                                    <asp:HyperLink ID="HLSinSP" runat="server" Text='<%# Eval("SinSP", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>                                                    
                                                 </ItemTemplate>
                                                 <ItemStyle Width="150px" HorizontalAlign="Right" />
-                                            </asp:TemplateField>--%>
+                                            </asp:TemplateField>
 
                                             <%--<asp:BoundField HeaderText="%" DataField="PorcentajeActual" DataFormatString="{0:N2}" ItemStyle-Width="100px" />--%>
+                                            
+
+                                            
+
+                                            
                                             <asp:TemplateField HeaderText="Acumulado">
                                                 <ItemTemplate>
                                                     <asp:HyperLink ID="HLAnterior" runat="server" Text='<%# Eval("ImporteAcumulado", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
                                                 </ItemTemplate>
                                                 <ItemStyle Width="150px" HorizontalAlign="Right" />
                                             </asp:TemplateField>
+
                                             <%--<asp:BoundField HeaderText="%" DataField="PorcentajeAcumulado" DataFormatString="{0:N2}" ItemStyle-Width="100px" />--%>
                                         </Columns>
                                     </asp:GridView>

Contabilidad2/RepBalanceGeneralHorizontal.aspx.vb

@@ -430,9 +430,12 @@ Partial Class Contabilidad_RepBalanceGeneralHorizontal
         GvActivo.Columns(2).HeaderText = (DdlEjercicio.SelectedValue.ToEntero - 1).ToString
 
         GvPasivo.Columns(1).HeaderText = DdlEjercicio.SelectedValue
-        GvPasivo.Columns(2).HeaderText = (DdlEjercicio.SelectedValue.ToEntero - 1).ToString
-
-        Dim CveSubProyecto As Integer = DdlSubproyecto.SelectedValue.ToEntero
+        GvPasivo.Columns(2).HeaderText = (DdlEjercicio.SelectedValue.ToEntero - 1).ToString
+
+
+
+
+        Dim CveSubProyecto As Integer = If(DdlSubproyecto.SelectedValue.ToEntero = -1, -2, DdlSubproyecto.SelectedValue.ToEntero)
 
         If ObjConta.GetSituacionFinanciera2("01/01/1900".ToDate, FechaF.ToDate, CveSubProyecto, DdlDivisor.SelectedValue.ToEntero, UsuarioActual.CveEmpresa, UsuarioActual.CveUsuario, TipoReporte) Then
             DtDatos = ObjConta.DtResultados
@@ -838,7 +841,7 @@ Partial Class Contabilidad_RepBalanceGeneralHorizontal
         params.Add(New ReportParameter("pFirma2", If(ChkFirma.Checked, String.Format("{0}l", vbCrLf), "")))
         params.Add(New ReportParameter("pFechaFin", FechaF))
         params.Add(New ReportParameter("periodo", String.Format("de {0} {1}", DdlPeriodo.SelectedItem.ToString, DdlEjercicio.SelectedItem.ToString)))
-        ImprimirPDF(reportpath, DtDatos, params, fileName, Formato)
+        'ImprimirPDF(reportpath, DtDatos, params, fileName, Formato)
     End Sub
 
 
@@ -852,7 +855,7 @@ Partial Class Contabilidad_RepBalanceGeneralHorizontal
         FechaIMes = $"01/01/1900"
         FechaFMes = $"31/12/{DdlEjercicio.SelectedValue}"
 
-        Dim CveSubProyecto As Integer = DdlSubproyecto.SelectedValue.ToEntero
+        Dim CveSubProyecto As Integer = If(DdlSubproyecto.SelectedValue.ToEntero = -1, -2, DdlSubproyecto.SelectedValue.ToEntero)
 
         'Dim ObjConta As New ClsContPAQi(UsuarioActual.Empresa)
         Dim ObjConta As New ClsContabilidad
@@ -1243,7 +1246,7 @@ Partial Class Contabilidad_RepBalanceGeneralHorizontal
             RowAF.Item("Noviembre") = DT_ACTIVO.SUM("Noviembre", "NOT CtaMayor in (-1,3,4)") - DT_PASIVO.SUM("Noviembre", "NOT CtaMayor in (-1,3,4)") - DT_CAPITAL_CONTABLE.SUM("Noviembre", "NOT CtaMayor in (-1,3,4)")
             RowAF.Item("Diciembre") = DT_ACTIVO.SUM("Diciembre", "NOT CtaMayor in (-1,3,4)") - DT_PASIVO.SUM("Diciembre", "NOT CtaMayor in (-1,3,4)") - DT_CAPITAL_CONTABLE.SUM("Diciembre", "NOT CtaMayor in (-1,3,4)")
 
-            RowAF.Item("Nombre") = "Resultados del Ejercicio:"
+            RowAF.Item("Nombre") = "TOTALES"
             RowAF.Item("CtaMayor") = -1
             RowAF.Item("ImporteAcumulado") = DT_ACTIVO.SUM("ImporteAcumulado", "NOT CtaMayor in (-1,3,4)") - DT_PASIVO.SUM("ImporteAcumulado", "NOT CtaMayor in (-1,3,4)") - DT_CAPITAL_CONTABLE.SUM("ImporteAcumulado", "NOT CtaMayor in (-1,3,4)") ' TotalAnterior.ToString
             DT_TOTALES.Rows.Add(RowAF)
@@ -1365,7 +1368,7 @@ Partial Class Contabilidad_RepBalanceGeneralHorizontal
         FechaIMes = $"01/01/1900"
         FechaFMes = $"31/12/{DdlEjercicio.SelectedValue}"
 
-        Dim CveSubProyecto As Integer = DdlSubproyecto.SelectedValue.ToEntero
+        Dim CveSubProyecto As Integer = If(DdlSubproyecto.SelectedValue.ToEntero = -1, -2, DdlSubproyecto.SelectedValue.ToEntero)
 
 
         Dim ObjConta As New ClsContabilidad
@@ -1504,7 +1507,7 @@ Partial Class Contabilidad_RepBalanceGeneralHorizontal
                 Row.Item(IndexData) = DT_ACTIVO_FIJO.SUM($"[{DT_ACTIVO_FIJO.Columns(IndexData).ColumnName}]", "NOT CtaMayor in (3,4)")
             Next
 
-            Row.Item("Nombre") = "TOTAL ACTIVO CIRCULANTE"
+            Row.Item("Nombre") = "TOTAL ACTIVO NO CIRCULANTE"
             Row.Item("ImporteActual") = DT_ACTIVO_FIJO.SUM("ImporteActual", "NOT CtaMayor in (3,4)")
             Row.Item("PorcentajeActual") = 100.0
             Row.Item("ImporteAcumulado") = DT_ACTIVO_FIJO.SUM("ImporteAcumulado", "NOT CtaMayor in (3,4)")
@@ -1512,7 +1515,7 @@ Partial Class Contabilidad_RepBalanceGeneralHorizontal
             Row.Item("CtaMayor") = -1
             DT_ACTIVO_FIJO.Rows.Add(Row)
         Else
-            Row.Item("Nombre") = "TOTAL ACTIVO CIRCULANTE"
+            Row.Item("Nombre") = "TOTAL ACTIVO NO CIRCULANTE"
             Row.Item("ImporteActual") = "0.00"
             Row.Item("ImporteAcumulado") = "0.00"
             Row.Item("CtaMayor") = -1
@@ -1531,15 +1534,15 @@ Partial Class Contabilidad_RepBalanceGeneralHorizontal
                 Row.Item(IndexData) = DT_ACTIVO_DIFERIDO.SUM($"[{DT_ACTIVO_DIFERIDO.Columns(IndexData).ColumnName}]", "NOT CtaMayor in (3,4)")
             Next
 
-            Row.Item("Nombre") = "TOTAL ACTIVO CIRCULANTE"
-            Row.Item("ImporteActual") = DtIngresosAnualH.SUM("ImporteActual", "NOT CtaMayor in (3,4)")
+            Row.Item("Nombre") = "TOTAL ACTIVO DIFERIDO"
+            Row.Item("ImporteActual") = DT_ACTIVO_DIFERIDO.SUM("ImporteActual", "NOT CtaMayor in (3,4)")
             Row.Item("PorcentajeActual") = 100.0
-            Row.Item("ImporteAcumulado") = DtIngresosAnualH.SUM("ImporteAcumulado", "NOT CtaMayor in (3,4)")
+            Row.Item("ImporteAcumulado") = DT_ACTIVO_DIFERIDO.SUM("ImporteAcumulado", "NOT CtaMayor in (3,4)")
             Row.Item("PorcentajeAcumulado") = 100.0
             Row.Item("CtaMayor") = -1
             DT_ACTIVO_DIFERIDO.Rows.Add(Row)
         Else
-            Row.Item("Nombre") = "TOTAL ACTIVO CIRCULANTE"
+            Row.Item("Nombre") = "TOTAL ACTIVO DIFERIDO"
             Row.Item("ImporteActual") = "0.00"
             Row.Item("ImporteAcumulado") = "0.00"
             Row.Item("CtaMayor") = -1
@@ -1557,15 +1560,15 @@ Partial Class Contabilidad_RepBalanceGeneralHorizontal
                 Row.Item(IndexData) = DT_PASIVO_CIRCULANTE.SUM($"[{DT_PASIVO_CIRCULANTE.Columns(IndexData).ColumnName}]", "NOT CtaMayor in (3,4)")
             Next
 
-            Row.Item("Nombre") = "TOTAL ACTIVO CIRCULANTE"
-            Row.Item("ImporteActual") = DtIngresosAnualH.SUM("ImporteActual", "NOT CtaMayor in (3,4)")
+            Row.Item("Nombre") = "TOTAL PASIVO CIRCULANTE"
+            Row.Item("ImporteActual") = DT_PASIVO_CIRCULANTE.SUM("ImporteActual", "NOT CtaMayor in (3,4)")
             Row.Item("PorcentajeActual") = 100.0
-            Row.Item("ImporteAcumulado") = DtIngresosAnualH.SUM("ImporteAcumulado", "NOT CtaMayor in (3,4)")
+            Row.Item("ImporteAcumulado") = DT_PASIVO_CIRCULANTE.SUM("ImporteAcumulado", "NOT CtaMayor in (3,4)")
             Row.Item("PorcentajeAcumulado") = 100.0
             Row.Item("CtaMayor") = -1
             DT_PASIVO_CIRCULANTE.Rows.Add(Row)
         Else
-            Row.Item("Nombre") = "TOTAL ACTIVO CIRCULANTE"
+            Row.Item("Nombre") = "TOTAL PASIVO CIRCULANTE"
             Row.Item("ImporteActual") = "0.00"
             Row.Item("ImporteAcumulado") = "0.00"
             Row.Item("CtaMayor") = -1
@@ -1583,15 +1586,15 @@ Partial Class Contabilidad_RepBalanceGeneralHorizontal
                 Row.Item(IndexData) = DT_PASIVO_NO_CIRCULANTE.SUM($"[{DT_PASIVO_NO_CIRCULANTE.Columns(IndexData).ColumnName}]", "NOT CtaMayor in (3,4)")
             Next
 
-            Row.Item("Nombre") = "TOTAL ACTIVO CIRCULANTE"
-            Row.Item("ImporteActual") = DtIngresosAnualH.SUM("ImporteActual", "NOT CtaMayor in (3,4)")
+            Row.Item("Nombre") = "TOTAL PASIVO NO CIRCULANTE"
+            Row.Item("ImporteActual") = DT_PASIVO_NO_CIRCULANTE.SUM("ImporteActual", "NOT CtaMayor in (3,4)")
             Row.Item("PorcentajeActual") = 100.0
-            Row.Item("ImporteAcumulado") = DtIngresosAnualH.SUM("ImporteAcumulado", "NOT CtaMayor in (3,4)")
+            Row.Item("ImporteAcumulado") = DT_PASIVO_NO_CIRCULANTE.SUM("ImporteAcumulado", "NOT CtaMayor in (3,4)")
             Row.Item("PorcentajeAcumulado") = 100.0
             Row.Item("CtaMayor") = -1
             DT_PASIVO_NO_CIRCULANTE.Rows.Add(Row)
         Else
-            Row.Item("Nombre") = "TOTAL ACTIVO CIRCULANTE"
+            Row.Item("Nombre") = "TOTAL PASIVO NO CIRCULANTE"
             Row.Item("ImporteActual") = "0.00"
             Row.Item("ImporteAcumulado") = "0.00"
             Row.Item("CtaMayor") = -1
@@ -1609,15 +1612,15 @@ Partial Class Contabilidad_RepBalanceGeneralHorizontal
                 Row.Item(IndexData) = DT_CAPITAL_CONTABLE.SUM($"[{DT_CAPITAL_CONTABLE.Columns(IndexData).ColumnName}]", "NOT CtaMayor in (3,4)")
             Next
 
-            Row.Item("Nombre") = "TOTAL ACTIVO CIRCULANTE"
-            Row.Item("ImporteActual") = DtIngresosAnualH.SUM("ImporteActual", "NOT CtaMayor in (3,4)")
+            Row.Item("Nombre") = "TOTAL CAPITAL CONTABLE"
+            Row.Item("ImporteActual") = DT_CAPITAL_CONTABLE.SUM("ImporteActual", "NOT CtaMayor in (3,4)")
             Row.Item("PorcentajeActual") = 100.0
-            Row.Item("ImporteAcumulado") = DtIngresosAnualH.SUM("ImporteAcumulado", "NOT CtaMayor in (3,4)")
+            Row.Item("ImporteAcumulado") = DT_CAPITAL_CONTABLE.SUM("ImporteAcumulado", "NOT CtaMayor in (3,4)")
             Row.Item("PorcentajeAcumulado") = 100.0
             Row.Item("CtaMayor") = -1
             DT_CAPITAL_CONTABLE.Rows.Add(Row)
         Else
-            Row.Item("Nombre") = "TOTAL ACTIVO CIRCULANTE"
+            Row.Item("Nombre") = "TOTAL CAPITAL CONTABLE"
             Row.Item("ImporteActual") = "0.00"
             Row.Item("ImporteAcumulado") = "0.00"
             Row.Item("CtaMayor") = -1
@@ -1646,7 +1649,7 @@ Partial Class Contabilidad_RepBalanceGeneralHorizontal
             Next
 
             Row.Item("Nombre") = "TOTAL ACTIVO"
-            Row.Item("ImporteActual") = DT_ACTIVO.SUM("ImporteActual", "NOT CtaMayor in (3,4)")
+            Row.Item("ImporteActual") = DT_ACTIVO.SUM("ImporteActual", "NOT CtaMayor in (-1,3,4)")
             Row.Item("PorcentajeActual") = 100.0
             Row.Item("ImporteAcumulado") = DT_ACTIVO.SUM("ImporteAcumulado", "NOT CtaMayor in (-1,3,4)")
             Row.Item("PorcentajeAcumulado") = 100.0
@@ -1693,7 +1696,7 @@ Partial Class Contabilidad_RepBalanceGeneralHorizontal
 
         If DT_TOTALES.Rows.Count > 0 Then
 
-            Row = DTTotalesAnualH.NewRow
+            Row = DT_TOTALES.NewRow
 
 
             IndexData = 11
@@ -1701,11 +1704,13 @@ Partial Class Contabilidad_RepBalanceGeneralHorizontal
                 Row.Item(IndexData) = DT_ACTIVO.SUM($"[{DT_ACTIVO.Columns(IndexData).ColumnName}]", "Not CtaMayor In (-1,3,4)") - DT_PASIVO.SUM($"[{DT_PASIVO.Columns(IndexData).ColumnName}]", "Not CtaMayor In (-1,3,4)") - DT_CAPITAL_CONTABLE.SUM($"[{DT_CAPITAL_CONTABLE.Columns(IndexData).ColumnName}]", "Not CtaMayor In (-1,3,4)")
             Next
 
-            Row.Item("Nombre") = "Resultados del Ejercicio"
+            Row.Item("Nombre") = "TOTALES"
+            Row.Item("CtaMayor") = -1
+            Row.Item("ImporteActual") = DT_ACTIVO.SUM($"ImporteActual", "Not CtaMayor in (-1,3,4)") - DT_PASIVO.SUM($"ImporteActual", "Not CtaMayor in (-1,3,4)") - DT_CAPITAL_CONTABLE.SUM($"ImporteActual", "Not CtaMayor in (-1,3,4)")
             Row.Item("ImporteAcumulado") = DT_ACTIVO.SUM($"ImporteAcumulado", "Not CtaMayor in (-1,3,4)") - DT_PASIVO.SUM($"ImporteAcumulado", "Not CtaMayor in (-1,3,4)") - DT_CAPITAL_CONTABLE.SUM($"ImporteAcumulado", "Not CtaMayor in (-1,3,4)")
 
 
-            DTTotalesAnualH.Rows.Add(Row)
+            DT_TOTALES.Rows.Add(Row)
 
         End If
 
@@ -1934,6 +1939,8 @@ Partial Class Contabilidad_RepBalanceGeneralHorizontal
             Row.Item("ImporteAcumulado") = DT_ACTIVO_CIRCULANTE.SUM("ImporteActual", "NOT CtaMayor in (3,4)") 'TotalAnterior.ToString
             Row.Item("PorcentajeAcumulado") = 100.0
             Row.Item("CtaMayor") = -1
+            Row.Item("SinSP") = DT_ACTIVO_CIRCULANTE.SUM("SinSP", "NOT CtaMayor in (3,4)") 'Sin SP
+
             DT_ACTIVO_CIRCULANTE.Rows.Add(Row)
         Else
             Row.Item("Nombre") = "TOTAL ACTIVO CIRCULANTE"
@@ -1965,6 +1972,7 @@ Partial Class Contabilidad_RepBalanceGeneralHorizontal
             Row.Item("ImporteAcumulado") = DT_ACTIVO_FIJO.SUM("ImporteActual", "NOT CtaMayor in (3,4)") 'TotalAnterior.ToString
             Row.Item("PorcentajeAcumulado") = 100.0
             Row.Item("CtaMayor") = -1
+            Row.Item("SinSP") = DT_ACTIVO_FIJO.SUM("SinSP", "NOT CtaMayor in (3,4)") 'Sin SP
             DT_ACTIVO_FIJO.Rows.Add(Row)
         Else
             Row.Item("Nombre") = "TOTAL ACTIVO NO CIRCULANTE"
@@ -1996,6 +2004,7 @@ Partial Class Contabilidad_RepBalanceGeneralHorizontal
             Row.Item("ImporteAcumulado") = DT_ACTIVO_DIFERIDO.SUM("ImporteActual", "NOT CtaMayor in (3,4)") 'TotalAnterior.ToString
             Row.Item("PorcentajeAcumulado") = 100.0
             Row.Item("CtaMayor") = -1
+            Row.Item("SinSP") = DT_ACTIVO_DIFERIDO.SUM("SinSP", "NOT CtaMayor in (3,4)") 'Sin SP
             DT_ACTIVO_DIFERIDO.Rows.Add(Row)
         Else
             Row.Item("Nombre") = "TOTAL ACTIVO DIFERIDO"
@@ -2027,6 +2036,7 @@ Partial Class Contabilidad_RepBalanceGeneralHorizontal
             Row.Item("ImporteAcumulado") = DT_PASIVO_CIRCULANTE.SUM("ImporteActual", "NOT CtaMayor in (3,4)") 'TotalAnterior.ToString
             Row.Item("PorcentajeAcumulado") = 100.0
             Row.Item("CtaMayor") = -1
+            Row.Item("SinSP") = DT_PASIVO_CIRCULANTE.SUM("SinSP", "NOT CtaMayor in (3,4)") 'Sin SP
             DT_PASIVO_CIRCULANTE.Rows.Add(Row)
         Else
             Row.Item("Nombre") = "TOTAL PASIVO CIRCULANTE"
@@ -2064,6 +2074,7 @@ Partial Class Contabilidad_RepBalanceGeneralHorizontal
             Row.Item("ImporteActual") = 0.00
             Row.Item("ImporteAcumulado") = 0.00
             Row.Item("CtaMayor") = -1
+            Row.Item("SinSP") = DT_PASIVO_NO_CIRCULANTE.SUM("SinSP", "NOT CtaMayor in (3,4)") 'Sin SP
             DT_PASIVO_NO_CIRCULANTE.Rows.Add(Row)
         End If
 
@@ -2090,6 +2101,7 @@ Partial Class Contabilidad_RepBalanceGeneralHorizontal
             Row.Item("ImporteAcumulado") = DT_CAPITAL_CONTABLE.SUM("ImporteActual", "NOT CtaMayor in (3,4)") 'TotalAnterior.ToString
             Row.Item("PorcentajeAcumulado") = 100.0
             Row.Item("CtaMayor") = -1
+            Row.Item("SinSP") = DT_CAPITAL_CONTABLE.SUM("SinSP", "NOT CtaMayor in (3,4)") 'Sin SP
             DT_CAPITAL_CONTABLE.Rows.Add(Row)
         Else
             Row.Item("Nombre") = "TOTAL CAPITAL CONTABLE"
@@ -2129,6 +2141,7 @@ Partial Class Contabilidad_RepBalanceGeneralHorizontal
             Row.Item("ImporteAcumulado") = DT_ACTIVO.SUM("ImporteActual", "NOT CtaMayor in (-1,3,4)") 'TotalAnterior.ToString
             Row.Item("PorcentajeAcumulado") = 100.0
             Row.Item("CtaMayor") = -1
+            Row.Item("SinSP") = DT_ACTIVO.SUM("SinSP", "NOT CtaMayor in (-1,3,4)") 'Sin SP
             DT_ACTIVO.Rows.Add(Row)
         Else
             Row.Item("Nombre") = "TOTAL ACTIVO"
@@ -2160,6 +2173,7 @@ Partial Class Contabilidad_RepBalanceGeneralHorizontal
             Row.Item("ImporteAcumulado") = DT_PASIVO.SUM("ImporteActual", "NOT CtaMayor in (-1,3,4)") 'TotalAnterior.ToString
             Row.Item("PorcentajeAcumulado") = 100.0
             Row.Item("CtaMayor") = -1
+            Row.Item("SinSP") = DT_PASIVO.SUM("SinSP", "NOT CtaMayor in (-1,3,4)") 'Sin SP
             DT_PASIVO.Rows.Add(Row)
         Else
             Row.Item("Nombre") = "TOTAL PASIVO"
@@ -2192,6 +2206,7 @@ Partial Class Contabilidad_RepBalanceGeneralHorizontal
             Row.Item("ImporteAcumulado") = DT_ACTIVO.SUM($"ImporteAcumulado", "NOT CtaMayor in (-1,3,4)") - DT_PASIVO.SUM($"ImporteAcumulado", "NOT CtaMayor in (-1,3,4)") - DT_CAPITAL_CONTABLE.SUM($"ImporteAcumulado", "NOT CtaMayor in (-1,3,4)")
 
             Row.Item("CtaMayor") = -2
+            Row.Item("SinSP") = DT_TOTALES.SUM("SinSP", "NOT CtaMayor in (-1,3,4)") 'Sin SP
 
             DT_TOTALES.Rows.Add(Row)
 
@@ -2245,13 +2260,13 @@ Partial Class Contabilidad_RepBalanceGeneralHorizontal
                     Dim CveSubProyectoIntermo As String = CType(GvIngresosSubProyectoH.Columns(IndiceInicio), BoundField).DataField
                     Dim Importe As String = e.Row.Cells(IndiceInicio).Text
 
-
-
                     e.Row.Cells(IndiceInicio).Text = $"<a target='_blank' href='./RepAnexoCatalogo.aspx?CveCuenta={CveCuenta}&FF={FEchaMesFinal.ToString("dd/MM/yyyy")}&FI=01/01/1900&ER=1&CveSubProyecto={CveSubProyectoIntermo}' >{Importe}</a>"
                 Next IndiceInicio
 
                 e.Row.FCHyperLink("HLAnterior").NavigateUrl = $"./RepAnexoCatalogo.aspx?CveCuenta={CveCuenta}&FF={FEchaMesFinal.ToString("dd/MM/yyyy")}&FI=01/01/1900&ER=1&CveSubProyecto={-1}"
 
+                e.Row.FCHyperLink("HLSinSP").NavigateUrl = $"./RepAnexoCatalogo.aspx?CveCuenta={CveCuenta}&FF={FEchaMesFinal.ToString("dd/MM/yyyy")}&FI=01/01/1900&ER=1&CveSubProyecto=0"
+
             End If
 
             If e.Row.DBCampo("ImporteAcumulado").ToString.ToDouble < 0 Then

Contabilidad2/RepEstadoResultadosHorizontal.aspx

@@ -1,21 +1,21 @@
-<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="RepEstadoResultadosHorizontal.aspx.vb" Inherits="Contabilidad_RepEstadoResultadosHorizontal" %>
-
-<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
-</asp:Content>
-<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
-</asp:Content>
-<asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
-</asp:Content>
-<asp:Content ID="Content4" ContentPlaceHolderID="E" runat="Server">
-    <asp:Literal ID="LtTitulo" Text="Estado de Resultados" runat="server" />
-</asp:Content>
-<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
-
-
-
-</asp:Content>
-<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
-
+<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="RepEstadoResultadosHorizontal.aspx.vb" Inherits="Contabilidad_RepEstadoResultadosHorizontal" %>
+
+<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
+</asp:Content>
+<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
+</asp:Content>
+<asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
+</asp:Content>
+<asp:Content ID="Content4" ContentPlaceHolderID="E" runat="Server">
+    <asp:Literal ID="LtTitulo" Text="Estado de Resultados" runat="server" />
+</asp:Content>
+<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
+
+
+
+</asp:Content>
+<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
+
      <asp:UpdatePanel runat="server" ID="UpFiltros" UpdateMode="Conditional">
         <ContentTemplate>
             <div class="portlet solid  grey-cascade portlet-filter">
@@ -38,7 +38,7 @@
                                       <asp:DropDownList ID="DdlEjercicio2" runat="server" CssClass="select2me" DataTextField="Ejercicio" DataValueField="Ejercicio" Width="100px">
                                     </asp:DropDownList>
                                 </div>                                  
-                                
+                                
                                  <label class="col-md-2" style="width: 80px;"  runat="server" id="LiPeriodoLbl"  >Periodo: </label>    
                                 <div class="col-md-2 " runat="server" id="LiPeriodoDdl">
                                     <asp:DropDownList ID="DdlPeriodo" runat="server" Width="150px" CssClass="select2me">
@@ -80,8 +80,8 @@
                 </div>
             </div>
         </ContentTemplate>
-    </asp:UpdatePanel>
-
+    </asp:UpdatePanel>
+
      <ajax:TabContainer ID="Tab" runat="server" ActiveTabIndex="0" Width="100%" OnActiveTabChanged="Tab_ActiveTabChanged" AutoPostBack="true">
         
          <ajax:TabPanel ID="TabMes" runat="server" HeaderText="Mensual">
@@ -1010,11 +1010,11 @@
 
             </ContentTemplate>
         </ajax:TabPanel>
-    </ajax:TabContainer>
-    
-
-
-
-</asp:Content>
-<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
-</asp:Content>
+    </ajax:TabContainer>
+    
+
+
+
+</asp:Content>
+<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
+</asp:Content>

OI/CircularDetalle.aspx.vb

@@ -34,7 +34,7 @@ Partial Class OI_CircularDetalle
     End Sub
 
     Private Sub CargarCve()
-        Dim PreCveCircular As String = Request.Params("CveCircular").ToString
+        Dim PreCveCircular As String = Request.Params("CveCircular").ToString()
         If IsNumeric(PreCveCircular) Then
             CveCircular = PreCveCircular.ToEntero
         End If

OI/CircularDetalleB.aspx

@@ -0,0 +1,246 @@
+<%@ Page Title="" Language="C#" MasterPageFile="~/Site.master" AutoEventWireup="true" CodeFile="CircularDetalleB.aspx.cs" Inherits="OI_CircularDetalleB" %>
+
+<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
+</asp:Content>
+<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
+    <style>
+        .mypaste:before {
+            content: "Pegar aquí";
+        }
+
+        .addropzone.dz-clickable:before {
+            margin-top: 40px;
+        }
+
+        .pnlCorreo {
+            display: table;
+            width: 100%;
+            border: 1px solid #e0e0e0;
+        }
+
+        .headerCorreo {
+            font-size: 16px;
+            float: left;
+            width: 20%;
+            color: #333333;
+            background-color: #f9f9f9;
+            border-color: #e0e0e0;
+            padding: 10px 15px;
+        }
+
+        .bodycorreos {
+            padding: 3px 15px;
+            width: 80%;
+            float: right;
+        }
+
+        .headerCorreoCCP {
+            padding: 20px 15px;
+        }
+
+        @media (min-width: 1167px) {
+            .headerCorreoCCP {
+                padding: 30px 15px;
+            }
+        }
+
+        .linkCorreo {
+            text-decoration: none;
+            color: #659be0;
+            font-weight: bold;
+        }
+
+        tr[hide="1"] {
+            display: none;
+        }
+    </style>
+</asp:Content>
+<asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
+    Circular 
+</asp:Content>
+<asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server">
+</asp:Content>
+<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
+</asp:Content>
+<asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server">
+</asp:Content>
+<asp:Content ID="Content7" ContentPlaceHolderID="C" runat="Server">
+
+    <asp:UpdatePanel ID="UpContenido" runat="server" UpdateMode="Conditional">
+        <ContentTemplate>
+
+
+            <div class="pnlCorreo" style="margin-bottom: 5px;">
+                <div class="headerCorreo">
+                    <h3 class="panel-title">Para</h3>
+                </div>
+                <div class="bodycorreos">
+                    <asp:Literal ID="LtlPara" runat="server"></asp:Literal>
+                    <asp:LinkButton ID="Lnkuser1" runat="server" CssClass="linkCorreo" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea eliminar Correo?" data-btn-ok-label="si">Jorge caudillo(jcaudillo@adsistemas.mx)</asp:LinkButton>;
+            <asp:LinkButton ID="Lnkuser2" runat="server" CssClass="linkCorreo" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea eliminar Correo?" data-btn-ok-label="si">Julian Moreno(Julianmoreno@adsistemas.mx)</asp:LinkButton>;
+            <asp:LinkButton ID="LnkAgregar" OnClick="LnkAgregar_Click" CssClass="btn btn-default" runat="server"><i class="fa fa-plus"></i></asp:LinkButton>
+                </div>
+            </div>
+
+            <div class="pnlCorreo" style="margin-bottom: 5px;">
+                <div class="headerCorreo headerCorreoCCP">
+                    <h3 class="panel-title ">Correos Adicionales:</h3>
+                </div>
+                <div class="bodycorreos ">
+                    <asp:TextBox ID="TxtCCPara" runat="server" CssClass="form-control " TextMode="MultiLine" Rows="3"></asp:TextBox>
+                </div>
+            </div>
+            <div class="pnlCorreo" style="margin-bottom: 5px;">
+                <div class="headerCorreo">
+                    <h3 class="panel-title">Asunto</h3>
+                </div>
+                <div class="bodycorreos">
+                    <asp:TextBox ID="TxtAsunto" runat="server" CssClass="form-control "></asp:TextBox>
+                </div>
+            </div>
+
+
+            <div class="pnlCorreo" style="margin-bottom: 5px;">
+                <div class="headerCorreo headerCorreoCCP" style="background-color: transparent;">
+                    <h3 class="panel-title ">Adjuntar Archivos:</h3>
+                    <asp:TextBox ID="TxtArchivo" CssClass="ADSdropzone hidden" runat="server"></asp:TextBox>
+                </div>
+                <div class="bodycorreos ">
+                    <asp:TextBox ID="TextBox1" runat="server" CssClass="form-control ckeditor" TextMode="MultiLine" Rows="3"></asp:TextBox>
+                </div>
+            </div>
+
+
+            <div id='<%= iddivAgregarPara %>' class="modal ADS fade" role="dialog">
+                <div class="modal-dialog">
+                    <asp:UpdatePanel ID="UpUsuarios" 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">Para</asp:Literal></h4>
+                            </div>
+                            <div class="modal-body">
+
+                                <div class="form-group form-md-line-input">
+                                    <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">
+                                    <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>
+                                <div class="form-group form-md-line-input">
+                                    <asp:TextBox ID="TxtUsuario" runat="server" CssClass="form-control TxtUsuario" CausesValidation="true"></asp:TextBox>
+                                    <asp:Label runat="server" Text="Usuario" AssociatedControlID="TxtUsuario"></asp:Label>
+                                </div>
+
+
+                                <asp:GridView ID="GVUsuarios" runat="server" AutoGenerateColumns="false" DataKeyNames="CveUsuario,Nombre,Correo,Empresa,CveRol,CveSubProyecto"
+                                    CssClass="table table-striped table-advance table-hover Widthall ScrollAD GVUsuarios" GridLines="None" data-height="200"
+                                    OnRowDataBound="GVUsuarios_RowDataBound">
+                                    <Columns>
+                                        <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-check-square"></i></a>
+                                                <a id="UnchkAll" onclick="chkAll_OncLick(0);" class="linkCorreo" data-toggle="tooltip" title="Quitar seleccion todos(Visibles)"><i class="fa fa-check-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 class="modal-footer">
+                                <asp:LinkButton ID="BtnUpMiembros" OnClick="BtnUpMiembros_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 src="/Metronic/assets/global/plugins/ckeditor/ckeditor.js" type="text/javascript"></script>
+</asp:Content>
+<asp:Content ID="Content8" ContentPlaceHolderID="JS" runat="Server">
+    <script>
+        let CveRol = -1;
+        let CveSucursal = -1;
+        let usuariotext = "";
+        function ddlRol_Onchange() {
+            CveRol = $('select.ddlrol option:selected').val();
+            showhideUser();
+        }
+        function DdlSucursales_Onchange() {
+            CveSucursal = $('select.ddlsucursal option:selected').val();
+            showhideUser();
+        }
+
+        let tickBarBmaster = 0;
+        function TxtUsuario_Onchange() {
+            let obj = $('.TxtUsuario');
+            let text = '';
+            tickBarBmaster = tickBarBmaster + 1;
+            tickBarnew = tickBarBmaster;
+            setTimeout(function () {
+                if (tickBarnew == tickBarBmaster) {
+                    if ((text = obj.val().trim()) != usuariotext) {
+                        usuariotext = text;
+                        showhideUser();
+                    }
+                }
+            }, 500);
+        }
+        function chkAll_OncLick(valor) {
+            $('.GVUsuarios tr:visible input[type="checkbox"]').prop("checked", valor);
+        }
+
+        function showhideUser() {
+            let strCveRol = CveRol > 0 ? '[data-rol="' + CveRol + '"]' : '';
+            let strCveSucursal = CveSucursal > 0 ? '[data-sucursal="' + CveSucursal + '"]' : '';
+            let strusuario = usuariotext.length > 0 ? ' td:nth-child(2):contains("' + usuariotext + '")' : '';// td:nth-child(2)
+
+            $('.GVUsuarios tr.items').attr('hide', '1')//oculto todos
+            if (strusuario.length > 0) {
+                $('.GVUsuarios tr.items' + strCveRol + strCveSucursal + strusuario).closest('tr').attr('hide', '');//muestro los que tienen filtro con usuario,sucursal y rol
+            } else {
+                $('.GVUsuarios tr.items' + strCveRol + strCveSucursal).attr('hide', '');//muestro los que tienen filtro con sucursal y rol
+
+            }
+            //e.Row.Attributes.Add("data-rol", CveRol);
+            //e.Row.Attributes.Add("data-sucursal", CveRol);
+        }
+        function loadeventos() {
+            let input = $('input.TxtUsuario:not(.ConEvento)')
+
+            input.bind({
+                copy: TxtUsuario_Onchange
+                , paste: TxtUsuario_Onchange
+                , cut: TxtUsuario_Onchange
+                , keydown: TxtUsuario_Onchange
+                , keyup: TxtUsuario_Onchange
+            });
+            input.addClass('ConEvento');
+        }
+        function ADSReady() {
+            loadeventos();
+            showhideUser()
+        }
+    </script>
+</asp:Content>
+

OI/CircularDetalleB.aspx.cs

@@ -0,0 +1,61 @@
+using System;
+using System.Collections.Generic;
+using System.Linq;
+using System.Web;
+using System.Web.UI;
+using System.Web.UI.WebControls;
+using Extensiones;
+
+public partial class OI_CircularDetalleB :  ClsPaginas 
+{
+    public const string iddivAgregarPara = "iddivAgregarPara";
+    protected void Page_Load(object sender, EventArgs e)
+    {
+        if (!IsPostBack)
+        {
+            cargarFiltroUsuarios();
+        }
+    }
+    private void cargarFiltroUsuarios()
+    {
+        DdlRoles.DataSource = get_GlobalDTRoles(UsuarioActual.CveEmpresa);
+        DdlRoles.DataBind();
+        DdlRoles.Items.Insert(0, new ListItem("Todos", "-1"));
+
+        DdlSucursales.DataSource = get_GlobalDTSubProyectos(-1, -1, UsuarioActual.CveEmpresa);
+        DdlSucursales.DataBind();
+        DdlSucursales.Items.Insert(0, new ListItem("Todos", "-1"));
+
+        GVUsuarios.DataSource = get_GlobalDTUsuarios( CveEmpresa: UsuarioActual.CveEmpresa);
+        GVUsuarios.DataBind();
+        UpUsuarios.Update();
+    }
+
+    protected void GVUsuarios_RowDataBound(object sender, GridViewRowEventArgs e)
+    {
+        if (e.Row.RowType == DataControlRowType.DataRow)
+        {
+            string CveRol = e.Row.DBCampo("CveRol");
+            string CveSubProyecto = e.Row.DBCampo("CveSubProyecto");
+            e.Row.CssClass = "items";
+            e.Row.Attributes.Add("data-rol", CveRol);
+            e.Row.Attributes.Add("data-sucursal", CveRol);
+        }
+
+    }
+
+    protected void LnkAgregar_Click(object sender, EventArgs e)
+    { 
+        this.RegistraScript(string.Format("$('#{0}').modal()", iddivAgregarPara));
+    }
+
+    protected void BtnUpPara_Click(object sender, EventArgs e)
+    {
+
+    }
+
+    protected void BtnUpMiembros_Click(object sender, EventArgs e)
+    {
+
+    }
+}

OI/TareaDetalle.aspx

@@ -4,6 +4,10 @@
 </asp:Content>
 <asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
     <style>
+        tr[hide="1"] {
+            display: none;
+        }
+
         .btn.btnCalendar {
             padding: 5px 10px;
         }
@@ -86,6 +90,16 @@
             color: #888888;
             opacity: 1;
         }
+
+        .cssnowrap {
+            white-space: nowrap;
+        }
+
+        .linkCorreo {
+            text-decoration: none;
+            color: #659be0;
+            font-weight: bold;
+        }
     </style>
 
     <link href="/Metronic/assets/global/plugins/ion.rangeslider/css/ion.rangeSlider.css" rel="stylesheet" type="text/css" />
@@ -116,6 +130,8 @@
                 <asp:LinkButton ID="LnkAgregarTema" OnClick="LnkAgregarTema_Click" runat="server"><i class="fa fa-plus"></i> Agregar Tema</asp:LinkButton></li>
             <li>
                 <asp:LinkButton ID="LnkUpFile" OnClick="LnkUpFile_Click" Visible="false" runat="server"><i class="fa fa-plus"></i> Agregar Archivo</asp:LinkButton></li>
+            <li>
+                <asp:LinkButton ID="LnkUpUsuarios" OnClick="LnkUpUsuarios_Click" Visible="true" runat="server"><i class="fa fa-pencil"></i> Actualizar Usuarios</asp:LinkButton></li>
 
         </ContentTemplate>
     </asp:UpdatePanel>
@@ -127,7 +143,6 @@
         <ContentTemplate>
             <div class="row">
                 <div class="col-md-8">
-
                     <asp:Panel runat="server" ID="portletTarea" class="portlet light smmallpadding bordered">
                         <div class="portlet-title">
                             <div class="caption font-green">
@@ -150,6 +165,15 @@
                                 <asp:Label runat="server" Text="Descripción" AssociatedControlID="TxtDescripcion"></asp:Label>
                             </div>
                             <asp:Panel runat="server" ID="PnlUsuarios" Visible="false">
+
+                                <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">De</h3>
+                                    </div>
+                                    <div class="panel-body" style="display: inline-block; width: 79%;">
+                                        <asp:Literal ID="LtlDeUser" runat="server"></asp:Literal>
+                                    </div>
+                                </div>
                                 <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">Para</h3>
@@ -159,7 +183,6 @@
                                     </div>
                                 </div>
 
-
                                 <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">C. C. Para</h3>
@@ -203,7 +226,7 @@
                                         <ajax:ValidatorCalloutExtender ID="VCOPrio" runat="server" TargetControlID="RFVPrioridad" HighlightCssClass="vco" Width="300px"></ajax:ValidatorCalloutExtender>
                                     </div>
                                 </div>
-                                <div class="col-sm-6">
+                                <div class="col-sm-4">
                                     <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>
@@ -211,9 +234,73 @@
                                         <asp:Label runat="server" AssociatedControlID="DdlTema">Tema:</asp:Label>
                                     </div>
                                 </div>
+                                <div class="col-sm-2">
+                                    <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>
                     </asp:Panel>
+
+                    <asp:UpdatePanel ID="UpChkList" runat="server" UpdateMode="Conditional">
+                        <ContentTemplate>
+                            <asp:Panel runat="server" ID="portletChekList" Visible="false" class="portlet light smmallpadding bordered" DefaultButton="LnkAgregarchklistitem">
+                                <div class="portlet-title">
+                                    <div class="caption font-green">
+                                        <i class="fa fa-check-square-o font-green"></i>
+                                        <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>
+                                    </div>
+                                </div>
+                                <div class="portlet-body rowpadding">
+                                    <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: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>
+                                            <%--<a class="btn btn-default">Agregar</a>--%>
+                                        </div>
+                                    </div>
+
+                                    <asp:GridView ID="GVcheklist" runat="server" GridLines="None" CssClass="table table-hover table-striped ScrollAD Widthall GVcheklist" AutoGenerateColumns="False"
+                                        DataKeyNames="CveEventoCheckList,CveEvento,CveTipoEvento,EventoComentario,Estatus,CveUsuario,Usuario,FechaIng">
+                                        <Columns>
+                                            <asp:TemplateField HeaderText="" ItemStyle-Width="30">
+                                                <ItemTemplate>
+                                                    <asp:CheckBox ID="ChkEstatus" Text=" " OnCheckedChanged="ChkEstatus_CheckedChanged" runat="server" data-valor='<%# Extensiones.ModExtensiones.Encripta(Eval("CveEventoCheckList").ToString())%>' Checked='<%# Eval("Estatus")%>' />
+                                                </ItemTemplate>
+                                            </asp:TemplateField>
+                                            <asp:TemplateField HeaderText="Actividad">
+                                                <ItemTemplate>
+                                                    <%--<pre>--%>
+                                                    <span class="pre">
+                                                        <asp:Literal ID="lbleventoComentario" runat="server" Text='<%# Eval("EventoComentario")%>'> </asp:Literal>
+                                                    </span>
+                                                    <%--</pre>--%>
+                                                </ItemTemplate>
+                                            </asp:TemplateField>
+                                            <asp:TemplateField ItemStyle-Width="30" Visible="false">
+                                                <ItemTemplate>
+                                                    <asp:LinkButton data-toggle="tooltip" title="Editar" ID="LnkEditar" OnClick="LnkEditarCheck_Click" CssClass="btn btn-circle btn-sm green" runat="server" Text="<i class='fa fa-pencil'></i>"></asp:LinkButton>
+                                                </ItemTemplate>
+                                            </asp:TemplateField>
+                                            <asp:TemplateField ItemStyle-Width="30">
+                                                <ItemTemplate>
+                                                    <asp:LinkButton ID="LnkD" runat="server" OnClick="LnkEliminarchek_Click" CssClass="btn btn-circle btn-sm red" Text="<i class='icon-trash'></i>" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea eliminar el cheklist?" data-btn-ok-label="si" />
+                                                </ItemTemplate>
+                                            </asp:TemplateField>
+                                        </Columns>
+                                    </asp:GridView>
+                                </div>
+                            </asp:Panel>
+                        </ContentTemplate>
+                    </asp:UpdatePanel>
                 </div>
                 <div class="col-md-4">
 
@@ -242,12 +329,20 @@
                                         <asp:TextBox ID="TxtAvance" runat="server" CssClass="form-control TxtAvance" CausesValidation="true"></asp:TextBox>
                                     </div>
                                     <asp:Button ID="BtnUpAvance" OnClick="BtnUpAvance_Click" CssClass="hidden BtnUpAvance" runat="server" Text="ActualizarAvance" />
+
+                                    <div class="form-group form-md-line-input input-iconright">
+                                        <asp:TextBox ID="TxtFechaIng" Enabled="false" runat="server" CssClass="form-control" CausesValidation="true"></asp:TextBox>
+                                        <asp:Label runat="server" Text="Fecha Registró" AssociatedControlID="TxtFechaIng"></asp:Label>
+                                    </div>
+                                    <div class="form-group form-md-line-input input-iconright">
+                                        <asp:TextBox ID="TxtUsuarioreg" Enabled="false" runat="server" CssClass="form-control" CausesValidation="true"></asp:TextBox>
+                                        <asp:Label runat="server" Text="Registró" AssociatedControlID="TxtUsuarioreg"></asp:Label>
+                                    </div>
                                 </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">
@@ -272,113 +367,31 @@
                             </div>
                         </div>
                     </asp:Panel>
-                </div>
-            </div>
 
-            <div class="row">
-                <asp:UpdatePanel ID="UpChkList" runat="server" class="col-md-8" UpdateMode="Conditional">
-                    <ContentTemplate>
-                        <asp:Panel runat="server" ID="portletChekList" Visible="false" class="portlet light smmallpadding bordered" DefaultButton="LnkAgregarchklistitem">
-                            <div class="portlet-title">
-                                <div class="caption font-green">
-                                    <i class="fa fa-check-square-o font-green"></i>
-                                    <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>
-                                </div>
-                            </div>
-                            <div class="portlet-body rowpadding">
-                                <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: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>
-                                        <%--<a class="btn btn-default">Agregar</a>--%>
-                                    </div>
-                                </div>
-
-                                <asp:GridView ID="GVcheklist" runat="server" GridLines="None" CssClass="table table-hover table-striped ScrollAD Widthall GVcheklist" AutoGenerateColumns="False"
-                                    DataKeyNames="CveEventoCheckList,CveEvento,CveTipoEvento,EventoComentario,Estatus,CveUsuario,Usuario,FechaIng">
-                                    <Columns>
-                                        <asp:TemplateField HeaderText="" ItemStyle-Width="30">
-                                            <ItemTemplate>
-                                                <asp:CheckBox ID="ChkEstatus" Text=" " OnCheckedChanged="ChkEstatus_CheckedChanged" runat="server" data-valor='<%# Extensiones.ModExtensiones.Encripta(Eval("CveEventoCheckList").ToString())%>' Checked='<%# Eval("Estatus")%>' />
-                                            </ItemTemplate>
-                                        </asp:TemplateField>
-                                        <asp:TemplateField HeaderText="Actividad">
-                                            <ItemTemplate>
-                                                <%--<pre>--%>
-                                                <span class="pre">
-                                                    <asp:Literal ID="lbleventoComentario" runat="server" Text='<%# Eval("EventoComentario")%>'> </asp:Literal>
-                                                </span>
-                                                <%--</pre>--%>
-                                            </ItemTemplate>
-                                        </asp:TemplateField>
-                                        <asp:TemplateField ItemStyle-Width="30" Visible="false">
-                                            <ItemTemplate>
-                                                <asp:LinkButton data-toggle="tooltip" title="Editar" ID="LnkEditar" OnClick="LnkEditarCheck_Click" CssClass="btn btn-circle btn-sm green" runat="server" Text="<i class='fa fa-pencil'></i>"></asp:LinkButton>
-                                            </ItemTemplate>
-                                        </asp:TemplateField>
-                                        <asp:TemplateField ItemStyle-Width="30">
-                                            <ItemTemplate>
-                                                <asp:LinkButton ID="LnkD" runat="server" OnClick="LnkEliminarchek_Click" CssClass="btn btn-circle btn-sm red" Text="<i class='icon-trash'></i>" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea eliminar el cheklist?" data-btn-ok-label="si" />
-                                            </ItemTemplate>
-                                        </asp:TemplateField>
-                                    </Columns>
-                                </asp:GridView>
-                            </div>
-                        </asp:Panel>
-                    </ContentTemplate>
-                </asp:UpdatePanel>
-                <div class="col-md-4 ">
                     <asp:Panel runat="server" ID="portletMiembros" class="portlet light smmallpadding bordered">
                         <div class="portlet-title">
                             <div class="caption font-green">
                                 <i class="fa fa-user-plus font-green"></i>
                                 <span class="caption-subject bold uppercase">Miembros</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-10">
-                            <div class="form-group form-md-line-input">
-                                <asp:DropDownList ID="DdlUsuario" Visible="true" runat="server" CssClass="form-control select2me input-sm" Width="100%" DataValueField="CveUsuario" DataTextField="Usuario">
-                                </asp:DropDownList>
-                                <asp:Label runat="server" AssociatedControlID="DdlUsuario">Usuario:</asp:Label>
+                            <div class="actions">
+                                <div class="btn-group">
+
+                                    <div class="text-right" style="">
+                                        <asp:TextBox ID="TxtUser2" runat="server" CssClass="form-control input-sm TxtUsuario2" 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>
+                                </div>
                             </div>
                         </div>
-                        <div class="col-md-2" style="direction: rtl; padding-top: 15px;">
-                            <a class="btn btn-default"><i class="fa fa-plus"></i></a>
-                        </div>
-                    </div>
-                    <table id="Gvmiembros" class="Widthall">
-                        <tr class="titletable">
-                            <td colspan="2">Para</td>
-                        </tr>
-                        <tr>
-                            <td>jorge caudillo</td>
-                            <td><a class="btn btn-circle btn-icon-only red btnsmalli"><i class='icon-trash'></i></a></td>
-                        </tr>
-                        <tr class="titletable">
-                            <td colspan="2">Con copia para</td>
-                        </tr>
-                        <tr>
-                            <td>Julian Moreno</td>
-                            <td><a class="btn btn-circle btn-icon-only red btnsmalli"><i class='icon-trash'></i></a></td>
-                        </tr>
-                    </table>--%>
-
-                            <asp:GridView ID="GVUsuarios" runat="server" AutoGenerateColumns="false" DataKeyNames="CveUsuario,Nombre,Correo,Empresa"
-                                CssClass="table table-striped table-advance table-hover Widthall ScrollAD GVUsuarios" GridLines="None" data-height="200">
+                        <div class="portlet-body rowpadding">
+                            <asp:GridView ID="GVUsuariosB" runat="server" AutoGenerateColumns="false" DataKeyNames="CveUsuario,Nombre,Correo,Empresa"
+                                CssClass="table table-striped table-advance table-hover Widthall ScrollAD GVUsuarios" GridLines="None" data-height="200"
+                                OnRowDataBound="GVUsuariosB_RowDataBound">
                                 <Columns>
                                     <asp:TemplateField>
                                         <ItemStyle HorizontalAlign="Center" Width="50px" />
@@ -391,9 +404,14 @@
                                     </asp:TemplateField>
                                     <asp:TemplateField>
                                         <ItemStyle HorizontalAlign="Center" Width="50px" />
-                                        <HeaderTemplate>C. C. Para</HeaderTemplate>
+                                        <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"></i></a>
+                                            <a id="UnchkAll" onclick="chkAll_OncLick(0);" class="linkCorreo" data-toggle="tooltip" title="Quitar seleccion todos(Visibles)"><i class="fa fa-check-square-o"></i></a>
+                                        </HeaderTemplate>
                                         <ItemTemplate>
-                                            <asp:CheckBox ID="ChkCCP" Checked="false" runat="server" />
+                                            <asp:CheckBox ID="ChkCCP" CssClass="ChkOk" Checked="false" runat="server" />
                                         </ItemTemplate>
                                     </asp:TemplateField>
                                     <asp:TemplateField>
@@ -414,6 +432,7 @@
                     </asp:Panel>
                 </div>
             </div>
+
             <div class="text-center">
                 <asp:LinkButton ID="LnkGuardar" OnClick="LnkGuardar_Click" CssClass="btn btn-primary" ValidationGroup="GrpTarea" runat="server">Guardar</asp:LinkButton>
             </div>
@@ -514,6 +533,84 @@
         </ContentTemplate>
     </asp:UpdatePanel>
 
+    <div id='<%= iddivAgregarPara %>' class="modal ADS fade" role="dialog">
+        <div class="modal-dialog">
+            <asp:UpdatePanel ID="UpUsuarios" 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="Literal4" runat="server">Para</asp:Literal></h4>
+                    </div>
+                    <div class="modal-body">
+
+                        <div class="form-group form-md-line-input">
+                            <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">
+                            <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>
+                        <%--<div class="form-group form-md-line-input">
+                            <asp:TextBox ID="TxtUsuario" runat="server" CssClass="form-control TxtUsuario" CausesValidation="true"></asp:TextBox>
+                            <asp:Label runat="server" Text="Usuario" AssociatedControlID="TxtUsuario"></asp:Label>
+                        </div>--%>
+
+
+                        <div class="text-right" style="">
+                            <asp:TextBox ID="TxtUsuario" runat="server" CssClass="form-control input-sm TxtUsuario" 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" runat="server" AutoGenerateColumns="false" DataKeyNames="CveUsuario,Nombre,Correo,Empresa,CveRol,CveSubProyecto"
+                            CssClass="table table-striped table-advance table-hover Widthall ScrollAD GVUsuarios" GridLines="None" data-height="200"
+                            OnRowDataBound="GVUsuarios_RowDataBound">
+                            <Columns>
+
+                                <asp:TemplateField>
+                                    <ItemStyle HorizontalAlign="Center" Width="50px" />
+                                    <HeaderTemplate>Para</HeaderTemplate>
+                                    <ItemTemplate>
+                                        <asp:CheckBox ID="ChkPara" Text=" " runat="server" />
+                                        <%--<asp:CheckBox ID="ChkPara" CssClass="icheck " data-checkbox="icheckbox_flat-red" runat="server" />--%>
+                                        <ajax:MutuallyExclusiveCheckBoxExtender ID="MECBE" runat="server" TargetControlID="ChkPara" Key="Para"></ajax:MutuallyExclusiveCheckBoxExtender>
+                                    </ItemTemplate>
+                                </asp:TemplateField>
+                                <asp:TemplateField>
+                                    <ItemStyle HorizontalAlign="Center" Width="50px" />
+                                    <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"></i></a>
+                                        <a id="UnchkAll" onclick="chkAll_OncLick(0);" class="linkCorreo" data-toggle="tooltip" title="Quitar seleccion todos(Visibles)"><i class="fa fa-check-square-o"></i></a>
+                                    </HeaderTemplate>
+                                    <ItemTemplate>
+                                        <asp:CheckBox ID="ChkCCP" 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 class="modal-footer">
+                        <asp:LinkButton ID="BtnUpMiembros" OnClick="BtnUpMiembros_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>
     <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">
@@ -530,8 +627,8 @@
                         </div>
                     </div>
                     <div class="modal-footer">
-                        <asp:LinkButton ID="BtnAgregarTema" OnClick="BtnAgregarTema_Click" CssClass="btn btn-default" runat="server">Agregar</asp:LinkButton>
-                        <button data-dismiss="modal" class="btn btn-default">Cancelar</button>
+                        <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>
@@ -556,8 +653,8 @@
                         <asp:TextBox ID="Txtfilecomentario" CssClass="ADSdropzone hidden" runat="server"></asp:TextBox>
                     </div>
                     <div class="modal-footer">
-                        <asp:LinkButton ID="BtnAgregarComentario" OnClick="BtnAgregarComentario_Click" CssClass="btn btn-default" runat="server">Agregar</asp:LinkButton>
-                        <button data-dismiss="modal" class="btn btn-default">Cancelar</button>
+                        <asp:LinkButton ID="BtnAgregarComentario" OnClick="BtnAgregarComentario_Click" CssClass="btn btn-primary" runat="server">Agregar</asp:LinkButton>
+                        <button data-dismiss="modal" class="btn btn-danger">Cancelar</button>
                     </div>
                 </ContentTemplate>
             </asp:UpdatePanel>
@@ -581,8 +678,8 @@
                         </div>
                     </div>
                     <div class="modal-footer">
-                        <asp:LinkButton ID="BtnCambiarEstatus" OnClick="BtnCambiarEstatus_Click" CssClass="btn btn-default" ValidationGroup="GrpTarea" runat="server">Guardar</asp:LinkButton>
-                        <button data-dismiss="modal" class="btn btn-default">Cancelar</button>
+                        <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>
                     </div>
                 </ContentTemplate>
             </asp:UpdatePanel>
@@ -604,8 +701,8 @@
                         <asp:TextBox ID="txtActualizarArchivo" CssClass="ADSdropzone hidden" runat="server"></asp:TextBox>
                     </div>
                     <div class="modal-footer">
-                        <asp:LinkButton ID="BtnActualizarArchivo" OnClick="BtnActualizarArchivo_Click" CssClass="btn btn-default" runat="server">Agregar</asp:LinkButton>
-                        <button data-dismiss="modal" class="btn btn-default">Cancelar</button>
+                        <asp:LinkButton ID="BtnActualizarArchivo" OnClick="BtnActualizarArchivo_Click" CssClass="btn btn-primary" runat="server">Agregar</asp:LinkButton>
+                        <button data-dismiss="modal" class="btn btn-danger">Cancelar</button>
                     </div>
                 </ContentTemplate>
             </asp:UpdatePanel>
@@ -620,6 +717,106 @@
     <script src="/Metronic/assets/global/plugins/bootstrap-summernote/summernote.min.js" type="text/javascript"></script>
     <script>
 
+
+        let CveRol = -1;
+        let CveSucursal = -1;
+        let usuariotext = "";
+        function ddlRol_Onchange() {
+            CveRol = $('select.ddlrol option:selected').val();
+            showhideUser();
+        }
+        function DdlSucursales_Onchange() {
+            CveSucursal = $('select.ddlsucursal option:selected').val();
+            showhideUser();
+        }
+
+        let tickBarBmaster = 0;
+        function TxtUsuario_Onchange() {
+            let obj = $('.TxtUsuario');
+            let text = '';
+            tickBarBmaster = tickBarBmaster + 1;
+            tickBarnew = tickBarBmaster;
+            setTimeout(function () {
+                if (tickBarnew == tickBarBmaster) {
+                    if ((text = obj.val().trim()) != usuariotext) {
+                        usuariotext = text;
+                        showhideUser();
+                    }
+                }
+            }, 500);
+        }
+        function TxtUsuario2_Onchange() {
+            let obj = $('.TxtUsuario2');
+            let text = '';
+            tickBarBmaster = tickBarBmaster + 1;
+            tickBarnew = tickBarBmaster;
+            setTimeout(function () {
+                if (tickBarnew == tickBarBmaster) {
+                    if ((text = obj.val().trim()) != usuariotext) {
+                        usuariotext = text;
+                        showhideUser2();
+                    }
+                }
+            }, 500);
+        }
+        function chkAll_OncLick(valor) {
+            $('.GVUsuarios tr:visible .ChkOk input[type="checkbox"]').prop("checked", valor);
+        }
+
+        function showhideUser() {
+            let strCveRol = CveRol > 0 ? '[data-rol="' + CveRol + '"]' : '';
+            let strCveSucursal = CveSucursal > 0 ? '[data-sucursal="' + CveSucursal + '"]' : '';
+            let strusuario = usuariotext.length > 0 ? ' td:nth-child(3):contains("' + usuariotext + '")' : '';// td:nth-child(2)
+
+            $('.GVUsuarios tr.items').attr('hide', '1')//oculto todos
+            if (strusuario.length > 0) {
+                $('.GVUsuarios tr.items' + strCveRol + strCveSucursal + strusuario).closest('tr').attr('hide', '');//muestro los que tienen filtro con usuario,sucursal y rol
+            } else {
+                $('.GVUsuarios tr.items' + strCveRol + strCveSucursal).attr('hide', '');//muestro los que tienen filtro con sucursal y rol
+
+            }
+            //e.Row.Attributes.Add("data-rol", CveRol);
+            //e.Row.Attributes.Add("data-sucursal", CveRol);
+        }
+        function showhideUser2() { 
+            let strusuario = usuariotext.length > 0 ? ' td:nth-child(3):contains("' + usuariotext + '")' : '';// td:nth-child(2)
+
+            $('.GVUsuarios tr.items').attr('hide', '1')//oculto todos
+                $('.GVUsuarios tr.items' + strusuario).closest('tr').attr('hide', '');//muestro los que tienen filtro con usuario
+             
+            //e.Row.Attributes.Add("data-sucursal", CveRol);
+        }
+        function loadeventos() {
+            let input = $('input.TxtUsuario:not(.ConEvento)')
+
+            input.bind({
+                copy: TxtUsuario_Onchange
+                , paste: TxtUsuario_Onchange
+                , cut: TxtUsuario_Onchange
+                , keydown: function (event) { if (event.which == 13) { event.preventDefault(); } TxtUsuario_Onchange();}
+                , keyup: TxtUsuario_Onchange
+            });
+            input.addClass('ConEvento');
+
+
+            let input2 = $('input.TxtUsuario2:not(.ConEvento)')
+
+            input2.bind({
+                copy: TxtUsuario2_Onchange
+                , paste: TxtUsuario2_Onchange
+                , cut: TxtUsuario2_Onchange
+                , keydown: function (event) { if (event.which == 13) { event.preventDefault(); } TxtUsuario2_Onchange();}
+                , keyup: TxtUsuario2_Onchange
+            });
+            input2.addClass('ConEvento');
+        }
+        function ADSReady(ConEvento) {
+            loadeventos();
+            showhideUser();
+            showhideUser2();
+        }
+
+
         function CargaPickers() {
             $.datetimepicker.setLocale('es');
             $('input.ADDateTimePicker').each(function () {
@@ -683,7 +880,7 @@
             texto = texto.substring(0, texto.length - size) + cadena;
             TTitulo.text(texto);
         }
-        var avancecambio=0;
+        var avancecambio = 0;
         function barraavance() {
             let item = $(".TxtAvance:not(.ionRangeSlider)")
             let Valorxyz = $(".TxtAvance").val();
@@ -692,13 +889,13 @@
                 item.ionRangeSlider({
                     min: 0,
                     max: 100,
-                    onChange: (function () { 
+                    onChange: (function () {
                         setTimeout(function () { if ($(".TxtAvance").val() != Valorxyz) { avancecambio = 1 } }, 50);
                     })
                 });
             }
         }
-        
+
 
         var prm = Sys.WebForms.PageRequestManager.getInstance();
         prm.add_endRequest(function (s, e) { loaderinit = loaderinited; });
@@ -710,7 +907,7 @@
         });
         $(document).ready(function () {
             $(document).mouseup(function () {
-                setTimeout( function () { if (avancecambio == 1) { loaderinit = (function () { });$('.BtnUpAvance').click();  avancecambio = 0; } }, 100);
+                setTimeout(function () { if (avancecambio == 1) { loaderinit = (function () { }); $('.BtnUpAvance').click(); avancecambio = 0; } }, 100);
             });
             CargaPickers();
             setchecklistitulo();

OI/TareaDetalle.aspx.cs

@@ -10,6 +10,7 @@ using Extensiones;
 public partial class OI_TareaDetalle : ClsPaginas
 {
     #region Propiedades 
+    public const string iddivAgregarPara = "iddivAgregarPara";
     public const string iddivAgregar = "divModalAgregarActividad";
     public const string iddivAgregarArchivo = "divModalAgregarArchivo";
     public const string iddivAgregarTema = "divModalAgregartema";
@@ -18,9 +19,9 @@ public partial class OI_TareaDetalle : ClsPaginas
     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 CveUsuarioPara { get { return ViewState["CveUsuarioPara"].ToString().ToEntero(); } set { ViewState["CveUsuarioPara"] = value; } }
-    public int CveUsuarioCCPara { get { return ViewState["CveUsuarioCCPara"].ToString().ToEntero(); } set { ViewState["CveUsuarioCCPara"] = 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; } }
     public bool EsNuevo { get { return Convert.ToBoolean(ViewState["EsNuevo"]); } set { ViewState["EsNuevo"] = value; } }
-
     public System.Data.DataTable CheckListNew { get { return ViewState["CheckListNew"] != null ? (System.Data.DataTable)ViewState["CheckListNew"] : null; } set { ViewState["CheckListNew"] = value; } }
     public int chklistitemindex { get { return ViewState["chklistitemindex"] != null ? ViewState["chklistitemindex"].ToString().ToEntero() : 0; } set { ViewState["chklistitemindex"] = value; } }
 
@@ -31,7 +32,8 @@ public partial class OI_TareaDetalle : ClsPaginas
         {
             EsNuevo = true;
             CveUsuarioPara = 0;
-            CveUsuarioCCPara = 0;
+            //System.Xml.Linq.XDocument document = new System.Xml.Linq.XDocument(new System.Xml.Linq.XElement("root", LCveUsuarioCCP.Select(x => new System.Xml.Linq.XElement("item", x))));
+            CveUsuarioDe = 0;
             if (Request["Archivo"] != null)
             {
                 string strArchivo = string.Format("{0}{1}", UsuarioActual.Empresa.Ruta, ModExtensiones.Decripta(Request["Archivo"].ToString()));
@@ -83,9 +85,10 @@ public partial class OI_TareaDetalle : ClsPaginas
                 }
                 else
                 {
+                    portletEstatus.Visible = false;
                     LtlTitulo.Text = "Tarea Nueva";
                     TxtArchivo.Visible = true;
-                    CveUsuarioCCPara = UsuarioActual.CveUsuario;
+                    CveUsuarioDe = UsuarioActual.CveUsuario;
                 }
                 SetUsuarios();
                 HypArchivo.Visible = !TxtArchivo.Visible;
@@ -114,8 +117,49 @@ public partial class OI_TareaDetalle : ClsPaginas
     {
         string FiltroAD = "";
 
-        GVUsuarios.DataSource = get_GlobalDTUsuarios().FiltraParametros(String.Format("CveEmpresa = {0} AND Estatus =1 {1}", UsuarioActual.CveEmpresa, FiltroAD), "Rol ASC");
+
+        DdlRoles.DataSource = get_GlobalDTRoles(UsuarioActual.CveEmpresa);
+        DdlRoles.DataBind();
+        DdlRoles.Items.Insert(0, new ListItem("Todos", "-1"));
+
+        DdlSucursales.DataSource = get_GlobalDTSubProyectos(-1, -1, UsuarioActual.CveEmpresa);
+        DdlSucursales.DataBind();
+        DdlSucursales.Items.Insert(0, new ListItem("Todos", "-1"));
+
+        GVUsuarios.DataSource = get_GlobalDTUsuarios(CveEmpresa: UsuarioActual.CveEmpresa);
         GVUsuarios.DataBind();
+        UpUsuarios.Update();
+
+
+        GVUsuarios.DataSource = get_GlobalDTUsuarios().FiltraParametros(String.Format("CveEmpresa = {0} AND Estatus =1 {1}", UsuarioActual.CveEmpresa, FiltroAD), "Rol ASC");
+        GVUsuariosB.DataSource = GVUsuarios.DataSource;
+        GVUsuarios.DataBind();
+        GVUsuariosB.DataBind();
+    }
+
+    protected void GVUsuariosB_RowDataBound(object sender, GridViewRowEventArgs e)
+    {
+        if (e.Row.RowType == DataControlRowType.DataRow)
+        {
+            string CveRol = e.Row.DBCampo("CveRol");
+            string CveSubProyecto = e.Row.DBCampo("CveSubProyecto");
+            e.Row.CssClass = "items";
+            //e.Row.Attributes.Add("data-rol", CveRol);
+            //e.Row.Attributes.Add("data-sucursal", CveRol);
+        }
+
+    }
+    protected void GVUsuarios_RowDataBound(object sender, GridViewRowEventArgs e)
+    {
+        if (e.Row.RowType == DataControlRowType.DataRow)
+        {
+            string CveRol = e.Row.DBCampo("CveRol");
+            string CveSubProyecto = e.Row.DBCampo("CveSubProyecto");
+            e.Row.CssClass = "items";
+            e.Row.Attributes.Add("data-rol", CveRol);
+            e.Row.Attributes.Add("data-sucursal", CveRol);
+        }
+
     }
     private void cargaActividades(ClsOIEventos ObjOI)
     {
@@ -129,9 +173,10 @@ public partial class OI_TareaDetalle : ClsPaginas
     }
     private void SetUsuarios()
     {
-        StringBuilder para = new StringBuilder();
-        StringBuilder CCpara = new StringBuilder();
-        foreach (GridViewRow gvRow in GVUsuarios.Rows)
+        StringBuilder StrPara = new StringBuilder();
+        StringBuilder StrDeUser = new StringBuilder();
+        StringBuilder StrCCPara = new StringBuilder();
+        foreach (GridViewRow gvRow in GVUsuariosB.Rows)
         {
             if (gvRow.RowType == DataControlRowType.DataRow)
             {
@@ -145,10 +190,10 @@ public partial class OI_TareaDetalle : ClsPaginas
                 {
                     chkpara.Enabled = true;
                     chkCCpara.Enabled = true;
-                    //if (CveUsuario == CveUsuarioCCPara)
-                    //{
-                    //    chkCCpara.Enabled = false;
-                    //}
+                    if (CveUsuario == CveUsuarioDe)
+                    {
+                        chkCCpara.Enabled = false;
+                    }
                 }
                 else
                 {
@@ -157,20 +202,58 @@ public partial class OI_TareaDetalle : ClsPaginas
                     chkCCpara.Enabled = false;
                 }
 
-                if (CveUsuario == CveUsuarioPara)
+                if ((CveUsuario == CveUsuarioPara) || (CveUsuario == CveUsuarioDe))
                 {
-                    chkpara.Checked = true;
-                    para.AppendFormat("\"{0}\"",gvRow.DataKey("Nombre").ToString());
+                    if (CveUsuario == CveUsuarioPara)
+                    {
+                        chkpara.Checked = true;
+                        StrPara.AppendFormat("<span class=\"linkCorreo\" data-toggle=\"tooltip\" title=\"{1}\">\"{0}\"</span>", gvRow.DataKey("Nombre").ToString(), gvRow.DataKey("Correo").ToString());
+                    }
+                    if (CveUsuario == CveUsuarioDe)
+                    {
+                        chkCCpara.Checked = true;
+                        StrDeUser.AppendFormat("<span class=\"linkCorreo\" data-toggle=\"tooltip\" title=\"{1}\">\"{0}\"</span>", gvRow.DataKey("Nombre").ToString(), gvRow.DataKey("Correo").ToString());
+                    }
                 }
-                if (CveUsuario == CveUsuarioCCPara)
+                else if (CveUsuario.Contiene(LCveUsuarioCCP.ToArray<int>()))
+                {
+                    chkCCpara.Checked = true;
+                    StrCCPara.AppendFormat("<span class=\"linkCorreo cssnowrap\" data-toggle=\"tooltip\" title=\"{1}\">\"{0}\"</span>; ", gvRow.DataKey("Nombre").ToString(), gvRow.DataKey("Correo").ToString());
+                }
+            }
+        }
+        LtlPara.Text = StrPara.ToString();
+        LtlDeUser.Text = StrDeUser.ToString();
+        LtlCCPara.Text = StrCCPara.ToString();
+
+
+        foreach (GridViewRow gvRow in GVUsuarios.Rows)
+        {
+            if (gvRow.RowType == DataControlRowType.DataRow)
+            {
+                int CveUsuario = gvRow.DataKey("CveUsuario").ToString().ToEntero();
+                CheckBox chkpara = gvRow.FCCheckBox("ChkPara");
+                CheckBox chkCCpara = gvRow.FCCheckBox("ChkCCP");
+                chkpara.Checked = false;
+                chkCCpara.Checked = false;
+
+
+                if ((CveUsuario == CveUsuarioPara) || (CveUsuario == CveUsuarioDe))
+                {
+                    if (CveUsuario == CveUsuarioPara)
+                    {
+                        chkpara.Checked = true;
+                    }
+                    if (CveUsuario == CveUsuarioDe)
+                    {
+                        chkCCpara.Checked = true;
+                    }
+                }
+                else if (CveUsuario.Contiene(LCveUsuarioCCP.ToArray<int>()))
                 {
                     chkCCpara.Checked = true;
-                    CCpara.AppendFormat("\"{0}\"", gvRow.DataKey("Nombre").ToString());
                 }
-
             }
-            LtlPara.Text = para.ToString();
-            LtlCCPara.Text = CCpara.ToString();
         }
     }
 
@@ -179,7 +262,7 @@ public partial class OI_TareaDetalle : ClsPaginas
         GVcheklist.DataSource = new System.Data.DataTable();
         using (ClsOIEventos ObjOI_E = new ClsOIEventos())
         {
-            if (ObjOI_E.GetOI_Eventos2(RCveEvento, UsuarioActual.CveEmpresa) && ObjOI_E.DtResultados.Rows.Count > 0)
+            if (ObjOI_E.GetEventos2(RCveEvento, UsuarioActual.CveEmpresa) && ObjOI_E.DtResultados.Rows.Count > 0)
             {
                 PnlUsuarios.Visible = true;
                 portletMiembros.Visible = false;
@@ -201,15 +284,27 @@ public partial class OI_TareaDetalle : ClsPaginas
                 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()));
                 TxtArchivo.Visible = (drow["Archivo"].ToString().Length == 0);
                 portletArchivo.Visible = !TxtArchivo.Visible;
-                LnkUpFile.Text = (portletArchivo.Visible ? "Actualizar archivo" : "Agregar archivo");
-                CveUsuarioCCPara = drow["CveUsuarioDe"].ToString().ToEntero();
+                LnkUpFile.Text = (portletArchivo.Visible ? "<i class=\"fa fa-pencil\"></i> Actualizar archivo" : "<i class=\"fa fa-plus\"></i> Agregar archivo");
+                Literal3.Text = portletArchivo.Visible ? "Actualizar archivo" : "Agregar archivo";
+                BtnActualizarArchivo.Text = portletArchivo.Visible ? "Actualizar" : "Agregar";
+                CveUsuarioDe = drow["CveUsuarioDe"].ToString().ToEntero();
                 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"]);
                 //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]
 
                 LtlTitulo.Text = drow["Titulo"].ToString();
+                if (ObjOI_E.GetEventosUsuario(RCveEvento, UsuarioActual.CveEmpresa))
+                {
+                    LCveUsuarioCCP.Clear();
+                    foreach (System.Data.DataRow item in ObjOI_E.DtResultados.Select("CveEvento >0"))
+                    {
+                        LCveUsuarioCCP.Add(item["CveUsuario"].ToString().ToEntero());
+                    }
+                }
                 if (ObjOI_E.Getcheklist(RCveEvento))
                 {
                     GVcheklist.DataSource = ObjOI_E.DtResultados;
@@ -230,10 +325,11 @@ public partial class OI_TareaDetalle : ClsPaginas
         if (EsNuevo)
         {
             string errorMessage = "";
-            int cveUsuarioDe = -1;
+            int cveUsuarioDe = UsuarioActual.CveUsuario;
+            List<int> listaCCP = new List<int>();
             int cveUsuarioPara = -1;
 
-            foreach (GridViewRow gvRow in GVUsuarios.Rows)
+            foreach (GridViewRow gvRow in GVUsuariosB.Rows)
             {
                 if (gvRow.RowType == DataControlRowType.DataRow)
                 {
@@ -246,11 +342,19 @@ public partial class OI_TareaDetalle : ClsPaginas
                     }
                     if (chkCCpara.Checked)
                     {
-                        cveUsuarioDe = CveUsuario;
+                        listaCCP.Add(CveUsuario);
+                        //cveUsuarioDe = CveUsuario;
                     }
                 }
             }
-
+            if (!cveUsuarioDe.Contiene(listaCCP.ToArray<int>()))
+            {
+                listaCCP.Add(cveUsuarioDe);
+            }
+            if (!cveUsuarioPara.Contiene(listaCCP.ToArray<int>()))
+            {
+                listaCCP.Add(cveUsuarioPara);
+            }
             OITipoEventos cveTipoEvento = OITipoEventos.Tarea;
             string asunto = TxtAsunto.Text;
             string descripcion = TxtDescripcion.Text;
@@ -262,7 +366,7 @@ public partial class OI_TareaDetalle : ClsPaginas
             {
                 if (txtFechaI.Text.ToDateTimeExcat("dd/MM/yyyy").Year <= 1999)
                 {
-                    errorMessage = "no se ingreso una fecha de inicio valida";
+                    errorMessage = "No se ingresó una fecha de inicio valida";
 
                 }
                 else
@@ -279,7 +383,7 @@ public partial class OI_TareaDetalle : ClsPaginas
             {
                 if (txtFechaF.Text.ToDateTimeExcat("dd/MM/yyyy").Year <= 1999)
                 {
-                    errorMessage = "no se ingreso una fecha fin valida";
+                    errorMessage = "No se ingresó una fecha fin valida";
 
                 }
                 else
@@ -311,11 +415,11 @@ public partial class OI_TareaDetalle : ClsPaginas
 
             if (cveUsuarioDe <= 0)
             {
-                errorMessage = "no se selecciono el miembro 'C C Para'";
+                errorMessage = "No se selecciono el miembro 'C C Para'";
             }
             if (cveUsuarioPara <= 0)
             {
-                errorMessage = "no se selecciono el miembro 'Para'";
+                errorMessage = "No se selecciono el miembro 'Para'";
 
             }
             if (errorMessage.Length == 0)
@@ -326,7 +430,11 @@ public partial class OI_TareaDetalle : ClsPaginas
                     Continuar = objOI.AddOI_Eventos2(cveTipoEvento, asunto, descripcion, prioridad, cveUsuarioDe, cveUsuarioPara, fechaInicio, fechaFin, cveRevision, archivoname, cveUsuarioIng, cveEmpresa);
                     CveEvento = objOI.CveEvento;
                     Folio = objOI.Folio;
-                    if (Continuar)
+                    if (CveEvento == 0)
+                    {
+                        Continuar = false;
+                    }
+                    if (Continuar && CheckListNew != null)
                     {
                         foreach (System.Data.DataRow item in CheckListNew.Rows)
                         {
@@ -338,7 +446,19 @@ public partial class OI_TareaDetalle : ClsPaginas
 
                         }
                     }
-                    if (Continuar && CveEvento > 0)
+                    if (Continuar)
+                    {
+                        foreach (int item in listaCCP)
+                        {
+                            if (Continuar)
+                            {
+                                Continuar = objOI.AddEventoUsuario(CveEvento, item);
+
+                            }
+
+                        }
+                    }
+                    if (Continuar)
                     {
                         objOI.Commit();
 
@@ -366,7 +486,7 @@ public partial class OI_TareaDetalle : ClsPaginas
                         ruta = string.Format("{0}{1}", ruta, archivoname);//, ArchivoExtencion);
                         System.IO.File.Move(rutaarchivoOri, ruta);
                     }
-                    this.Alert("Se ha agregado la nueva tarea", ModExtensiones.TipoMensaje.MsgInformacion, string.Format("location.replace(\"/OI/TareaDetalle.aspx?CveEvento={0}\");", CveEvento));
+                    this.Alert("Se ha agregadó la nueva tarea", ModExtensiones.TipoMensaje.MsgInformacion, string.Format("location.replace(\"/OI/TareaDetalle.aspx?CveEvento={0}\");", CveEvento));
                 }
             }
             else
@@ -393,7 +513,7 @@ public partial class OI_TareaDetalle : ClsPaginas
             {
                 if (objOI.Removecheklist(gvrow.DataKey("CveEventoCheckList").ToEntero(), gvrow.DataKey("CveEvento").ToEntero(), UsuarioActual.CveUsuario))
                 {
-                    Alert("Se ha eliminado la actividad", ModExtensiones.TipoMensaje.ToastInformacion);
+                    Alert("Se ha eliminadó la actividad", ModExtensiones.TipoMensaje.ToastInformacion);
                     if (objOI.Getcheklist(RCveEvento))
                     {
                         GVcheklist.DataSource = objOI.DtResultados;
@@ -469,7 +589,7 @@ public partial class OI_TareaDetalle : ClsPaginas
         {
             if (objOI.Upcheklist(gvrow.DataKey("CveEventoCheckList").ToEntero(), gvrow.DataKey("CveEvento").ToEntero(), gvrow.DataKey("EventoComentario"), chk.Checked, UsuarioActual.CveUsuario))
             {
-                Alert("Se actualizo el estatus de la actividad", ModExtensiones.TipoMensaje.ToastInformacion);
+                Alert("Se actualizó el estatus de la actividad", ModExtensiones.TipoMensaje.ToastInformacion);
                 if (objOI.Getcheklist(RCveEvento))
                 {
                     GVcheklist.DataSource = objOI.DtResultados;
@@ -512,7 +632,6 @@ public partial class OI_TareaDetalle : ClsPaginas
     protected void LnkcambiarEstatus_Click(object sender, EventArgs e)
     {
         this.RegistraScript(string.Format("$('#{0}').modal()", iddivCambiarEstatus));
-
     }
 
 
@@ -524,10 +643,7 @@ public partial class OI_TareaDetalle : ClsPaginas
 
     protected void LnkAgregarTema_Click(object sender, EventArgs e)
     {
-
-
         this.RegistraScript(string.Format("$('#{0}').modal()", iddivAgregarTema));
-
     }
 
     protected void BtnAgregarTema_Click(object sender, EventArgs e)
@@ -592,7 +708,7 @@ public partial class OI_TareaDetalle : ClsPaginas
                 System.IO.File.Move(rutaarchivoOri, ruta);
             }
             this.RegistraScript(string.Format("$('#{0}').modal('hide')", iddivAgregar));
-            this.Alert("comentario agregado", ModExtensiones.TipoMensaje.ToastInformacion);
+            this.Alert("Comentario agregadó", ModExtensiones.TipoMensaje.ToastInformacion);
             //this.Alert("Se ha agregado la nueva tarea", ModExtensiones.TipoMensaje.MsgInformacion, string.Format("location.replace(\"/OI/TareaDetalle.aspx?CveEvento={0}\");", CveEvento));
         }
 
@@ -655,15 +771,16 @@ public partial class OI_TareaDetalle : ClsPaginas
         using (ClsOIEventos objoi = new ClsOIEventos())
         {
             continuar = objoi.AddUPEventoArchivo(RCveEvento, archivoname, UsuarioActual.CveUsuario);
-             
+
         }
         if (continuar)
         {
             LoadTarea();
             this.RegistraScript(string.Format("$('#{0}').modal('hide')", iddivAgregarArchivo));
-            this.Alert("Archivo Actualizado", ModExtensiones.TipoMensaje.ToastInformacion);
+            this.Alert("Archivo Actualizadó", ModExtensiones.TipoMensaje.ToastInformacion);
         }
         UpContenido.Update();
+        UpAcciones.Update();
     }
 
     protected void BtnUpAvance_Click(object sender, EventArgs e)
@@ -673,19 +790,36 @@ public partial class OI_TareaDetalle : ClsPaginas
         using (ClsOIEventos objoi = new ClsOIEventos())
         {
             continuar = objoi.UPEventoAAvance(RCveEvento, TxtAvance.Text.ToDecimal(), UsuarioActual.CveUsuario);
-            if (continuar){
+            if (continuar)
+            {
                 if (objoi.DtResultados.Rows.Count > 0)
                 {
                     LtlTitulo.Text = objoi.DtResultados.Rows[0]["Titulo"].ToString();
                 }
                 cargaActividades(objoi);
             }
-        } 
+        }
         if (continuar)
         {
-            this.Alert("Avance Actualizado", ModExtensiones.TipoMensaje.ToastInformacion);
+            this.Alert("Avance Actualizadó", ModExtensiones.TipoMensaje.ToastInformacion);
 
         }
         UpTitulo.Update();
     }
+
+    protected void LnkAddTtemaB_Click(object sender, EventArgs e)
+    {
+        this.RegistraScript(string.Format("$('#{0}').modal()", iddivAgregarTema));
+    }
+
+    protected void LnkUpUsuarios_Click(object sender, EventArgs e)
+    {
+        this.RegistraScript(string.Format("$('#{0}').modal()", iddivAgregarPara));
+    }
+
+    protected void BtnUpMiembros_Click(object sender, EventArgs e)
+    {
+
+    }
+
 }

RH/MiPerfil.aspx.vb

@@ -1119,11 +1119,12 @@ Partial Class RH_MiPerfil
                     continuar = False
                 End If
             End If
+            Dim CorreoSupervisor As String = GlobalDTRHPersonal(UsuarioActual.CveEmpresa, DdlSupervisor.SelectedValue.ToEntero).FiltroPrimeroValor("Correo")
             objRH.Dispose()
             If continuar Then
                 CargaVacaciones()
                 CargaVacacionesResumenPeriodoActual()
-                VacacionesMandaCorreoSupervisor("Vacaciones " & UsuarioActual.Nombre, "antonio.gonzalez@adssistemas.mx", VacSupervisorNombre, NombreCompleto, fInicio, fFin, "vacaciones")
+                VacacionesMandaCorreoSupervisor("Vacaciones " & UsuarioActual.Nombre, CorreoSupervisor, VacSupervisorNombre, NombreCompleto, fInicio, fFin, "vacaciones")
                 RegistraScript("$('#ModalAddVacaciones').modal('hide');")
             End If
         Else
@@ -1208,7 +1209,8 @@ Partial Class RH_MiPerfil
             Else
                 Alert("Permiso agregado Actualizado correctamente")
             End If
-            VacacionesMandaCorreoSupervisor("Permiso para " & UsuarioActual.Nombre, "antonio.gonzalez@adssistemas.mx", VacSupervisorNombre, NombreCompleto, TxtFechaInicioPer.Text, TxtFechaFinPer.Text, "permiso")
+            Dim CorreoSupervisor As String = GlobalDTRHPersonal(UsuarioActual.CveEmpresa, DdlSupervisor.SelectedValue.ToEntero).FiltroPrimeroValor("Correo")
+            VacacionesMandaCorreoSupervisor("Permiso para " & UsuarioActual.Nombre, CorreoSupervisor, VacSupervisorNombre, NombreCompleto, TxtFechaInicioPer.Text, TxtFechaFinPer.Text, "permiso")
             RegistraScript("$('#DvPermisos').modal('hide');")
 
         End If

RH/Personal.aspx.vb

@@ -1178,6 +1178,7 @@ Partial Class RH_Personal
 
                 'Carga Datos Personales
                 LtlPersonal.Text = ObjPersonal.NombreCompleto
+                NombreCompleto = ObjPersonal.NombreCompleto
                 'TxtNombre.Text = ObjPersonal.Nombre
                 TxtAPaterno.Text = ObjPersonal.APaterno
                 TxtAMaterno.Text = ObjPersonal.AMaterno

Ventas/Ventas.aspx.vb

@@ -19201,49 +19201,56 @@ Partial Class Ventas
             CancelarRefacturada()
         End If
 
-        CreaObjetosVenta(EsCancelacion:=True)
+        Dim ObjFacturaCancelacion As New Modelos.Factura(UsuarioActual, CveVenta, UsuarioActual.CveEmpresa, EsCancelacion:=True)
+        Try
+            Dim resp As Modelos.Factura.MCancelacionVentaMensaje = Nothing
 
-        Dim resp As Modelos.Factura.MCancelacionVentaMensaje = Nothing
+            If ObjFacturaCancelacion IsNot Nothing AndAlso ObjFacturaCancelacion.CveVenta > 0 Then
 
-        If ObjFactura IsNot Nothing AndAlso ObjFactura.CveVenta > 0 Then
+                If EsRefacturacion Then
+                    resp = ObjFacturaCancelacion.CancelarPorRefacturacion()
+                Else
+                    Dim ListaRemisionesCancelar As New List(Of Integer)
+                    If ChkCanRem.Checked Then
+                        For Each Gvr As GridViewRow In GvCancelarRemisiones.Rows
+                            If Gvr.FCCheckBox("ChkCancelarRemision").Checked Then
+                                ListaRemisionesCancelar.Add(Gvr.DataKey("CveVenta").ToEntero)
+                            End If
+                        Next
+                    End If
 
-            If EsRefacturacion Then
-                resp = ObjFactura.CancelarPorRefacturacion()
-            Else
-                Dim ListaRemisionesCancelar As New List(Of Integer)
-                If ChkCanRem.Checked Then
-                    For Each Gvr As GridViewRow In GvCancelarRemisiones.Rows
-                        If Gvr.FCCheckBox("ChkCancelarRemision").Checked Then
-                            ListaRemisionesCancelar.Add(Gvr.DataKey("CveVenta").ToEntero)
-                        End If
-                    Next
+                    ObjFacturaCancelacion.CveAlmacenDevolucion = CveAlmacenDevolucion
+
+                    resp = ObjFacturaCancelacion.CancelarFactura(ChkDevAlm.Checked, ListaRemisionesCancelar)
                 End If
 
-                ObjFactura.CveAlmacenDevolucion = CveAlmacenDevolucion
-
-                resp = ObjFactura.CancelarFactura(ChkDevAlm.Checked, ListaRemisionesCancelar)
-            End If
-
-            If resp.CveEstatus = 5 AndAlso Not EsRefacturacion Then
-                Alert(resp.Mensaje, resp.TipoMensaje, JSBtnAceptar:="BtnEnviarMailCancelacion();", TextoConfirmacion:="&nbsp;&nbsp;&nbsp;&nbsp;Si&nbsp;&nbsp;&nbsp;&nbsp;", TextoCancelacion:="&nbsp;&nbsp;&nbsp;&nbsp;<a onclick='Recargar()'>No</>&nbsp;&nbsp;&nbsp;&nbsp;")
-            Else
-                If EsRefacturacion Then
-                    If resp.CveEstatus = 20 Then
-                        Response.Redirect($"/Ventas/RepCancelacionesPorRespuesta.aspx?CveVenta={CveVenta}")
-                    ElseIf resp.CveEstatus.Contiene(4, 5) Then
-                        Response.Redirect($"Ventas.aspx?CveDevolucion={CveVenta}&NuevaFactura=1")
+                If resp.CveEstatus = 5 AndAlso Not EsRefacturacion Then
+                    Alert(resp.Mensaje, resp.TipoMensaje, JSBtnAceptar:="BtnEnviarMailCancelacion();", TextoConfirmacion:="&nbsp;&nbsp;&nbsp;&nbsp;Si&nbsp;&nbsp;&nbsp;&nbsp;", TextoCancelacion:="&nbsp;&nbsp;&nbsp;&nbsp;<a onclick='Recargar()'>No</>&nbsp;&nbsp;&nbsp;&nbsp;")
+                Else
+                    If EsRefacturacion Then
+                        If resp.CveEstatus = 20 Then
+                            ObjFacturaCancelacion.Dispose()
+                            Response.Redirect($"/Ventas/RepCancelacionesPorRespuesta.aspx?CveVenta={CveVenta}")
+                        ElseIf resp.CveEstatus.Contiene(4, 5) Then
+                            ObjFacturaCancelacion.Dispose()
+                            Response.Redirect($"Ventas.aspx?CveDevolucion={CveVenta}&NuevaFactura=1")
+                        Else
+                            Alert(resp.Mensaje, resp.TipoMensaje, JSBtnAceptar:="BtnRefrescarPagina();")
+                        End If
                     Else
                         Alert(resp.Mensaje, resp.TipoMensaje, JSBtnAceptar:="BtnRefrescarPagina();")
                     End If
-                Else
-                    Alert(resp.Mensaje, resp.TipoMensaje, JSBtnAceptar:="BtnRefrescarPagina();")
                 End If
-            End If
 
-            ObjFactura.CveAlmacen = -1
-        Else
-            Alert("Ocurrió un error al generar la cancelación", TipoMensaje.MsgError)
-        End If
+                ObjFacturaCancelacion.CveAlmacen = -1
+            Else
+                Alert("Ocurrió un error al generar la cancelación", TipoMensaje.MsgError)
+            End If
+        Catch ex As Exception
+            OnError("Ocurrío un error al cancelar", ex)
+        End Try
+        ObjFacturaCancelacion.Dispose()
+
 
         UpEstatus.Update()