<% Dim RutaHTTP Dim Favorito Dim Fecha Dim prom Dim cont Dim strTemp numArticulo="13564" Fecha = "" session("PalabrasClaves") = "4 pasos que no deben faltar en un programa de high potential" ' ' ' '' ' ' ' ' ' 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 = "4 pasos que no deben faltar en un programa de high potential" 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 = "Desarrollo Empresarial" varTitulo1 = "4 pasos que no deben faltar en un programa de high potential" varAntetituloTitulo = ""&varAntetitulo1&"
"&varTitulo1&"" %> <% varSumario1 = "Definir el nivel de contribución de cada uno de los roles e identificar el talento natural de las personas, están entre los pasos que recomienda Diego Cardozo, Gerente de Psigma Corp para implementar un programa de High Potential." varSumario = ""&varSumario1&"" %> <% if Session("CodWebsite")=2 then if numArticulo < 10329 or numArticulo > 11708 then %>
<%=varAntetituloTitulo%>
<%=varSumario%>
<% end if%> <% else %>
<%=varAntetituloTitulo%>
<%=varSumario%>
<% end if %>

<% strAutor="Gestionhumana.com" 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 a Diego Cardozo, Gerente de Psigma Corp para implementar un programa de High Potential, es fundamental tener en cuenta cuatro pasos, que son:

1. Definir el nivel de contribución de cada uno de los roles al cual va a aplicar o podría aplicar la persona; se debe tener claro el perfil y las exigencias de los roles, así mismo la realidad a la cual se enfrentaría el candidato junto a la complejidad de la tarea a ejercer.

2. Identificar el talento natural de las personas; más allá del tipo de formación profesional, es reconocer las habilidades innatas que poseen estas personas, para impulsar su talento natural. El conocer este tipo de talento y generar estrategias de desarrollo para potencializarlo, puede impactar diferentes variables del negocio como la productividad, la rentabilidad y el crecimiento de una empresa.

3. Evaluar a través de metodologías concretas, como entrevistas codificadas; esto permitirá tener un mapa de talento claro, con la fijación de objetivos concretos, con ejes de tiempos donde se trabaje los gaps que falten en el hoy, de un candidato clave al siguiente en la escala.

4. Definir un programa de desarrollo individual; donde se desarrollen las habilidades de la gente, basándose en sus fortalezas y no en sus debilidades. Cuando se trabaja en lo que la gente mejor hace, se vuelve exponencial al resultado y se puede tener un desarrollo más concreto y exigente.





<% 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 %>