Имя: Пароль:
1C
1С v8
Оповестить о выборе
0 Начинающий_13
 
11.10.11
15:03
Здравствуйте
Обычное приложение (в управляемом все сдалал) наверное с командой что то  не то.
Хочу из обработки перенести значения из табличной части в табличную часть документа
В документе табличная часть ТМЦ
В обработке табличная часть ТЗ (тип таблица значений)
Код обработки все работает
Процедура ПартииВыбор(Элемент, ВыбраннаяСтрока, Колонка, СтандартнаяОбработка)
   
   Перем ТМЦ,Количество;
   Перем СтруктураПараметров;
   
   СтандартнаяОбработка=Ложь;
   
   Количество=1;
   
   ТМЦ=ВыбраннаяСтрока.ТМЦ;
   
   ИмяФормыВводаПараметров  = "ВводПараметровВнутренние";
   ФормаВводПараметров = Обработки.ПодборПартии.ПолучитьФорму(ИмяФормыВводаПараметров, ЭтаФорма);
   
   // Устанвливаем занчения
   ФормаВводПараметров.Заголовок              = ТМЦ;
   ФормаВводПараметров.Количество             = Количество;
       
   СтруктураПараметров = ФормаВводПараметров.ОткрытьМодально();

   НВС=ТЗ.Добавить();// НВС=НоваяСтрока
   НВС.Установить(0,ВыбраннаяСтрока.Характеристика);
   НВС.Установить(1,ВыбраннаяСтрока.ТМЦ);
   НВС.Установить(2,ВыбраннаяСтрока.Контрагент);
   НВС.Установить(3,ВыбраннаяСтрока.Партия);
   НВС.Установить(4,ВыбраннаяСтрока.Цена1го);
   НВС.Установить(5,ВыбраннаяСтрока.Цена);
   НВС.Установить(6,СтруктураПараметров.Количество);
   
КонецПроцедуры

Создаю кнопку делаю процедура

Процедура КоманднаяПанельПеренестиВДокумент(Кнопка)
     ОповеститьОВыборе(ТЗ);
КонецПроцедуры

Захожу в документ ОбоработкаВыбора

Процедура ДобавитьСтрокуТовары(ААА,Количество)

   Строка=ТМЦ.Добавить();
   Строка.ТМЦ=ААА;
   Строка.Количество=Количество;
   

КонецПроцедуры // ДобавитьСтрокуТовары()



Процедура ТМЦОбработкаВыбора(Элемент, ВыбранноеЗначение, СтандартнаяОбработка)

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

   КонецЕсли;

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

Ничего не переносится