FEPESP discute prevenção do H1N1 nas escolas
Publicado em 18/06/2010
A FEPESP participou de uma reunião no Ministério Público do Trabalho, dia 14/06, para discutir as medidas que devem ser adotadas pelas escolas para proteger professores e demais trabalhadores contra o vírus H1N1 no ambiente de trabalho.
Em agosto de 2009, a FEPESP recorreu ao Ministério Púbico para garantir que as escolas afastassem as professoras grávidas. Como resultado, foi publicada uma notificação recomendatória determinando o afastamento das gestantes e dos empregados pertencentes a grupos de risco.
A reunião do dia 14 serviu para dar continuidade às medidas adotadas no ano passado. Ela foi organizada pela Dra. Silvana Márcia Montechi Valladares de Oliveira, da Coordenadoria da Defesa dos Interesses Difusos e Coletivos.
Além de Celso Napolitano, presidente da FEPESP, participaram do encontro o analista pericial de medicina do trabalho do MPT, Maurício Pedroso de Araújo, e representantes das secretarias de Educação e Saúde do estado e do município de São Paulo.
A pedido da FEPESP, será realizada uma nova reunião no dia 24/06 com a participação das entidades patronais - SIEEESP, SEMESP e SESI-SENAI.
Cuidados que os estabelecimentos de ensino devem ter
A Secretaria de Saúde avalia que a situação agora é melhor, por conta da campanha de vacinação e do maior conhecimento sobre a gripe.
No Estado de São Paulo, quase 20 milhões de pessoas já foram imunizadas. Estima-se que pelo menos 72% das gestantes tomaram a vacina. Cerca de 800 mil crianças entre 2 anos e 4 anos e 11 meses já tomaram a primeira dose ( o prazo encerra-se dia 18/06).
Ainda assim, a situação exige cuidado. Segundo as representantes da Secretaria Estadual da Saúde, a primeira medida é reconhecer os sintomas da gripe e estar atento à ocorrência de surto na classe.
Considera-se surto quando três ou mais indivíduos de uma mesma classe apresentam os sintomas da gripe.
Os sintomas são febre (38 graus ou mais) e pelo menos duas entre outras três manifestações: tosse, dor de garganta e dificuldade respirátoria.
Veja quais foram as orientações da Secretaria da Saúde:
a) notificação - se três ou mais indivíduos numa mesma classe apresentarem sintomas da gripe, a escola é obrigada a notificar a Secretaria Municipal de Saúde.
b) afastamento das gestantes- ainda que vacinada, a professora grávida deve ser retirada da classe se houver ocorrência da gripe entre os seus alunos. Ela poderá ser transferida para uma outra classe ou local com menos aglomeração por pelo menos cinco dias.
c) licença médica - alunos acometidos da gripe devem permanecer afastados por período entre 10 a 15 dias a partir do início dos sintomas.
Se o professor adoecer deve afastar-se do trabalho pelo tempo que seu médico julgar necessário, mediante atestado. Vale lembrar que a Convenção Coletiva garante a apresentação de atestado de médico particular (não é mais necessária a convalidação pelo sindicato).
d) medidas de prevenção - ambiente arejados, não compartilhamento de objetos de uso pessoal e cuidados com a higiene continuam sendo medidas importantes para conter o avanço da doença.
A água, inclusive no bebedouro, deve ser tomada sempre em copo descartável . Sabonete líquido e toalhas descartáveis são suficientes e só devem ser substituídos por álcool geo quando não houver possibilidade de lavar as mãos com água e sabão.
Fonte: FEPESP
" & vbCrLf 'Response.Write strReferringPage & "
" & vbCrLf ' Read in and set the initial values of our message parameters strFromName = Trim(Request.Form("txtFromName")) strFromEmail = Trim(Request.Form("txtFromEmail")) strToEmail = Trim(Request.Form("txtToEmail")) strSubject = "www.contee.org.br" strBody = Trim(Request.Form("txtMessage")) ' I set the body message to a message that referenced the page the ' user arrived from. This makes it great if you place a link to it ' from your different articles, but can be weird if people link in ' from other web sites. If strBody = "" Then If strReferringPage = "" Or InStr(1, strReferringPage, "www.contee.org.br", 1) = 0 Then strBody = "" strBody = strBody & "O link abaixo é uma sugestão de leitura: FEPESP discute prevenção do H1N1 nas escolas" & vbCrLf strBody = strBody & vbCrLf strBody = strBody & "http://www.contee.org.br/noticias/msin/nmsin1018.asp" & vbCrLf Else strBody = "O link abaixo é uma sugestão de leitura: FEPESP discute prevenção do H1N1 nas escolas" sstrBody = strBody & "O link abaixo é uma sugestão de leitura: FEPESP discute prevenção do H1N1 nas escolas" & vbCrLf strBody = strBody & vbCrLf strBody = strBody & "http://www.contee.org.br/noticias/msin/nmsin1018.asp" & vbCrLf End If End If ' Quick validation just to make sure our parameters are somewhat valid bValidInput = True bValidInput = bValidInput And strFromName <> "" bValidInput = bValidInput And IsValidEmail(strFromEmail) bValidInput = bValidInput And IsValidEmail(strToEmail) ' If valid send email and show thanks, o/w show form If bValidInput Then ' Set up our email object and send the message Set objCDONTS = Server.CreateObject("CDONTS.NewMail") objCDONTS.From = strFromName & " <" & strFromEmail & ">" objCDONTS.To = strToEmail objCDONTS.Subject = strSubject objCDONTS.Body = strBody objCDONTS.Send Set objCDONTS = Nothing ' Show our thank you message ShowThanksMsg Else If "http://" & Request.ServerVariables("HTTP_HOST") & strThisPage = strReferringPage Then Response.Write "Foi encontrado erro no preenchimento. Por favor confira os dados:" & "
" & vbCrLf End If ' Show our information retrieval form ShowReferralForm strThisPage, strFromName, strFromEmail, strToEmail, strBody End If ' End of page logic... subs and functions follow! %> <% ' Subroutines and Functions that encapsulate some functionality ' and make the above code easier to write... and read. ' A quick email syntax checker. It's not perfect, ' but it's quick and easy and will catch most of ' the bad addresses than people type in. Function IsValidEmail(strEmail) Dim bIsValid bIsValid = True If Len(strEmail) < 5 Then bIsValid = False Else If Instr(1, strEmail, " ") <> 0 Then bIsValid = False Else If InStr(1, strEmail, "@", 1) < 2 Then bIsValid = False Else If InStrRev(strEmail, ".") < InStr(1, strEmail, "@", 1) + 2 Then bIsValid = False End If End If End If End If IsValidEmail = bIsValid End Function ' I made this a function just to get it out of the ' logic and make it easier to read. It just shows the ' form that asks for the input Sub ShowReferralForm(strPageName, strFromName, strFromEmail, strToEmail, strBody) ' I use script_name so users can rename this script witout having to change the code. %> <% '
The Message to be sent:
'Subject: < %= strSubject % >
'Body: < %= strBody % >
End Sub ' This just shows our thank you message... probably didn't need to ' be a function, but since I made the form one I figured I'd do this ' for consistency. Sub ShowThanksMsg() %>Sua mensagem foi enviada com sucesso. <% End Sub %>