<% Dim RutaHTTP Dim Favorito Dim Fecha Dim prom Dim cont Dim strTemp numArticulo="16902" Fecha = "10/02/2020" session("PalabrasClaves") = "gestión humana,recursos humanos,clima laboral,riesgo psicosocial,selección,desarrollo, salarios,compensación,evaluación de desempeño,indicadores de gestión humana,empleo,covid19" ' ' ' '' ' ' ' ' ' 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 = "Covid-19: Este es el protocolo para instituciones educativas y el regreso a clases presenciales" 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 = "Normativa/Resolución 1721" varTitulo1 = "Covid-19: Este es el protocolo para instituciones educativas y el regreso a clases presenciales" varAntetituloTitulo = ""&varAntetitulo1&"
"&varTitulo1&"" %> <% varSumario1 = "Tal como se había anunciado, el Gobierno, a través del Ministerio de Salud, expidió el protocolo de bioseguridad para instituciones educativas, de educación superior y las instituciones de educación para el trabajo y el desarrollo humano" 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 %>
<% %>
Este es complementario al definido en la Resolución 666, del 24 de abril del 2020, y a las demás medidas que los responsables de cada una de las actividades previstas crean necesarias.

Por ejemplo, entre las medidas se deben establecer horarios específicos para lavado de manos mínimo cada tres horas; y para el caso de educación preescolar y básica bajo la supervisión de un adulto. Adicionalmente, toda la comunidad académica debe tener adecuado uso del tapabocas y retirarlo solamente para comer.

Se define también garantizar el distanciamiento físico de un metro en las aulas y de dos metros en otras áreas y con estas pautas de distancia se deben definir los aforos de los respectivos espacios. Además, los colegios deben abstenerse de realizar reuniones colectivas presenciales con las familias y cuidadores, teniendo como alternativa la virtualidad.

Con información de www.legismovil.com
Minsalud


<% txturl = "" txturl = Replace(txtUrl,"'>","' class=""Parrafo"">") Response.write txturl %> Consulte la Resolución 1721

<% txturl = "" txturl = Replace(txtUrl,"'>","' class=""Parrafo"">") Response.write txturl %> Archivo Normativa





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