fabio
/
AdmMono
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fixes bug#22115 

qua:
dev:Valdir

git-svn-id: http://desenvolvimento.rjconsultores.com.br/repositorio/sco/BD/FlyWay/trunk@106664 d1611594-4594-4d17-8e1d-87c2c4800839
master
valdevir 2021-05-13 13:51:12 +00:00
parent c7dd80bfea
commit 8d0a7d573c
2 changed files with 45 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

31
src/db/migration/V20210705_1412__mantis22115.sql 100644
View File

@ -0,0 +1,31 @@
declare
object_exists exception;
except_01451 exception;
except_01442 exception;
pragma exception_init (object_exists , -01430);
pragma exception_init (except_01451 , -01451);
pragma exception_init (except_01442 , -01442);
begin
execute immediate 'ALTER TABLE EMPRESA ADD INDICEIRK NUMBER(8,2) ';
exception
when object_exists then null;
when except_01451 then null;
when except_01442 then null;
end;
/
declare
dup_val_on_index exception;
except_02291 exception;
pragma exception_init (dup_val_on_index , -00001);
pragma exception_init (except_02291 , -02291);
begin
execute immediate 'INSERT INTO FUNCION_SISTEMA (FUNCIONSISTEMA_ID, SISTEMA_ID, NOMBFUNCION, DESCRUTA, ACTIVO, FECMODIF, USUARIO_ID)
VALUES (FUNCION_SISTEMA_SEQ.nextval, 1, ''ADM > RELATORIOS > OPERACIONAIS >> RELATORIO IRK'',
''COM.RJCONSULTORES.ADMINISTRACION.GUI.RELATORIOS.MENU.RELATORIOIRK'', 1,
SYSDATE, -1)';
exception
when dup_val_on_index then null;
when except_02291 then null;
end;

14
src/db/postgresql/migration/V20210705_1412__mantis22115.sql 100644
View File

@ -0,0 +1,14 @@
DO $$
BEGIN
ALTER TABLE EMPRESA ADD INDICEIRK NUMBER(8,2);
EXCEPTION WHEN duplicate_column THEN NULL;
END
$$;
/
DO $$
BEGIN
INSERT INTO FUNCION_SISTEMA (FUNCIONSISTEMA_ID, SISTEMA_ID, NOMBFUNCION, DESCRUTA, ACTIVO, FECMODIF, USUARIO_ID)
VALUES (nextval('funcion_sistema_seq'), 1, 'ADM > RELATORIOS > OPERACIONAIS >> RELATORIO IRK',
'COM.RJCONSULTORES.ADMINISTRACION.GUI.RELATORIOS.MENU.RELATORIOIRK', 1, now(), 1);
END
$$;