fixes bug#15657

dev:
qua:

git-svn-id: http://desenvolvimento.rjconsultores.com.br/repositorio/sco/BD/FlyWay/trunk@98115 d1611594-4594-4d17-8e1d-87c2c4800839
master
thiago.clemente 2019-10-07 15:17:58 +00:00
parent 801db5b95a
commit 2aa7ca577d
1 changed files with 6 additions and 18 deletions

View File

@ -1,28 +1,16 @@
declare declare
object_exists exception; dup_val_on_index exception;
except_00957 exception; pragma exception_init (dup_val_on_index , -00001);
pragma exception_init (object_exists , -01430);
pragma exception_init (except_00957 , -00957);
begin 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 > INTEGRACAO > CASH MONITOR'', ''COM.RJCONSULTORES.ADMINISTRACION.GUI.INTEGRACION.CASHMONITOR'', 1, SYSDATE, 1)'; execute immediate 'INSERT INTO FUNCION_SISTEMA (FUNCIONSISTEMA_ID, SISTEMA_ID, NOMBFUNCION, DESCRUTA, ACTIVO, FECMODIF, USUARIO_ID) VALUES (FUNCION_SISTEMA_SEQ.nextVal, 1, ''ADM > RELATORIOS > INTEGRACAO > CASH MONITOR'', ''COM.RJCONSULTORES.ADMINISTRACION.GUI.INTEGRACION.CASHMONITOR'', 1, SYSDATE, 1)';
exception when dup_val_on_index then null;
exception
when object_exists then null;
when except_00957 then null;
end; end;
/ /
declare declare
object_exists exception; dup_val_on_index exception;
except_00957 exception; pragma exception_init (dup_val_on_index , -00001);
pragma exception_init (object_exists , -01430);
pragma exception_init (except_00957 , -00957);
begin 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 > INTEGRACAO > CASH MONITOR > VENDA DE CARTAO'', ''COM.RJCONSULTORES.ADMINISTRACION.GUI.INTEGRACION.CASHMONITOR.RELATORIOVENDACARTAOCASHMONITOR'', 1, SYSDATE, 1)'; execute immediate 'INSERT INTO FUNCION_SISTEMA (FUNCIONSISTEMA_ID, SISTEMA_ID, NOMBFUNCION, DESCRUTA, ACTIVO, FECMODIF, USUARIO_ID) VALUES (FUNCION_SISTEMA_SEQ.nextVal, 1, ''ADM > RELATORIOS > INTEGRACAO > CASH MONITOR > VENDA DE CARTAO'', ''COM.RJCONSULTORES.ADMINISTRACION.GUI.INTEGRACION.CASHMONITOR.RELATORIOVENDACARTAOCASHMONITOR'', 1, SYSDATE, 1)';
exception when dup_val_on_index then null;
exception
when object_exists then null;
when except_00957 then null;
end; end;