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