Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
21 ноя 2024, 20:09

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

Автор Kostik2013, 16 мая 2013, 13:24

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

Kostik2013

Всем привет! Подскажите пожалуйста как передать реквизит в табличную часть при вводе на основании?Сделал ввод на основании,все передается кроме контрагента а он у меня реквизит и в табличную часть не передается,просто пусто, не заполняется.

Dethmontt

Если долго всматриваться в учебник...то в голову может прийти мысль его открыть!

Besart

Если ТипЗнч(ДанныеЗаполнения) = Тип("ДокументСсылка.ВашДокумент") Тогда
// Заполнение шапки
Для Каждого ТекСтрокаТовары Из ДанныеЗаполнения.Товары Цикл
НоваяСтрока = Товары.Добавить();
НоваяСтрока.Количество = ТекСтрокаТовары.Количество;
НоваяСтрока.Номенклатура = ТекСтрокаТовары.Номенклатура;
НоваяСтрока.Сумма = ТекСтрокаТовары.Сумма;
НоваяСтрока.Цена = ТекСтрокаТовары.Цена;
             НоваяСтрока.Контрагент = ДанныеЗаполнения.Контрагент;//В этой строке для каждой строки таб части заполняете контрагента
КонецЦикла;
КонецЕсли;

Kostik2013

Процедура ОбработкаЗаполнения(ДанныеЗаполнения, СтандартнаяОбработка)
   //{{__КОНСТРУКТОР_ВВОД_НА_ОСНОВАНИИ
   // Данный фрагмент построен конструктором.
   // При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
   Если ТипЗнч(ДанныеЗаполнения) = Тип("ДокументСсылка.РасходнаяНакладная") Тогда
      // Заполнение шапки
      Комментарий = ДанныеЗаполнения.Комментарий;
      Для Каждого ТекСтрокаТовары Из ДанныеЗаполнения.Товары Цикл
         НоваяСтрока = ТабличнаяЧасть1.Добавить();
         НоваяСтрока.Сумма = ТекСтрокаТовары.СуммаГрн;
      КонецЦикла;
   ИначеЕсли ТипЗнч(ДанныеЗаполнения) = Тип("ДокументСсылка.Продажа") Тогда
      // Заполнение шапки
      Комментарий = ДанныеЗаполнения.Комментарий;
      Для Каждого ТекСтрокаТовары Из ДанныеЗаполнения.Товары Цикл
         НоваяСтрока = ТабличнаяЧасть1.Добавить();
         НоваяСтрока.Сумма = ТекСтрокаТовары.Сумма;
      КонецЦикла;
   КонецЕсли;
   //}}__КОНСТРУКТОР_ВВОД_НА_ОСНОВАНИИ
КонецПроцедуры

Добавлено: 16 мая 2013, 15:10


НоваяСтрока.Контрагент = ДанныеЗаполнения.Контрагент;   Так не хочет,пусто...

Besart

Цитата: Kostik2013 от 16 мая 2013, 14:57НоваяСтрока.Контрагент = ДанныеЗаполнения.Контрагент;   Так не хочет,пусто...
проверьте тип данных - Контрагент в таб части, должно быть СправочникСсылка.Контрагенты

Kostik2013

Цитата: Besart от 16 мая 2013, 15:15
Цитата: Kostik2013 от 16 мая 2013, 14:57НоваяСтрока.Контрагент = ДанныеЗаполнения.Контрагент;   Так не хочет,пусто...
проверьте тип данных - Контрагент в таб части, должно быть СправочникСсылка.Контрагенты

Так и есть)

Yura063

Тогда проверьте приходит ли данные и какие данные из документа основания!
Помогли, отблагодари!

Kostik2013

Цитата: Yura063 от 16 мая 2013, 15:23
Тогда проверьте приходит ли данные и какие данные из документа основания!

Проходят все которые берутся именно из ТабЧасти а Контрагент пусто.

Dethmontt

Так может в документе "Продажа" или "РасходнаяНакладная" не заполнен реквизит КОНТРАГЕНТ? Или имеет отличный тип
Если долго всматриваться в учебник...то в голову может прийти мысль его открыть!

Yura063

Помогли, отблагодари!

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск