diff --git a/App_Code/ClsSisUsuarios.vb b/App_Code/ClsSisUsuarios.vb
index c1f9e640a..d1ff35a2d 100644
--- a/App_Code/ClsSisUsuarios.vb
+++ b/App_Code/ClsSisUsuarios.vb
@@ -191,7 +191,7 @@ Public Class ClsSisUsuarios
         End Try
         Return Retorno
     End Function
-    Public Function ValidaUsuario(Usuario As String, Password As String, tIMEI As String, Optional CveEmpresa As Integer = -1) As Usuario
+    Public Function ValidaUsuario(Usuario As String, Password As String, tIMEI As String, Optional CveEmpresa As Integer = -1, Optional CvePlataforma As Integer = -1) As Usuario
         Dim Retorno As Usuario = Nothing
         DataAdapter("PA_Sis_UsuariosGet")
         With SqlAdapter.SelectCommand.Parameters
@@ -199,6 +199,7 @@ Public Class ClsSisUsuarios
             .Add("@CveRol", SqlDbType.Int).Value = -1
             .Add("@Usuario", SqlDbType.VarChar).Value = Usuario
             .Add("@Contraseña", SqlDbType.VarChar).Value = Password
+            .Add("@CvePlataforma", SqlDbType.Int).Value = CvePlataforma
             .Add("@EsLogIn", SqlDbType.Bit).Value = 1
         End With
         Try
diff --git a/Compras/eFacturas.aspx b/Compras/eFacturas.aspx
index 3f7b5b01f..89b63605c 100644
--- a/Compras/eFacturas.aspx
+++ b/Compras/eFacturas.aspx
@@ -210,7 +210,7 @@
                                 </asp:TemplateField>
                                 <asp:TemplateField HeaderText="Proveedor">
                                     <ItemTemplate>
-                                        <asp:HyperLink ID="HplProveedor" runat="server" CssClass="Texto" Target="_newtab" Text='<%# Eval("NombreProveedor") %>'></asp:HyperLink>
+                                        <asp:HyperLink ID="HplProveedor" runat="server" CssClass="Texto" Target="_blank" rel="opener"  Text='<%# Eval("NombreProveedor") %>'></asp:HyperLink>
                                     </ItemTemplate>
                                     <ItemStyle HorizontalAlign="Left" />
                                 </asp:TemplateField>
@@ -236,7 +236,7 @@
                                 <asp:TemplateField HeaderText="Prov">
                                     <ItemTemplate>
                                         <%--<asp:Literal ID="LtlProv" runat="server"></asp:Literal>--%>
-                                        <asp:HyperLink ID="HplProv" runat="server" Visible='False' CssClass="btn btn-circle btn-sm blue" ToolTip="Agregar Proveedor" Target="_blank"><i class="fa fa-pencil"></i></asp:HyperLink>
+                                        <asp:HyperLink ID="HplProv" runat="server" Visible='False' CssClass="btn btn-circle btn-sm blue" ToolTip="Agregar Proveedor" Target="_blank" rel="opener"><i class="fa fa-pencil"></i></asp:HyperLink>
                                     </ItemTemplate>
                                     <ItemStyle HorizontalAlign="Center" />
                                 </asp:TemplateField>
@@ -250,7 +250,7 @@
                                 <asp:TemplateField HeaderText="Agregar">
                                     <ItemTemplate>
                                         <%--<asp:Image ID="ImgAgregar" runat="server" Style="cursor: pointer;" Visible='<%# Eval("CveProveedor").ToString <> "" %>' ToolTip="Agregar Factura" ImageUrl="/Imagenes/Nota.gif" Height="18px" />--%>
-                                        <asp:HyperLink ID="HplAgregar" runat="server" CssClass="btn btn-circle btn-sm green" Visible='<%# Eval("CveProveedor").ToString <> "" %>' data-toggle="tooltip" title="Agregar Factura" rel="opener" Target="_blank"><i class="fa fa-plus"></i></asp:HyperLink>
+                                        <asp:HyperLink ID="HplAgregar" runat="server" CssClass="btn btn-circle btn-sm green" Visible='<%# Eval("CveProveedor").ToString <> "" %>' data-toggle="tooltip" title="Agregar Factura" rel="opener" Target="_blank" ><i class="fa fa-plus"></i></asp:HyperLink>
                                         <asp:LinkButton ID="LnkAgregarPago" runat="server" OnClick="LnkAgregarPago_Click" CssClass="btn btn-sm blue" Visible="false" data-toggle="tooltip" title="Vincular Pago"><i class="fa fa-check"></i></asp:LinkButton>
                                     </ItemTemplate>
                                     <ItemStyle HorizontalAlign="Center" />
