<% Dim RutaHTTP Dim Favorito Dim Fecha Dim prom Dim cont Dim strTemp numArticulo="13105" Fecha = "" session("PalabrasClaves") = "" ' ' ' '' ' ' ' ' ' RutaHTTP = "http://" & Request.ServerVariables("SERVER_NAME") & Left(Request.ServerVariables("PATH_INFO"), InstrRev(Request.ServerVariables("PATH_INFO"), "/")) ' se valida de la url si contiene los parametro que dan acceso para los contenidos de evaluaciones de la plataforma de capacitacion RutaCompleta = Request.ServerVariables("HTTP_REFERER") Cadena1 = RutaCompleta Cadena2= "IFramePanel.asp" If InStr(Cadena1,Cadena2)>0 then EsPanel = 1 Else EsPanel = 0 End if 'fin validacion txtTituloPagina = "" Session("txtTituloPagina")= trim(txtTituloPagina) If Request("print") = 1 then If Session("CodWebsite")=1 then %> <%=Application("website")%> - <%=txtTituloPagina%> <% Response.write( "") %>
<%=prObtieneBanner(Session("txtTituloPagina"),"TOPE")%>
<% else %> <%=Application("website")%> - <%=txtTituloPagina%> <% Response.write( "") %>
<%=prObtieneBanner(Session("txtTituloPagina"),"TOPE")%>
<% End if else if Request("IframePanel") <> 1 and Session("EsIframe")="" then Server.execute("../../../PaisEncabezadoArticulo.asp") else %> <%=Application("website")%> - <%=txtTituloPagina%> <% Response.write( "") %>
Planes de capacitación
<% end if end if session("PalabrasClaves") = "" %> <% if Request("IframePanel") <> 1 and Session("EsIframe")="" then if Request("print") <> 1 then Server.execute("../../../Include/Menu.asp") end if end if%> <% if Request("IframePanel") <> 1 then %> <% if Request("print") <> 1 then Response.write "" If Session("ID_Suscriptor") <> "" AND numArticulo <> "" Then Cadena_SQL = "SELECT COUNT(*) as cuantos FROM FavoritoArticulo WHERE CodSuscriptor=" & Session("ID_Suscriptor") & _ " AND CodObjetoSE=" & numArticulo ' Response.write (Cadena_SQL) Set RS = Conn.Execute(Cadena_SQL) If not RS.EOF Then If Rs("Cuantos")>0 Then favorito = "" Else favorito = "" End If Else favorito = "" End If Rs.close Set Rs=Nothing End If Response.write "" Response.write "" end if end if %>
    " & favorito & "    " If Session("CodWebsite")=1 then Response.write "      " End if Response.write "


<% Cadena_SQL = "select calificacion from calificaArticulo where CodObjetoSE = "&numarticulo Set RS = conn.execute(Cadena_SQL) cont = 0 prom = 0 Do while not RS.EOF prom = prom + RS("calificacion") RS.MoveNext cont = cont + 1 loop if cont=0 then cont=1 for i=1 to prom/cont Response.write " " next %> <% varAntetitulo1 = "PodCast" varTitulo1 = "Habilidades y destrezas de los líderes de Gestión Humana" varAntetituloTitulo = ""&varAntetitulo1&"
"&varTitulo1&"" %> <% varSumario1 = "Beltrán Benjumea, Director ejecutivo de la compañía consultora Michael Page explica como a través de habilidades de negociación, liderazgo y comunicación los líderes de Gestión Humana pueden focalizar sus acciones impactando las metas del negocio." varSumario = ""&varSumario1&"" %> <% if Session("CodWebsite")=2 then if numArticulo < 10329 or numArticulo > 11708 then %>
<%=varAntetituloTitulo%>
<%=varSumario%>
<% end if%> <% else %>
<%=varAntetituloTitulo%>
<%=varSumario%>
<% end if %>

<% strAutor="" Session("strAutor") = strAutor strTiempo="" If strAutor <> "" Then Response.write "Por " & strAutor & "" End If Session("Fecha") = Fecha If Fecha <> "" Then Response.write ("
" & Day(Fecha) & " de " &Meses(Month(Fecha)) & " de " & Year(Fecha)) End If If strTiempo <> "" Then%>
Tiempo estimado de lectura: <%'Response.write("
Tiempo estimado de lectura:" & " " & strTiempo) Response.write strTiempo End If %>
<% %>
Tiempo de Descarga Aprox: 20 segundos

De acuerdo al Director Ejecutivo de Michael Page, el líder de Gestión Humana debe tener en cuenta para trascender de sus funciones:


1. Conocimiento del negocio: El líder de Gestión Humana debe estar en un aprendizaje continúo del negocio, tener la capacidad para analizar los detalles de la operación en todas sus áreas, tanto funcionales como de negocio, actuando como parte integral del equipo y no como un ente aislado.
2. Comunicación: Habilidad para dar a conocer sus ideas y transmitirlas de manera efectiva, generando canales que permitan la retroalimentación.
3. Capacidad de negociación: Con el conocimiento del negocio y la habilidad comunicativa generar medidas referentes al Talento Humano que impacten los resultados del negocio. Esto le permitirá contar con el respaldo de la Alta Gerencia.
4. Liderazgo: Actuar como intermediario efectivo entre la organización y sus colaboradores, generando confianza y credibilidad de su gestión.
5. Gestor del cambio: Capacidad de adaptación, flexibilidad y dinamismo frente al cambio, estando a la vanguardia de lo hoy exige el mercado. Profesionales altamente competitivos.





<% If EsPanel then datosconcatena = "IDUSUARIO=" & request("IDUSUARIO") & "&ITEM=" & request("ITEM")& "&CODPLANDESARROLLOUSUARIO=" & request("CODPLANDESARROLLOUSUARIO") %> <% End if if Request("IframePanel") <> 1 and Session("EsIframe")="" then Server.execute("../../../PaisPataArticulo.asp") else %>
<% end if If Request("IdUsuario")="" then Session("EsIframe") = "" end if %>