Ошибка 4059 там, где её не должно быть...

Есть функция, для возвращения массива с рабочими инструментами. В процессе её использования возникли проблемки. Комментируя функции, я обнаружил, что в классе, в котором данная функция находится если закомментить эту функцию, то всё работает без ошибок и не каких ошибок терминал не возвращает. Если же эту функция раскомментить, то сразу же возникает ошибка 4059. Есс-но я понял, что косяк именно в этой функции. Потому её и нужно штудировать..

Вот функция с расставленными принтами типа:  Print ("_LastError_( номер коммента ) = ", _LastError);

// 1.1 Создаём список рабочих инструментов и заносим их в массив. =========================================================================
int MakeListOfInstruments::CreatWorkingSMBArray (string& fsa_WorkingSMB[],           // Возвращаемый массив рабочих инструментов
                                                 string  fs_ListOfWorkingSMB,        // Список рабочих инструментов
                                                 string  fs_BaseCurrency,            // Список базовых валют
                                                 string  fs_BadCurrency,             // "Чёрный" список валют( их пропускаем )
                                                 int     fi_MAXspread = 0,           // Максимальный спред
                                                 string  fs_Delimiter = ",")         // Разделитель элементов в списках
{
   ResetLastError();
   int li_CntOfSMB = 0;

   //---- Формируем лист рабочих символов
   if (fs_ListOfWorkingSMB == "")
   {
      string lsa_AllSymbols[],      // Массив с общим количеством торговых инструментов( в зависимости от выбора источника )
             lsa_ProperCUR[],       // Массив с подходящими торговыми инструментами
             lsa_BadCUR[];          // Массив с НЕподходящими торговыми инструментами
      int    li_CntProperCUR,       // Количество подходящих торговых инструментов
             li_CntBadCUR,          // Количество НЕподходящих торговых инструментов
             li_Cnt = 0,            // Общее количество торговых инструментов котируемых ДЦ
             li_CUR,                // Счётчик подходящих торговых инструментов
             li_BAD;                // Счётчик НЕподходящих торговых инструментов
      bool   lb_BAD;

      //---- Формируем массив из списка базовых валют
      li_CntProperCUR = CArraysMan.MakeStrArrayFromLine (fs_BaseCurrency, lsa_ProperCUR, ",");

      //---- Формируем массив из "чёрного" списка валют
      li_CntBadCUR = CArraysMan.MakeStrArrayFromLine (fs_BadCurrency, lsa_BadCUR, ",");

      //---- Получаем перечень доступных символов в окне "Обзор рынка"
      li_Cnt = ListOfSMB (lsa_AllSymbols, True);

      ArrayResize (fsa_WorkingSMB, li_Cnt);

      if (li_CntProperCUR == 0)
      {
         li_CntProperCUR = 1;
         ArrayResize (lsa_ProperCUR, 1);
      }

      CArraysMan.InitializeArraySTR (fsa_WorkingSMB, "");
Print ("_LastError_1 = ", _LastError);
      //---- Оставляем только те инструменты, в которых присутствуют "доминантные" валюты
      for (int li_SMB = 0; li_SMB < li_Cnt; li_SMB++)
      {
         Print ("_LastError_2 = ", _LastError);
         for (li_CUR = 0; li_CUR < li_CntProperCUR; li_CUR++)
         {
            ResetLastError();
            Print ("_LastError_3 = ", _LastError);
            if (StringFind (lsa_AllSymbols [li_SMB], lsa_ProperCUR [li_CUR]) >= 0 || fs_BaseCurrency == "")
            {
//               Print ("_LastError_6 = ", _LastError);
               if (li_CntBadCUR > 0)
               {
//                //---- Фильтруем инструменты через "чёрный" список
                  lb_BAD = false;
                   
                  for (li_BAD = 0; li_BAD < li_CntBadCUR; li_BAD++)
                  {
                     if (StringFind (lsa_AllSymbols [li_SMB], lsa_BadCUR [li_BAD]) >= 0)
                     {
                        lb_BAD = true; break;
                     }
                  }
                  
                  if (lb_BAD) break;
               }
//               Print ("_LastError_7 = ", _LastError);
               //---- Отбрасываем инструменты с "большим" спредом
               if (MaxSpread > 0)
               {
                  if (  MarketInfo (lsa_AllSymbols [li_SMB], MODE_SPREAD) > MaxSpread)
                  break;
               }
               fsa_WorkingSMB [li_CntOfSMB] = lsa_AllSymbols [li_SMB];
               li_CntOfSMB++;
               break;
            }
         }
      }
      Print ("_LastError_4 = ", _LastError);
      ArrayResize (fsa_WorkingSMB, li_CntOfSMB);
   }
   else
   {
      li_CntOfSMB = CArraysMan.MakeStrArrayFromLine (fs_ListOfWorkingSMB, fsa_WorkingSMB, ",");
      //---- Проверяем на котируемость у ДЦ введённых символов
      li_CntOfSMB = CheckPresenceSMBInMarket (fsa_WorkingSMB);
   }
   //---- Контролируем возможные ошибки
   CLogging.Printing (StringConcatenate ("CreatWorkingSMBArray() => ", CErrs.ErrorToString (_LastError)));
//----
   return (li_CntOfSMB);
}

