В глобальном модуле есть такая процедура
******************************
Функция глКаталогОбработкиИнформа ционныйБлок() Экспорт
Перем Размер,Атр,ВС,ВД,ВЗ,Расш;
СписокКаталогов = СоздатьОбъект("СписокЗначе ний");
ТекКаталог = ФС.ТекКаталог();
КаталогРегОтчетов = КаталогИБ()+"ExtForms";
ФС.УстТекКаталог(КаталогРе гОтчетов);
// Просмотр внешних обработок
Файл = ФС.НайтиПервыйФайл("RpИИ.grp");
Пока ПустаяСтрока(Файл) = 0 Цикл
Если (Файл <> "..") И (Файл <> ".") Тогда
ФГ=СоздатьОбъект("ФС");
ФГ.АтрибутыФайла(Файл, Размер, Атр, ВС, ВД, ВЗ, Расш);
Если Сред(Атр,4,1)<>"1" Тогда
// ищем только каталоги
Продолжить;
КонецЕсли;
СписокКаталогов.ДобавитьЗ� �ачение(КаталогРегОтчетов+" \"+Файл,);
КонецЕсли;
Файл = ФС.НайтиСледующийФайл();
КонецЦикла;
ФС.УстТекКаталог(ТекКатало г);
Если СписокКаталогов.РазмерСпи� �ка()>0 Тогда
СписокКаталогов.Сортирова� �ь(1);
Возврат СписокКаталогов.ПолучитьЗ� �ачение(1);
Иначе
Возврат "";
КонецЕсли;
КонецФункции // глКаталогОбработкиИнформа ционныйБлок()
******************************
из текста процедуры видно, что она ищет все каталоги регламентированной отчетности по маске RpИИ.grp
внимание привлекает след. конструкция:
**********
Пока ПустаяСтрока(Файл) = 0 Цикл
----
Если Сред(Атр,4,1)<>"1" Тогда
// ищем только каталоги
Продолжить;
КонецЕсли;
**********
Т.е. если мы находим вместо каталога файл с таким наименованием, то уходим в бесконечный цикл, т.к. переход к следующему файлу осуществлен позже и мы зависаем на этом файле.
Перед "Продолжить;" следовало бы написать
"Файл = ФС.НайтиСледующийФайл();"
Пути решения:
1) Поправить в конфигураторе глобальный модуль, дописав
"Файл = ФС.НайтиСледующийФайл();" в нужном месте:
**********
Пока ПустаяСтрока(Файл) = 0 Цикл
----
Если Сред(Атр,4,1)<>"1" Тогда
// ищем только каталоги
Файл = ФС.НайтиСледующийФайл(); // Исправление
Продолжить;
КонецЕсли;
**********
Или
2) Удалить в каталоге "\Extforms\" файлы по маске RpИИ.grp (не каталоги!, а то останетесь без регламентированной отчетности)
Откуда эти файлы там взялись, мне неизвестно. Во всех случаях, когда возникала эта проблема у разных людей, находились такие файлы, которые имели размер 0 байт. Это не исключает того, что после удаления эти файлы могут появятся когда-нибудь там вновь и 1С снова зависнет. По идее этой маске должны соответствовать только каталоги с регламентированной отчетностью
Ответить с цитированием
Ваши права
Социальные закладки