Имя: Пароль:
1C
1С v8
Работа с элементами формы
,
0 Sky69
 
01.02.13
15:38
Стоит задача перед тем как записать в справочнике "Контрагент" проверить наличие юридического и фактического адреса контрагента. Я так поняла,что поскольку данные еще не записаны,то их брать надо с формы. Все бы ничего, только никак не получается список контактной информации получить. Мало опыта работы с формами. Стр содержит лишь название контрагента,а в остальных полях пусто. Надо получить ТЗ и из него отобрать уже нужные данные. Как можно получить список еще не сохраненных значений Контактной информации с формы?
Стр = ЭлементыФормы.КонтактнаяИнформация.Значение.Отбор;
В = Стр.Вид;
Т = Стр.Тип;
П = Стр.Представление;
1 Defender aka LINN
 
01.02.13
15:41
Этот код он что собой символизирует? Уныние и отчаяние?
2 AaNnDdRrEeYy
 
01.02.13
15:42
Бери из объекта а не с формы, если это конечно реквизиты объекта, а не отдельный регистр
3 Defender aka LINN
 
01.02.13
15:47
(0) У формы тоже есть реквизиты
4 Sky69
 
01.02.13
15:48
(1) =(
5 Rovan
 
гуру
01.02.13
15:50
(0) конфа какая ?
6 Sky69
 
01.02.13
15:50
Если бы мне надо было брать данные из регистраСведений проблем бы не было. Но туда данные еще не записаны. И это не просто поле,а таблица и внесена может быть не одна запись с контактной информацией а много,и только после этого нажимается кнопка "записать". УПП 8.2 спр."Контрагенты" вкладка "Контакты"
7 Sky69
 
01.02.13
15:51
впервые с этим столкнулась
8 hhhh
 
01.02.13
15:54
(6) ну посмотри у этой таблицы в свойствах имя ее, и что написано в "Данные", то есть путь к данным.
9 sapphire
 
01.02.13
15:57
(0) Насколько я помню, пока контактная информация, типа
юридического и фактического адреса контрагента хранилась в РС, стало быть, пока элемент справочника не записан - это вводить не след. Не?
10 Sky69
 
01.02.13
16:01
(8) НаборКонтактнойИнформации
11 Идентификатор
 
01.02.13
16:02
(0) ПередЗаписью, в самый конец запили

       Врем = НаборКонтактнойИнформации.Выгрузить();
       
       Отбор = Новый Структура();
       Отбор.Вставить("Вид",Справочники.ВидыКонтактнойИнформации.ЮрАдресКонтрагента);
       Строки = Врем.НайтиСтроки(Отбор);
       ЮРАдрес = Строки[0].Представление;
       

       Отбор = Новый Структура();
       Отбор.Вставить("Вид",Справочники.ВидыКонтактнойИнформации.ФактАдресКонтрагента);
       Строки = Врем.НайтиСтроки(Отбор);
       ФактАдрес = Строки[0].Представление;

Если ЮРАдрес = "" или ФактАдрес = "" тогда

   Сообщить("Адрес не запилен");
   Отказ = истина;

КОнецЕсли
12 Sky69
 
01.02.13
16:02
Как мне к нему обратиться?
13 Sky69
 
01.02.13
16:03
(11) спасибо, попробую
14 Идентификатор
 
01.02.13
16:04
че т много, пятница, можно даже и не выгружать :)
15 Sky69
 
01.02.13
16:09
(14) как можно обратиться к этому набору? просто ЭлементыФормы.КонтактнаяИнформация это же не одно и то же? или тоже? там нет возможности выгрузить
16 Идентификатор
 
01.02.13
16:11
из формы элемента, ПриЗаписи
17 Идентификатор
 
01.02.13
16:12
прям просто скопируй кусок кода в Процедуру ПередЗаписью, в самый конец
18 Идентификатор
 
01.02.13
16:12
(16) тьфу, не приЗаписи, а перед Записью :) вообщем как в (17)
19 Sky69
 
01.02.13
16:13
может Тек = ЭлементыФормы.КонтактнаяИнформация.ТекущиеДанные;?
20 Sky69
 
01.02.13
16:13
(18) попробую
21 Sky69
 
01.02.13
16:17
(18) Все работает. СПАСИБО БОЛЬШОЕ!!!