@@ -324,7 +324,7 @@
                                     </asp:TemplateField>
                                     <asp:TemplateField HeaderText="Proveedor">
                                         <ItemTemplate>
-                                            <asp:HyperLink ID="HplProveedor" runat="server" CssClass="Texto" Target="_newtab" Text='<%# Eval("NombreProveedor") %>'></asp:HyperLink>
+                                            <asp:HyperLink ID="HplProveedor" runat="server" CssClass="Texto" Target="_blank" rel="opener" Text='<%# Eval("NombreProveedor") %>'></asp:HyperLink>
                                         </ItemTemplate>
                                         <ItemStyle HorizontalAlign="Left" />
                                     </asp:TemplateField>
@@ -348,7 +348,7 @@
                                     </asp:TemplateField>
                                     <asp:TemplateField HeaderText="Prov">
                                         <ItemTemplate>
-                                            <asp:HyperLink ID="HplProv" runat="server" Visible='False' CssClass="btn btn-circle btn-sm blue" ToolTip="Agregar Proveedor" Target="_blank"><i class="fa fa-pencil"></i></asp:HyperLink>
+                                            <asp:HyperLink ID="HplProv" runat="server" Visible='False' CssClass="btn btn-circle btn-sm blue" ToolTip="Agregar Proveedor" rel="opener" Target="_blank"><i class="fa fa-pencil"></i></asp:HyperLink>
                                         </ItemTemplate>
                                         <ItemStyle HorizontalAlign="Center" />
                                     </asp:TemplateField>
@@ -361,7 +361,7 @@
                                     </asp:TemplateField>
                                     <asp:TemplateField HeaderText="Agregar">
                                         <ItemTemplate>
-                                            <asp:HyperLink ID="HplAgregarP" runat="server" CssClass="btn btn-circle btn-sm green" Visible='<%# Eval("CveProveedor").ToString <> "" %>' data-toggle="tooltip" title="Agregar Factura" Target="_blank"><i class="fa fa-plus"></i></asp:HyperLink>
+                                            <asp:HyperLink ID="HplAgregarP" runat="server" CssClass="btn btn-circle btn-sm green" Visible='<%# Eval("CveProveedor").ToString <> "" %>' data-toggle="tooltip" title="Agregar Factura" Target="_blank" rel="opener"><i class="fa fa-plus"></i></asp:HyperLink>
                                             <asp:LinkButton ID="LnkAgregarPagoP" runat="server" OnClick="LnkAgregarPago_Click" CssClass="btn btn-sm blue" Visible="false" data-toggle="tooltip" ></asp:LinkButton>
                                         </ItemTemplate>
                                         <ItemStyle HorizontalAlign="Center" />
diff --git a/Compras/eFacturas.aspx.vb b/Compras/eFacturas.aspx.vb
index ed6cba02e..0f8199f3a 100644
--- a/Compras/eFacturas.aspx.vb
+++ b/Compras/eFacturas.aspx.vb
@@ -898,7 +898,7 @@ Partial Class Compras_eFacturas
 
             End If
             If e.Row.DBCampo("CveCompra") <> "" Then
-                e.Row.FCLiteral("LtlFolio").Text = String.Format("<a class=""Texto"" style=""cursor:pointer;text-decoration: underline;"" href='/Compras/Compras.aspx?CveCompra={0}' target='_newtab');"">{1}</a>", e.Row.DBCampo("CveCompra"), e.Row.DBCampo("SerieFolio"))  '1\Compras\GAPC480413QL3\A-69.xml
+                e.Row.FCLiteral("LtlFolio").Text = String.Format("<a class=""Texto"" style=""cursor:pointer;text-decoration: underline;"" href='/Compras/Compras.aspx?CveCompra={0}' target='_blank' rel='opener'  );"">{1}</a>", e.Row.DBCampo("CveCompra"), e.Row.DBCampo("SerieFolio"))  '1\Compras\GAPC480413QL3\A-69.xml
             End If
 
             If e.Row.DBCampo("CveProveedor") = "" Then
@@ -1059,7 +1059,7 @@ Partial Class Compras_eFacturas
 
             End If
             If e.Row.DBCampo("CveCompra") <> "" Then
