Assédio moral e a dignidade humana
Por Sérgio Henrique Tedeschi*
Atualmente, está muito em voga o tema relacionado ao assédio moral no trabalho e as suas conseqüências no meio ambiente laboral. Ele caracteriza-se como sendo qualquer conduta abusiva, de forma repetida, que atente contra a dignidade e a intimidade da pessoa ameaçada, em seu emprego e exclusivamente no trabalho, comprometendo o clima no ambiente de labor.
Apesar da discussão sobre este tema ter começado na França, no início da década de 90, o assédio moral no trabalho existe desde que se principiaram as relações entre empregado e empregador.
Tal assédio pode ocorrer de forma vertical ascendente, (a qual acontece quando o agente causador exerce um cargo hierárquico superior em relação à vítima), horizontal (quando acontece entre agente e vítima exercerem cargos do mesmo nível de hierarquia), e vertical descendente (quando o agente causador do assédio exerce cargo hierárquico de nível inferior ao da vítima).
Das três formas acima citadas, as mais comuns são a vertical ascendente e a horizontal. Em nossa prática profissional, jamais vislumbramos a ocorrência de assédio moral vertical descendente.
O assédio moral difere do assédio sexual, posto que, conforme preconiza o artigo 216-A do Código Penal pátrio, este ocorre apenas quando o agente, utilizando-se de sua condição de superioridade hierárquica ou ascendência de cargo e função na empresa, procura obter vantagem sexual.
A nossa Constituição Federal de 1988, também conhecida como a "Constituição cidadã", tem como princípio basilar o da dignidade da pessoa humana. E é justamente este princípio que é ferido quando ocorrem situações que caracterizam o assédio moral no trabalho.
O referido assédio sempre é baseado em fundo discriminatório, o que é sempre odioso, e acaba por contaminar o meio ambiente de trabalho. A omissão dos empresários em prevenir e punir a ocorrência do assédio moral é um dos motivos, senão o maior, de que hoje em dia se ouça falar tanto deste mal que assola o meio ambiente laboral.
Na Europa, existem países que já aprovaram leis que tratam do tema. No Brasil, existem leis versando sobre assédio moral no trabalho. Contudo, tais leis tratam do assédio moral no setor público, sendo que tais regramentos não podem ser aplicados em relações privadas de emprego.
Os empresários devem ficar atentos para situações que possam dar azo ao assédio moral, pois, em ocorrendo tal fato, o empregador pode responder a uma ação trabalhista na qual haja o pedido de indenização por danos morais, oriunda do assédio moral, indenização esta que será fixada de acordo com o livre convencimento do Juiz que decidir a demanda.
O empregador deve estar ciente de que precisa coibir atos praticados por seus funcionários, os quais possam ensejar o assédio moral e o conseqüente dever de indenizar ao empregado pelos danos morais daí advindos, porque, em um primeiro momento, quem deverá pagar o valor da indenização arbitrada pelo Judiciário é o empregador, por ato cometido pelo seu preposto.
Além disso, a dignidade da pessoa humana sempre deve ser respeitada, pois, além do trabalho ser a fonte de renda do trabalhador, também é o celeiro de seus sonhos e realizações pessoais e profissionais.
Por fim, deve-se ter em mente que o assédio moral no trabalho é um mal que deve ser cortado pela raiz, pois a sua reiteração e continuidade são maléficos, não só para o meio ambiente laboral, mas também para toda a sociedade.
Coluna sob responsabilidade dos membros do grupo de pesquisa do Mestrado em Direito do UniCuritiba: Liberdade de Iniciativa, Dignidade da Pessoa Humana e Proteção ao Meio Ambiente Empresarial: inclusão, sustentabilidade, função social e efetividade, liderado pelo advogado e professor doutor Carlyle Popp e secretariado pela advogada e professora M.Sc. Ana Cecília Parodi.
(*) Mestrando e especialista em Direito Empresarial na UniCuritiba. Professor de Direito Empresarial. Advogado e administrador. tedeschi@tedeschiepadilha.adv.br
Fonte: Paraná Online
Publicado em 22/07/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: Assédio moral e a dignidade humana" & vbCrLf strBody = strBody & vbCrLf strBody = strBody & "http://www.contee.org.br/noticias/artigos/art337.asp" & vbCrLf Else strBody = "O link abaixo é uma sugestão de leitura: Assédio moral e a dignidade humana" sstrBody = strBody & "O link abaixo é uma sugestão de leitura: Assédio moral e a dignidade humana" & vbCrLf strBody = strBody & vbCrLf strBody = strBody & "http://www.contee.org.br/noticias/artigos/art337.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 %>