/// <summary>
        /// Get species fact (Swedish history or Swedish occurrence)
        /// for specified taxon.
        /// </summary>
        /// <param name="factor">Get species fact for this factor.</param>
        /// <param name="taxon">Get species fact for this taxon.</param>
        /// <returns>Species fact (Swedish history and Swedish occurrence) for specified taxon.</returns>
        public ArtDatabanken.Data.SpeciesFact GetSpeciesFact(IUserContext userContext, ArtDatabanken.Data.FactorId factor, ITaxon taxon)
        {
            Dictionary <ArtDatabanken.Data.FactorId, ArtDatabanken.Data.SpeciesFact> speciesFacts;
            List <ArtDatabanken.Data.FactorId> factorIds;
            List <ITaxon> allTaxa;

            ArtDatabanken.Data.SpeciesFact speciesFact;

            speciesFact = null;
            if (_allSpeciesFacts.IsNull())
            {
                // Get species facts.
                factorIds = new List <ArtDatabanken.Data.FactorId>();
                factorIds.Add(ArtDatabanken.Data.FactorId.SwedishHistory);
                factorIds.Add(ArtDatabanken.Data.FactorId.SwedishOccurrence);
                allTaxa = new List <ITaxon>();
                allTaxa.AddRange(TaxonTree.GetTaxa().GetGenericList());
                _allSpeciesFacts = SpeciesFactHelper.GetSpeciesFacts(userContext, allTaxa, factorIds);
            }
            if (_allSpeciesFacts.ContainsKey(taxon.Id))
            {
                speciesFacts = _allSpeciesFacts[taxon.Id];
                if (speciesFacts.ContainsKey(factor))
                {
                    speciesFact = speciesFacts[factor];
                }
            }

            return(speciesFact);
        }
Exemplo n.º 2
0
        /// <summary>
        /// Reads species fact.
        /// </summary>
        /// <param name="taxon">
        /// The taxon.
        /// </param>
        private void InitSpeciesFact(ITaxon taxon)
        {
            Stopwatch sp = new Stopwatch();

            sp.Start();
            try
            {
                Dictionary <FactorId, SpeciesFact> dicSpeciesFacts = SpeciesFactHelper.GetCommonDyntaxaSpeciesFacts(_user, taxon);
                dicSpeciesFacts.TryGetValue(FactorId.SwedishOccurrence, out _swedishOccourrenceFact);
                dicSpeciesFacts.TryGetValue(FactorId.SwedishHistory, out _swedishHistoryFact);
            }
            catch (Exception)
            {
                // the taxon did not exist in Artfakta
            }

            sp.Stop();
            Debug.WriteLine("Retrieving species fact: {0:N0} milliseconds", sp.ElapsedMilliseconds);
        }
        /// <summary>
        /// Init swedish occurence and swedish history factor enum value lists.
        /// </summary>
        private void InitSpeciesFacts(IUserContext userContext)
        {
            Dictionary <ArtDatabanken.Data.FactorId, IList <ArtDatabanken.Data.FactorFieldEnumValue> > factorEnumValues;

            factorEnumValues = SpeciesFactHelper.GetFactorsValueLists(userContext, new[] { ArtDatabanken.Data.FactorId.SwedishOccurrence, ArtDatabanken.Data.FactorId.SwedishHistory });
            FilterSwedishOccurrenceValues = new List <ExportSpeciesFactFactorValue>();
            //SwedishOccurrenceValues.Add(ExportSpeciesFactFactorValue.CreateValueMissingFactorValue(true));
            foreach (ArtDatabanken.Data.FactorFieldEnumValue enumValue in factorEnumValues[ArtDatabanken.Data.FactorId.SwedishOccurrence])
            {
                FilterSwedishOccurrenceValues.Add(ExportSpeciesFactFactorValue.Create(enumValue, true));
            }

            FilterSwedishHistoryValues = new List <ExportSpeciesFactFactorValue>();
            //SwedishHistoryValues.Add(ExportSpeciesFactFactorValue.CreateValueMissingFactorValue(true));
            foreach (ArtDatabanken.Data.FactorFieldEnumValue enumValue in factorEnumValues[ArtDatabanken.Data.FactorId.SwedishHistory])
            {
                FilterSwedishHistoryValues.Add(ExportSpeciesFactFactorValue.Create(enumValue, true));
            }
        }
