Seminário em SP discute “Políticas Públicas em Saúde da Mulher”

Acontece nos dias 21, 22 e 23 de outubro 1º Seminário de Políticas Públicas em Saúde da Mulher no Município de São Paulo. Os debates foram convocados pela Comissão de Saúde da Mulher do Conselho Municipal de Saúde de São Paulo.

Segundo a comissão, foi detectado um “distanciamento entre as necessidades da Demanda X Oferta”. O seminário é uma “forma de oferecer espaço privilegiado para construção conjunta das Políticas Públicas entre a Sociedade Civil e o Poder Público”.

O objetivo dessa atividade é “difundir e provocar a apropriação por parte da sociedade civil das políticas públicas vigentes e apontar para as alterações, propondo novas diretrizes que levem ao aprimoramento no atendimento das mulheres paulistanas com base em sua realidade e necessidades”.

Confira abaixo a programação.
1º Seminário de Políticas Públicas em Saúde da Mulher no Município de São Paulo

DIA 21
18h – Credenciamento/Abertura Cultural
19h – Mesa de Abertura: Secretaria Municipal da Saúde, Conselho Municipal de Saúde, Conselho Estadual da Condição Feminina, União Brasileira de Mulheres, SOF – Sempre Organização Feminina. Coordenação: Célia Assumpção e Jaqueline Nascimento
20h – Coquetel

DIA 22
09h - 1ª Mesa – Saúde da Mulher e Direitos Reprodutivos no Brasil: Conquistas e Desafios. Coordenação: Célia Assumpção.
9h45 - Debate
10h30 - 2ª Mesa – Planejamento Reprodutivo. Coordenação: Jaqueline Nascimento.
11h15 – Debate
12h – Almoço
13h -3ª Mesa - Política para Saúde da Mulher no Município de São Paulo
Coordenação: Francisca Andrade Quinteros.
14h – Debate
14h45 – Intervalo / Café
15h15 – 4ª Mesa - Saúde da Mulher: Diferenças, Diversidades e Desigualdades. Coordenação: Jaqueline Nascimento.
17h45 – Debate

DIA 23
09h – 1ª Mesa - Mortalidade Materna no Brasil e em São Paulo
Coordenação: Ana Lúcia Firmino
10h – Debate
10h45 - 2ª Mesa – Neoplasias Ginecológicas de Câncer de Colo e de Mama
Coordenadora: Célia Assumpção
11h30 – Debate
12h15 - Almoço
13h30 - 3ª Mesa - Violência contra a Mulher: Questão de Saúde Pública. Coordenadora: Márcia Nestardo.
14h - Debate
14h45 – Intervalo para o café
15h - 4ª Mesa - Atenção Integral à Saúde da Mulher / Controle Social e Monitoramento das Políticas no Município. Coordenação: Célia e Jaqueline
16hs - Encerramento e Entrega de Certificados

Fonte: Vermelho


ENVIE A MATÉRIA:

<% Dim objCDONTS ' Email object Dim strFromName ' From persons' real name Dim strFromEmail, strToEmail ' Email addresses Dim strSubject, strBody ' Message Dim strThisPage ' This page's URL Dim strReferringPage ' The referring page's URL Dim bValidInput ' A boolean indicating valid parameters ' Retrieve this page name and referring page name strThisPage = Request.ServerVariables("SCRIPT_NAME") strReferringPage = Request.ServerVariables("HTTP_REFERER") ' Debugging lines: 'Response.Write strThisPage & "
" & 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: Seminário em SP discute “Políticas Públicas em Saúde da Mulher”" & vbCrLf strBody = strBody & vbCrLf strBody = strBody & "http://www.contee.org.br/noticias/msoc/nmsoc848.asp" & vbCrLf Else strBody = "O link abaixo é uma sugestão de leitura: Seminário em SP discute “Políticas Públicas em Saúde da Mulher”" sstrBody = strBody & "O link abaixo é uma sugestão de leitura: Seminário em SP discute “Políticas Públicas em Saúde da Mulher”" & vbCrLf strBody = strBody & vbCrLf strBody = strBody & "http://www.contee.org.br/noticias/msoc/nmsoc848.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. %>
Seu nome:
Seu e-mail:
Para:
 
<% '

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