УСН, 2 НДФЛ в 189 конфигурации
27.01.2012
11:59
#1
"Не формирует никаких форм по НДФЛ, включая 2-НДФЛ. Ошибка: СуммыВычетов[Номер]=СуммыВычетов[Номер]+СуммаВычета;
{Глобальный модуль {16049}: Значение индексного выражения находится за границами массива
[Промодерировано]"
{Глобальный модуль {16049}: Значение индексного выражения находится за границами массива
[Промодерировано]"
29.01.2012
18:10
#2
попробуйте сформировать без подбора сотрудников, сразу на всех, а печать на принтер только выделенный фрагмент.
Или надо кое какие строчки в модуле закомментировать...
Или надо кое какие строчки в модуле закомментировать...
30.01.2012
08:33
#3
"В Отчете СправкиПоНДФЛ при подборе СОтрудника выдает ошибку модуля.
Лечится просто. Скопировать аналогичный фрагмент кода из конфигурации УСН 188.
Строка Строка 4779
Вместо фрагмента:
Если Элемент.ЭтоГруппа()=0 Тогда
Если Элемент.ОсновнойЭлемент <> Элемент Тогда
Элемент = Элемент.ОсновнойЭлемент
КонецЕсли;
Если Элемент.Выбран() = 1 Тогда
Если Сотрудники.НайтиЗначение(Элемент) = 0 Тогда
Сотрудники.ДобавитьЗначение(Элемент);
КонецЕсли;
КонецЕсли;
КонецЕсли;
СпособВыборкиСотрудников = ?((Сотрудники.РазмерСписка()>0) и (СпособВыборкиСотрудников = 1),2,СпособВыборкиСотрудников);
Вставить такой фрагмент:
Если Элемент.ЭтоГруппа()=0 Тогда
Если Элемент.Выбран() = 1 Тогда
Если ТекущаяЗакладка=1 Тогда
Если Сотрудники.НайтиЗначение(Элемент) = 0 Тогда
Сотрудники.ДобавитьЗначение(Элемент);
КонецЕсли;
КонецЕсли;
КонецЕсли;
КонецЕсли;"
Лечится просто. Скопировать аналогичный фрагмент кода из конфигурации УСН 188.
Строка Строка 4779
Вместо фрагмента:
Если Элемент.ЭтоГруппа()=0 Тогда
Если Элемент.ОсновнойЭлемент <> Элемент Тогда
Элемент = Элемент.ОсновнойЭлемент
КонецЕсли;
Если Элемент.Выбран() = 1 Тогда
Если Сотрудники.НайтиЗначение(Элемент) = 0 Тогда
Сотрудники.ДобавитьЗначение(Элемент);
КонецЕсли;
КонецЕсли;
КонецЕсли;
СпособВыборкиСотрудников = ?((Сотрудники.РазмерСписка()>0) и (СпособВыборкиСотрудников = 1),2,СпособВыборкиСотрудников);
Вставить такой фрагмент:
Если Элемент.ЭтоГруппа()=0 Тогда
Если Элемент.Выбран() = 1 Тогда
Если ТекущаяЗакладка=1 Тогда
Если Сотрудники.НайтиЗначение(Элемент) = 0 Тогда
Сотрудники.ДобавитьЗначение(Элемент);
КонецЕсли;
КонецЕсли;
КонецЕсли;
КонецЕсли;"
Читают тему
(гостей: 1)