/// <summary>МЕТОД Заполняем экспандер при первом открытии Стационара</summary>
 /// <param name="pPole">Наше поле</param>
 private void MET_OpenStac(UserPole_History pPole)
 {
     // Заполняем список шаблонов
     MySql.MET_DsAdapterFill(MyQuery.MET_History_Select_2(pPole.PROP_Cod), "History");
     foreach (DataRow _Row in MyGlo.DataSet.Tables["History"].Rows)
     {
         PRO_RowShablon = _Row;
         // Настраиваем поле документа
         UserPole_History _Pole = new UserPole_History();
         _Pole.PROP_Date       = MET_PoleDat("pDate");
         _Pole.PROP_Document   = MET_PoleStr("NameKr");
         _Pole.PROP_Dp         = MET_PoleDat("pDate");
         _Pole.Margin          = new Thickness(5, 0, 0, 0);
         _Pole.PROP_Background = Brushes.LightYellow;
         _Pole.PROP_Type       = eTipDocum.Stac;
         _Pole.PROP_IsTexted   = true;
         // Находим иконку
         string _Icon = MET_PoleStr("Icon") != "" ? MET_PoleStr("Icon") : "mnOneOsmotr";
         _Pole.MET_LoadIcon(_Icon);
         _Pole.PROP_Cod          = MET_PoleInt("Cod");
         _Pole.PROP_CodApstac    = pPole.PROP_CodApstac;
         _Pole.PROP_NumerShablon = MET_PoleInt("NumShablon");
         _Pole.PROP_Kdl          = MET_PoleStr("kdl");
         _Pole.PROP_DocumHistory = new UserDocument(_Pole.PROP_Type);
         _Pole.PROP_DocumHistory.PROP_Protokol = UserProtokol.MET_FactoryProtokol(_Pole.PROP_Type, (int)_Pole.PROP_Cod);
         _Pole.PROP_Vrach = _Pole.PROP_DocumHistory.PROP_Protokol.PROP_UserName;
         _Pole.MET_Inicial();
         // Делегат при открытии документа
         _Pole.Event_OpenNewPoleHistory = MET_Protokol;
         // Если запрет для просмотра
         if (PUB_Ban && MET_PoleInt("Dostup") == 0)
         {
             _Pole.PROP_Description         = "(Доступ Закрыт)   ";
             _Pole.PROP_Background          = Brushes.GhostWhite;
             _Pole.IsEnabled                = false;
             _Pole.Event_OpenNewPoleHistory = null;
         }
         _Pole.PROP_IsDelete = MET_PoleInt("xDelete") == 1;
         pPole.MET_AddEle(_Pole);
         if (_Pole.PROP_Kdl != "")
         {
             var _PoleKDL = MET_GreatKDL(_Pole);
             _PoleKDL.Margin = new Thickness(5, 0, 0, 0);
             // Добавляем в очередь
             pPole.MET_AddEle(_PoleKDL);
         }
     }
     // Отключаем делегат
     pPole.Event_OpenNewPoleHistory = null;
 }