1С ИНАГРО помогите снять защиту СЛК (Бухгалтерия сельскохозяйственного предприятия)

[Chvalov]

Все делал по примерам из других конфигураций:
1. Конфигурация - Открыть конфигурацию
2. Конфигурация - Поддержка - Настройка поддержки - Включить возможность изменения
3. В появившемся окошке выбираю вторую строчку: "Объект редактируется с сохранением поддержкой", после чего с низу жму кнопку "Открыть"
4. Правой кл.мыши на БухгалтерияСельскохозяйст венногоПредприятия Открыть модуль обычного приложения

Процедуру проверки нашел:

// Процедура - обработчик события "При начале работы системы".
//
Процедура ПриНачалеРаботыСистемы()

	// Начало: изменено компанией ИН-АГРО
	//Инициализируем механизм защиты
	ИНАГРО_ОбщегоНазначенияКлиент.ВывестиИнтерфейсПользователя(Истина);
	Если НЕ ИНАГРО_ДирективыПрепроцессору.ИНАГРО_ИнициализироватьЗащитуКонфигурации() Тогда      
		Предупреждение("Не удалось инициализировать систему СЛК.
						|Работа системы будет завершена!", 120);
		ЗавершитьРаботуСистемы(Ложь);
		Возврат;
	КонецЕсли;  		
	ИНАГРО_ОбщегоНазначенияКлиент.ВывестиИнтерфейсПользователя(Ложь);
	
	Если Константы.ИНАГРО_глИдентификаторКонфигурации.Получить() = "" 
        ИЛИ Константы.ИНАГРО_глИдентификаторКонфигурации.Получить() <> "AccountingUkr" Тогда
        Константы.ИНАГРО_глИдентификаторКонфигурации.Установить("AccountingUkr");
    КонецЕсли;    
	
	КонтрольВерсииПлатформы.ПроверитьВерсиюПлатформы(); 
	
	ПервыйЗапуск = (Константы.НомерВерсииКонфигурации.Получить()="");
	
	ПользовательОпределен = Ложь;
	ОписаниеОшибкиОпределенияПользователя = "";
	Если Не ЗначениеЗаполнено(ПараметрыСеанса.ТекущийПользователь) Тогда
		Если УправлениеПользователями.ОпределитьТекущегоПользователя(ОписаниеОшибкиОпределенияПользователя) Тогда
			ПользовательОпределен = ЗначениеЗаполнено(ПараметрыСеанса.ТекущийПользователь);
		КонецЕсли;
	Иначе
		ПользовательОпределен = Истина;
	КонецЕсли;
	
	Если Не ПользовательОпределен Тогда
		Если ПустаяСтрока(ОписаниеОшибкиОпределенияПользователя) Тогда
			ОписаниеОшибкиОпределенияПользователя = НСтр("ru='Ошибка идентификации пользователя. Обратитесь к администратору';uk='Помилка ідентифікації користувача. Зверніться до адміністратора'");
		КонецЕсли;
		Предупреждение(ОписаниеОшибкиОпределенияПользователя);
		ЗавершитьРаботуСистемы(Ложь);
		Возврат;			

	КонецЕсли;
	
	ЗаголовокСистемы = Константы.ЗаголовокСистемы.Получить();
	Если НЕ Пустаястрока(ЗаголовокСистемы) Тогда
		УстановитьЗаголовокСистемы(ЗаголовокСистемы);
	КонецЕсли;

	// Открытие Панели функций
	Если (НЕ ПервыйЗапуск) Тогда
		ПроверитьЗапускСтартовогоПомощникаИПанелиФункций();		
	КонецЕсли;
	
	БИ = Обработки.БухгалтерскиеИтоги.Создать();
	
	// Установить начальное значение ТипДетализацииСтандартныхОтчетов
	Если УправлениеПользователями.ПолучитьЗначениеПоУмолчанию(глЗначениеПеременной("глТекущийПользователь"), "ТипДетализацииСтандартныхОтчетов") = Перечисления.ТипДетализацииСтандартныхОтчетов.ПустаяСсылка() Тогда
		УправлениеПользователями.УстановитьЗначениеПоУмолчанию(глЗначениеПеременной("глТекущийПользователь"), "ТипДетализацииСтандартныхОтчетов", Перечисления.ТипДетализацииСтандартныхОтчетов.Элементы);
	КонецЕсли;
															
	ОбновлениеИнформационнойБазы.ВыполнитьОбновлениеИнформационнойБазы();
	
	//-----------------Начало ИН-АГРО Подсистема Элевотор-----------------------
	Если ИНАГРО_ОбщийПовторногоИспользования.ЕстьБЭМКЗУ() Тогда
		Если Метаданные.РегистрыНакопления.Найти("ИНАГРО_Остатки") <> Неопределено Тогда
		
			Выполнить("ИНАГРО_ДирективыПрепроцессоруЭлеватор.ИНАГРО_ВыполнитьОбновлениеИнформационнойБазы();");
		
		КонецЕсли;	
	КонецЕсли;	
	//-----------------Конец  ИН-АГРО Подсистема Элевотор-----------------------
	
	// Выполнить проверку разницы времени с сервером приложения
	Если НЕ ПроверкаРазницыВремениКлиент.ВыполнитьПроверку() Тогда
		Возврат;	
	КонецЕсли;
	
	Если ОбработатьПараметрыЗапуска(ПараметрЗапуска) Тогда
		Возврат;
	КонецЕсли;

	УправлениеСоединениямиИБ.УстановитьКонтрольРежимаЗавершенияРаботыПользователей();

	ЭтоФайловаяИБ = ОпределитьЭтаИнформационнаяБазаФайловая();
		
	Если ЭтоФайловаяИБ Тогда
					
		ПользовательДляВыполненияРеглЗаданий = Константы.ПользовательДляВыполненияРегламентныхЗаданийВФайловомВарианте.Получить();
		
		Если глЗначениеПеременной("глТекущийПользователь") = ПользовательДляВыполненияРеглЗаданий Тогда
			
			// с интервалом секунд вызываем процедуру работы с регламентными заданиями
			ПоддержкаРегламентныхЗаданиеДляФайловойВерсии();
			
			ИнтервалДляОпроса = Константы.ИнтервалДляОпросаРегламентныхЗаданийВФайловомВарианте.Получить();
			
			Если ИнтервалДляОпроса = Неопределено
				ИЛИ ИнтервалДляОпроса = 0 Тогда
				
				ИнтервалДляОпроса = 60;	
				
			КонецЕсли;
			
			ПодключитьОбработчикОжидания("ПоддержкаРегламентныхЗаданиеДляФайловойВерсии", ИнтервалДляОпроса);
			
		КонецЕсли;
		
	КонецЕсли;
	
	// автообмен данными
	Если глЗначениеПеременной("глОбработкаАвтоОбменДанными") <> Неопределено Тогда
		
		// подключим обработчик обменов данными
		ПодключитьОбработчикОжидания("ПроверкаОбменаДанными", глЗначениеПеременной("глКоличествоСекундОпросаОбмена"));
			
	КонецЕсли;
	
	// Открытие Быстрого освоения
	ПоказыватьБыстроеОсвоение = УправлениеПользователями.ПолучитьЗначениеПоУмолчанию(глЗначениеПеременной("глТекущийПользователь"), "ПоказыватьБыстроеОсвоениеПриНачалеРаботыСистемы");
	Если ПоказыватьБыстроеОсвоение  И (НЕ ПервыйЗапуск) Тогда
		Обработки.БыстроеОсвоение.ПолучитьФорму().Открыть();
	КонецЕсли;
	
	// Начало: изменено компанией ИН-АГРО
	глУчетнаяПолитикаПоПерсоналуОрганизации = ИНАГРО_Зарплата.ИНАГРО_ЗаполнениеУчетнойПолитикиПоПерсоналуОрганизации();
	// Конец: изменено компанией ИН-АГРО
	
	Если НЕ ПервыйЗапуск Тогда
		// Открытие дополнительной информации
		Форма = Обработки.ДополнительнаяИнформация.ПолучитьФорму("ФормаРабочийСтол");
		Форма.Открыть();
	КонецЕсли;
	
	// Начнем проверку динамического обновления конфигурации
	НачатьПроверкуДинамическогоОбновленияИБ();
	
	// Автоматическая загрузка почты
	Если УправлениеПользователями.ПолучитьЗначениеПоУмолчанию(глЗначениеПеременной("глТекущийПользователь"), "АвтооткрытиеЭлектроннойПочтыПриЗапускеПрограммы") = Истина
	   И Константы.ИспользованиеВстроенногоПочтовогоКлиента.Получить() Тогда
		Обработки.Почта.ПолучитьФорму().Открыть();
	КонецЕсли; 
	
	Если УправлениеПользователями.ПолучитьЗначениеПоУмолчанию(глЗначениеПеременной("глТекущийПользователь"), "ЗагружатьАктуальныеКурсыВалютПриЗапускеСистемы") Тогда
	
		// Автоматическая загрузка курсов валют
		ЗначениеКонстанты = Константы.НастройкиЗагрузкиКурсовВалют.Получить();
		Настройки 		  = ЗначениеКонстанты.Получить();
		ЗагружатьЕжедневно = Ложь;	
		Если Настройки <> Неопределено Тогда
			Попытка
				ЗагружатьЕжедневно = Настройки.ЗагружатьЕжедневно;
			Исключение
			КонецПопытки;	
		КонецЕсли;
		
		Попытка
			Если ЗагружатьЕжедневно Тогда
				
				ОбработкаЗагрузкаКурсов = Обработки.ЗагрузкаКурсовВалют.Создать();
				Если НЕ ОбработкаЗагрузкаКурсов.КодДоступаАктуален() Тогда
					ФормаОжиданияКурсов = ОбработкаЗагрузкаКурсов.ПолучитьФорму("ФормаОжидания");
					ФормаОжиданияКурсов.Открыть();
					ПодключитьОбработчикОжидания("ОбработчикЗагрузкаКурсов", 20, Истина);
				Иначе
					ОбработкаЗагрузкаКурсов.ЗагрузитьКурсыПоНастройкам();
				КонецЕсли;
			КонецЕсли;
		Исключение
		КонецПопытки;
	
	КонецЕсли; 
	
	Локализация.ПроверитьСоответсвиеЯзыкаПлатформыИПользователя();
	
	Если Не ПервыйЗапуск Тогда
		 ОткрытьПутеводительПоДемобазе();
	КонецЕсли; 
	
	// Форма помощника обновления конфигурации выводится поверх остальных окон.
	// ИН-АГРО   Чтобы не лезла в Интернет за обновлением
	//Если РольДоступна(Метаданные.Роли.ПолныеПрава) Тогда
	//	ОбработкаОбновлениеКонфигурации = Обработки.ОбновлениеКонфигурации.Создать();
	//	ОбработкаОбновлениеКонфигурации.ПроверитьНаличиеОбновлений();
	//КонецЕсли;
	
	глПодключитьМенеджерЗвит1С(Ложь);
	
КонецПроцедуры // ПриНачалеРаботыСистемы()

Но весь прикол в том что редактировать не можно, модуль открыт со статусом "Только чтение"
1C.jpg
Как обойти, или как же все таки ее взломать ?