Sinpro/RS faz Assembleia em todo RS sobre reivindicações 2010
O Sindicato dos Professores do Ensino Privado do RS (Sinpro/RS) realiza de 2 a 15 de outubro Assembleia em 16 cidades no interior e uma em Porto Alegre, conforme datas, horários e locais na tabela abaixo. A Assembleia tem como principal objetivo ratificar com os professores a antecipação da negociação coletiva 2010 com o Sinepe/RS para este ano e a prioridade da pauta específica da saúde, além de aprovar a pauta geral, com o índice de reajuste salarial.
A pauta de reivindicações da saúde foi elaborada a partir do resultado da pesquisa “Condições de Trabalho e Saúde dos Professores do Ensino Privado do Rio Grande do Sul” (www.sinprors.org.br/pesquisa_prof.pdf), realizada pelo Diesat em 2008/2009 e divulgada em junho deste ano. Dentre as reivindicações estão: a limitação de número de alunos por turma (presenciais e por EAD); a sonorização das salas de aula; e a destinação de 20% da carga horária para atividades extraclasse.
ASSEMBLEIAS REGIONAIS - Sinpro/RS
Santa Rosa - 2/10 - 18h - Sede do Sinpro/RS - Regional Santa Rosa. Rua Minas Gerais, 55/1001
Uruguaiana - 2/10 - 18h30min - Colégio Marista Santana, sala 231. Rua Bento Martins, 2015
Passo Fundo - 3/10 - 14h - Auditório do Colégio Conceição Rua Paissandu, 889
Pelotas - 6/10 - 18h - Campus I da UCPel. Auditório da Esin, sala 425. Rua Gonçalves Chaves, 373
Rio Grande - 7/10 - 18h - Sede do Sinpro/RS - Regional Rio Grande. Rua General Bacelar, 378/804
São Leopoldo - 7/10 - 18h - Sede do Sinpro/RS - Regional São Leopoldo. Rua São Joaquim, 792/204
Erechim - 8/10 - 17h45min - Anfiteatro da URI, Prédio 03. Av. Sete de Setembro, 1621
Livramento - 8/10 - 18h - Colégio Santa Teresa de Jesus. Rua Brigadeiro Davi Canabarro, 421/09
Lajeado - 8/10 - 17h30min - Unishopping, sala 29. BR 386 - km 346
Bento Gonçalves - 8/10 - 18h - Sede do Sinpro/RS - Regional Bento Gonçalves. Rua Cândido Costa, 65/1008
Santa Maria - 9/10 - 18h - Sede 2 do Sindicato dos Bancários. Rua Serafim Valandro - 835/21
Sto. Ângelo - 13/10 - 18h - Quiosque da Assoc. dos Funcion. e Professores da URI . Tv. Azaléia, s/nº.
Santa Cruz - 14/10 - 17h15min - Assoc. Docentes da Unisc. Av. independência 2293
Cruz Alta - 14/10 - 18h - Mini Auditório do Centro de Ciências Sociais Aplicadas/Unicruz. Rod. Jacob Della Mea, s/nº
Cachoeira do Sul - 15/10 - 18h - Sede do Siprom. Rua Virgilio de Abreu, 11/75
Bagé - 15/10 - 18h - Anfiteatro da Unimed. Av. sete de Setembro, 679
Porto Alegre - 15/10 - 18h30min - Sede Estadual do Sinpro/RS. Av. João Pessoa, 919
Fonte: Sinpro RS
" & 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: Sinpro/RS faz Assembleia em todo RS sobre reivindicações 2010" & vbCrLf strBody = strBody & vbCrLf strBody = strBody & "http://www.contee.org.br/noticias/msin/nmsin798.asp" & vbCrLf Else strBody = "O link abaixo é uma sugestão de leitura: Sinpro/RS faz Assembleia em todo RS sobre reivindicações 2010" sstrBody = strBody & "O link abaixo é uma sugestão de leitura: Sinpro/RS faz Assembleia em todo RS sobre reivindicações 2010" & vbCrLf strBody = strBody & vbCrLf strBody = strBody & "http://www.contee.org.br/noticias/msin/nmsin798.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 %>