Как программно получить данные производственного календаря? | Форум Программирование в ЗУП 3.1

Форум

Добро пожаловать на «ЗУП по зубам» — Форум по ЗУП 3.1 на платформе 1С 8.3!

Задайте вопрос и специалисты-консультанты постараются вам помочь!

1 ответ(ов) в теме
ZupMan
не в сети 2 недели
На сайте с 16.03.2019
Администратор
Тем 141
Сообщения 241
1
15:06

Чтобы программно получить данные производственного календаря, в том числе такие данные, как:
- Рабочих часов (длительность недели 40 часов)
- Рабочих часов (длительность недели 36 часов)
- Рабочих часов (длительность недели 24 часа)
- Календарных или рабочих дней по производственному календарю

используйте такой запрос

		ЗапросКалендарь = Новый Запрос;
		ЗапросКалендарь.Текст = 
		"ВЫБРАТЬ
		|	ДанныеПроизводственногоКалендаряПомесячно.ПроизводственныйКалендарь КАК ПроизводственныйКалендарь,
		|	ДанныеПроизводственногоКалендаряПомесячно.Год КАК Год,
		|	ДанныеПроизводственногоКалендаряПомесячно.Месяц КАК Месяц,
		|	ДанныеПроизводственногоКалендаряПомесячно.КалендарныхДней КАК КалендарныхДней,
		|	ДанныеПроизводственногоКалендаряПомесячно.РабочихДней КАК РабочихДней,
		|	ДанныеПроизводственногоКалендаряПомесячно.РабочихЧасовДлительностьНедели40Часов КАК РабочихЧасовДлительностьНедели40Часов,
		|	ДанныеПроизводственногоКалендаряПомесячно.РабочихЧасовДлительностьНедели36Часов КАК РабочихЧасовДлительностьНедели36Часов,
		|	ДанныеПроизводственногоКалендаряПомесячно.РабочихЧасовДлительностьНедели24Часа КАК РабочихЧасовДлительностьНедели24Часа
		|ИЗ
		|	РегистрСведений.ДанныеПроизводственногоКалендаряПомесячно КАК ДанныеПроизводственногоКалендаряПомесячно
		|ГДЕ
		|	ДанныеПроизводственногоКалендаряПомесячно.ПроизводственныйКалендарь = &ПроизводственныйКалендарь
		|	И ДанныеПроизводственногоКалендаряПомесячно.Месяц >= &ДатаНачала
		|	И ДанныеПроизводственногоКалендаряПомесячно.Месяц <= &ДатаОкончания";
		
		ЗапросКалендарь.УстановитьПараметр("ДатаНачала", НачалоМесяца(Объект.ДатаНачала));
		ЗапросКалендарь.УстановитьПараметр("ДатаОкончания", КонецДня(КонецМесяца(Объект.ДатаОкончания)));
		ЗапросКалендарь.УстановитьПараметр("ПроизводственныйКалендарь", ПроизводственныйКалендарь);
		
		РезультатЗапросаКалендарь = ЗапросКалендарь.Выполнить();
		
		ВыборкаКалендарь = РезультатЗапросаКалендарь.Выбрать();

0
Вы не имеете права на публикацию сообщений в этой теме