Как получить значение реквизита другой формы 1с

Как получить данные из другой формы

Автор ktu78, 20 янв 2016, 15:17

0 Пользователей и 1 гость просматривают эту тему.

Добрый день, у меня естть форма документа.
В ней есть кнопка, которой вызывается другая форма —  ФормаЗначения
В ФормаЗначения вычисляются данные, затем когда в этой же форме нажимаем Ок мы возвращаемся в ФормуДокумента
Подскажите, как сделать так, чтоб вычисленными значениями можно было пользоваться в ФормеДокумента
Спасибо!


При открытии формы нужно указать форму владельца: ОткрытьФорму(«форма»,,ЭтаФорма)

В открытой форме будет доступ к реквизитам формы-владельца: ВладелецФормы.Реквизит =
Или ВладелецФормы.Объект.Реквизит =


Открываете форму метод «открытьформу», в открытой форме используете метод «оповестить» при закрытии формы. У формы, которая открывала другую форму, используете событие «ОбработкаОповещения».



открываете форму через ОткрытьМодально()
если в открытой форме в метод Закрыть() передать значение, то ОткрытьМодально() превратится в функцию и вернет это значение.

Получил помощь — скажи СПАСИБО.
Разобрался сам — расскажи другим.


второй вариант (так обычно реализуют подбор) установить у открываемой формы режим выбора и тогда у формы-владельца сработает событие ОбработкаВыбора().

Получил помощь — скажи СПАСИБО.
Разобрался сам — расскажи другим.


Содержание:

1.    Реквизиты объекта и реквизиты формы в 1С

2.    Как получить значения из элементов формы 1С  

1.    Реквизиты объекта и реквизиты формы в 1С

В обычном приложении у элемента формы 1С 8.3 было свойство «Значение», доступное как для чтения, так и для записи. Какой аналог в управляемом приложении?

Элементы формы 1С 8.3 могут содержать реквизиты двух видов: реквизиты объекта 1С и реквизиты формы.

Красным помечен реквизит объекта 1С Контрагент, а зеленым – реквизит формы в 1С.

Интерактивно выберем эти элементы в пользовательском режиме 1С и попробуем прочитать их «программно» кнопкой «Прочитать».

Если читать значения реквизитов в клиентской процедуре, то код для 1С Предприятия будет следующий:


Все бы хорошо: мы получили на клиенте значения реквизитов объекта 1С и формы, но – не значения элементов формы 1С. На клиенте значение элементов формы 1С получить нельзя. 

2.    Как получить значения из элементов формы 1С

Чтобы получить значения из элементов формы 1С, нам потребуется серверный вызов:

Именно на сервере у элемента формы 1С 8.3 становится доступно свойство ПутьКДанным, по которому его можно извлечь либо из Объекта, который имеет тип ДанныеФормыСтруктура:

…либо из Формы, которая имеет тип ФормаКлиентскогоПриложения:


Форма и ее элементы не видны на сервере без контекста. То есть код для 1С:Предприятия выдаст множество ошибок.

Также Форму нельзя передать как параметр в процедуру и функцию на сервер или в общий модуль.


            Еще хочется разобрать момент, когда нам возможно увидеть состояние различающихся значений в элементе форме 1С и в объекте. Это возможно в событии элемента ОбработкаВыбора.
Например, при значении поля Контрагент — Ассоль, мы выбрали контрагента Бакалея:


Новое значение доступно как параметр процедуры ВыбранноеЗначение.


Система дает шанс что-то сделать в этой ситуации.

Специалист компании ООО «Кодерлайн»

Добрыгин Михаил

 0 

   

Распечатать

Форма ~ Как получить данные одной формы, находясь на другой?

Например, на 1 форме есть поле ввода. Как поместить данные этого поля ввода на форму 2, используя внешние обработки?

Самый простой способ — инициировать открытие формы программно и программно получить данные с нее после закрытия:

Код 1C v 8.х

 Форма = Справочники.Номенклатура.ПолучитьФормуСписка();
Форма.ОткрытьМодально();
Сообщить(Форма.ПолеВВода1);

Второй вариант — переподключить обработчик событий:

Код 1C v 8.х

 Форма = Справочники.Номенклатура.ПолучитьФормуСписка();
