declare
    dup_val_on_index  exception;
    pragma exception_init (dup_val_on_index  , -00001);
begin
    execute immediate  'Insert into FUNCION_SISTEMA (FUNCIONSISTEMA_ID,SISTEMA_ID,NOMBFUNCION,DESCRUTA,ACTIVO,
   FECMODIF,USUARIO_ID) values (FUNCION_SISTEMA_SEQ.NEXTVAL, 1,''ALTERAR EMBARQUE DESEMBARQUE'',
   ''COM.RJCONSULTORES.VENTABOLETOS.ALTERAREMBARQUEDESEMBARQUE'',1,SYSDATE,-1)';
 exception when dup_val_on_index  then null;
end;