Exemplo n.º 4
0
        public void SetTaxon(ITaxon taxon, MatchSettingsViewModel options)
        {
            IUserContext userContext = CoreData.UserManager.GetCurrentUser();

            this.TaxonId        = taxon.Id;
            this.ScientificName = taxon.ScientificName;
            this.GUID           = taxon.Guid;
            this.Author         = taxon.Author;
            this.CommonName     = taxon.CommonName.IsNotEmpty() ? taxon.CommonName : "";
            this.TaxonCategory  = taxon.Category.Name;
            if (options.OutputRecommendedGUID)
            {
                this.RecommendedGUID = taxon.GetRecommendedGuid(userContext);
            }

            if (options.OutputSwedishOccurrence)
            {
                try
                {
                    //Dictionary<FactorId, SpeciesFact> dicSpeciesFacts = SpeciesFactHelper.GetSpeciesFacts(taxon, new[] { FactorId.SwedishOccurence, FactorId.SwedishHistory });
                    Dictionary <ArtDatabanken.Data.FactorId, ArtDatabanken.Data.SpeciesFact> dicSpeciesFacts = SpeciesFactHelper.GetCommonDyntaxaSpeciesFacts(userContext, taxon);
                    this.SwedishOccurrence = SpeciesFactHelper.GetFactorValue(dicSpeciesFacts, ArtDatabanken.Data.FactorId.SwedishOccurrence);
                    //this.SwedishHistory = SpeciesFactHelper.GetFactorValue(dicSpeciesFacts, FactorId.SwedishHistory);
                }
                catch (Exception)
                {
                    this.SwedishOccurrence = "";
                }
            }

            //base.SetTaxon(taxon);
            //base.Author = taxon.Author;
            //base.CommonName = taxon.CommonName;
            //base.Id = taxon.Id;
            //base.ScientificName = taxon.ScientificName;
            //base.TaxonCategory = taxon.TaxonType.Name;
            //base.TaxonCategoryId = taxon.TaxonType.Id;
            //base.TaxonCategorySortOrder = taxon.TaxonType.SortOrder;
            //base.TaxonId = taxon.Id.ToString();
            //base.GUID = Resources.DyntaxaSettings.Default.LSIDString.Replace("[TaxonId]", taxon.Id.ToString());
        }
