// Код устанавливает период в списке документов взависимости от выбранной периодичности:

    Если Периодичность = Перечисления.Периодичность.Год Тогда

        ДатаНачала = НачалоГода(РабочаяДата);

    ИначеЕсли Периодичность = Перечисления.Периодичность.Квартал Тогда

        ДатаНачала = НачалоКвартала(РабочаяДата);

    ИначеЕсли Периодичность = Перечисления.Периодичность.Месяц Тогда

        ДатаНачала = НачалоМесяца(РабочаяДата);

    ИначеЕсли Периодичность = Перечисления.Периодичность.Неделя Тогда

        ДатаНачала = НачалоНедели(РабочаяДата);

    ИначеЕсли Периодичность = Перечисления.Периодичность.День Тогда

        ДатаНачала = НачалоДня(РабочаяДата);

    Иначе

        ДатаНачала = НачалоДня(РабочаяДата);

    КонецЕсли;



    ДокументСписок.Отбор.Дата.ВидСравнения=ВидСравнения.ИнтервалВключаяГраницы;

    ДокументСписок.Отбор.Дата.ЗначениеС = ДатаНачала;

    ДокументСписок.Отбор.Дата.ЗначениеПо = КонецДня(РабочаяДата);

    ДокументСписок.Отбор.Дата.Использование = Истина;   

 

Процедура ПриВыводеСтроки(Элемент, ОформлениеСтроки, ДанныеСтроки)

//Раскрасим ячейку статус в разные цвета взависимости от значения

если сокрЛП(ДанныеСтроки.статус) = "Новая" тогда

	ОформлениеСтроки.Ячейки.статус.ЦветФона = Новый Цвет(255, 250, 207);

иначеесли СокрЛП(ДанныеСтроки.статус) = "Выполнено" тогда

	ОформлениеСтроки.Ячейки.статус.ЦветФона = Новый Цвет(155, 255, 155);

иначеесли СокрЛП(ДанныеСтроки.статус) = "В работе" тогда

	ОформлениеСтроки.Ячейки.статус.ЦветФона = Новый Цвет(200, 225, 255);

иначеесли СокрЛП(ДанныеСтроки.статус) = "На согласовании" тогда

	ОформлениеСтроки.Ячейки.статус.ЦветФона = Новый Цвет(255, 225, 181);

иначеесли СокрЛП(ДанныеСтроки.статус) = "Рассмотрена BH" тогда

	ОформлениеСтроки.Ячейки.статус.ЦветФона = Новый Цвет(255, 153, 0);

иначеесли СокрЛП(Лев(ДанныеСтроки.статус,7)) = "Принята" тогда

	ОформлениеСтроки.Ячейки.статус.ЦветФона = Новый Цвет(218, 255, 218);	

иначеесли СокрЛП(ДанныеСтроки.статус) = "Удалить (Ошибочна!)" тогда

	ОформлениеСтроки.Ячейки.статус.ЦветФона = Новый Цвет(255, 0, 0);

иначеесли СокрЛП(ДанныеСтроки.статус) = "Отклонена" тогда

	ОформлениеСтроки.Ячейки.статус.ЦветФона = Новый Цвет(255, 0, 0);

иначеесли СокрЛП(ДанныеСтроки.статус) = "Осметить!" тогда

	ОформлениеСтроки.Ячейки.статус.ЦветФона = Новый Цвет(255, 139, 139);

иначеесли СокрЛП(ДанныеСтроки.статус) = "Осмечена" тогда

	ОформлениеСтроки.Ячейки.статус.ЦветФона = Новый Цвет(148, 176, 255);

конецесли;		

	

//раскрашивание нескольких ячеек

если ДанныеСтроки.Ссылка.Срочная = истина тогда

	ЦветСрочной=Новый Цвет(255, 227, 227);

	ОформлениеСтроки.Ячейки.Номер.ЦветФона = ЦветСрочной; 

	ОформлениеСтроки.Ячейки.Дата.ЦветФона = ЦветСрочной;

	ОформлениеСтроки.Ячейки.Автор.ЦветФона = ЦветСрочной;

конецесли;

	

//Вывод картинки

ОформлениеСтроки.Ячейки.Комментарий.ИндексКартинки=1;

если ПустаяСтрока(ДанныеСтроки.Комментарий) тогда

	ОформлениеСтроки.Ячейки.Комментарий.ОтображатьКартинку =ложь;

	ОформлениеСтроки.Ячейки.Комментарий.ОтображатьТекст=ложь;

иначе

	ОформлениеСтроки.Ячейки.Комментарий.ОтображатьКартинку =истина;

	ОформлениеСтроки.Ячейки.Комментарий.ОтображатьТекст=ложь;

конецесли;

КонецПроцедуры