![]() |
|
Не работает расшифровка | ☑ | ||
---|---|---|---|---|
0
bUbA
29.04.13
✎
17:28
|
Подскажите, вот есть код, но почему то не выполняется процедура, в чём может быть причина?
Процедура РезультатОбработкаРасшифровки(Элемент, Расшифровка, СтандартнаяОбработка) Перем СуммаПриход; Перем СуммаРасход; СтандартнаяОбработка = Ложь; СКД = ПолучитьМакет("ОсновнаяСхемаКомпоновкиДанных"); ОбработкаРасшифровки = Новый ОбработкаРасшифровкиКомпоновкиДанных(ДанныеРасшифровки, Новый ИсточникДоступныхНастроекКомпоновкиДанных(СКД)); ДоступныеДействия = Новый Массив; ДоступныеДействия.Добавить(ДействиеОбработкиРасшифровкиКомпоновкиДанных.Расшифровать); Настройки = ОбработкаРасшифровки.Расшифровать(Расшифровка, КомпоновщикНастроек.Настройки.ДоступныеПоляВыбора.Элементы[0].Поле); Контрагент = Неопределено; Договор = Неопределено; Для Каждого ЭлементКоллекции Из Настройки.Отбор.Элементы Цикл ПравоеЗначение = ЭлементКоллекции.ПравоеЗначение; Если ТипЗнч(ПравоеЗначение) = Тип("СправочникСсылка.Контрагенты") Тогда Контрагент = ПравоеЗначение; ИначеЕсли ТипЗнч(ПравоеЗначение) = Тип("СправочникСсылка.Договора") Тогда Договор = ПравоеЗначение; КонецЕсли; КонецЦикла; Если Договор <> Неопределено И Контрагент <> Неопределено Тогда СформироватьДвиженияПоДокументам(СуммаПриход, СуммаРасход, Договор, Контрагент); КонецЕсли; КонецПроцедуры Процедура СформироватьДвиженияПоДокументам(СуммаПриход, СуммаРасход, Договор, Контрагент) Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ | АКС_ЗадолженностьКонтрагентовОстаткиИОбороты.Регистратор, | АКС_ЗадолженностьКонтрагентовОстаткиИОбороты.Договор, | АКС_ЗадолженностьКонтрагентовОстаткиИОбороты.СуммаПриход, | АКС_ЗадолженностьКонтрагентовОстаткиИОбороты.СуммаРасход, | АКС_ЗадолженностьКонтрагентовОстаткиИОбороты.Контрагент |ИЗ | РегистрНакопления.АКС_ЗадолженностьКонтрагентов.ОстаткиИОбороты(, , Регистратор, , ) КАК АКС_ЗадолженностьКонтрагентовОстаткиИОбороты"; Запрос.УстановитьПараметр("СуммаПриход", СуммаПриход); Запрос.УстановитьПараметр("СуммаРасход", СуммаРасход); Запрос.УстановитьПараметр("Договор", Договор); Запрос.УстановитьПараметр("Контрагент", Контрагент); ТЗ = Запрос.Выполнить().Выгрузить(); ВнешнийНабор = Новый Структура; ВнешнийНабор.Вставить("ДетальнаяРасшифровка", ТЗ); СКД = ПолучитьМакет("РасшифровкаДокументов"); Настройки = СКД.НастройкиПоУмолчанию; КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных; МакетКомпоновки = КомпоновщикМакета.Выполнить(СКД, Настройки); ПроцессорКомпоновки = Новый ПроцессорКомпоновкиДанных; ПроцессорКомпоновки.Инициализировать(МакетКомпоновки, ВнешнийНабор); ДокументРезультат = Новый ТабличныйДокумент; ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВТабличныйДокумент; ПроцессорВывода.УстановитьДокумент(ДокументРезультат); ПроцессорВывода.Вывести(ПроцессорКомпоновки); ДокументРезультат.ОтображатьСетку = Ложь; ДокументРезультат.ОтображатьЗаголовки = Ложь; ДокументРезультат.АвтоМасштаб = Истина; ДокументРезультат.Показать("Детальная расшифровка"); КонецПроцедуры |
|||
1
Wobland
29.04.13
✎
17:33
|
в непривязанности процедуры, в отсутствии процедуры, в пятнах на солнце, в происках марсиан, в невыставленной защите
|
|||
2
bUbA
29.04.13
✎
17:34
|
процедура привязана и присутствует, но при нажатии даже пустой таблицы не появляется
|
|||
3
Wobland
29.04.13
✎
17:37
|
в честности автора, в ДНК автора, в нежелании показать ТабДок
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |