заполненный » Поиск

Результаты по ключевому слову: заполненный

Как сделать Расшифровку в табличном документе

Вопрос: Подскажите пожалуйста, каким образом можно сделать следующее.

У меня есть выводимый в табличный документ результат запроса, к ячейке есть расшифровка.

Я хочу чтобы при двойном клике на ячейку выполнялась процедура которая к примеру запускает отчет по расшифровке ячейки.

Ответ: Расшифровки бывают стандартные и нестандартные.

I) Стандартные:

может использоваться как непосредственно в табличном документе, так и в объекте ПолеТабличногоДокумента (т.е.табличный документ, размещенный не в отдельном окне, а непосредственно на форме).

Чтобы Расшифровка сработала, должны выполняться 3 условия:

1) Для ячейки табличного документа, из которой мы хотим вызвать Расшифровку, должно быть установлено свойство ПараметрРасшифровки. Например, мы хотим, чтобы по двойному щелчку на ячейке с названием контрагента открывалась форма элемента справочника Контрагента, чтобы можно было уточнить какие-то данные, которые в отчет не выводятся. Задаем свойству ПараметрРасшифровки какое-нибудь значение, например, РасшифровкаКонтрагента.

2)В процессе вывода областей макета в результирующий табличный документ нужно ОБЯЗАТЕЛЬНО ПРИСВОИТЬ параметру расшифровки значение нужного типа, например:

Код 1C v 8.х

 ТабДок = Новый ТабличныйДокумент;

Выборка = Справочники.Контрагенты.Выбрать();

Пока Выборка.Следующий() Цикл

Область = Макет.ПолучитьОбласть("Строка");

Область.Параметры.Контрагент = Выборка.Наименование;

// .................................................

Область.Параметры.РасшифровкаКонтрагента = Выборка.Ссылка;

ТабДок.Вывести(Область);

КонецЦикла;

3)Должен быть обеспечен запрет редактирования ячейки с расшифровкой, т.е. нужно указать

ТабДок.ТолькоПросмотр = Истина;

иначе, несмотря на многообещающий вид курсура при наведении на ячейку можно щелкать по ней сколько угодно, но ничего происходить не будет.

II) Нестандартные:

по двойному щелчку на ячейке с расшифровкой можно вызвать свою процедуру. Для реализации этого следует выполнить несколько условий:

1)Вывод табличного документа должен осуществляться в объект ПолеТабличногоДокумента;

2)Должно быть присвоено значение свойству ячейки ПараметрРасшифровки, например, РасшифровкаКонтрагента.

3)Параметру расшифровки РасшифровкаКонтрагента присваивается заполненный при формировании табличного документа нужными значениями СписокЗначений или чаще Структура. В частности, может передаваться имя стандартного отчета конфигурации и параметров, которые нужно задать в форме отчета, например, период дат, номер счета и т.д. А потом этот отчет вызывается как процедура.

4)Для объекта ПолеТабличногоДокумента свойство ТолькоПросмотр нужно установить в значение Истина.

5)Код пользовательской процедуры помещается в процедуру

Код 1C v 8.х

 ПолеТабличногоДокумента1ОбработкаРасшифровки(Элемент, Расшифровка, СтандартнаяОбработка)

// первой строкой в ней должна быть такая:

СтандартнаяОбработка = Ложь;

Приведу небольшой пример, открывающий для "щелкнутого" контрагента подчиненный справочник.

Код 1C v 8.х

 Процедура КнопкаСформироватьНажатие(Кнопка)

Контрагенты = Справочники.Контрагенты;

Выборка = Контрагенты.Выбрать();

Таб = ЭлементыФормы.ПолеТабличногоДокумента1;

Макет = ПолучитьМакет("Макет"); 

Пока Выборка.Следующий() Цикл

Если Выборка.ЭтоГруппа = Ложь Тогда

Область = Макет.ПолучитьОбласть("Строка");

Область.Параметры.Контрагент = Выборка.Наименование;

.................................................................................................

СтруктураРасшифровки = Новый Структура;

СтруктураРасшифровки.Вставить("Контрагент",Выборка.Ссылка);

СтруктураРасшифровки.Вставить(".......",.........);

.........................................................................

Область.Параметры.РасшифровкаКонтрагента = СтруктураРасшифровки;

ЭлементыФормы.ПолеТабличногоДокумента1.Вывести(Область);

Иначе

Продолжить;

КонецЕсли;

КонецЦикла;

ЭлементыФормы.ПолеТабличногоДокумента1.ТолькоПросмотр = Истина;

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



Процедура ПолеТабличногоДокумента1ОбработкаРасшифровки(Элемент, Расшифровка, СтандартнаяОбработка)

СтандартнаяОбработка = Ложь;

Договоры = Справочники.Договоры.ПолучитьФормуСписка();

Договоры.ПараметрОтборПоВладельцу = Расшифровка.Контрагент;

Договоры.Открыть();

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

Категория: Табличный документ

