Всем привет. Помогите сделать закрашиваемую ячейку в подборе номенклатуры по определенному условию. Я вывели в подбор дату последнего поступления товара. Теперь мне нужно закрасить эту ячейку по условию если срок даты уже более 15 дней. Смотрел по поисковикам в интернете ничего не могу найти похожее.

Процедура СоставПриВыводеСтроки(Элемент, ОформлениеСтроки, ДанныеСтроки)
    Если ДанныеСтроки.ОсновноеСырьё Тогда
        ОформлениеСтроки.Шрифт=Новый Шрифт(ОформлениеСтроки.Шрифт, , , Истина);
    КонецЕсли;

(0) Ща, погоди, хрустальный шар протру, чтобы увидеть, что у тебя за платформа, конфигурация...

(2) =)) Обычные формы. Бухгалтерия 2.0 1С 8.2.  Вся проблемв в том у меня что я не могу найти в форме подбора, в моей ячейке обработчик при выводе строки. Наверное туплю. Извините. Где она вообще

(2) Кто-то ещё юзает это старьё?
Уже лет пять как использую кофейную гущу :-\

(3) не факт, что он назначен

(3)при выводе строки - это не на ячейке обработчик, а на табличной части

(4) Ну вот так оно. Это Конфигурация 1С Общепит 8 "Совместимо". Она базе Бухгалтерии 2.0

(6) Нашел =) Блин ппц

(2) а на кофейной гуще не умеешь?

(8) да не за что, мелочь какая..

(10) Я пытаюсь сделать я не пропал. Спасибо Вам большое.

(9) Я растворимый пью, от него гущи мало :(

Пишет значение к типу Булево не может быть выполнено. Я ставлю После ДанныеСтроки Свое "ДанныеСтроки.ДатаПоступления" ДатаПоступления - Это моя ячейка в строке. не хочет работать

(13) я б тоже не стал что попало в булево конвертировать, но грубее

(13) Так у тебе условие должно быть типа Если ДанныеСтроки.ДАтаПоступления<ДатаКогдаПораПодкрашивать ТОгда

(1) За Новый Шрифт() в привыводестроке() - расстрел на 10 лет с конфискацией.

(15) Не получается так. Ругается. На Булево

(17) не верю

(18) Ну блин. Так оно

(19) Выложи сюда код

(17) Кидай весь код процедуры привыводестроки, а то тут видишь же - не все современными методами телепатии пользуются.
Некоторые на устаревших девайсах а-ля хрустальный шар сидят

(16) ээ.. почему?
(18) ты просто код не видишь

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

    Если ДанныеСтроки.ДатаПоступления Тогда
        ОформлениеСтроки.Ячейки.ДатаПоступления.ЦветФона = WebЦвета.Зеленый;
    КонецЕсли;
    
    ЯчейкаПиктограмма = ОформлениеСтроки.Ячейки.Пиктограмма;
    ЯчейкаПиктограмма.ОтображатьКартинку = Истина;

    Если ДанныеСтроки.ЭтоГруппа Тогда

        ЯчейкаПиктограмма.ИндексКартинки = ?(ДанныеСтроки.ПометкаУдаления, 2, 0); // группа
        
        Если ДанныеСтроки.ПереходитьВверх Тогда
            ОформлениеСтроки.ЦветФона = ЦветаСтиля.ЦветФонаФормы;
        КонецЕсли;

    Иначе

        ЯчейкаПиктограмма.ИндексКартинки = ?(ДанныеСтроки.ПометкаУдаления, 3, 1); // элемент

    КонецЕсли;

    // Выделим цветом те цены, которые заданы особыми условиями поставок
    Если ДанныеСтроки.ФлагУсловийПоставки Тогда
        ОформлениеСтроки.Ячейки.Цена.ЦветФона = WebЦвета.Лимонный;
    КонецЕсли;
    
    
        
КонецПроцедуры // НоменклатураДляПодбораПриВыводеСтроки()

(23) >Если ДанныеСтроки.ДатаПоступления Тогда
моптить ять, если 18 декабря, то что?

(23) А в (15) я кому писал?

{Обработка.ПодборНоменклатуры.Форма.ОсновнаяФорма.Форма(664)}: Преобразование значения к типу Булево не может быть выполнено
    Если ДанныеСтроки.ДатаПоступления Тогда

(22) Чтобы было. Нефиг объекты GDI лишний раз создавать

(24) То СкороНовыйГод = Истина :)

Не ну если даже нет условия все равно должен ведь все закрасить. Разве нет

А за Если ДанныеСтроки.ДатаПоступления Тогда
вообще 25 без права переписки....

(26) Если ЗначениеЗАполнено(ДанныеСтроки.ДатаПоступления) Тогда

(27) успокоил. создаётся не более одного раза
(29) какого условия?

(29) У тебя есть условие.  Если ДанныеСтроки.ДатаПоступления это тоже самое,что и  Если ДанныеСтроки.ДатаПоступления = Истина. А Данные строки не могут быть истиной. И ложью не могут. ПОтому и ругается

Может ли дата быть истиной или ложью. Вот в чём вопрос...

Ой без если все закрасило. Туплю и очень сильно. Учусь же =) А как сделать условие что бы отсчитывало от даты 15 дней. и тогда только закрашивать.

(35) в одном дне приблизительно 86400 секунд

(35) надобно от текущей даты отнять 15 суток и сравнить

(35) ДатаКогдаПораПодкрашивать = ТекущаяДАта()-15*24*60*60;

(38) ты не даёшь ему подумать

(39) самоутверждаюсь)

+(40) больше не буду

(40) хотя в (38) лажа

хорошо, когда нет разницы - 15 рабочих дней или календарых

(42) почему?

(44) всё дело в двух паралельных полосочках :)

(45) уже нюхнул штоль?

(46) вон нос какой на аватарке :)

(41) А я буду -)
Если ДанныеСтроки.ДатаПоступления < НачалоДня(ТекущаяДАта()-15*24*60*60) Тогда

(48) во! вот тут они не паралельные

(48) ах ты негодяй. Отжал у меня ЧСВ :)

(49) так (35) - это дополнение к (15)

+(51) всмысле (38)

(38) Спасибо. Очень помогли. Извиняюсь за свой тупизм.

а вот уже тут текущую дату нужно один раз получить