Форма.ПодключитьОбработчикИзмененияДанных("РеквизитФормы","ПриНоменклатуре");
Форма.ОткрытьМодально();

Но в этом случае процедура ПриНоменклатуре(РасшифровкаСобытия) должна находиться в модуле открываемой формы.

Стандартных способов 1С для других видов обработки событий не существует. Т.к. в 1С все процедуры-обработчики событий должны находиться в модуле этого элемента и никак иначе из внешней обработки процедуру не подключишь.

Получение значений реквизита формы справочника

Я
   yalanton

01.09.16 — 09:02

Добрый день . Может кто подскажет . Есть справочник например сотрудники в ЗУП 8.3.  форма управляемая . У этого справочника есть «формаэлемента»  Например на «формеэлемента» есть не основной реквизит формы «датаприема»(тип дата)  Как получить значение реквизита формы справочника для конкретного элемента справочника и как записать в него значение ? Спасибо

  

Партнерская программа EFSOL Oblako

   zak555

1 — 01.09.16 — 09:04

Объект.ДатаПриема =

   lubitelxml

2 — 01.09.16 — 09:04

Объект

   Defender aka LINN

3 — 01.09.16 — 09:47

(0) Посмотреть, откуда форма его заполняет при чтении данных. Вангую, что из какого-то регистра

   yalanton

4 — 01.09.16 — 11:12

извините я наверное не догоняю например в обработке написал

в модуле формы

&НаСервере

Процедура А4()

    
Справочники.Сотрудники.НайтиПоНаименованию(«Иванов»);

об= спр.ПолучитьОбъект();

об.Датаприема;

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

Ругается  — я так понимаю что «датаприема» это реквизит конкретной формы (ФормаЭлемента) ,а форм у справочника сотрудникимного разных, т.е. вначале наверное надо получить именно «формуэлемента» ?

   lodger

5 — 01.09.16 — 11:14

открой формуэлемента и поищи в модуле формы датаприема.

ищи что-то вида датаприема = получитьдатуприема(четотам) или заполнитьреквизитыформы(этаформа)

   yalanton

6 — 01.09.16 — 11:15

спр= Справочники.Сотрудники.НайтиПоНаименованию(«Цюкало»);

об= спр.ПолучитьОбъект();

ф=об.ПолучитьФорму(«ФормаЭлемента»)  ;

ф.датаприема;

все равно ругается на датаприема

   lodger

7 — 01.09.16 — 11:20

(6) открой формуэлемента ручками в конфигураторе.

   yalanton

8 — 01.09.16 — 11:21

открыл  форму элемента

   lodger

9 — 01.09.16 — 11:22

(8) поищи в модуле формы датаприема

   yalanton

10 — 01.09.16 — 11:22

&НаСервере

Процедура А4()

    
    
спр= Справочники.Сотрудники.НайтиПоНаименованию(«Цюкало»);

об= спр.ПолучитьОбъект();

ф=об.ПолучитьФорму(«ФормаЭлемента»)  ;

дд=ф.РеквизитФормыВЗначение(«датаприема»);

пишет интерактивные операции не доступны

   lubitelxml

11 — 01.09.16 — 11:23

(10) на сервере не доступны

   программистище

12 — 01.09.16 — 11:25

сложно посмотреть модуль и узнать как реквизит заполняется на этой форме

   yalanton

13 — 01.09.16 — 11:25

&НаКлиенте

Процедура ВидЗанятостиПриИзменении(Элемент)

    СотрудникиКлиент.ПроверитьКонфликтыВидаЗанятостиССуществующимиСотрудниками(Сотрудник.Ссылка, Сотрудник.ФизическоеЛицо, ТекущаяОрганизация, Сотрудник.ВидЗанятости, ДатаПриема);

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

поискал дата приема в модуле формы элемента -вот единственное место где есть «датаприема»

   yalanton

14 — 01.09.16 — 11:26

а в какой процедуре смотреть ? призаписи или присоздании насервере ? там вроде нет в этом тоже проблема не могу понять как реквизит формы заполняется

   программистище

15 — 01.09.16 — 11:26

Копай При создании, при чтении, при открытии

может через общий модуль заполняется

   lodger

16 — 01.09.16 — 11:26

