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

Заполнение ТЧ данными из другой формы.

Автор mashencev_anton, 27 мая 2015, 13:24

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

mashencev_anton

День добрый.для полноты картины. Внешняя обработка с двумя формами. в ТЧ первой формы загружаются данные из Excel(загружается номенклатура используя метод НайтиПоНаименованию()).потом по кнопке открывается вторая форма с уже заполненной ТЧ(туда попали наименования не найденной номенклатуры), в этой же ТЧ выбираются соответствующая номенклатура и по нажатию кнопки(второй формы) "перенести",закрывается вторая форма и заполняются пустые строки ТЧ первой формы.
для примера вот что мне необходимо(это так, для нагладности.). Это код первой формы(Владелец):
&НаКлиенте
Процедура ОбработкаОповещения(ИмяСобытия, Параметр, Источник)
   
    НазваниеСобытия = "ПеренестиНоменклатуру";
    Если ИмяСобытия = НазваниеСобытия Тогда
        ОповещениеНаСервере(Параметр);
    КонецЕсли;
   
КонецПроцедуры

&НаСервере
Процедура ОповещениеНаСервере(параметр)
    Для каждого стр из объект.Товары цикл
        если НЕ ЗначениеЗаполнено(стр.Номенклатура) Тогда
        Для каждого строка из Параметр цикл   
            стр.номенклатура= Справочники.Номенклатура.НайтиПоНаименованию(строка);               
            КонецЦикла;
        КонецЕсли;
    КонецЦикла;
КонецПроцедуры



Это код второй формы:
&НаКлиенте
Процедура Перенести(Команда)
     
НазваниеСобытия = "ПеренестиНоменклатуру";
ИмяСобытия = НазваниеСобытия;
ПараметрВызова = ПеренестиНаСервере();
ФормаИсточник = "ВнешняяОбработка.АнализПрайсаПоставщика.Форма.Форма";
Оповестить(ИмяСобытия,ПараметрВызова,ФормаИсточник);
Закрыть();
КонецПроцедуры

&НаСервере
Функция  ПеренестиНаСервере()
Массив=Новый Массив;
для каждого стр из Объект.НоменклатураСравнение цикл
          Массив.Добавить(стр.Номенклатура);

  КонецЦикла;
Возврат Массив;
КонецФункции


Rasty

а в чем вопрос?
так вы при помощи кнопки получаете форму, значит при нажатии кнопки вы получаете данные из ТЧ, а потом, когда получили форму, заполняете ее ТЧ
Добавлено: 27 мая 2015, 13:33


Помогли - Скажи спасибо! Решил сам - поделись решением!
:)

mashencev_anton

оу точно вопрос))))
Как мне правильно заполнить Пустые строки ТЧ первой формы?

Rasty

в перовой форме подгружаются из excel и если такой товар не найден, то он добавляется, правильно?
Помогли - Скажи спасибо! Решил сам - поделись решением!
:)

mashencev_anton

Цитата: Rasty от 27 мая 2015, 14:24
в перовой форме подгружаются из excel и если такой товар не найден, то он добавляется, правильно?
загрузили, потом нажали кнопку->открылась форма№2 с ТЧ в которую уже подпали те позиции которые не были найдены и соответственно не подпали в ТЧ формы№1. потом в ТЧ формы№2 вручную выбрали соответствующую номенклатуры-> Нажимаем кнопку "Перенести"(кнопка формы№2) и эта подобранная вручную номенклатура должна заполнить пустые строки ТЧ формы№1

Rasty

и вопрос в том как это реализовать?
Помогли - Скажи спасибо! Решил сам - поделись решением!
:)

mashencev_anton

Цитата: Rasty от 27 мая 2015, 14:42
и вопрос в том как это реализовать?
как правильно заполнить пустые строки ТЧ Первой формы. код я уже приводил выше. со второй формы в первую форму передается параметр и впринципе ТЧ первой формы заполняется но неправильно

Rasty

Помогли - Скажи спасибо! Решил сам - поделись решением!
:)

mashencev_anton

Цитата: Rasty от 27 мая 2015, 14:47
ПустойСсылкой
подробнее можешь изложить мысль если не сложно

Rasty

с удовольствием=)если номенклатура не найдена, то в строку мы пихаем Справочники.Номенкалутра.ПустаяСсылка(), потом ищем пустые ссылки в первой тч и заполняем из строками из второй
Добавлено: 27 мая 2015, 14:55


Помогли - Скажи спасибо! Решил сам - поделись решением!
:)

Теги:

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

Рейтинг@Mail.ru

Поиск