-                e.Row.FCLiteral("LtlFolio").Text = String.Format("<a class=""Texto"" style=""cursor:pointer;text-decoration: underline;"" href='/Compras/Compras.aspx?CveCompra={0}' target='_newtab');"">{1}</a>", e.Row.DBCampo("CveCompra"), e.Row.DBCampo("SerieFolio"))  '1\Compras\GAPC480413QL3\A-69.xml
+                e.Row.FCLiteral("LtlFolio").Text = String.Format("<a class=""Texto"" style=""cursor:pointer;text-decoration: underline;"" href='/Compras/Compras.aspx?CveCompra={0}' target='_blank' rel='opener');"">{1}</a>", e.Row.DBCampo("CveCompra"), e.Row.DBCampo("SerieFolio"))  '1\Compras\GAPC480413QL3\A-69.xml
             End If
 
             If e.Row.DBCampo("CveProveedor") = "" Then
diff --git a/GPS/WizardDispositivos.aspx.cs b/GPS/WizardDispositivos.aspx.cs
index d82f32cbb..d5d2dcbf0 100644
--- a/GPS/WizardDispositivos.aspx.cs
+++ b/GPS/WizardDispositivos.aspx.cs
@@ -153,7 +153,7 @@ public partial class GPS_WizardDispositivos : ClsPaginas
         if (CveDispositivo < 0)
         {
             TabContainer.ActiveTabIndex = 0;
-            Alert("Debe guardar el dispositivo primero");
+            Alert("Debe guardar el dispositivo primero",ModExtensiones.TipoMensaje.MsgAdvertencia );
         }
     }
 
@@ -376,7 +376,13 @@ public partial class GPS_WizardDispositivos : ClsPaginas
                 CargaDatos(CveDispositivo);
                 Updatos.Update();
                 string script = "";
-                if (GPSNEW == 1) { TabContainer.ActiveTabIndex = 1; script = $"RegresaValor({CveDispositivo})"; }
+                if (GPSNEW == 1) { 
+                    TabContainer.ActiveTabIndex = 1; script = $"RegresaValor({CveDispositivo})";
+                    ClsSisMail correo = new ClsSisMail();
+                    Correo.SendMail(UsuarioActual.EmpresaNotificaciones, "paola@adssistemas.mx;Caudillo.90d@gmail.com", "Alta nuevo dispositivo", 
+                        $"se le informa la alta de un nuevo dispositivo en la empresa \"{UsuarioActual.Empresa.Empresa}\"\r\nIMEI : \"{IMEI}\"\r\nSerie : \"{Serie}\"\r\nModelo : \"{modelo}\"");
+
+                }
 
                 Alert("El dispositivo y sus configuraciones, se han guardado correctamente", ModExtensiones.TipoMensaje.MsgInformacion, script);
                 if (TipoDispositivo == 2)
diff --git a/LogIn.aspx.vb b/LogIn.aspx.vb
index bff8ad86f..e82ce6868 100644
--- a/LogIn.aspx.vb
+++ b/LogIn.aspx.vb
@@ -198,19 +198,14 @@ Partial Class LogIn
             Dim Usuario As Usuario = Nothing
             'Dim UsuarioAsignaciones As Usuario = Nothing
 
-            Usuario = ObjUsuario.ValidaUsuario(txtUsuario.Text, Encripta(TxtContraseña.Text.Trim), IMEI)
+            Dim isgps = Request.Url.Host.ToUpper().Contains("SIGNALSGPS".ToUpper())
+            Usuario = ObjUsuario.ValidaUsuario(txtUsuario.Text, Encripta(TxtContraseña.Text.Trim), IMEI, CvePlataforma:=If(isgps, 3, 1))
             'UsuarioAsignaciones = ObjUsuario.ValidaUsuarioAsignacion(Usuario.CveUsuario, Usuario.CveEmpresa)
 
             ADSSessionConfig.sessionUser = Usuario
             ADSSessionConfig.sessionDpage = False
             ObjUsuario.Dispose()
-            Dim isgps = Request.Url.Host.ToUpper().Contains("SIGNALSGPS".ToUpper())
-            If Usuario IsNot Nothing AndAlso (
-                 Usuario.CveRol = 1 OrElse (
-                (isgps AndAlso (Usuario.CvePlataforma = 3 OrElse Usuario.CveRol = 1200)) OrElse
-                ((Not isgps) AndAlso (Usuario.CvePlataforma <> 3 AndAlso Usuario.CveRol <> 1200))
-                )
-                ) Then
+            If Usuario IsNot Nothing Then
                 If Not Usuario.AutorizadoxIP OrElse (HddAdsCodex.Text.Length > 0 AndAlso Usuario.CodigoAutorizado = HddAdsCodex.Text) Then
 
                     CreaObjetoEmpresa(Usuario)
diff --git a/vwd.webinfo b/vwd.webinfo
index 37b42e3cc..d553518ff 100644
--- a/vwd.webinfo
+++ b/vwd.webinfo
@@ -174,6 +174,8 @@
     
   
     
+  
+