Имя: Пароль:
1C
1С v8
Копирование таблицы
,
0 igand73
 
28.01.13
16:54
Добрый день!
Есть документ, где при выборе контрагента заполняются его поля из справочника, а как скопировать таблицу номера телефонов?
Вот не большой текст

Процедура ФамилияПриИзменении(Элемент)
Объект.Имя = ПолучитьИмя(Объект.Фамилия);    
Объект.Отчество = ПолучитьОтчество(Объект.Фамилия);
КонецПроцедуры


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

&НаСервереБезКонтекста
Функция ПолучитьОтчество(Фамилия)
   Отчество = Фамилия.Отчество;
   Возврат Отчество;
КонецФункции
1 DrShad
 
28.01.13
16:56
*рукаяйцо* какая еще таблица номеров телефонов? как вопрос связан с примером кода!?
2 pessok
 
28.01.13
16:57
(1) православно говорить - "челодлань". (0) познает дзен новой контактной информации из БСП
3 igand73
 
28.01.13
16:57
На этой форме есть табличная часть номера телефонов и у контрагента есть табличная часть номера телефонов. Мне нужно скопировать из справочника в документ
4 pessok
 
28.01.13
16:58
(3) ТаблицаДокумента.Загрузить(ТаблицаСправочника.Выгрузить())
5 Ayvengo
 
28.01.13
16:59
Радостно, что используется &НаСервереБезКонтекста ;) Тут ты молодец :)

ТЧ_Документа.Загрузить(Объект.ТЧ_Объекта.ВыгрузитьКолонки());
6 Maxus43
 
28.01.13
17:02
(3) там точно ТЧ?
7 igand73
 
28.01.13
17:08
(6) да ТЧ
8 igand73
 
28.01.13
17:13
&НаКлиенте
Процедура ФамилияПриИзменении(Элемент)
Объект.Имя = ПолучитьИмя(Объект.Фамилия);    
Объект.Отчество = ПолучитьОтчество(Объект.Фамилия);

 Объект.НомераТелефонов.Загрузить(ПолучитьНомера(Объект.Фамилия));

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


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


Ошибка
{Документ.ПриемТехники.Форма.ФормаДокумента.Форма(8)}: Ошибка при вызове метода контекста (ПолучитьНомера)
Объект.НомераТелефонов.Загрузить(ПолучитьНомера(Объект.Фамилия));
по причине:
Ошибка передачи данных между клиентом и сервером. Значение недопустимого типа.
по причине:
Ошибка преобразования данных XDTO:
НачалоСвойства: ret    Форма: Элемент    Тип: {http://www.w3.org/2001/XMLSchema}anyType
по причине:
Ошибка отображения типов:
Отсутствует отображение для типа '{http://v8.1c.ru/8.1/data/core}ValueTable'
9 Ayvengo
 
28.01.13
17:16
(8) ну тык делай это &НаСервере
10 Ayvengo
 
28.01.13
17:17
Здесь уже не прокатит НаСервереБезКонтекста
Нужно сделать просто

Объект.НомераТелефонов.Загрузить(Фамилия.НомераТелефонов.Выгрузить());

Либо передавать на клиент какой-то массив или другой тип, который на клиенте отрабатывается
11 igand73
 
28.01.13
17:22
Огромное спасибо!!!
&НаКлиенте
Процедура ФамилияПриИзменении(Элемент)
Объект.Имя = ПолучитьИмя(Объект.Фамилия);    
Объект.Отчество = ПолучитьОтчество(Объект.Фамилия);

ПолучитьНомера(Объект.Фамилия);
КонецПроцедуры


&НаСервере
Функция ПолучитьНомера(Фамилия)
  Объект.НомераТелефонов.Загрузить(Фамилия.НомераТелефонов.Выгрузить());
КонецФункции
12 igand73
 
28.01.13
17:22
Заработало
13 Ayvengo
 
28.01.13
17:24
(11) Объект.Фамилия - передавать не нужно достаточно так

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

ПолучитьНомера();
КонецПроцедуры


&НаСервере
Функция ПолучитьНомера()
  Объект.НомераТелефонов.Загрузить(Фамилия.НомераТелефонов.Выгрузить());
КонецФункции
14 Ayvengo
 
28.01.13
17:24
&НаСервере
Функция ПолучитьНомера()
  Объект.НомераТелефонов.Загрузить(Объект.Фамилия.НомераТелефонов.Выгрузить());
КонецФункции
15 igand73
 
28.01.13
17:53
(14) Спасибо
Оптимист верит, что мы живем в лучшем из миров. Пессимист боится, что так оно и есть.