(13) явно не первое место где он используется.

ищи что-то вида датаприема = получитьдатуприема(четотам) или заполнитьреквизитыформы(этаформа)

(14) когда поймешь, тогда и решение само собой придет.

   программистище

17 — 01.09.16 — 11:28

точку останова

можешь по строчкам пробежаться и увидеть в какой строке она заполняется

   Buster007

18 — 01.09.16 — 11:28

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

   yalanton

19 — 01.09.16 — 11:32

(18) а почему я не могу получить значение реквизита из формы ? я как раз так бы и хотел а не искать каждый раз место и алгоритм его заполнения ?

или 1с так не позволяет ?

   lera01

20 — 01.09.16 — 11:36

(19) Как ты на сервере к форме обратишься? Ты вот свои усы же не в зеркале бреешь!

   Defender aka LINN

21 — 01.09.16 — 11:43

Каждый день появляется очередной дятел, которому надо вытащить значение реквизита формы. И каждый дятел начинает с того, что пытается получить форму на сервере. Ни у кого из них не получается, но они не сдаются…

   yalanton

22 — 01.09.16 — 11:47

и я не сдамся   :)

   Горогуля

23 — 01.09.16 — 11:48

говорят, скоро 1С выпустит новое революционное решение для мобильных девайсов СГК — система генерации кода. там можно будет по аналогии с СКД просто натыкивать на экране нужные места со словами «вот это хочу. и ещё вот здесь», а код обработки система сгенерирует сама.

   Неверный Параметр И

24 — 01.09.16 — 11:49

(23) Интеграцию с какими платежными системами обещают?

   Горогуля

25 — 01.09.16 — 11:49

(24) какими ещё системами? ты не понял. скоро для программирования не то, что клавиатура, мышь не понадобится

   Альбатрос

26 — 01.09.16 — 11:49

(23) :)

   Альбатрос

27 — 01.09.16 — 11:50

(23) Такая система уже есть, но она работает только во время действия эффекта ЛСД

   Горогуля

28 — 01.09.16 — 11:50

+(25) а мозгов и так ни у кого нет

   Неверный Параметр И

29 — 01.09.16 — 11:51

(25) Чо, даже карточку привязывать не надо будет?

   Неверный Параметр И

30 — 01.09.16 — 11:55

(25) В линуксе заработало USB–устройство для ввода текста при помощи мыслей!

Комментарий:

Ура, товарищи! Наконец–то можно выкинуть клавиасиськи сиськи сиськи сисечки сисищи мягкие теплые сочные сисяндры сисяндрищи сисюльки сиськи сиськи блд палюсьь

   Менталист

31 — 01.09.16 — 11:56

(0)Реквизит формы рождается и живет ровно столько и форма. И если заполняется при открытии, значит есть какой-то источник заполнения(РС например или еще что-то)

   yalanton

32 — 01.09.16 — 12:02

а т.е. я не могу из формы получить реквизит формы ? я могу только посмотреть алгоритм заполнения и получить реквизит по этому алгоритму так чтоли ?

   yalanton

33 — 01.09.16 — 12:03

(31) ?

   Горогуля

34 — 01.09.16 — 12:08

(32) следи внимательно за руками. есть вопрос: Как получить значение реквизита формы справочника для конкретного элемента справочника и как записать в него значение ? в этом вопросе ни разу нет слова «форма», это ты молодец. проходит ничтожное по историческим меркам время, и у автора вопроса появляется слово «форма». автор — приматЮ, автор ращмышляет, эволюционирует. это нормально. но почему он эволюционирует в обратную сторону?

   Горогуля

35 — 01.09.16 — 12:08

мда, с «ни разу нет» я несколько перегнул ;)

   lera01

36 — 01.09.16 — 12:11

(32) Конечно, можешь из формы получить ее реквизит. Вот прям хоть сейчас. Только форму ты на сервере не видишь, но это просто досадное недоразумение. Но ты пытайся, не сдавайся!

   Fish

37 — 01.09.16 — 12:13

(32) Ты лучше спроси себя, куда ты хочешь записать это новое значение? Подсказка — данные не хранятся в форме.

   yalanton

38 — 01.09.16 — 12:13

