fixes bug#13581
qua: dev:Valdir git-svn-id: http://desenvolvimento.rjconsultores.com.br/repositorio/sco/BD/FlyWay/trunk@102917 d1611594-4594-4d17-8e1d-87c2c4800839master
parent
7347c74a61
commit
ffdde78b87
|
@ -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;
|
Loading…
Reference in New Issue