РеквизитФормыВЗначение() и ДанныеФормыВзначение() - Описание и примеры использования

gvk2009 подробно и доходчиво описал разницу методов, за что ему огромное спасибо:

В Синтаксис-Помощнике очень скупо написано о процедуре ДанныеФормыВЗначение(), чуть побольше - о РеквизитФормыВЗначение(). И совсем нет примеров использования. Попробуем с этим разобраться.

РеквизитФормыВЗначение()

Является методом управляемой формы, компилируется только &НаСервере, контекст формы является для него необходимым, поэтому компиляция &НаСервереБезКонтекста недоступна. На клиенте не работает, поскольку в результате получаем прикладной объект.

Где и когда его нужно использовать?

Метод РеквизитФормыВЗначение() необходим, если требуется из модуля формы вызвать стандартный метод объекта или метод (процедуру, функцию) из модуля объекта, из общего модуля.

Этот метод будет отрабатывать с данными, взятыми из формы, т.е. еще не записанными в базу.

Для того, чтобы измененные данные вернуть на форму, используется метод ЗначениеВРеквизитФормы().

Вторым параметром метода РеквизитФормыВЗначение является тип значения. Это необязательный параметр. Если обрабатываемый реквизит не является составным типом, то тип будет автоматически получен из реквизита формы. Иначе генерируется исключение времени выполнения.

Примеры:

Код 1C v 8.2 УП

 // 1)

&НаСервере

Процедура ЗаполнитьТЧПоДаннымПоследнегоДокумента(Контрагент)

            ДокОбъект = РеквизитФормыВЗначение("Объект");

            ДокОбъект.ЗаполнитьТЧПоДаннымПоследнегоДокумента(Контрагент);

            ЗначениеВРеквизитФормы(ДокОбъект, "Объект");

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





// 2)

&НаСервере

Процедура ОчиститьСтрокиСПустойЦенойНаСервере()

	ДокОбъект = РеквизитФормыВЗначение("Объект");

	ДокОбъект.ОчиститьСтрокиСПустойЦеной();

	ЗначениеВРеквизитФормы(ДокОбъект, "Объект");

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



//3)

&НаСервере

Функция ОбъектЗаполнен()

	Возврат РеквизитФормыВЗначение("Объект").ПроверитьЗаполнение();

КонецФункции

В указанных выше случаях метод РеквизитФормыВЗначение() похож на метод ПолучитьОбъект(). Разница в том, что первый получает объект, заполненный данными формы, а второй - объект с данными из базы.

ДанныеФормыВзначение()

В отличие от метода управляемой формы РеквизитФормыВЗначение(), процедура глобального контекста ДанныеФормыВЗначение() может работать без контекста формы, но именно поэтому, в частности, ей необходимо указывать тип конвертируемых данных.

Обратной процедурой является ЗначениеВДанныеФормы().

Примеры:

Код 1C v 8.2 УП

 // 1)

    &НаСервере

       // Инициализация набора констант

       НаборКонстантОбъект = ДанныеФормыВЗначение(НаборКонстант, Тип("КонстантыНабор"));

       НаборКонстантОбъект.Прочитать();

       ЗначениеВДанныеФормы(НаборКонстантОбъект, НаборКонстант);



// 2)

   &НаСервере  

       НаборФорма = Объект.Движения.РегистрУправленческий;

       Набор = ДанныеФормыВЗначение(НаборФорма, Тип("РегистрБухгалтерииНаборЗаписей.РегистрУправленческий"));

       Если Набор.Количество()=0 Тогда

              Возврат;

       КонецЕсли; 

       Набор.УстановитьАктивность(НЕ Набор[0].Активность);

       ЗначениеВДанныеФормы(Набор, НаборФорма);

В этом примере на форме отображен набор записей регистра бухгалтерии. При отработке процедуры, активность набора меняется только на форме, в базе при этом ничего не происходит. Активность у набора записей регистра в базе поменяется только после выполнения операции Записать.

Код 1C v 8.2 УП

 // 3)

&НаКлиенте

Процедура Заполнить(Команда)

       ОснРеквизит = Объект;

       ВыполнитьНаСервереБезКонтекста(ОснРеквизит);

       КопироватьДанныеФормы(ОснРеквизит,Объект)

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



&НаСервереБезКонтекста

Процедура ВыполнитьНаСервереБезКонтекста(ОснРеквизит)

       ОбъектЗначение = ДанныеФормыВЗначение(ОснРеквизит, Тип("ДокументОбъект.АктСверкиВзаиморасчетов"));

       //...Выполнение операций с Объектом "ОбъектЗначение"

       ЗначениеВДанныеФормы(ОбъектЗначение, ОснРеквизит);

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

В этом примере на клиент возвращается ОснРеквизит, содержащий измененные данные. Но его еще нужно "запихать" в отображаемую форму. Для этого используем процедуру глобального контекста КопироватьДанныеФормы().

