fixes bug#21768

qua: silvania
dev: Julio 

git-svn-id: http://desenvolvimento.rjconsultores.com.br/repositorio/sco/BD/FlyWay/trunk@106818 d1611594-4594-4d17-8e1d-87c2c4800839
master
celio 2021-05-21 21:09:43 +00:00
parent e796f04dd5
commit 22a9a46109
2 changed files with 18 additions and 1 deletions

View File

@ -1,6 +1,6 @@
declare
begin
execute immediate
'Insert into FUNCION_SISTEMA (FUNCIONSISTEMA_ID,SISTEMA_ID,NOMBFUNCION,DESCRUTA,ACTIVO,FECMODIF,USUARIO_ID) values (FUNCION_SISTEMA_seq.nextval,''2'',''VDA > VENDA >> MAPA DE VIAGEM'',''COM.RJCONSULTORES.VENTABOLETOS.GUI.VENTA.MENU.ITEN.MAPAVIAGEM'',''1'',null,''1'')';
'Insert into FUNCION_SISTEMA (FUNCIONSISTEMA_ID,SISTEMA_ID,NOMBFUNCION,DESCRUTA,ACTIVO,FECMODIF,USUARIO_ID) values (FUNCION_SISTEMA_seq.nextval,''2'',''VDA > VENDA >> MAPA DE VIAGEM'',''COM.RJCONSULTORES.VENTABOLETOS.GUI.VENTA.MENU.ITEN.MAPAVIAGEM'',''1'',SYSDATE,''1'')';
exception when others then null;
end;

View File

@ -0,0 +1,17 @@
declare
begin
execute immediate
'INSERT INTO PERFIL_FUNCION (PERFILFUNCION_ID, PERFIL_ID, FUNCIONSISTEMA_ID, ACTIVO, FECMODIF, USUARIO_ID, INDLECTURA)
SELECT
PERFIL_FUNCION_SEQ.NEXTVAL as PERFILFUNCION_ID,
p.PERFIL_ID,
(SELECT FUNCIONSISTEMA_ID FROM FUNCION_SISTEMA fs WHERE fs.DESCRUTA = ''COM.RJCONSULTORES.VENTABOLETOS.GUI.VENTA.MENU.ITEN.MAPAVIAGEM'') AS FUNCIONSISTEMA_ID,
1 as ACTIVO,
SYSDATE AS FECMODIF,
-2 AS USUARIO_ID,
0 AS INDLECTURA
FROM PERFIL p
WHERE p.ACTIVO = 1
AND NOT EXISTS(SELECT * FROM PERFIL_FUNCION WHERE FUNCIONSISTEMA_ID = (SELECT FUNCIONSISTEMA_ID FROM FUNCION_SISTEMA fs WHERE fs.DESCRUTA = ''COM.RJCONSULTORES.VENTABOLETOS.GUI.VENTA.MENU.ITEN.MAPAVIAGEM''))';
exception when others then null;
end;