declare
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 >> MENSAGEM RECUSA'',
''COM.RJCONSULTORES.ADMINISTRACION.GUI.CATALOGO.MENU.MENSAGEMRECUSA'',
''1'',sysdate,''1'')';
       exception when others  then null;
end;