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;
