Перестал работать парсер сайта

т_Курсы = Новый ТаблицаЗначений;                                                                  
	т_курсы.Колонки.Добавить("Биржа", Новый ОписаниеТипов("Строка",, Новый КвалификаторыСтроки(150)));
	т_Курсы.Колонки.Добавить("СпособОплаты", Новый ОписаниеТипов("Строка",, Новый КвалификаторыСтроки(150)));
	т_Курсы.Колонки.Добавить("Купить", Новый ОписаниеТипов("Число", Новый КвалификаторыЧисла(12,2)));
	т_Курсы.Колонки.Добавить("Продать", Новый ОписаниеТипов("Число", Новый КвалификаторыЧисла(12,2)));
	
	ЗащищенноеСоединение = Новый ЗащищенноеСоединениеOpenSSL();
	Соединение = Новый HTTPСоединение("p2p.army",,,,,, ЗащищенноеСоединение);  
	Для Каждого Биржа Из МассивБирж Цикл
		Текст = "/ru/p2p/prices/bybit?fiatUnit=RUB"; 
		Запрос = Новый HTTPЗапрос(Текст);
		Ответ = Соединение.Получить(Запрос); 
		Если Ответ.КодСостояния = 200 Тогда
			Построитель = Новый ПостроительDOM;  
			ЧтениеHTML = Новый ЧтениеHTML;
			ЧтениеHTML.УстановитьСтроку(Ответ.ПолучитьТелоКакСтроку());
			ДокументHTML = Построитель.Прочитать(ЧтениеHTML);
			ЧтениеHTML.Закрыть(); 
			
			СписокЭлементов = ДокументHTML.ПолучитьЭлементыПоИмени("tr");
			индМетод = Неопределено;
			индКупить = Неопределено;
			индПродать = Неопределено;  
			индЗаполнены = Ложь; 
			ПервыйЦикл = Истина;
			
			Для Каждого ЭлСписка Из СписокЭлементов Цикл 
				Если ПервыйЦикл Тогда
					Для i = 0 по ЭлСписка.ДочерниеУзлы.Количество() - 1 цикл
						Если индМетод = Неопределено 
							Или индКупить = Неопределено 
							Или индПродать = Неопределено Тогда
							Если Найти(НРег(ЭлСписка.ДочерниеУзлы[i].ТекстовоеСодержимое), "метод") Тогда
								индМетод = i;
							КонецЕсли;
							Если Найти(НРег(ЭлСписка.ДочерниеУзлы[i].ТекстовоеСодержимое), "buy") Тогда
								индКупить = i;
							КонецЕсли;
							Если Найти(НРег(ЭлСписка.ДочерниеУзлы[i].ТекстовоеСодержимое), "sell") Тогда
								индПродать = i;
							КонецЕсли;
						Иначе
							индЗаполнены = Истина;
							ПервыйЦикл = Ложь;
							Прервать;
						КонецЕсли; 
					КонецЦикла; 
				КонецЕсли;
				Если индЗаполнены Тогда
					индЗаполнены = Ложь;
					Продолжить;
				КонецЕсли;         
				Попытка
					нСтр = т_Курсы.Добавить(); 
					нСтр.Биржа = Биржа;
					нСтр.СпособОплаты = ЭлСписка.ДочерниеУзлы[индМетод].ТекстовоеСодержимое;
					нСтр.Купить = Число(СтрРазделить(ЭлСписка.ДочерниеУзлы[индКупить].ТекстовоеСодержимое, " ")[0]);
					нСтр.Продать = Число(СтрРазделить(ЭлСписка.ДочерниеУзлы[индПродать].ТекстовоеСодержимое, " ")[0]);
				Исключение
					
				КонецПопытки;
			КонецЦикла;
		КонецЕсли;
	КонецЦикла;