Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / [игнор отключен] [закрыт для гостей] / Работа с табличным документом (Расшифровки) / 5 сообщений из 5, страница 1 из 1
10.06.2009, 16:30
    #36035941
Masygreen
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Работа с табличным документом (Расшифровки)
Добрый день! Курил книги и форум .. но так и не понял можно ли сделать свою расшифровку для вновь созданного табличного документа ...или только если табличная часть внутри формы отчета???
Второе не удобно ..т.к. во первых много параметров, во вторых желательно сравнивать результаты отчета с разными параметрами...

Создан отчет. есть Основная форма отчета, где вводится дата. По кнопке сформировать выводится отчет.
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
Процедура КнопкаСформироватьНажатие(Кнопка)
	ТабДок = Новый ТабличныйДокумент;
	Запрос = Новый Запрос;
	Запрос.Текст = "
	|ВЫБРАТЬ
	|	ОстаткиИОбороты.сТО как ТО,
	|
	|	СУММА(ОстаткиИОбороты.СуммаКонечныйОстаток) КАК Сумма
	|ИЗ
	|	РегистрБухгалтерии.Управленческий.ОстаткиИОбороты(, &ДатОкон, , , , , ) КАК ОстаткиИОбороты
	|ГДЕ
	|	ОстаткиИОбороты.Счет = &Счет
	|
	|СГРУППИРОВАТЬ ПО
	|	ОстаткиИОбороты.сТО";
	Запрос.УстановитьПараметр("ДатОкон",	ТекущаяДата());
	Запрос.УстановитьПараметр("Счет",ПланыСчетов.Основной.счет01);
	РезультатЗапроса = Запрос.Выполнить();
	ТабДок = Новый ТабличныйДокумент;
	Результат = Запрос.Выполнить().Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
	НомерСтроки =  3 ;
	Пока Результат.Следующий() Цикл
		ТабДок.Область("R"+(НомерСтроки)+"C2").Текст = Результат.ТО;	
		ТабДок.Область("R"+(НомерСтроки)+"C3").Текст =	Результат.Сумма;	
		ТабДок.Область("R"+(НомерСтроки)+"C3").Расшифровка = Результат.ТО;
		НомерСтроки =НомерСтроки +  1 ;	
	КонецЦикла;
	ТабДок.ОтображатьСетку = Истина;
	ТабДок.ОтображатьЗаголовки = Истина;
	ТабДок.Защита = Ложь;
	ТабДок.ТолькоПросмотр = Истина;
	ТабДок.Показать();
КонецПроцедуры


Процедура ОбработкаРасшифровки(Элемент, Расшифровка, СтандартнаяОбработка)
  СтандартнаяОбработка = Ложь;
  сообщить("фигня");
КонецПроцедуры

Процедура ПриОткрытии()
	ЭлементыФормы.Дата.Значение = ТекущаяДата();
КонецПроцедуры

По этому отчету вылетает справочник по переданной ссылке это хорошо но ...
Можно ли при таком построении отчета перехватить это событие? Получить записанную в расшифровку ссылку(структуру) и выдать другой отчет ???
...
Рейтинг: 0 / 0
10.06.2009, 17:22
    #36036101
Masygreen
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Работа с табличным документом (Расшифровки)
Дополню вопрос...
если я добавлю в форму элемент ПолеТабличногоДокумента и изменю одну строчку кода:
Код: plaintext
1.
2.
	//ТабДок = Новый ТабличныйДокумент;
	ТабДок = ЭлементыФормы.ПолеТабличногоДокумента;
Все будет работать .. но хочется отдельными отчетами???
...
Рейтинг: 0 / 0
03.03.2010, 18:02
    #36500652
Работа с табличным документом (Расшифровки)
кто нить знает как сделать это?
...
Рейтинг: 0 / 0
04.03.2010, 08:53
    #36501381
leaf
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Работа с табличным документом (Расшифровки)
у табличного документа нет событий
есть только методы
...
Рейтинг: 0 / 0
04.03.2010, 11:33
    #36501815
Masygreen
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Работа с табличным документом (Расшифровки)
как сделал я...
в макете ячейке назначаем парамтер расшифровки
Код: plaintext
ЭтоИмяПараметраРасшифровки

при выводе суем в расшифровку структуру

Код: plaintext
1.
2.
3.
СтруктураРасшифровки = Новый Структура;
СтруктураРасшифровки.Вставить("чеговытамвструктурусунули","куйрашифруишьйашпийон");
СтрокаЗначений.Параметры.ЭтоИмяПараметраРасшифровки= СтруктураРасшифровки;

В основной форме переназначаем событие

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
//ПРОЦЕДУРА ОБРАБОТКИ РАСШИФРОВКИ ЭЛЕМЕНТА ТАБЛИЦЫ
Процедура ПолеТабличногоДокументаОбработкаРасшифровки(Элемент, Расшифровка, СтандартнаяОбработка)
	//ОТМЕНЯЕМ СТАНДАРТНУЮ ОБРАБОТКУ
	СтандартнаяОбработка = Ложь;

//чего вы там хотите делаете дальше	
Запрос.УстановитьПараметр("Некийпарамтер",	Расшифровка.чеговытамвструктурусунули);
КонецПроцедуры
...
Рейтинг: 0 / 0
Форумы / [игнор отключен] [закрыт для гостей] / Работа с табличным документом (Расшифровки) / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]