В большинстве случаев процедуры ДанныеФормыВзначение() и РеквизитФормыВЗначение() взаимозаменяемы. При этом РеквизитФормыВЗначение проще в использовании. Но если требуется использование &НаСервереБезКонтекста - тогда только ДанныеФормыВЗначение.

В качестве иллюстрации взаимозаменяемости Пример 2 еще в двух вариантах:

Код 1C v 8.2 УП

 // ВАРИАНТ 1

&НаКлиенте

Процедура Активность(Команда)



       ОснРеквизитДвижения = Объект.Движения.РегистрУправленческий;

       АктивностьНаСервереБезКонтекста(ОснРеквизитДвижения);

       КопироватьДанныеФормы(ОснРеквизитДвижения,Объект.Движения.РегистрУправленческий);



КонецПроцедуры // Активность()



&НаСервереБезКонтекста

Процедура АктивностьНаСервереБезКонтекста(ОснРеквизитДвижения)



       Набор = ДанныеФормыВЗначение(ОснРеквизитДвижения, Тип("РегистрБухгалтерииНаборЗаписей.РегистрУправленческий"));

       Если Набор.Количество()=0 Тогда

              Возврат;

       КонецЕсли; 

       Набор.УстановитьАктивность(НЕ Набор[0].Активность);

       ЗначениеВДанныеФормы(Набор, ОснРеквизитДвижения);



КонецПроцедуры // АктивностьНаСервереБезКонтекста()



// ВАРИАНТ 2

&НаСервере

Процедура АктивностьНаСервере()



       НаборФорма = РеквизитФормыВЗначение("Объект");

       Набор = НаборФорма.Движения.РегистрУправленческий;



       Если Набор.Количество()=0 Тогда

              Возврат;

       КонецЕсли; 



       Набор.УстановитьАктивность(НЕ Набор[0].Активность);

       ЗначениеВРеквизитФормы(НаборФорма, "Объект");



КонецПроцедуры // АктивностьНаСервере()

Категория: Управляемое приложение, Тонкий клиент

Использование объекта ДанныеРасшифровки Категория: Схема Компоновки Данных

ЗначениеВСтрокуВнутр / ЗначениеИзСтрокиВнутр Категория: Встроенные Функции

Как в периодическом независимом регистре сведений удалить все записи по валютам с наименованиями?

Как в периодическом независимом регистре сведений «КурсыВалют» удалить все записи по валютам с наименованиями «EUR» и «USD», период которых меньше 01 января 2005 года?

Сначала получим таблицу записей, которые необходимо оставить. Поскольку условий несколько, да еще и не все они на равенство, оптимальнее это сделать при помощи запроса. Следующий запрос даст нам желаемое:

Код 1C v 8.х

 // Получение нужных записей

Запрос = Новый Запрос;

Запрос.Текст = "ВЫБРАТЬ

|	*

|ИЗ

|	РегистрСведений.КурсыВалют КАК КурсыВалют

|

|ГДЕ

|	(КурсыВалют.Период >= ДАТАВРЕМЯ(2005, 1, 1) 

|	 ИЛИ 

|	НЕ(КурсыВалют.Валюта.Наименование ПОДОБНО " "USD" ") 

|	 И 

|	НЕ(КурсыВалют.Валюта.Наименование ПОДОБНО " "EUR" "))";

Источником данных для запроса послужила таблица записей регистра.
Были применены отборы, чтобы в результат попали записи, для которых период более или равен 01 января 2005 года, или наименования не USD и не EUR. Обратите внимание: при составлении условия по периоду, чтобы не пользоваться параметром запроса, прямо в тексте запроса применили литерал даты ДАТАВРЕМЯ(), в котором части даты указываются в «обратном» порядке: год, месяц, порядковый номер дня в месяце.
Результатом запроса будет таблица, в которой по каждой записи заполнены все поля регистра сведений КурсыВалют.

Код 1C v 8.х

 // Выгрузка результата запроса

ТаблицаОставляемыхЗаписей = Запрос.Выполнить().Выгрузить();



НаборЗаписей = РегистрыСведений.КурсыВалют.СоздатьНаборЗаписей();



НаборЗаписей.Загрузить(ТаблицаОставляемыхЗаписей);



НаборЗаписей.Записать();

Далее выполняем запрос, выгружаем результат в таблицу значений ТаблицаОставляемыхЗаписей
Создаем переменную НаборЗаписей, тип значения РегистрСведенийНаборЗаписей.КурсыВалют, выгружаем в нее таблицу значений ТаблицаОставляемыхЗаписей.
Поскольку сама таблица была получена из регистра, то названия ее колонок совпадут с названиями полей регистра, а значит, загрузка пройдет успешно.
Далее записываем заполненный только нужными записями набор записей в регистр с замещением его исходных данных (как вы уже помните, параметр Замещать метода Записать() по умолчанию имеет значение Истина).

Категория: Регистры сведений

Параметры, ключи запуска 1Сv7 из командной строки Категория: Администрирование