Ошибка в заполнение табличной части документа через внешнюю обработку
Здравствуйте, Данный код в отладке работал нормально , но при подключении не срабатывает. Можете подсказать в чем ошибка?
&НаКлиенте
Процедура ВыполнитьКоманду(ИдентификаторКоманды,ОбъектыНазначения) Экспорт
ДанныеФормы = ВладелецФормы.Объект;
ЗаполнитьНачисленияНаСервере(ДанныеФормы);
КонецПроцедуры
&НаСервере
Функция ПолучитьТекущуюДолжность(Сотрудник)
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| КадроваяИсторияСотрудниковСрезПоследних.Сотрудник КАК Сотрудник,
| КадроваяИсторияСотрудниковСрезПоследних.Должность КАК Должность
|ИЗ
| РегистрСведений.КадроваяИсторияСотрудников.СрезПоследних КАК КадроваяИсторияСотрудниковСрезПоследних
|ГДЕ
| КадроваяИсторияСотрудниковСрезПоследних.Сотрудник = &Сотрудник";
Запрос.УстановитьПараметр("Сотрудник", Сотрудник);
Выборка = Запрос.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл
Возврат Выборка.Должность;
КонецЦикла;
КонецФункции
Функция ПолучитьСуточныеПоШтатномуРасписанию(Должность, Подразделение)
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| ШтатноеРасписаниеДополнительныеРеквизиты.Значение КАК Значение
|ИЗ
| Справочник.ШтатноеРасписание КАК ШтатноеРасписание
| ЛЕВОЕ СОЕДИНЕНИЕ Справочник.ШтатноеРасписание.ДополнительныеРеквизиты КАК ШтатноеРасписаниеДополнительныеРеквизиты
| ПО (ШтатноеРасписание.Ссылка = ШтатноеРасписаниеДополнительныеРеквизиты.Ссылка)
|ГДЕ
| ШтатноеРасписание.Должность = &Должность
| И ШтатноеРасписание.Подразделение = &Подразделение";
Запрос.УстановитьПараметр("Должность", Должность);
Запрос.УстановитьПараметр("Подразделение", Подразделение);
Выборка = Запрос.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл
Возврат Выборка.Значение;
КонецЦикла;
КонецФункции
Процедура ЗаполнитьНачисленияНаСервере(ДанныеФормы)
ПорядокПоказателей = ПорядокПоказателейВидаРасчета(ДанныеФормы.Начисление);
Для Каждого СтрокаТЧ Из ДанныеФормы.Начисления Цикл
ТекущаяДолжность = ПолучитьТекущуюДолжность(СтрокаТЧ.Сотрудник);
СуточныеЗначение = ПолучитьСуточныеПоШтатномуРасписанию(ТекущаяДолжность, ДанныеФормы.Подразделение);
СтрокаТЧ["Значение" + ПорядокПоказателей.Получить("СуточныеВДень")] = Число(Строка(СуточныеЗначение));
СтрокаТЧ.ФиксЗаполнение = Истина;
КонецЦикла;
КонецПроцедуры
Функция ПорядокПоказателейВидаРасчета(Начисление)
Результат = Новый Соответствие;
Для Каждого СтрокаТЧ Из Начисление.Показатели Цикл
Результат.Вставить(СтрокаТЧ.Показатель.Идентификатор, СтрокаТЧ.НомерСтроки);
КонецЦикла;
Возврат Результат;
КонецФункции
ПоказатьПо теме из базы знаний
- Программное добавление кнопок копирования табличных частей во все документы с минимальными изменениями конфигурации (или вообще без изменения)
- Выгрузка и загрузка табличных частей (а также копирование)
- Использование стандартной обработки Загрузка данных из табличного документа.epf для заполнения табличных частей - обычный интерфейс
- Заполнение табличной части документа Заказ клиента на основе EXCEL файла
- Заполнение документа "Премия" из файла Excel (Табельный номер + Сумма премии) с использованием внешней обработки заполнения табличной части и расширения. ЗУП 3.1
Найденные решения
Остальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот