Pendientes BDH, mejoras servicion E141, mwjoras carga PS entradas/salidas,cambios en modalidad contable, favicon signals gps

Site.master.vb

@@ -74,6 +74,12 @@ Partial Class Site
                     TxtTit.Visible = True
                 End If
 
+                If UsuarioActual.Empresa.CvePlataforma = 3 Then
+                    lnkFavicon.Href = "/Imagenes/favicongps.ico"
+                Else
+                    lnkFavicon.Href = "/Imagenes/favicon.ico"
+                End If
+
                 Dim thisURL As String = Request.Url.Segments(Request.Url.Segments.Count - 1)
                 If thisURL.Equals("WizardRegistro.aspx") OrElse thisURL.Equals("Registro.aspx") Then
                     LitTit.Text = "<span style='color:white; font-size:x-large'>AD</span>&nbsp;<span style='color:  #32A1CF; font-size:x-large'> Soluciones en TI</span> "