bug#21861
dev: qua:xxx git-svn-id: http://desenvolvimento.rjconsultores.com.br/repositorio/sco/BD/FlyWay/trunk@105743 d1611594-4594-4d17-8e1d-87c2c4800839master
parent
fb80a1fca1
commit
c7288aad03
|
@ -0,0 +1,22 @@
|
||||||
|
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 VALUES
|
||||||
|
(
|
||||||
|
FUNCION_SISTEMA_SEQ.NEXTVAL,
|
||||||
|
2,
|
||||||
|
''VDA > AUTORIZACAO > PESQUISA DE SERVICOS > BOTAO > EDITARVENDAEMPE'',
|
||||||
|
''COM.RJCONSULTORES.VENTABOLETOS.GUI.VENTA.BUSQUEDACORRIDAS.BTN.EDITARVENDAEMPE'',
|
||||||
|
1 ,
|
||||||
|
sysdate,
|
||||||
|
1
|
||||||
|
)';
|
||||||
|
|
||||||
|
exception
|
||||||
|
when dup_val_on_index then null;
|
||||||
|
when except_02291 then null;
|
||||||
|
end;
|
Loading…
Reference in New Issue