Empresários pressionam Temer e votação das 40 horas segue indefinida
Os representantes de seis centrais sindicais que foram a Brasília nesta terça-feira (9), com a intenção de intensificar a pressão pela votação da PEC 231/95, que reduz a jornada de trabalho de 44 horas para 40 horas semanais, não foram os únicos a se reunir com o presidente do Congresso, Michel Temer. Empresários também foram à capital federal para evitar qualquer mudança nas leis trabalhistas do país.
Os empresários foram recebidos por Temer antes dos sindicalistas da CTB, CUT, Força Sindical, CGTB, Nova Central e UGT e deixaram claro que não aceitam a proposta dos trabalhadores. Durante a reunião com as centrais, o presidente da Câmara chegou a cogitar um acordo que garantisse a redução gradativa da jornada de trabalho — inicialmente para 42 horas —, mas a proposta foi prontamente refutada pelos líderes sindicais. “Nem sequer discutimos essa possibilidade”, afirmou Wagner Gomes, presidente da CTB.
Diante do resultado da reunião, as centrais sindicais pretendem agora contar com a mobilização popular, em todos os estados, para garantir que a Proposta de Emenda Constitucional seja levada à votação na Câmara dos Deputados o quanto antes. “As centrais vão continuar com a pressão, sem dúvida. Por meio dela faremos com que a votação seja colocada na pauta”, disse Wagner Gomes.
Próximos passos
Após a reunião com Temer, os representantes das seis centrais sindicais decidiram marcar um encontro para debater quais serão os próximos passos na mobilização pela redução da jornada.
De acordo com Joílson Cardoso, secretário de Política Sindical e Relações Institucionais da CTB, os presidentes das seis centrais se reunirão em São Paulo, no dia 1º de março, às 10h, para tratar do tema. O encontro ocorrerá na sede nacional da CTB.
Fonte: CTB
" & 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: Empresários pressionam Temer e votação das 40 horas segue indefinida" & vbCrLf strBody = strBody & vbCrLf strBody = strBody & "http://www.contee.org.br/noticias/msoc/nmsoc1081.asp" & vbCrLf Else strBody = "O link abaixo é uma sugestão de leitura: Empresários pressionam Temer e votação das 40 horas segue indefinida" sstrBody = strBody & "O link abaixo é uma sugestão de leitura: Empresários pressionam Temer e votação das 40 horas segue indefinida" & vbCrLf strBody = strBody & vbCrLf strBody = strBody & "http://www.contee.org.br/noticias/msoc/nmsoc1081.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 %>