Commit ccfbbd6ab9a90057582ba36068bdc5e73df05b61

Authored by Guilherme Andrade Del Cantoni
1 parent ca15b8a2

Correção de script de atualização do módulo na base Oracle

Showing 1 changed file with 89 additions and 91 deletions   Show diff stats
rn/PenAtualizarSeiRN.php
@@ -1285,98 +1285,96 @@ class PenAtualizarSeiRN extends PenAtualizadorRN { @@ -1285,98 +1285,96 @@ class PenAtualizarSeiRN extends PenAtualizadorRN {
1285 $objInfraMetaBD->criarIndice('md_pen_rel_doc_map_recebido', 'ak1_rel_doc_map_recebido', array('codigo_especie'), true); 1285 $objInfraMetaBD->criarIndice('md_pen_rel_doc_map_recebido', 'ak1_rel_doc_map_recebido', array('codigo_especie'), true);
1286 1286
1287 //30 - Correção de erros de chave duplicada devido a concorrência de transações 1287 //30 - Correção de erros de chave duplicada devido a concorrência de transações
1288 - if(!(BancoSEI::getInstance() instanceof InfraOracle)){  
1289 - $objInfraSequenciaRN = new InfraSequenciaRN();  
1290 - $objInfraSequenciaDTO = new InfraSequenciaDTO();  
1291 -  
1292 - //Sequência: md_pen_seq_procedimento_andam  
1293 - $rs = BancoSEI::getInstance()->consultarSql('select max(id_andamento) as total from md_pen_procedimento_andamento');  
1294 - $numMaxId = $rs[0]['total'];  
1295 - if ($numMaxId==null){  
1296 - $numMaxId = 0;  
1297 - }  
1298 - BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_procedimento_andam', $numMaxId + 1);  
1299 - $objInfraSequenciaDTO->setStrNome('md_pen_procedimento_andamento');  
1300 - $objInfraSequenciaDTO->retStrNome();  
1301 - $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO);  
1302 - $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO);  
1303 -  
1304 -  
1305 - //Sequência: md_pen_seq_hipotese_legal  
1306 - $rs = BancoSEI::getInstance()->consultarSql('select max(id_hipotese_legal) as total from md_pen_hipotese_legal');  
1307 - $numMaxId = $rs[0]['total'];  
1308 - if ($numMaxId==null){  
1309 - $numMaxId = 0;  
1310 - }  
1311 - BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_hipotese_legal', $numMaxId + 1);  
1312 - $objInfraSequenciaDTO->setStrNome('md_pen_hipotese_legal');  
1313 - $objInfraSequenciaDTO->retStrNome();  
1314 - $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO);  
1315 - $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO);  
1316 -  
1317 -  
1318 - //Sequência: md_pen_seq_rel_hipotese_legal  
1319 - $rs = BancoSEI::getInstance()->consultarSql('select max(id_mapeamento) as total from md_pen_rel_hipotese_legal');  
1320 - $numMaxId = $rs[0]['total'];  
1321 - if ($numMaxId==null){  
1322 - $numMaxId = 0;  
1323 - }  
1324 - BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_rel_hipotese_legal', $numMaxId + 1);  
1325 - $objInfraSequenciaDTO->setStrNome('md_pen_rel_hipotese_legal');  
1326 - $objInfraSequenciaDTO->retStrNome();  
1327 - $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO);  
1328 - $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO);  
1329 -  
1330 -  
1331 - //Sequência: md_pen_seq_recibo_tramite_hash  
1332 - $rs = BancoSEI::getInstance()->consultarSql('select max(id_tramite_hash) as total from md_pen_recibo_tramite_hash');  
1333 - $numMaxId = $rs[0]['total'];  
1334 - if ($numMaxId==null){  
1335 - $numMaxId = 0;  
1336 - }  
1337 - BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_recibo_tramite_hash', $numMaxId + 1);  
1338 - $objInfraSequenciaDTO->setStrNome('md_pen_recibo_tramite_hash');  
1339 - $objInfraSequenciaDTO->retStrNome();  
1340 - $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO);  
1341 - $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO);  
1342 -  
1343 - //Sequência: md_pen_seq_rel_doc_map_enviado  
1344 - $rs = BancoSEI::getInstance()->consultarSql('select max(id_mapeamento) as total from md_pen_rel_doc_map_enviado');  
1345 - $numMaxId = $rs[0]['total'];  
1346 - if ($numMaxId==null){  
1347 - $numMaxId = 0;  
1348 - }  
1349 - BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_rel_doc_map_enviado', $numMaxId + 1);  
1350 - $objInfraSequenciaDTO->setStrNome('md_pen_rel_doc_map_enviado');  
1351 - $objInfraSequenciaDTO->retStrNome();  
1352 - $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO);  
1353 - $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO);  
1354 -  
1355 - //Sequência: md_pen_seq_rel_doc_map_recebid  
1356 - $rs = BancoSEI::getInstance()->consultarSql('select max(id_mapeamento) as total from md_pen_rel_doc_map_recebido');  
1357 - $numMaxId = $rs[0]['total'];  
1358 - if ($numMaxId==null){  
1359 - $numMaxId = 0;  
1360 - }  
1361 - BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_rel_doc_map_recebid', $numMaxId + 1);  
1362 - $objInfraSequenciaDTO->setStrNome('md_pen_rel_doc_map_recebido');  
1363 - $objInfraSequenciaDTO->retStrNome();  
1364 - $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO);  
1365 - $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO);  
1366 -  
1367 -  
1368 - //Sequência: md_pen_seq_tramite_pendente  
1369 - $rs = BancoSEI::getInstance()->consultarSql('select max(id) as total from md_pen_tramite_pendente');  
1370 - $numMaxId = $rs[0]['total'];  
1371 - if ($numMaxId==null){  
1372 - $numMaxId = 0;  
1373 - }  
1374 - BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_tramite_pendente', $numMaxId + 1);  
1375 - $objInfraSequenciaDTO->setStrNome('md_pen_tramite_pendente');  
1376 - $objInfraSequenciaDTO->retStrNome();  
1377 - $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO);  
1378 - $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO); 1288 + $objInfraSequenciaRN = new InfraSequenciaRN();
  1289 + $objInfraSequenciaDTO = new InfraSequenciaDTO();
  1290 +
  1291 + //Sequência: md_pen_seq_procedimento_andam
  1292 + $rs = BancoSEI::getInstance()->consultarSql('select max(id_andamento) as total from md_pen_procedimento_andamento');
  1293 + $numMaxId = $rs[0]['total'];
  1294 + if ($numMaxId==null){
  1295 + $numMaxId = 0;
  1296 + }
  1297 + BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_procedimento_andam', $numMaxId + 1);
  1298 + $objInfraSequenciaDTO->setStrNome('md_pen_procedimento_andamento');
  1299 + $objInfraSequenciaDTO->retStrNome();
  1300 + $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO);
  1301 + $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO);
  1302 +
  1303 +
  1304 + //Sequência: md_pen_seq_hipotese_legal
  1305 + $rs = BancoSEI::getInstance()->consultarSql('select max(id_hipotese_legal) as total from md_pen_hipotese_legal');
  1306 + $numMaxId = $rs[0]['total'];
  1307 + if ($numMaxId==null){
  1308 + $numMaxId = 0;
  1309 + }
  1310 + BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_hipotese_legal', $numMaxId + 1);
  1311 + $objInfraSequenciaDTO->setStrNome('md_pen_hipotese_legal');
  1312 + $objInfraSequenciaDTO->retStrNome();
  1313 + $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO);
  1314 + $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO);
  1315 +
  1316 +
  1317 + //Sequência: md_pen_seq_rel_hipotese_legal
  1318 + $rs = BancoSEI::getInstance()->consultarSql('select max(id_mapeamento) as total from md_pen_rel_hipotese_legal');
  1319 + $numMaxId = $rs[0]['total'];
  1320 + if ($numMaxId==null){
  1321 + $numMaxId = 0;
  1322 + }
  1323 + BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_rel_hipotese_legal', $numMaxId + 1);
  1324 + $objInfraSequenciaDTO->setStrNome('md_pen_rel_hipotese_legal');
  1325 + $objInfraSequenciaDTO->retStrNome();
  1326 + $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO);
  1327 + $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO);
  1328 +
  1329 +
  1330 + //Sequência: md_pen_seq_recibo_tramite_hash
  1331 + $rs = BancoSEI::getInstance()->consultarSql('select max(id_tramite_hash) as total from md_pen_recibo_tramite_hash');
  1332 + $numMaxId = $rs[0]['total'];
  1333 + if ($numMaxId==null){
  1334 + $numMaxId = 0;
  1335 + }
  1336 + BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_recibo_tramite_hash', $numMaxId + 1);
  1337 + $objInfraSequenciaDTO->setStrNome('md_pen_recibo_tramite_hash');
  1338 + $objInfraSequenciaDTO->retStrNome();
  1339 + $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO);
  1340 + $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO);
  1341 +
  1342 + //Sequência: md_pen_seq_rel_doc_map_enviado
  1343 + $rs = BancoSEI::getInstance()->consultarSql('select max(id_mapeamento) as total from md_pen_rel_doc_map_enviado');
  1344 + $numMaxId = $rs[0]['total'];
  1345 + if ($numMaxId==null){
  1346 + $numMaxId = 0;
  1347 + }
  1348 + BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_rel_doc_map_enviado', $numMaxId + 1);
  1349 + $objInfraSequenciaDTO->setStrNome('md_pen_rel_doc_map_enviado');
  1350 + $objInfraSequenciaDTO->retStrNome();
  1351 + $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO);
  1352 + $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO);
  1353 +
  1354 + //Sequência: md_pen_seq_rel_doc_map_recebid
  1355 + $rs = BancoSEI::getInstance()->consultarSql('select max(id_mapeamento) as total from md_pen_rel_doc_map_recebido');
  1356 + $numMaxId = $rs[0]['total'];
  1357 + if ($numMaxId==null){
  1358 + $numMaxId = 0;
  1359 + }
  1360 + BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_rel_doc_map_recebid', $numMaxId + 1);
  1361 + $objInfraSequenciaDTO->setStrNome('md_pen_rel_doc_map_recebido');
  1362 + $objInfraSequenciaDTO->retStrNome();
  1363 + $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO);
  1364 + $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO);
  1365 +
  1366 +
  1367 + //Sequência: md_pen_seq_tramite_pendente
  1368 + $rs = BancoSEI::getInstance()->consultarSql('select max(id) as total from md_pen_tramite_pendente');
  1369 + $numMaxId = $rs[0]['total'];
  1370 + if ($numMaxId==null){
  1371 + $numMaxId = 0;
1379 } 1372 }
  1373 + BancoSEI::getInstance()->criarSequencialNativa('md_pen_seq_tramite_pendente', $numMaxId + 1);
  1374 + $objInfraSequenciaDTO->setStrNome('md_pen_tramite_pendente');
  1375 + $objInfraSequenciaDTO->retStrNome();
  1376 + $arrObjInfraSequenciaDTO = $objInfraSequenciaRN->listar($objInfraSequenciaDTO);
  1377 + $objInfraSequenciaRN->excluir($arrObjInfraSequenciaDTO);
1380 1378
1381 //Fix 28 - Erro Data too long for column 'nome' at row 1 1379 //Fix 28 - Erro Data too long for column 'nome' at row 1
1382 $objInfraMetaBD->alterarColuna('md_pen_componente_digital','nome', $objInfraMetaBD->tipoTextoVariavel(255), 'not null'); 1380 $objInfraMetaBD->alterarColuna('md_pen_componente_digital','nome', $objInfraMetaBD->tipoTextoVariavel(255), 'not null');