В налогоплательщике не доступна Формы в виде машиночитаемого бланка

[Яна93]

Хотела распечатать бухгалтерский баланс..но Формы в виде машиночитаемого бланка с двухмерным штрихкодом PDF417 не активна..все остальные формы активны..согласно принятому закону баланс печатается раз в год..но мне эта форму нужна сейчас.. Что можно сделать?
Зашла в код..комментировала все что могло бы подойти под описание того, что указывает на первый переключатель и на его активность, но безуспешно ..Поэтому прошу Вашей помощи..
Налогоплательщик, редакция 3.0 (3.0.52.1)
И заметила, когда я переключаюсь на балансы 2012 года любого квартала, эта форма активна..

Перем НастройкиВФорме;
Перем ВыводитьКолонкуСКодамиСтрок;
////////////////////////////////////////////////////////////////////////////////
// ОБРАБОТЧИКИ СОБЫТИЙ ФОРМЫ
Процедура ПриОткрытии()

// Настройки по умолчанию.
НастройкиВФорме = Новый Структура;
НастройкиВФорме.Вставить("АктивныйПункт", 1);
НастройкиВФорме.Вставить("ДоступенПункт1", Истина);
НастройкиВФорме.Вставить("ДоступенПункт2", Истина);
НастройкиВФорме.Вставить("ДоступенПункт3", Истина);
НастройкиВФорме.Вставить("ВключатьКодыСтрок", Истина);

Если ТипЗнч(ПараметрыПечати) = Тип("Структура") Тогда
  ЗаполнитьЗначенияСвойств(НастройкиВФорме, ПараметрыПечати);
КонецЕсли;

ДоступныеПункты = Новый Массив;
Если НастройкиВФорме.ДоступенПункт1 Тогда
  ДоступныеПункты.Добавить(1);
КонецЕсли;
Если НастройкиВФорме.ДоступенПункт2 Тогда
  ДоступныеПункты.Добавить(2);
КонецЕсли;
Если НастройкиВФорме.ДоступенПункт3 Тогда
  ДоступныеПункты.Добавить(3);
КонецЕсли;

ИндексДоступногоПункта = ДоступныеПункты.Найти(НастройкиВФорме.АктивныйПункт);
Если ИндексДоступногоПункта = Неопределено Тогда
  ИндексДоступногоПункта = 0;
КонецЕсли;
Переключатель1 = ДоступныеПункты[ИндексДоступногоПункта];

ЭлементыФормы.Переключатель1.Доступность = НастройкиВФорме.ДоступенПункт1;
ЭлементыФормы.Переключатель2.Доступность = НастройкиВФорме.ДоступенПункт2;
ЭлементыФормы.Переключатель3.Доступность = НастройкиВФорме.ДоступенПункт3;

ВыводитьКолонкуСКодамиСтрок = Истина; // НастройкиВФорме.ВключатьКодыСтрок;

УстановитьДоступностьВключенияКодов();

КонецПроцедуры
////////////////////////////////////////////////////////////////////////////////
// ОБРАБОТЧИКИ СОБЫТИЙ ЭЛЕМЕНТОВ ШАПКИ ФОРМЫ
Процедура Переключатель1ПриИзменении(Элемент)

УстановитьДоступностьВключенияКодов();

КонецПроцедуры
Процедура Переключатель2ПриИзменении(Элемент)

УстановитьДоступностьВключенияКодов();

КонецПроцедуры
Процедура Переключатель3ПриИзменении(Элемент)

УстановитьДоступностьВключенияКодов();

КонецПроцедуры
////////////////////////////////////////////////////////////////////////////////
// ОБРАБОТЧИКИ КОМАНД ФОРМЫ
Процедура ОсновныеДействияФормыПечататьСразу(Кнопка)

НастройкиВФорме.Вставить("ВключатьКодыСтрок", ВыводитьКолонкуСКодамиСтрок);
НастройкиВФорме.Вставить("АктивныйПункт", Переключатель1);
НастройкиВФорме.Вставить("Команда", Кнопка.Имя);
ЭтаФорма.Закрыть(НастройкиВФорме);

КонецПроцедуры
Процедура ОсновныеДействияФормыПоказатьБланк(Кнопка)

НастройкиВФорме.Вставить("ВключатьКодыСтрок", ВыводитьКолонкуСКодамиСтрок);
НастройкиВФорме.Вставить("АктивныйПункт", Переключатель1);
НастройкиВФорме.Вставить("Команда", Кнопка.Имя);
ЭтаФорма.Закрыть(НастройкиВФорме);

КонецПроцедуры
////////////////////////////////////////////////////////////////////////////////
// СЛУЖЕБНЫЕ ПРОЦЕДУРЫ И ФУНКЦИИ
Процедура УстановитьДоступностьВключенияКодов()

// ЭлементыФормы.ВыводитьКолонкуСКодамиСтрок.Доступность = (Переключатель1 = 2);

КонецПроцедуры

[GRADUS]

Код Выделить Развернуть

ЭлементыФормы.Переключатель1.Доступность = НастройкиВФорме.ДоступенПункт1;
На

Код Выделить Развернуть

ЭлементыФормы.Переключатель1.Доступность = Истина;

[Яна93]

Код Выделить Развернуть

ЭлементыФормы.Переключатель1.Доступность = НастройкиВФорме.ДоступенПункт1;
На

Код Выделить Развернуть

ЭлементыФормы.Переключатель1.Доступность = Истина;

