Помогите покрасить строку

Форум Учет и отчетность Складской учет и логистика (WMS)

1С:Производство+Услуги+Бухгалтерия Оперативный учет 7.7 1С:Торговля и склад 7.7

Внимание! Тема закрыта. Добавлять сообщения в закрытую тему запрещено.

1. Lada385 29 26.03.14 10:49 Сейчас в теме

Процедура ПриОткрыии()
СпН.ВыборГруппы(1);
КонецПроцедуры

//*******************************************
Процедура Сформировать()
т=СоздатьОбъект("Таблица");
т.ИсходнаяТаблица("Таблица");

Т.ВывестиСекцию("Шапка");
спК = СоздатьОбъект("Справочник.Номенклатура");
спк.ИспользоватьРодителя(СпН.ТекущийЭлемент());
СДата=спК.СерДата;
спк.ВыбратьЭлементы();
Пока спк.ПолучитьЭлемент() = 1 Цикл
если спк.ЭтоГруппа() = 1 тогда
Продолжить;
КонецЕсли;

Если (СДата - ТекущаяДата()) < 30 Тогда
Т.Область("стр").ЦветФона(255,,);
Иначе
Т.Область("стр").ЦветФона(,,);
КонецЕсли;
Т.ВывестиСекцию("Стр");
КонецЦикла;

т.ТолькоПросмотр(1);
т.Показать();

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

Ошибка: Значение не представляет агрегатный объект (ЦветФона)

По теме из базы знаний

Вознаграждение за ответ

Сумма: 0 $m

Добавили:
Lada385 (1.00 $m)

Показать полностью

Найденные решения

2. Ёпрст 1063 26.03.14 10:55 Сейчас в теме

Процедура ПриОткрыии()
	СпН.ВыборГруппы(1);
КонецПроцедуры

//*******************************************
Процедура Сформировать()
	Т=СоздатьОбъект("Таблица");
	Т.ИсходнаяТаблица("Таблица");
	
	Т.ВывестиСекцию("Шапка");
	спК = СоздатьОбъект("Справочник.Номенклатура");
	спК.ИспользоватьРодителя(СпН.ТекущийЭлемент());
	спК.ВыбратьЭлементы();
	Пока спК.ПолучитьЭлемент() = 1 Цикл
		Если спК.ЭтоГруппа() = 1 Тогда
			Продолжить;
		КонецЕсли;
		СДата=спК.СерДата;
		Т.ВывестиСекцию("Стр");
		Если (СДата - ТекущаяДата()) < 30 Тогда
			Т.Область(Т.ВысотаТаблицы(),1,Т.ВысотаТаблицы(),Т.ШиринаТаблицы()).ЦветФона(255);
		КонецЕсли;
	КонецЦикла;
	Т.ТолькоПросмотр(1);
	Т.Показать("Вася в Магадан");
	
КонецПроцедуры

Показать

Остальные ответы

Подписаться на ответы Инфостарт бот

Свернуть все

2. Ёпрст 1063 26.03.14 10:55 Сейчас в теме

Процедура ПриОткрыии()
	СпН.ВыборГруппы(1);
КонецПроцедуры

//*******************************************
Процедура Сформировать()
	Т=СоздатьОбъект("Таблица");
	Т.ИсходнаяТаблица("Таблица");
	
	Т.ВывестиСекцию("Шапка");
	спК = СоздатьОбъект("Справочник.Номенклатура");
	спК.ИспользоватьРодителя(СпН.ТекущийЭлемент());
	спК.ВыбратьЭлементы();
	Пока спК.ПолучитьЭлемент() = 1 Цикл
		Если спК.ЭтоГруппа() = 1 Тогда
			Продолжить;
		КонецЕсли;
		СДата=спК.СерДата;
		Т.ВывестиСекцию("Стр");
		Если (СДата - ТекущаяДата()) < 30 Тогда
			Т.Область(Т.ВысотаТаблицы(),1,Т.ВысотаТаблицы(),Т.ШиринаТаблицы()).ЦветФона(255);
		КонецЕсли;
	КонецЦикла;
	Т.ТолькоПросмотр(1);
	Т.Показать("Вася в Магадан");
	
КонецПроцедуры

Показать

3. tdr1225 37 26.03.14 10:56 Сейчас в теме

(1) "стр" - это имя секции
посмотри параметры метода Область()

Оставьте свое сообщение

E-mail: