fixes bug#21827

qua:wallyson
dev:

git-svn-id: http://desenvolvimento.rjconsultores.com.br/repositorio/sco/BD/FlyWay/trunk@106128 d1611594-4594-4d17-8e1d-87c2c4800839
master
walace 2021-04-08 15:09:06 +00:00
parent 0d19abc78c
commit 8cabb0853b
3 changed files with 31 additions and 0 deletions

View File

@ -0,0 +1,7 @@
declare
object_exists exception;
pragma exception_init (object_exists , -00955);
begin
execute immediate 'update custom set tipo = ''1'', sistema = ''1'' where chave = ''MODCLI_ExibirEstoquePorPuloSequencia''';
exception when object_exists then null;
end;

View File

@ -0,0 +1,15 @@
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, ''VDA > MAPA DE VIAGEM >> RELATORIO TAXAS'',
''COM.RJCONSULTORES.VENTABOLETOS.GUI.VENTA.MENU.ITENS.ITEMMENURELATORIOTAXAS'', 1,
SYSDATE, -1)';
exception
when dup_val_on_index then null;
when except_02291 then null;
end;

View File

@ -0,0 +1,9 @@
DO $$
BEGIN
insert into funcion_sistema (funcionsistema_id,sistema_id,nombfuncion,descruta,activo,fecmodif,usuario_id) values
(nextval('funcion_sistema_seq'),2,'VDA > MAPA DE VIAGEM >> RELATORIO TAXAS','COM.RJCONSULTORES.VENTABOLETOS.GUI.VENTA.MENU.ITENS.ITEMMENURELATORIOTAXAS',1,now(),1);
EXCEPTION WHEN unique_violation THEN NULL;
END
$$;