GRADUS, прописала..но вышла ошибка:
{Отчет.РегламентированныйОтчетБухОтчетность.Форма.ВыборПечатнойФормы.Форма(75,44)}: Переменная не определена (Переключатель1)
   НастройкиВФорме.Вставить("АктивныйПункт", <<?>>Переключатель1); (Проверка: Толстый клиент (обычное приложение))
{Отчет.РегламентированныйОтчетБухОтчетность.Форма.ВыборПечатнойФормы.Форма(84,44)}: Переменная не определена (Переключатель1)
   НастройкиВФорме.Вставить("АктивныйПункт", <<?>>Переключатель1); (Проверка: Толстый клиент (обычное приложение))

[GRADUS]

Ну, ломать, так ломать

Код Выделить Развернуть

ДоступныеПункты.Добавить(1);

Вставить после

Код Выделить Развернуть

Если НастройкиВФорме.ДоступенПункт1 Тогда
  ДоступныеПункты.Добавить(1);
КонецЕсли;

Либо вместо "переключатель", там где ошибочка, поставь циферку 1

Код Выделить Развернуть


НастройкиВФорме.Вставить("АктивныйПункт", 1);

[Яна93]

Ну, ломать, так ломать

Код Выделить Развернуть

ДоступныеПункты.Добавить(1);

Вставить после

Код Выделить Развернуть

Если НастройкиВФорме.ДоступенПункт1 Тогда
  ДоступныеПункты.Добавить(1);
КонецЕсли;

Либо вместо "переключатель", там где ошибочка, поставь циферку 1

Код Выделить Развернуть


НастройкиВФорме.Вставить("АктивныйПункт", 1);

Проставила цифру 1..форма стала активной, но когда я выбрала ее и нажала на кнопку ПОКАЗАТЬ БЛАНК он выдал следующую ошибку: Не удалось выгрузить Бухгалтерская отчетность (с 2011 года) за 1 квартал 2013 г. (Первичный. ИФНС:7325)!
Не удалось сформировать тексты выгрузки!
Для исправления ошибок используйте окно навигации по ошибкам.
После чего я установила точку останова на процедуру Показать бланк..и проследила все операции которые он делал в отладчике по шагово..и обнаружила что на стадии когда выходит ошибка он обрабатывает модуль в Документе ВыгрузкаРегламентныхОтчетов.

Попытка
               Для Каждого СтрСообщ Из ТекФорма.ТаблицаСообщений Цикл
                  НовСтр = ТаблицаСообщений.Добавить();
                  НовСтр.ОтчетДок = ТекДок.Ссылка;
                  НовСтр.Отчет = РегламентированнаяОтчетность.ПредставлениеДокументаРеглОтч(ТекДок);
                  НовСтр.Раздел = СтрСообщ.Раздел;
                  НовСтр.Страница = СтрСообщ.Страница;
                  НовСтр.Строка = СтрСообщ.Строка;
                  НовСтр.СтрокаПП = СтрСообщ.СтрокаПП;
                  НовСтр.ИмяЯчейки = СтрСообщ.ИмяЯчейки;
                  НовСтр.Графа = СтрСообщ.Графа;
                  НовСтр.Описание = СтрСообщ.Описание;
               КонецЦикла;
            Исключение
            КонецПопытки;
            ТекстСообщения = "Не удалось выгрузить " + РегламентированнаяОтчетность.ПредставлениеДокументаРеглОтч(ТекДок.Ссылка) + "!";
            Сообщить(ТекстСообщения, СтатусСообщения.Важное);
            ОшибкаВыгрузки = Истина;
            ОтобразитьФормуНавигацииПоОшибкам();
            ВыгрузкаПрервана = Истина;
            Прервать;
         КонецПопытки;


Так же вот еще процедура вывода сообщения
Если ВыгрузкаПрервана Тогда
      Сообщить("Не удалось сформировать тексты выгрузки!", СтатусСообщения.Внимание);
      Если ТаблицаСообщений.Количество() <> 0 Тогда
         Сообщить("Для исправления ошибок используйте окно навигации по ошибкам.", СтатусСообщения.Информация);
      КонецЕсли;
От этого можно както избавиться? я вот еще скопировала в документ весь модуль данного документа..

[GRADUS]

Помоему, легче разобраться почему она была неактивна, чем всю обработку переделывать )

[Яна93]

Помоему, легче разобраться почему она была неактивна, чем всю обработку переделывать )

Это все согласно новому правилу, что бухгалтерский баланс сдается раз в год (после обновления программы так стало)..но мне просто для банка нужна эта форма..т.к. уверена что они там панику разведут как обычно, и босю на меня шишки полетят:(

[GRADUS]

Помоему, легче разобраться почему она была неактивна, чем всю обработку переделывать )

Это все согласно новому правилу, что бухгалтерский баланс сдается раз в год (после обновления программы так стало)..но мне просто для банка нужна эта форма..т.к. уверена что они там панику разведут как обычно, и босю на меня шишки полетят:(

Попробуй зайти отладчиком после слова "попытка" и посмотреть на какой строче в исключение уходит.
Ну и примерно что там за ошибочка то такая.

[Яна93]

Помоему, легче разобраться почему она была неактивна, чем всю обработку переделывать )

Это все согласно новому правилу, что бухгалтерский баланс сдается раз в год (после обновления программы так стало)..но мне просто для банка нужна эта форма..т.к. уверена что они там панику разведут как обычно, и босю на меня шишки полетят:(

Попробуй зайти отладчиком после слова "попытка" и посмотреть на какой строче в исключение уходит.
Ну и примерно что там за ошибочка то такая.

Пришлось пока отправить баланс в том виде который предоставила программа..думаю обойдется (просто времени не было) Спасибо, GRADUS!;)