declare
begin
  execute immediate 'INSERT INTO FUNCION_SISTEMA (FUNCIONSISTEMA_ID, SISTEMA_ID, NOMBFUNCION, DESCRUTA, ACTIVO, FECMODIF, USUARIO_ID)
        VALUES (FUNCION_SISTEMA_SEQ.nextval, 2, ''VTA>SITEFF>>ACESSO_MENU_SITEF'',
                ''ACESSO_MENU_INTERATIVO_SITEF'', 1,
                current_date, NULL)';
  exception when others  then null;
end;