diff --git a/bd/PenMetaBD.php b/bd/PenMetaBD.php
index d25e517..e4fb547 100644
--- a/bd/PenMetaBD.php
+++ b/bd/PenMetaBD.php
@@ -381,7 +381,7 @@ class PenMetaBD extends InfraMetaBD {
     }
     
     public function adicionarChaveEstrangeira($strNomeFK, $strTabela, $arrCampos, $strTabelaOrigem, $arrCamposOrigem) {
-        
+        $strNomeFK = substr($strNomeFK, 0, 30);
         if(!$this->isChaveExiste($strTabela, $strNomeFK)) {
             parent::adicionarChaveEstrangeira($strNomeFK, $strTabela, $arrCampos, $strTabelaOrigem, $arrCamposOrigem);
         }
--
libgit2 0.21.2