From 45dc40c3c4e6817904c474e0575b673eb8063364 Mon Sep 17 00:00:00 2001 From: Guilherme Andrade Del Cantoni Date: Thu, 4 Apr 2019 11:20:17 -0300 Subject: [PATCH] Correção de script de atualização do módulo na base Oracle --- bd/PenMetaBD.php | 2 +- rn/PenAtualizarSeiRN.php | 180 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++----------------------------------------------------------------------------------------- 2 files changed, 92 insertions(+), 90 deletions(-) diff --git a/bd/PenMetaBD.php b/bd/PenMetaBD.php index 95f6d9a..bbf918b 100644 --- a/bd/PenMetaBD.php +++ b/bd/PenMetaBD.php @@ -326,7 +326,7 @@ class PenMetaBD extends InfraMetaBD { return $this; } - public function adicionarChaveEstrangeira($strNomeFK, $strTabela, $arrCampos, $strTabelaOrigem, $arrCamposOrigem, $bolCriarIndice = true) { + public function adicionarChaveEstrangeira($strNomeFK, $strTabela, $arrCampos, $strTabelaOrigem, $arrCamposOrigem, $bolCriarIndice=false) { if(!$this->isChaveExiste($strTabela, $strNomeFK)) { parent::adicionarChaveEstrangeira($strNomeFK, $strTabela, $arrCampos, $strTabelaOrigem, $arrCamposOrigem, $bolCriarIndice); diff --git a/rn/PenAtualizarSeiRN.php b/rn/PenAtualizarSeiRN.php index 8d340e6..bed4a25 100644 --- a/rn/PenAtualizarSeiRN.php +++ b/rn/PenAtualizarSeiRN.php @@ -1283,96 +1283,98 @@ class PenAtualizarSeiRN extends PenAtualizadorRN { $objInfraMetaBD->criarIndice('md_pen_rel_doc_map_recebido', 'ak1_rel_doc_map_recebido', array('codigo_especie'), true); //30 - Correção de erros de chave duplicada devido a concorrência de transações - $objInfraSequenciaRN = new InfraSequenciaRN(); - $objInfraSequenciaDTO = new InfraSequenciaDTO(); - - //Sequência: md_pen_seq_procedimento_andam - $rs = BancoSEI::getInstance()->consultarSql('select max(id_andamento) as total from md_pen_procedimento_andamento'); - $numMaxId = $rs[0]['total']; - if ($numMaxId==null){ - $numMaxId = 0; - } - BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_procedimento_andam', $numMaxId + 1); - $objInfraSequenciaDTO->setStrNome('md_pen_procedimento_andamento'); - $objInfraSequenciaDTO->retStrNome(); - $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO); - $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO); - - - //Sequência: md_pen_seq_hipotese_legal - $rs = BancoSEI::getInstance()->consultarSql('select max(id_hipotese_legal) as total from md_pen_hipotese_legal'); - $numMaxId = $rs[0]['total']; - if ($numMaxId==null){ - $numMaxId = 0; - } - BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_hipotese_legal', $numMaxId + 1); - $objInfraSequenciaDTO->setStrNome('md_pen_hipotese_legal'); - $objInfraSequenciaDTO->retStrNome(); - $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO); - $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO); - - - //Sequência: md_pen_seq_rel_hipotese_legal - $rs = BancoSEI::getInstance()->consultarSql('select max(id_mapeamento) as total from md_pen_rel_hipotese_legal'); - $numMaxId = $rs[0]['total']; - if ($numMaxId==null){ - $numMaxId = 0; - } - BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_rel_hipotese_legal', $numMaxId + 1); - $objInfraSequenciaDTO->setStrNome('md_pen_rel_hipotese_legal'); - $objInfraSequenciaDTO->retStrNome(); - $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO); - $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO); - - - //Sequência: md_pen_seq_recibo_tramite_hash - $rs = BancoSEI::getInstance()->consultarSql('select max(id_tramite_hash) as total from md_pen_recibo_tramite_hash'); - $numMaxId = $rs[0]['total']; - if ($numMaxId==null){ - $numMaxId = 0; - } - BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_recibo_tramite_hash', $numMaxId + 1); - $objInfraSequenciaDTO->setStrNome('md_pen_recibo_tramite_hash'); - $objInfraSequenciaDTO->retStrNome(); - $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO); - $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO); - - //Sequência: md_pen_seq_rel_doc_map_enviado - $rs = BancoSEI::getInstance()->consultarSql('select max(id_mapeamento) as total from md_pen_rel_doc_map_enviado'); - $numMaxId = $rs[0]['total']; - if ($numMaxId==null){ - $numMaxId = 0; - } - BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_rel_doc_map_enviado', $numMaxId + 1); - $objInfraSequenciaDTO->setStrNome('md_pen_rel_doc_map_enviado'); - $objInfraSequenciaDTO->retStrNome(); - $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO); - $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO); - - //Sequência: md_pen_seq_rel_doc_map_recebid - $rs = BancoSEI::getInstance()->consultarSql('select max(id_mapeamento) as total from md_pen_rel_doc_map_recebido'); - $numMaxId = $rs[0]['total']; - if ($numMaxId==null){ - $numMaxId = 0; - } - BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_rel_doc_map_recebid', $numMaxId + 1); - $objInfraSequenciaDTO->setStrNome('md_pen_rel_doc_map_recebido'); - $objInfraSequenciaDTO->retStrNome(); - $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO); - $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO); - - - //Sequência: md_pen_seq_tramite_pendente - $rs = BancoSEI::getInstance()->consultarSql('select max(id) as total from md_pen_tramite_pendente'); - $numMaxId = $rs[0]['total']; - if ($numMaxId==null){ - $numMaxId = 0; + if(!(BancoSEI::getInstance() instanceof InfraOracle)){ + $objInfraSequenciaRN = new InfraSequenciaRN(); + $objInfraSequenciaDTO = new InfraSequenciaDTO(); + + //Sequência: md_pen_seq_procedimento_andam + $rs = BancoSEI::getInstance()->consultarSql('select max(id_andamento) as total from md_pen_procedimento_andamento'); + $numMaxId = $rs[0]['total']; + if ($numMaxId==null){ + $numMaxId = 0; + } + BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_procedimento_andam', $numMaxId + 1); + $objInfraSequenciaDTO->setStrNome('md_pen_procedimento_andamento'); + $objInfraSequenciaDTO->retStrNome(); + $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO); + $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO); + + + //Sequência: md_pen_seq_hipotese_legal + $rs = BancoSEI::getInstance()->consultarSql('select max(id_hipotese_legal) as total from md_pen_hipotese_legal'); + $numMaxId = $rs[0]['total']; + if ($numMaxId==null){ + $numMaxId = 0; + } + BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_hipotese_legal', $numMaxId + 1); + $objInfraSequenciaDTO->setStrNome('md_pen_hipotese_legal'); + $objInfraSequenciaDTO->retStrNome(); + $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO); + $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO); + + + //Sequência: md_pen_seq_rel_hipotese_legal + $rs = BancoSEI::getInstance()->consultarSql('select max(id_mapeamento) as total from md_pen_rel_hipotese_legal'); + $numMaxId = $rs[0]['total']; + if ($numMaxId==null){ + $numMaxId = 0; + } + BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_rel_hipotese_legal', $numMaxId + 1); + $objInfraSequenciaDTO->setStrNome('md_pen_rel_hipotese_legal'); + $objInfraSequenciaDTO->retStrNome(); + $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO); + $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO); + + + //Sequência: md_pen_seq_recibo_tramite_hash + $rs = BancoSEI::getInstance()->consultarSql('select max(id_tramite_hash) as total from md_pen_recibo_tramite_hash'); + $numMaxId = $rs[0]['total']; + if ($numMaxId==null){ + $numMaxId = 0; + } + BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_recibo_tramite_hash', $numMaxId + 1); + $objInfraSequenciaDTO->setStrNome('md_pen_recibo_tramite_hash'); + $objInfraSequenciaDTO->retStrNome(); + $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO); + $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO); + + //Sequência: md_pen_seq_rel_doc_map_enviado + $rs = BancoSEI::getInstance()->consultarSql('select max(id_mapeamento) as total from md_pen_rel_doc_map_enviado'); + $numMaxId = $rs[0]['total']; + if ($numMaxId==null){ + $numMaxId = 0; + } + BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_rel_doc_map_enviado', $numMaxId + 1); + $objInfraSequenciaDTO->setStrNome('md_pen_rel_doc_map_enviado'); + $objInfraSequenciaDTO->retStrNome(); + $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO); + $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO); + + //Sequência: md_pen_seq_rel_doc_map_recebid + $rs = BancoSEI::getInstance()->consultarSql('select max(id_mapeamento) as total from md_pen_rel_doc_map_recebido'); + $numMaxId = $rs[0]['total']; + if ($numMaxId==null){ + $numMaxId = 0; + } + BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_rel_doc_map_recebid', $numMaxId + 1); + $objInfraSequenciaDTO->setStrNome('md_pen_rel_doc_map_recebido'); + $objInfraSequenciaDTO->retStrNome(); + $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO); + $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO); + + + //Sequência: md_pen_seq_tramite_pendente + $rs = BancoSEI::getInstance()->consultarSql('select max(id) as total from md_pen_tramite_pendente'); + $numMaxId = $rs[0]['total']; + if ($numMaxId==null){ + $numMaxId = 0; + } + BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_tramite_pendente', $numMaxId + 1); + $objInfraSequenciaDTO->setStrNome('md_pen_tramite_pendente'); + $objInfraSequenciaDTO->retStrNome(); + $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO); + $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO); } - BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_tramite_pendente', $numMaxId + 1); - $objInfraSequenciaDTO->setStrNome('md_pen_tramite_pendente'); - $objInfraSequenciaDTO->retStrNome(); - $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO); - $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO); //Fix 28 - Erro Data too long for column 'nome' at row 1 $objInfraMetaBD->alterarColuna('md_pen_componente_digital','nome', $objInfraMetaBD->tipoTextoVariavel(255), 'not null'); -- libgit2 0.21.2