то что на сервере не вижу форму я понял , но вот как точно получить реквизит формы на клиенте пока до конца не понял

   Горогуля

39 — 01.09.16 — 12:14

ещё раз подсказка: тебе не нужна форма

   Fish

40 — 01.09.16 — 12:15

(38) Посмотреть, из каких данных значение попадает в реквизит формы и взять оттуда. Новое значение записывать туда же. Форма для этого тебе не нужна, от слова совсем.

   yalanton

41 — 01.09.16 — 12:16

(37) сначала хочу хоть получить значения реквизитов формы , а записать хм сам не знаю куда записать если например  у реквизита датаприема -тип дата ? , вот если регистр тип у рекв то наверное просто в этот регистр

   Fish

42 — 01.09.16 — 12:18

(41) Вот когда ты узнаешь, куда записать, то сразу поймёшь откуда брать :)

   yalanton

43 — 01.09.16 — 12:49

(41)у формысписка справ-ка сотрудники есть  основной реквизит «список » в его св-х есть настройка списка там я вижу такой текст запроса

ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ТекущиеКадровыеДанныеСотрудников КАК ТекущиеКадровыеДанные ПО ДанныеДляПодбораСотрудников.ФизическоеЛицо = ТекущиеКадровыеДанные.ФизическоеЛицо И ДанныеДляПодбораСотрудников.Сотрудник = ТекущиеКадровыеДанные.Сотрудник

я так понял что по такому условию инфа попадает в форму справочника т.е. из регистра ТекущиеКадровыеДанныеСотрудников  а в тексте запроса дальше есть ТекущиеКадровыеДанные.ДатаПриема,

сам реквизит формы датаприема это рекв типа «дата»

   yalanton

44 — 01.09.16 — 12:50

наверное ответ где то тут куда записать

   Горогуля

45 — 01.09.16 — 13:12

превращение дятла в орла. первые секунды волшебства

  

yalanton

46 — 01.09.16 — 13:19

:) пока я вроде вижу что в реквизите формы  действительно нет значения  

например в справочнике в иодуле элемента формы я пишу код

&НаСервере

Процедура А()

  Сообщить( РеквизитФормыВЗначение(«ГражданствоФизическихЛиц»));

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

ГражданствоФизическихЛиц-это реквизит формы типа регистр

процедура после выполнения сообщить пишет :РегистрСведенийМенеджерЗаписи.ГражданствоФизическихЛиц

т.е. конкретное значение не вернула например гражданство Россия

я только что то не пойму- что для получения значений реквизита формы каждый раз надо искать как этот реквизит заполняется -проще нельзя чтоли ?

Задача заключается в том, чтобы получить реквизит от ссылочного значения, хранящегося в реквизите формы. Например у документа Накладная есть реквизит ссылочного типа – Поставщик. Необходимо получить ИНН этого поставщика:


Мы находимся в модуле формы на клиенте. В контексте клиента ссылочные типы очень сильно ограничены в своих возможностях. В частности, нельзя получить значение реквизита от ссылки «через точку». Это можно сделать только в контексте сервера.

Поэтому для решения этой задачи в модуле формы создадим серверную внеконтекстную функцию, которую вызовем с клиента и передадим в нее ссылку на поставщика. В теле функции, на сервере, мы получим ИНН поставщика и вернем его на клиента.

Например, локальная команда формы, вызывающая серверную функцию, будет выглядеть следующим образом:

&НаКлиенте
Процедура ПолучитьИННПоставщика(Команда)
   ИННПоставщика = ПолучитьИНННаСервере(Объект.Поставщик);
КонецПроцедуры 

А функцию ПолучитьИНННаСервере() опишем здесь же, в модуле формы:

&НаСервереБезКонтекста
Функция ПолучитьИНННаСервере(СсылкаНаПоставщика)
   Возврат СсылкаНаПоставщика.ИНН;
КонецФункции   

Таким образом на сервере мы сразу же получаем значение реквизита «через точку» от полученной ссылки и возвращаем его на клиента.

Важно заметить, что функция ПолучитьИНННаСервере() не использует контекст формы (директива компиляции &НаСервереБезКонтекста). Потому что все, что нужно передать на сервер, – это только ссылка, и мы передаем ее в параметре функции. Использовать контекстный вызов и передавать на сервер весь контекст формы только ради того, чтобы на сервере взять из него значение одного реквизита формы, — это слишком расточительно.

 Как получить доступ к реквизитам формы?