Входящие данные ИНПУТ такие:

input string     _Make_List_Of_Symbols =     " ______________ Make List Of Symbols _____________ ";
input string     is_ListOfWorkingSMB = "";           // Список рабочих инструментов
input string     is_ListOfMagic = "3333021";         // Список используемых экспертом магиков
input string     is_BaseCurrencyList = "USD,EUR,JPY,CHF,GBP,CAD,AUD";      // Список базовых валют
input string     is_BadCurrencyList = "NZD";         // "Чёрный" список валют ( их пропускаем )
input int        ii_MaxSpread = 50;                  // Максимальный спред, при котором эксперту разрешено торговать!

По ходу, если просмотреть лог, то становится ясно, что ошибка возникает в процессе вложенного цикла. Вот что интересно, в логе:

22:35:05 Expert BaseTemplate EURUSD,H1: loaded successfully
22:35:05 TestGenerator: current spread 105 used
22:35:05 BaseTemplate inputs: id_Lots=0.1; id_SL=0; id_TP=10; ii_Slippage=2; ib_Bootstrap=0; ib_RealTrade=1; ib_VirtualTrade=1; ib_NeedLogs=1; ib_PrintUP=1; ib_CommentUP=1; ii_MaxSpread=500; ii_NumberOfTry=10; ib_LotMoreMaxLot=0; 
22:35:05 2014.06.24 00:00  BaseTemplate EURUSD,H1: _LastError_1 = 0
22:35:05 2014.06.24 00:00  BaseTemplate EURUSD,H1: _LastError_2 = 0
22:35:05 2014.06.24 00:00  BaseTemplate EURUSD,H1: _LastError_3 = 0
22:35:05 2014.06.24 00:00  BaseTemplate EURUSD,H1: _LastError_2 = 4059
22:35:05 2014.06.24 00:00  BaseTemplate EURUSD,H1: _LastError_3 = 0
22:35:05 2014.06.24 00:00  BaseTemplate EURUSD,H1: _LastError_2 = 4059
22:35:05 2014.06.24 00:00  BaseTemplate EURUSD,H1: _LastError_3 = 0
22:35:05 2014.06.24 00:00  BaseTemplate EURUSD,H1: _LastError_2 = 0
22:35:05 2014.06.24 00:00  BaseTemplate EURUSD,H1: _LastError_3 = 0
22:35:05 2014.06.24 00:00  BaseTemplate EURUSD,H1: _LastError_2 = 4059
22:35:05 2014.06.24 00:00  BaseTemplate EURUSD,H1: _LastError_3 = 0
22:35:05 2014.06.24 00:00  BaseTemplate EURUSD,H1: _LastError_2 = 4059
22:35:05 2014.06.24 00:00  BaseTemplate EURUSD,H1: _LastError_3 = 0
22:35:05 2014.06.24 00:00  BaseTemplate EURUSD,H1: _LastError_2 = 4059
22:35:05 2014.06.24 00:00  BaseTemplate EURUSD,H1: _LastError_3 = 0
22:35:05 2014.06.24 00:00  BaseTemplate EURUSD,H1: _LastError_3 = 0

 Весь класс, который тут используется прилагаю к сообщению. Глобальные переменные я уже показал. И 2 метода, которые используются в проблемной функции MakeStrArrayFromLine и InitializeArraySTR вот:

// 1.4 Возвращает массив STRING из строки, разделённой fs_Delimiter. ========================================================================
int MakeStrArrayFromLine (string  fs_List,              // строка с данными
                          string& fsa_OUT[],            // возвращаемый массив
                          string  fs_Delimiter = ",")   // разделитель данных в строке
{
   string tmp_Str = "",
          tmp_Char = "";
//----
   ArrayResize (fsa_OUT, 0);
    
   for (int i = 0; i < StringLen (fs_List); i++)
   {
      tmp_Char = StringSubstr (fs_List, i, 1);
    
      if (tmp_Char == fs_Delimiter)
      {
         if (StringTrimLeft (StringTrimRight (tmp_Str)) != "")
         {
            ArrayResize (fsa_OUT, ArraySize (fsa_OUT) + 1);
            fsa_OUT [ArraySize (fsa_OUT) - 1] = tmp_Str;
         }
         tmp_Str = "";
      }
      else
      {
         if (tmp_Char != " ") tmp_Str = tmp_Str + tmp_Char;
      }
   }
    
   if (StringTrimLeft (StringTrimRight (tmp_Str)) != "")
   {
      ArrayResize (fsa_OUT, ArraySize (fsa_OUT) + 1);
      fsa_OUT [ArraySize (fsa_OUT) - 1] = tmp_Str;
   }
//----
   return (ArraySize (fsa_OUT));
}

// 1.3 Инициализируем массив STRING по заданному VALUE. ===================================================================================
void InitializeArraySTR (string& fsa_Array[],     // Инициализируемый массив
                         string  fs_Value = "")   // Значение, которым будем инициализировать массив fsa_Array
{
   for (int li_Int = 0; li_Int < ArraySize (fsa_Array); li_Int++)
   {
      fsa_Array [li_Int] = fs_Value;
   }
}