A Previdência é superavitária
Por Luís Nassif*
Um dos grandes desafios dos próximos meses será administrar a questão do desemprego. O cenário atual é confuso. Há certo consenso de que o primeiro trimestre será o período mais duro da crise. Muito do que ocorrer depois será reflexo do que acontecer agora.
A Previdência Social brasileira é superavitária. Em julho o superávit foi de R$ 13 milhões. É o terceiro mês do ano em que se registrou superávit. Os anteriores haviam sido Fevereiro (R$ 268 milhões) e Maio (R$ 214,3 milhões).
A enxurrada de manchetes dos jornais de ontem, apontando para um suposto deficit da Previdência, deve-se ao engano sistemático alimentado especialmente por economistas como Fábio Giambiagi.
Juntam-se na mesma conta os dados da Previdência urbana e as políticas assistenciais que nada têm a ver para passar a falsa impressão de déficit - e poder impor aumentos de alíquotas ou redução de benefícios.
Primeiro, vamos ver como os dados são distorcidos.
1. Se se analisar só o Regime Geral da Previdência Urbana - isto é, quem contribui (empresas e empregadores) e quem recebe benefícios - se verá que se saiu de um déficit de R$ 8,7 bilhões em 2003 para um provável déficit de R$ 1,29 bi em 2009 - mesmo com a crise reduzindo o contingente de empregados com carteira de trabalho.
Esse dado comprova que o regime é sustentável e exigirá alguns ajustes apenas no médio prazo.
2. Quando se analisa o Regime Geral da Previdência Rural, o quadro muda de figura. Isso porque a lei criou uma série de benefícios - necessários - para a inclusão do trabalhador rural. Em 2003 o déficit estava em R$ 17,7 bilhões.
Em 2009 poderá chegar a R$ 39,8 bilhões - benefícios de R$ 45,5 bilhões para receitas de R$ 5,7 bilhões apenas.
3. Se se descontasse do Regime Geral Urbano os incentivos criados - para instituições beneficentes, clubes de futebol, pequenas e micro empresas - o regime seria francamente superavitário.
Com esses incentivos, essas instituições são isentas de pagamento de contribuição, mas seus funcionários têm direito à aposentadoria.
A importância social da Previdência pode ser medida pelos grandes números. 18,4 milhões de beneficiários diretos (69,1% dos benefícios) recebem até um salário mínimo.
Se se jogar três dependentes por beneficiário, se terá uma população assistida de 55,2 milhões de brasileiros. Desse total, 7,2 milhões de beneficiários diretos estão na área urbana e 7,8 milhões na área rural - representando 98,7% de todos os benefícios rurais.
Aí se entra no ponto central: qual a razão de se misturar os dois regimes, o rural e o urbano.
Mais que isso, qual a razão para se jogar na conta do Regime Geral da Previdência Urbana os benefícios da área rural e também os incentivos fiscais?
Ora, trata-se de políticas sociais das mais relevantes que, como tal, precisam ser bancadas pelo conjunto do país, através de recursos disponibilizados através do orçamento.
Ao espetar esses números nas costas da Previdência Urbana, economistas como Giambiagi querem transferir a conta dos benefícios para quem contribui - empresas e trabalhadores.
Com isso, pretende-se que essa conta - que é responsabilidade do País - seja bancada pelo aumento ainda maior das contribuições, ou pela redução dos benefícios.
É essa a lógica dessa mistura ilógica de números.
* Luís Nassif é jornalista econômico.
Fonte: Blog do Luís Nassif
Publicado em 25/08/2009
" & 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: A Previdência é superavitária" & vbCrLf strBody = strBody & vbCrLf strBody = strBody & "http://www.contee.org.br/noticias/artigos/art354.asp" & vbCrLf Else strBody = "O link abaixo é uma sugestão de leitura: A Previdência é superavitária" sstrBody = strBody & "O link abaixo é uma sugestão de leitura: A Previdência é superavitária" & vbCrLf strBody = strBody & vbCrLf strBody = strBody & "http://www.contee.org.br/noticias/artigos/art354.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
%>