Если реквизит объекта «вытащен» на форму, то реквизит формы можно получить через объект ЭлементыФормы, который содержит коллекцию элементов формы, сканируя ее в цикле:

ДокСсылка = СсылкаНаДокумент(ТипДокумента, НомерДок);
ДокОбъект = ДокСсылка.ПолучитьОбъект();
 
ФормаОбъекта = ДокОбъект.ПолучитьФорму();
Для Каждого Элемент Из ФормаОбъекта.ЭлементыФормы Цикл
        Сообщить(Элемент);
КонецЦикла;     
 

Этот цикл позволяет просмотреть имена а так же типы всех реквизитов формы, в том числе такие реквизиты как надписи, командные панели и тд.

Реквизиты формы могут быть различных типов. Поставив фильтр в виде типа реквизита мы можем просмотреть реквизиты определенного типа.

Если реквизит формы имеет тип «ТабличноеПоле», то можно такой элемент просканировать во вложенном цикле и узнать имена колонок таблицы:

 
Для Каждого Элемент Из ФормаОбъекта.ЭлементыФормы Цикл
        Сообщить(Элемент.Имя);
        Если Тип(Элемент) = Тип("ТабличноеПоле") Тогда
                Сообщить(" Это табличное поле! "  + Элемент.Имя );
                Для Каждого Колонка Из Элемент.Колонки Цикл
                        ИмяКолонки = Колонка.Имя;
                        Сообщить(ИмяКолонки);
                КонецЦикла;
        КонецЕсли;      
КонецЦикла;     
 

Как получить значение отдельного реквизита формы?

Чаще требуется получать не массив реквизитов формы,  а значение отдельных конкретных реквизитов формы. Например реквизиты «Шапки» или «Подвала» формы документа.

Пример:

 
ФормаОбъекта = ДокОбъект.ПолучитьФорму("ФормаДокумента");
Поставщик = ФормаОбъекта.ЭлементыФормы.Поставщик;
Поставщик = ФормаОбъекта.ЭлементыФормы.Получатель;
Сообщить(ФормаОбъекта.ЭлементыФормы.ТаблПоле.Колонки.Количество());
 

Реквизиты шапки могут иметь различные типы: Дата, СправочникСсылка, ЧекБокс, элемент раскрывающегося списка и др.

Как получить значение элементов табличной части формы?

Доступ к табличной части формы через объект

Доступ к табличной части формы (например: Товары) можно получить через объект:

 
  ДокОбъект = Док.ПолучитьОбъект(); //здесь Док - ссылка на объект
  //просканируем построчно таб часть документа
  Для Каждого Стр из ДокОбъект.Товары Цикл
      Номенклатура = Стр.Номенклатура;
      Стр.Коэффициент = 1;
  КонецЦикла;
 

Здесь ДокОбъект.Товары — это табличная часть «Товары» объекта. Далее в цикле табличная часть построчно сканируется!
В каждой итерации цикла можно получить доступ к любому полю строки указав через точку имя этого поля:

      Номенклатура = Стр.Номенклатура;

Доступ к табличной части формы через ЭлементыФормы

Табличная часть объекта и табличная часть формы объекта — это не одно и то же!

Для того, чтобы код работал правильно, надо чтобы колонка формы табчасти объекта в свойстве данные ссылалась на реквизит табличной части объекта. Этим определяется тип колонки таб части формы.

То есть должна быть установлена связь между реквизитом табчасти объекта и реквизитом табчасти формы. Форм у объекта метаданных может быть много мы знаем. Табличную часть формы объекта можно получить через объект ЭлементыФормы:

Объект ЭлементыФормы используется для доступа к элементам управления, расположенным на форме, в частности к таб части документа.

 
        ДокСсылка = СсылкаНаДокумент(ТипДокумента, НомерДок);
        ДокОбъект = ДокСсылка.ПолучитьОбъект();
                                
        ФормаОбъекта = ДокОбъект.ПолучитьФорму();
        Для Каждого Элемент Из ФормаОбъекта.ЭлементыФормы Цикл
                Если Тип(Элемент) = Тип("ТабличноеПоле") Тогда //элемент формы - табличное поле
                                                        
                        Если Элемент.Имя = "Товары" Тогда
                                Сообщить("Это табличное поле!! "  + Элемент.Имя );
                                
                                //ТабПоле = ФормаОбъекта.ЭлементыФормы.Товары.Значение;
                                ТабПоле = Элемент.Значение;
                                Колво = ТабПоле.Количество();
                                Сообщить("Количество строк: " + Колво); 
                                
                                Для Каждого ТекущаяСтрока Из ТабПоле Цикл
                                        
                                        Имя = ТекущаяСтрока.Номенклатура;
                                        Сообщить(Имя); 
                
                                КонецЦикла;                             
                                
                        КонецЕсли;      
                                                        
                КонецЕсли;                                      
        КонецЦикла;  
 

Результат для документа Авансовый отчет:

Это табличное поле!! Товары
Количество строк: 4
Женские ботфорты коричневые
Ботинки женские демисезонные
Ботинки женские натуральная кожа
Женские босоножки       

Если надо получить значение всех колонок всех строк, то организуем дважды вложенный цикл:
Во внешнем цикле сканируются строки, во внутреннем — колонки:

 
        ДокСсылка = СсылкаНаДокумент(ТипДокумента, НомерДок);
        ДокОбъект = ДокСсылка.ПолучитьОбъект();
                                
        ФормаОбъекта = ДокОбъект.ПолучитьФорму("ФормаДокумента");
        Для Каждого Элемент Из ФормаОбъекта.ЭлементыФормы Цикл
                Если Тип(Элемент) = Тип("ТабличноеПоле") Тогда
                                                        
                        Если Элемент.Имя = "ВыданныеАвансы" Тогда //таб часть объекта
                                Сообщить(" Это табличное поле!! "  + Элемент.Имя );
                                
                                ТабПоле = Элемент.Значение;
                                Индекс = 0;
                                Для Каждого ТекущаяСтрока Из ТабПоле Цикл
                                        
                                        Сообщить("=======================");
                                        Для Каждого Колонка Из Элемент.Колонки Цикл
                                                
                                                ИмяКолонки = Строка(Колонка.Имя);
                                                Сообщить(ИмяКолонки);
                                                Имя = ТекущаяСтрока[ИмяКолонки];//сработает только если есть такое поле таб части объекта
                                                Сообщить("=== " + Имя); 
                                                
                                        КонецЦикла;
                                        
                                        Индекс = Индекс + 1;
                                        Если Индекс > 0 Тогда break КонецЕсли; //только первая строка
                                        
                                        
                                КонецЦикла;                             
                                
                                                        
                        КонецЕсли;      
                                                        
                КонецЕсли;                                      
        КонецЦикла;    
 

Результат для документа Авансовый отчет:

Это табличное поле!! ВыданныеАвансы
=======================
НомерСтроки 1
ДокументАванса Расходный кассовый ордер ТК000000004 от 15.02.2007 19:24:03
СуммаДокументаАванса 300
ВалютаДокументаАванса USD
Выдано 300
Сумма 174

 Такое двойное сканирование удобно использовать для быстрой проверки того, что все колонки таб части формы имеют связь с реквизитами таб части объекта. Если такой связи у какой-либо колонки нет, система сгенерирует ошибку.

Kivals

Модератор

us
Offline Offline
Пол: Мужской

WWW

Re: Обратиться к реквизиту другой формы

« Ответ #4 : 01-07-2010 15:32 » 


Код:

Форма=ПолучитьФорму(«НазваниеФормы»);
Форма.Реквизит // получил доступ к ревизиту
// если реквизит — это простое значение, то ему можно просто присвоить что-то
= РеквизитВызывающейФормы;
// Если же это список значений — то и работаешь с ним как со списком
Форма.СписокЗначений.Очистить();

Форма.Открыть();

Понравилась статья? Поделить с друзьями:
  • Как получить периодический реквизит справочника
  • Как получить по своей карте подробные реквизиты
  • Как получить реквизит справочника в документ 1с
  • Как получить реквизит справочника программно 1с
  • Как получить реквизит табличной части документа