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

По теме из базы знаний
- Универсальный конвертер XML в Таблицу значений + вывод XML в печатную форму (v 7.7)
- Универсальная печатная форма Приказа/Договора с возможностью настройки макета в пользовательском режиме
- Две печатные формы на одном листе - технология на примере печатных форм "Расходного ордера на товары" и "Задания на отбор"
- Конструктор печатных форм (PrintWizard). Часть 1: Печатные формы. А что, собственно, не так?
- Печатные формы Счет-фактура (+корректировочный) в редакции 1096 для УТ 10.3
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(16) заметил еще что вы два раза выполняете
ОбластьДетали.Параметры.КоличествоЧасов= Выборка.КоличествоЧасов;
если посмотреть
>>ОбластьДетали.Параметры.КоличествоЧасов= Выборка.КоличествоЧасов;
ОбластьДетали.Параметры.КолвоРабочихДней = Выборка.КолвоРабочихДней;
ОбластьДетали.Параметры.Контрагент = Выборка.Контрагент;
>>ОбластьДетали.Параметры.КоличествоЧасов = Выборка.КоличествоЧасов;
для каких целей?
ОбластьДетали.Параметры.КоличествоЧасов= Выборка.КоличествоЧасов;
если посмотреть
>>ОбластьДетали.Параметры.КоличествоЧасов= Выборка.КоличествоЧасов;
ОбластьДетали.Параметры.КолвоРабочихДней = Выборка.КолвоРабочихДней;
ОбластьДетали.Параметры.Контрагент = Выборка.Контрагент;
>>ОбластьДетали.Параметры.КоличествоЧасов = Выборка.КоличествоЧасов;
для каких целей?
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот