fixes bug#24815

AL-1114
qua:
dev:Valdir

git-svn-id: http://desenvolvimento.rjconsultores.com.br/repositorio/sco/BD/FlyWay/trunk@113935 d1611594-4594-4d17-8e1d-87c2c4800839
master
valdevir 2022-08-23 13:42:37 +00:00
parent 55568ac2d6
commit 9f336cd699
2 changed files with 22 additions and 0 deletions

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, ''ADM > CATALOGO > PUNTO VENTA > PERMITE APENAS BLOQUEIO DESBLOQUEIO AGENCIA'',
''COM.RJCONSULTORES.ADMINISTRACION.PUNTOVENTA.PERMITEAPENASBLOQUEIODESBLOQUEIOAGENCIA'', 1, SYSDATE, 1)';
exception
when dup_val_on_index then null;
when except_02291 then null;
end;

View File

@ -0,0 +1,7 @@
DO $$
BEGIN
INSERT INTO FUNCION_SISTEMA (FUNCIONSISTEMA_ID, SISTEMA_ID, NOMBFUNCION, DESCRUTA, ACTIVO, FECMODIF, USUARIO_ID)
VALUES (FUNCION_SISTEMA_SEQ.nextVal, 1, 'ADM > CATALOGO > PUNTO VENTA > PERMITE APENAS BLOQUEIO DESBLOQUEIO AGENCIA',
'COM.RJCONSULTORES.ADMINISTRACION.PUNTOVENTA.PERMITEAPENASBLOQUEIODESBLOQUEIOAGENCIA', 1, SYSDATE, 1);
END
$$;