ЗиК 301 релиз (в 302 не исправлено) больничный

Была попытка принять человека на внутреннее совместительство, но не понадобилось. Документ принятия удалили.<br>Напротив совместителя - "не принят на внутреннее совместительство". Эта запись в справочнике Сотрудники помечена на удаление.<br>Человек продолжает работать по основной должности. Если ввести ему больничный, то при заполнении среднего выдается ошибка,<br>что человек не является работником предприятия. У некоторых вообще нулевой средний, у некоторых заполняется. При печати<br>выводится два раздела "Начисления за расчетный период", один из которых пуст.

"Для исправления достаточно вставить две строки в глобальный модуль они помечены комментарием //++++++++++++<br> <br>Функция глЗаполнитьДанныеСреднегоЗаработкаДляБЛ(Сотрудник,НачалоБолезни,ТипБолезни,ТипРасчетаБольничного,ПорядокРасчета=0) Экспорт <br> <br> <br> <br> ТаблицаДанныхОСреднемЗаработке = СоздатьОбъект("ТаблицаЗначений");<br> ТаблицаДанныхОСреднемЗаработке.НоваяКолонка("РабочееМесто", "Справочник.Сотрудники");<br> ТаблицаДанныхОСреднемЗаработке.НоваяКолонка("Месяц", "Строка", 16);<br> ТаблицаДанныхОСреднемЗаработке.НоваяКолонка("ВидСтроки", "Перечисление.ВидСтрокиСреднегоЗаработка"); <br> ТаблицаДанныхОСреднемЗаработке.НоваяКолонка("ПорядокРасчета", "Перечисление.ПорядокРасчетаСреднегоДляБЛ");<br> ТаблицаДанныхОСреднемЗаработке.НоваяКолонка("ШаблонПроводки", "Справочник.ШаблоныПроводок");<br> ТаблицаДанныхОСреднемЗаработке.НоваяКолонка("ДнейОтработано", "Число", 6, 2);<br> ТаблицаДанныхОСреднемЗаработке.НоваяКолонка("РазмерРаспределения", "Число", 12, 2);<br> ТаблицаДанныхОСреднемЗаработке.НоваяКолонка("ОтработаноФактически", "Число", 6, 2);<br> <br> <br> Если (НачалоБолезни>='01.01.2010') или (ПорядокРасчета = 2) Тогда<br> <br> СпрСотрудники = СоздатьОбъект("Справочник.Сотрудники");<br> СпрСотрудники.ВыбратьЭлементыПоРеквизиту("ОсновнойЭлемент",Сотрудник,0,0);<br> <br> Пока СпрСотрудники.ПолучитьЭлемент() = 1 Цикл <br> <br> ЭлСотрудника = СпрСотрудники.ТекущийЭлемент();<br> Если СпрСотрудники.ПометкаУдаления() = 0 Тогда //++++++++++++++++<br> ТаблицаДанныхОСреднемЗаработкеСотрудника=глЗаполнитьДанныеСр­еднегоЗаработкаДляБЛ2010(ЭлСотрудника,НачалоБолезни,ТипБолезни,ТипРасчетаБольничного);<br> ТаблицаДанныхОСреднемЗаработкеСотрудника.ВставитьКолонку("РабочееМесто",1, "Справочник.Сотрудники");<br> Если ТаблицаДанныхОСреднемЗаработкеСотрудника.КоличествоСтрок()>0 Тогда<br> ТаблицаДанныхОСреднемЗаработкеСотрудника.Заполнить(ЭлСотрудника,1,ТаблицаДанныхОСреднемЗаработкеСотрудника.КоличествоСтрок(),"РабочееМесто");<br> КонецЕсли;<br> ТаблицаДанныхОСреднемЗаработкеСотрудника.ВставитьКолонку("ПорядокРасчета",4, "Перечисление.ПорядокРасчетаСреднегоДляБЛ");<br> глПереписатьИзТаблицыВТаблицу(ТаблицаДанныхОСреднемЗаработкеСотрудника,ТаблицаДанныхОСреднемЗаработке);<br> КонецЕсли; //++++++++++++++++++++++++<br> КонецЦикла; <br>"

А недостаточно просто штатную процедуру удаления выполнить?

Нет, если есть документы в прошлых периодах - вы не удалите. А в документы тоже могло попасть "случайно", как обычно.

> У некоторых вообще нулевой средний, у некоторых заполняется<br>Таких "попыток" было по нескольким сотрудникам?