internal void FillModelParallel(string typename, Guid typeid, Guid contextid, Guid macroid, bool filltype, bool fillrel, Dictionary<Guid, string> filters, bool viewmode = false, YSBMESDataSet ds = default(YSBMESDataSet), System.ComponentModel.BackgroundWorker wk = null)
        {
            /*
            swsql.Reset();
            swsql.Start();
            */

            var er = GetContext(contextid);
            if (ds == default(YSBMESDataSet)) ds = er.DS;
            if (ds == default(YSBMESDataSet)) ds = currentDS;

            lock (ds)
            {
                ds.EnforceConstraints = false;

                var macrotypename = GetMacroTypeNameByMacroTypeID(macroid.ToString());
                var types = GetTypesInMacroType(macrotypename);
                foreach (var t in types)
                {
                    if (ds.Tables[t].ExtendedProperties.ContainsKey("hasExpFields"))
                    {
                        var changed = TypeTableEventsMinus(t, ds);

                        foreach (DataColumn dc in ds.Tables[t].Columns)
                        {
                            if (!(dc.Expression == ""))
                            {
                                if (!dc.ExtendedProperties.ContainsKey("exp")) dc.ExtendedProperties.Add("exp", dc.Expression);
                                else
                                {
                                    if (dc.ExtendedProperties["exp"].ToString() != dc.Expression) dc.ExtendedProperties["exp"] = dc.Expression;
                                }
                                dc.Expression = "";
                                dc.ReadOnly = false;
                            }
                        }

                        TypeTableEventsPlus(t, changed, ds);
                    }
                }

                /*
                string times = "";
                swsqlobject.Reset();
                swsqlobject.Start();
                */

                if (wk == null || !wk.CancellationPending)
                {
                    if (filltype) FillType(typename, typeid, filters[macroid], viewmode, ds);
                    else fillrel = false;

                    if (wk != null) wk.ReportProgress(10, 1);

                    /*
                    swsqlobject.Stop();
                    times += typename + " - " + swsqlobject.Elapsed.ToString() + "\r\n";
                    var elap = swsqlobject.ElapsedMilliseconds;
                    */

                    if (fillrel && ds.Tables[typename].Rows.Count > 0)
                    {
                        Dictionary<Guid, КонтекстныеНастройкиСвязей> svs = new Dictionary<Guid, КонтекстныеНастройкиСвязей>();
                        if (MacroTypes.ContainsKey(macroid)) svs = MacroTypes[macroid].Links;
                        var sv = svs.Where(s => s.Value.Связь != null).Select(s => new { ИД = s.Key, s.Value.Связь }).ToDictionary(s => s.Связь);

                        System.Collections.Concurrent.ConcurrentStack<Tuple<string, System.Collections.Concurrent.ConcurrentDictionary<string, string>>> stack = new System.Collections.Concurrent.ConcurrentStack<Tuple<string, System.Collections.Concurrent.ConcurrentDictionary<string, string>>>();
                        System.Collections.Concurrent.ConcurrentDictionary<string, string> extprops = new System.Collections.Concurrent.ConcurrentDictionary<string, string>();

                        var ttypename = ds.Tables[typename];
                        extprops.TryAdd("InnerList", ttypename.ExtendedProperties["InnerList"].ToString());
                        extprops.TryAdd("ParentInnerList", ttypename.ExtendedProperties["ParentInnerList"].ToString());
                        extprops.TryAdd("InnerJoinOnList", ttypename.ExtendedProperties["InnerJoinOnList"].ToString());
                        extprops.TryAdd("ActualSQL", ttypename.ExtendedProperties["ActualSQL"].ToString());
                        extprops.TryAdd("Filter", (ttypename.ExtendedProperties.ContainsKey("Where") ? ttypename.ExtendedProperties["Where"].ToString() : "") +
                                                  (ttypename.ExtendedProperties.ContainsKey("WhereFC") ? ttypename.ExtendedProperties["WhereFC"].ToString() : "") +
                                                  filters[macroid]);

                        stack.Push(new Tuple<string, System.Collections.Concurrent.ConcurrentDictionary<string, string>>(typename, extprops));

                        while (stack.Count > 0)
                        {
                            if (wk != null && wk.CancellationPending) break;

                            var tuple = new Tuple<string, System.Collections.Concurrent.ConcurrentDictionary<string, string>>(string.Empty, new System.Collections.Concurrent.ConcurrentDictionary<string, string>());
                            stack.TryPop(out tuple);

                            typename = tuple.Item1;
                            ttypename = ds.Tables[typename];
                            ttypename.ExtendedProperties["InnerList"] = tuple.Item2["InnerList"];
                            ttypename.ExtendedProperties["ParentInnerList"] = tuple.Item2["ParentInnerList"];
                            ttypename.ExtendedProperties["InnerJoinOnList"] = tuple.Item2["InnerJoinOnList"];
                            ttypename.ExtendedProperties["ActualSQL"] = tuple.Item2["ActualSQL"];
                            ttypename.ExtendedProperties["Filter"] = tuple.Item2["Filter"];

                            var rls = ((List<ТипДляCreateRelations>)ds.Tables[typename].ExtendedProperties["DownRelations"]).
                                                                    Where(r => sv.ContainsKey(typename + "_" + r.Наименование + "{" + r.Синоним + "}"));
                            if (ttypename.Rows.Count > 0 && rls.Any())
                            {
                                /*
                                string inList = "";// ttypename.AsEnumerable().Select(rw => rw["ИД"].ToString()).Aggregate((a, b) => b + "," + a);
                                StringBuilder sb = new StringBuilder();
                                foreach(DataRow rw in ttypename.Rows)
                                {
                                    if (sb.Length == 0) sb.Append(rw["ИД"].ToString());
                                    else sb.Append("," + rw["ИД"].ToString());
                                }
                                inList = sb.ToString();
                                */

                                ParallelOptions pop = new ParallelOptions();
                                pop.MaxDegreeOfParallelism = System.Environment.ProcessorCount;
                                Parallel.ForEach(rls, pop, (r, ls) =>
                                {
                                    if (wk != null && wk.CancellationPending) ls.Stop();

                                    var rtypename = ds.Tables[r.Наименование];
                                    if (typename != r.Наименование)
                                    {
                                        //*
                                        if (ttypename.ExtendedProperties["InnerList"].ToString().Length > 0)
                                            rtypename.ExtendedProperties["ParentInnerList"] = ttypename.ExtendedProperties["InnerList"].ToString();
                                        else
                                        {
                                            if (ttypename.ExtendedProperties["ParentInnerList"].ToString().Length > 0)
                                                rtypename.ExtendedProperties["ParentInnerList"] = ttypename.ExtendedProperties["ParentInnerList"].ToString();
                                        }
                                        rtypename.ExtendedProperties["InnerJoinOnList"] = ttypename.ExtendedProperties["InnerJoinOnList"].ToString();
                                        rtypename.ExtendedProperties["InnerJoinOn"] = r.Синоним;

                                        if (paging || ttypename.ExtendedProperties["Filter"].ToString().Length > 0)
                                        {
                                            if (ttypename.ExtendedProperties["ActualSQL"].ToString().Length > 0)
                                                rtypename.ExtendedProperties["InnerJoinTo"] = "(" + ttypename.ExtendedProperties["ActualSQL"].ToString() + ")";
                                            rtypename.ExtendedProperties["InnerJoinToOn"] = "ИД";
                                        }

                                        //внешний фильтр
                                        string baseWhere = "";
                                        if (rtypename.ExtendedProperties.ContainsKey("Where")) baseWhere = rtypename.ExtendedProperties["Where"].ToString();

                                        if (er != null && er.externalSQLWhereForMacroLinks.ContainsKey(typename + "_" + r.Наименование + "{" + r.Синоним + "}"))
                                        {
                                            var exFilt = er.externalSQLWhereForMacroLinks[typename + "_" + r.Наименование + "{" + r.Синоним + "}"];
                                            if (!string.IsNullOrEmpty(exFilt))
                                            {
                                                if (!rtypename.ExtendedProperties.ContainsKey("Where")) rtypename.ExtendedProperties.Add("Where", "(" + exFilt + ")");
                                                else
                                                {
                                                    if (!string.IsNullOrEmpty(rtypename.ExtendedProperties["Where"].ToString()))
                                                    {
                                                        rtypename.ExtendedProperties["Where"] = "((" + rtypename.ExtendedProperties["Where"] + ") and (" + exFilt + "))";
                                                    }
                                                    else rtypename.ExtendedProperties["Where"] = "(" + exFilt + ")";
                                                }
                                            }
                                        }
                                        //------------------
                                        //*/

                                        // rtypename.ExtendedProperties["InnerList"] = inList;
                                        // rtypename.ExtendedProperties["InnerJoinOnList"] = r.Синоним;

                                        lock (ds.Tables[r.Наименование])
                                        {
                                            /*
                                            var sw = new Stopwatch();
                                            sw.Reset();
                                            sw.Start();
                                            */

                                            FillType(r.Наименование, r.ИД, filters[sv[typename + "_" + r.Наименование + "{" + r.Синоним + "}"].ИД], false, ds);
                                            if (ds.Tables[r.Наименование].ExtendedProperties.ContainsKey("Where")) ds.Tables[r.Наименование].ExtendedProperties["Where"] = baseWhere;

                                            if (wk != null) wk.ReportProgress(10, 1);

                                            /*
                                            sw.Stop();
                                            System.Threading.Interlocked.Add(ref elap, sw.ElapsedMilliseconds);
                                            times += r.Наименование + " - " + sw.Elapsed.ToString() + "\r\n";
                                            */
                                        }

                                        System.Collections.Concurrent.ConcurrentDictionary<string, string> сextprops = new System.Collections.Concurrent.ConcurrentDictionary<string, string>();
                                        сextprops.TryAdd("InnerList", rtypename.ExtendedProperties["InnerList"].ToString());
                                        сextprops.TryAdd("ParentInnerList", rtypename.ExtendedProperties["ParentInnerList"].ToString());
                                        сextprops.TryAdd("InnerJoinOnList", rtypename.ExtendedProperties["InnerJoinOnList"].ToString());
                                        сextprops.TryAdd("ActualSQL", rtypename.ExtendedProperties["ActualSQL"].ToString());
                                        сextprops.TryAdd("Filter", ttypename.ExtendedProperties["Filter"].ToString() +
                                                                   (rtypename.ExtendedProperties.ContainsKey("Where") ? rtypename.ExtendedProperties["Where"].ToString() : "") +
                                                                   (rtypename.ExtendedProperties.ContainsKey("WhereFC") ? rtypename.ExtendedProperties["WhereFC"].ToString() : "") +
                                                                   filters[sv[typename + "_" + r.Наименование + "{" + r.Синоним + "}"].ИД]);

                                        stack.Push(new Tuple<string, System.Collections.Concurrent.ConcurrentDictionary<string, string>>(r.Наименование, сextprops));
                                    }
                                }
                                );
                            }
                        }
                    }
                }

                if (wk != null) wk.ReportProgress(10, 2);

                foreach (var t in types)
                {
                    if (ds.Tables[t].ExtendedProperties.ContainsKey("hasExpFields"))
                    {
                        var changed = TypeTableEventsMinus(t, ds);

                        foreach (DataColumn dc in ds.Tables[t].Columns)
                        {
                            if (dc.ExtendedProperties.ContainsKey("exp"))
                            {
                                if (dc.Expression != dc.ExtendedProperties["exp"].ToString()) dc.Expression = dc.ExtendedProperties["exp"].ToString();
                                if (!dc.ReadOnly) dc.ReadOnly = true;
                            }
                        }

                        TypeTableEventsPlus(t, changed, ds);
                    }

                    ClearTypeLoadingParameters(t, ds);
                }

                ds.EnforceConstraints = true;
            }

            /*
            swsql.Stop();

            times += "SQL" + " - " + swsql.Elapsed.ToString() + "\r\n";
            times += "Всего" + " - " + TimeSpan.FromMilliseconds(elap).ToString() + "\r\n";
            MessageBox.Show(times);
            */
        }