fixes bug#13581

qua:
dev:Valdir

git-svn-id: http://desenvolvimento.rjconsultores.com.br/repositorio/sco/BD/FlyWay/trunk@102917 d1611594-4594-4d17-8e1d-87c2c4800839
master
valdevir 2020-08-17 19:43:02 +00:00
parent 7347c74a61
commit ffdde78b87
1 changed files with 33 additions and 0 deletions

View File

@ -0,0 +1,33 @@
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, 2, ''VDA > GRANITO >> CANCELAR TRANSACAO'',
''COM.RJCONSULTORES.VENTABOLETOS.GUI.VENTA.MENU.ITENS.ITEMMENUGRANITOCANCELARTRANSACAO'', 1,
SYSDATE, 1)';
exception
when dup_val_on_index then null;
when except_02291 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, 2, ''VDA > GRANITO >> REIMPRESSAO COMPROVANTE'',
''COM.RJCONSULTORES.VENTABOLETOS.GUI.VENTA.MENU.ITENS.ITEMMENUGRANITOREIMPRESSAO'', 1,
SYSDATE, 1)';
exception
when dup_val_on_index then null;
when except_02291 then null;
end;