Exemplo n.º 5
0
        //private static IPerson GetCreatedByPerson(IUserContext userContext, int createdBy)
        //{
        //    IPerson person;
        //    IUser user;

        //    try
        //    {
        //        user = CoreData.UserManager.GetUser(userContext, createdBy);
        //    }
        //    catch (Exception)
        //    {
        //        // user does not exist in UserAdmin system
        //        user = null;
        //    }

        //    if ((user.IsNotNull()) &&
        //        (user.Type == UserType.Person) &&
        //        (user.PersonId.HasValue))
        //    {
        //        person = CoreData.UserManager.GetPerson(userContext, user.PersonId.Value);
        //    }
        //    else
        //    {
        //        person = null;
        //    }
        //    return person;
        //}

        /// <summary>
        /// The create.
        /// </summary>
        /// <param name="userContext">
        /// The user context.
        /// </param>
        /// <param name="taxon">
        /// The taxon.
        /// </param>
        /// <param name="revisionId">
        /// The revision id.
        /// </param>
        /// <returns>
        /// The <see cref="TaxonSummaryViewModel"/>.
        /// </returns>
        public static TaxonSummaryViewModel Create(IUserContext userContext, ITaxon taxon, int?revisionId)
        {
            var     model = new TaxonSummaryViewModel();
            IPerson person;
            bool    isInRevision      = DyntaxaHelper.IsInRevision(userContext, revisionId);
            bool    isUserTaxonEditor = userContext.IsTaxonEditor();

            model.Id                = taxon.Id.ToString();
            model.Guid              = taxon.Guid ?? string.Empty;
            model.CategoryId        = taxon.Category != null ? taxon.Category.Id : 0;
            model.Category          = taxon.Category != null ? taxon.Category.Name : string.Empty;
            model.IsMicrospecies    = taxon.IsMicrospecies;
            model.CategorySortOrder = taxon.Category != null ? taxon.Category.SortOrder : 0;
            model.ConceptDefinition = taxon.GetConceptDefinition(userContext) ?? "-";
            model.AlertStatus       = (TaxonAlertStatusId)taxon.AlertStatus.Id;
            model.AlertImageUrl     = GetAlertImageUrl(model.AlertStatus);
            person = taxon.GetModifiedByPerson(userContext);
            //IPerson createdByPerson = GetCreatedByPerson(userContext, taxon.CreatedBy);
            //string createdFullName = createdByPerson.FullName;
            if (person.IsNull())
            {
                model.UpdateInformation = string.Format("{0} ({1})", taxon.ModifiedDate.ToShortDateString(), String.Empty);
            }
            else
            {
                model.UpdateInformation = string.Format("{0} ({1})", taxon.ModifiedDate.ToShortDateString(), person.FullName);
            }

            model.ValidToInformation = string.Format("{0} ({1})", taxon.ValidToDate.ToShortDateString(), taxon.ModifiedByPerson);
            model.CreatedInformation = string.Format("{0} ({1})", taxon.CreatedDate.ToShortDateString(), taxon.ModifiedByPerson);
            model.Validity           = GetValidityDescription(taxon);

            if (taxon.ScientificName.IsNotEmpty())
            {
                model.ScientificName = new TaxonNameAuthorViewModel(taxon.ScientificName, taxon.Author);
            }

            if (taxon.CommonName.IsNotEmpty())
            {
                model.CommonName = new TaxonNameAuthorViewModel(taxon.CommonName, string.Empty);
            }

            // Synonyms
            //model.Synonyms = new List<TaxonNameViewModel>();
            //var synonyms = taxon.GetSynonyms(userContext, true);
            //if (synonyms != null)
            //{
            //    foreach (ITaxonName taxonName in synonyms)
            //    {
            //        model.Synonyms.Add(new TaxonNameViewModel(taxonName, taxon));
            //    }
            //}

            model.Synonyms         = taxon.GetSynonymsViewModel(isInRevision, isUserTaxonEditor, false);
            model.ProParteSynonyms = taxon.GetProParteSynonymsViewModel(isInRevision, isUserTaxonEditor);
            model.MisappliedNames  = taxon.GetMisappliedNamesViewModel(isInRevision, isUserTaxonEditor);

            // Other valid common names
            // todo - change implementation?
            //model.OtherValidCommonNames = new List<string>();
            //if (!taxon.CommonName.IsEmpty())
            //{
            //    model.OtherValidCommonNames.AddRange(
            //        from taxonName in taxon.GetTaxonNames(userContext)
            //        where
            //            taxonName.Category.Id == (int)TaxonNameCategoryId.SwedishName &&
            //            taxonName.Version != taxon.GetCommonName(userContext).Version
            //        select taxonName.Name);

            //    // todo - även ha med att namnet är gilitigt. Hur ser man det???
            //}

            model.OtherValidCommonNames = taxon.GetNotRecommendedSwedishNamesViewModel(isInRevision, isUserTaxonEditor);

            // Remove other valid common names from synonyms
            if (model.OtherValidCommonNames.IsNotEmpty())
            {
                List <TaxonNameViewModel> newSynonymList = new List <TaxonNameViewModel>();

                foreach (TaxonNameViewModel synonym in model.Synonyms)
                {
                    if (model.OtherValidCommonNames.All(x => x.Id != synonym.Id))
                    {
                        newSynonymList.Add(synonym);
                    }
                }

                model.Synonyms = newSynonymList;
            }

            // Classification
            var allParentTaxa      = taxon.GetAllParentTaxonRelations(userContext, null, isInRevision, false, true);
            var distinctParentTaxa = allParentTaxa.GroupBy(x => x.ParentTaxon.Id).Select(x => x.First().ParentTaxon).ToList();

            model.Classification = new List <RelatedTaxonViewModel>();
            foreach (ITaxon relatedTaxon in distinctParentTaxa)
            {
                if (relatedTaxon.Category.IsTaxonomic)
                {
                    model.Classification.Add(new RelatedTaxonViewModel(relatedTaxon, relatedTaxon.Category, null));
                }
            }

            // Species fact
            try
            {
                // Dictionary<FactorId, SpeciesFact> dicSpeciesFacts = SpeciesFactHelper.GetSpeciesFacts(taxon, new [] {FactorId.SwedishOccurence, FactorId.SwedishHistory});
                Dictionary <FactorId, SpeciesFact> dicSpeciesFacts = SpeciesFactHelper.GetCommonDyntaxaSpeciesFacts(userContext, taxon);
                model.SwedishHistory    = SpeciesFactHelper.GetFactorValue(dicSpeciesFacts, FactorId.SwedishHistory);
                model.SwedishOccurrence = SpeciesFactHelper.GetFactorValue(dicSpeciesFacts, FactorId.SwedishOccurrence);

                // If swedish occurrence or swedish history is changed in the current revision, then show those values instead.
                if (DyntaxaHelper.IsInRevision(userContext, revisionId))
                {
                    DyntaxaInternalTaxonServiceManager internalTaxonServiceManager =
                        new DyntaxaInternalTaxonServiceManager();

                    // Check if Swedish occurrence is stored in Taxon database in this revision.
                    DyntaxaRevisionSpeciesFact swedishOccurrenceRevisionSpeciesFact =
                        internalTaxonServiceManager.GetDyntaxaRevisionSpeciesFact(
                            userContext,
                            (Int32)FactorId.SwedishOccurrence,
                            taxon.Id,
                            revisionId.Value);
                    if (swedishOccurrenceRevisionSpeciesFact != null)
                    {
                        SpeciesFactModelManager speciesFactModel = new SpeciesFactModelManager(taxon, userContext);
                        TaxonModelManager.UpdateOldSpeciesFactModelWithDyntaxaRevisionSpeciesFactValues(userContext, speciesFactModel.SwedishOccurrenceSpeciesFact, swedishOccurrenceRevisionSpeciesFact);
                        model.SwedishOccurrence = speciesFactModel.SwedishOccurrenceSpeciesFact.GetStatusOriginalLabel();
                    }

                    // Check if Swedish history is stored in Taxon database in this revision.
                    DyntaxaRevisionSpeciesFact swedishHistoryRevisionSpeciesFact =
                        internalTaxonServiceManager.GetDyntaxaRevisionSpeciesFact(
                            userContext,
                            (Int32)FactorId.SwedishHistory,
                            taxon.Id,
                            revisionId.Value);
                    if (swedishHistoryRevisionSpeciesFact != null)
                    {
                        if (swedishHistoryRevisionSpeciesFact.StatusId.HasValue)
                        {
                            SpeciesFactModelManager speciesFactModel = new SpeciesFactModelManager(taxon, userContext);
                            TaxonModelManager.UpdateOldSpeciesFactModelWithDyntaxaRevisionSpeciesFactValues(userContext, speciesFactModel.SwedishHistorySpeciesFact, swedishHistoryRevisionSpeciesFact);
                            model.SwedishHistory = speciesFactModel.SwedishHistorySpeciesFact.GetStatusOriginalLabel();
                        }
                        else // swedish history is deleted in this revision
                        {
                            model.SwedishHistory = "";
                        }
                    }
                }
            }
            catch (Exception)
            {
                // the taxon did not exist in Artfakta
            }

            return(model);
        }
        /// <summary>
        /// Creates a swedish occurrence summary view model.
        /// </summary>
        /// <param name="taxon">The taxon.</param>
        /// <returns></returns>
        public SwedishOccurrenceSummaryViewModel CreateSwedishOccurrenceSummaryViewModel(ITaxon taxon)
        {
            var model        = new SwedishOccurrenceSummaryViewModel();
            int?redListValue = null;

            // Species fact
            try
            {
                Dictionary <ArtDatabanken.Data.FactorId, ArtDatabanken.Data.SpeciesFact> dicSpeciesFacts = SpeciesFactHelper.GetCommonDyntaxaSpeciesFacts(this._userContext, taxon);
                if (dicSpeciesFacts.ContainsKey(FactorId.SwedishHistory))
                {
                    model.SwedishHistory     = SpeciesFactHelper.GetFactorValue(dicSpeciesFacts, ArtDatabanken.Data.FactorId.SwedishHistory);
                    model.SwedishHistoryFact = dicSpeciesFacts[FactorId.SwedishHistory];
                }

                if (dicSpeciesFacts.ContainsKey(FactorId.SwedishOccurrence))
                {
                    //CoreData.SpeciesFactManager.GetSpeciesFact()
                    model.SwedishOccurrence     = SpeciesFactHelper.GetFactorValue(dicSpeciesFacts, ArtDatabanken.Data.FactorId.SwedishOccurrence);
                    model.SwedishOccurrenceFact = dicSpeciesFacts[FactorId.SwedishOccurrence];
                }

                if (dicSpeciesFacts.ContainsKey(FactorId.RedlistCategory))
                {
                    model.RedListInfo = GetRedListCategory(dicSpeciesFacts[ArtDatabanken.Data.FactorId.RedlistCategory]);
                    redListValue      = GetRedListCategoryValue(dicSpeciesFacts[ArtDatabanken.Data.FactorId.RedlistCategory]);
                }

                // If swedish occurrence or swedish history is changed in the current revision, then show those values instead.
                if (DyntaxaHelper.IsInRevision(_userContext, _taxonRevision))
                {
                    DyntaxaInternalTaxonServiceManager internalTaxonServiceManager =
                        new DyntaxaInternalTaxonServiceManager();

                    // Check if Swedish occurrence is stored in Taxon database in this revision.
                    DyntaxaRevisionSpeciesFact swedishOccurrenceRevisionSpeciesFact =
                        internalTaxonServiceManager.GetDyntaxaRevisionSpeciesFact(
                            _userContext,
                            (Int32)FactorId.SwedishOccurrence,
                            taxon.Id,
                            _taxonRevision.Id);
                    if (swedishOccurrenceRevisionSpeciesFact != null)
                    {
                        SpeciesFactModelManager speciesFactModel = new SpeciesFactModelManager(taxon, _userContext);
                        TaxonModelManager.UpdateOldSpeciesFactModelWithDyntaxaRevisionSpeciesFactValues(_userContext, speciesFactModel.SwedishOccurrenceSpeciesFact, swedishOccurrenceRevisionSpeciesFact);
                        model.SwedishOccurrence     = speciesFactModel.SwedishOccurrenceSpeciesFact.GetStatusOriginalLabel();
                        model.SwedishOccurrenceFact = speciesFactModel.SwedishOccurrenceSpeciesFact;
                    }

                    // Check if Swedish history is stored in Taxon database in this revision.
                    DyntaxaRevisionSpeciesFact swedishHistoryRevisionSpeciesFact =
                        internalTaxonServiceManager.GetDyntaxaRevisionSpeciesFact(
                            _userContext,
                            (Int32)FactorId.SwedishHistory,
                            taxon.Id,
                            _taxonRevision.Id);
                    if (swedishHistoryRevisionSpeciesFact != null)
                    {
                        if (swedishHistoryRevisionSpeciesFact.StatusId.HasValue)
                        {
                            SpeciesFactModelManager speciesFactModel = new SpeciesFactModelManager(taxon, _userContext);
                            TaxonModelManager.UpdateOldSpeciesFactModelWithDyntaxaRevisionSpeciesFactValues(_userContext, speciesFactModel.SwedishHistorySpeciesFact, swedishHistoryRevisionSpeciesFact);
                            model.SwedishHistory     = speciesFactModel.SwedishHistorySpeciesFact.GetStatusOriginalLabel();
                            model.SwedishHistoryFact = speciesFactModel.SwedishHistorySpeciesFact;
                        }
                        else // swedish history is deleted in this revision
                        {
                            model.SwedishHistory     = null;
                            model.SwedishHistoryFact = null;
                        }
                    }
                }
            }
            catch (Exception)
            {
                // the taxon did not exist in Artfakta
            }

            const int noRedListValue = 6;

            if (!string.IsNullOrEmpty(model.RedListInfo) && redListValue.GetValueOrDefault(0) < noRedListValue)
            {
                var    linkManager = new LinkManager();
                string url         = linkManager.GetUrlToRedlist(taxon.Id.ToString());
                if (url != "")
                {
                    var item = new LinkItem(
                        LinkType.Url,
                        LinkQuality.ApprovedByExpert,
                        Resources.DyntaxaResource.LinkToSwedishRedlistLabel,
                        url);
                    model.RedListLink = item;
                }
            }

            return(model);
        }