Fixes Bug #AL-4506
parent
0cdf41b6f8
commit
5c4b812036
|
@ -0,0 +1,16 @@
|
||||||
|
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 > CONFIG COMERCIAL > CONFIGURACAO DE PRODUCTOS'',''COM.RJCONSULTORES.ADMINISTRACION.GUI.CONFIGURACIONECCOMERCIALES.MENU.CONFIGURACIONDEPRODUCTOS'',''1'',SYSDATE,''2'')';
|
||||||
|
|
||||||
|
exception
|
||||||
|
when dup_val_on_index then null;
|
||||||
|
when except_02291 then null;
|
||||||
|
end;
|
Loading…
Reference in New Issue