Заполнение табличной части документа из другого документа.

1. user2109808 06.12.24 08:33 Сейчас в теме
есть форма рмк в объекте такие данные: касса, фикс устройства, тч товары, кассир. не могу выстроить и полностью понять следующую логику
когда выбираешь товар и он оказывается маркированном -> открывается форма сканирования "ФормаМарка" имеет тз с реквизитом куда вписываются отсканированный код марки. вот код того как проходит и получает данные
//код на форме рмк
&НаКлиенте
Процедура ПодборЗаверщение(Результат, ДополнительныеПараметры) Экспорт
	
	Если Результат = Неопределено Тогда
		Возврат;	
	КонецЕсли;  
	
	СтруктураПараметров = ЗаполнитьСвойстваНоменклатуры(Результат.Номенклатура, ВидЦен, );  
	Если СтруктураПараметров.ИспользоватьХарактеристики = Истина Тогда          
		ПараметрыОтбора = Новый Структура();//"НаименованиеХарактеристики", Истина);
		ПараметрыФормы = Новый Структура("Отбор", Результат.Номенклатура);  
		ОбработчикОповещения  = Новый ОписаниеОповещения("ОбработатьВыборХарактеристики", ЭтотОбъект); 
        ОткрытьФорму("Справочник.Номенклатура.ФормаВыбора", ПараметрыФормы,,,,,ОбработчикОповещения, РежимОткрытияОкнаФормы.БлокироватьОкноВладельца);
		ПересчитатьДокументНаКлиенте();
	Иначе 
		СтруктураПараметров.Вставить("Количество", 1); 
		ДобавитьПозициюНоменклатуры(СтруктураПараметров);  
		Если СтруктураПараметров.ТипМаркировки = ПРЕДОПРЕДЕЛЕННОЕЗНАЧЕНИЕ("Перечисление.ТипыМаркировкиККТ.МаркированныйТовар") Тогда   
			Оповещения = Новый ОписаниеОповещения("МаркаЗавершение", ЭтотОбъект);
			ОткрытьФорму("Обработка.РабочееМестоКассира.Форма.ФормаМарка",, ЭтотОбъект,,,, ОбработчикОповещения, РежимОткрытияОкнаФормы.БлокироватьОкноВладельца);   
		КонецЕсли;
	КонецЕсли;  	
	ПересчитатьДокументНаКлиенте();

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


&НаКлиенте 
Процедура МаркаЗавершение(Результат, ДополнительныеПараметры) Экспорт 
	Если ЗначениеЗаполнено(Результат) Тогда 
		
		Сообщить("данные пришли"+результат);	
	КонецЕсли;
КонецПроцедуры



//код в "форма марки" 

&НаКлиенте
Процедура ОбработкаОповещения(ИмяСобытия, Параметр, Источник)
	Если Источник = "ПодключаемоеОборудование" и ВводДоступен() Тогда
		Если ИмяСобытия = "ScanData" Тогда
			Если Параметр[1] = Неопределено Тогда   
				новаястрока = маркасерии.Добавить();
				новаястрока.реквизит1 = Параметр[0]; 
				
			Иначе  
				новаястрока = маркасерии.Добавить();
				новаястрока.реквизит1 = Параметр[1][1];	
			КонецЕсли;  
		КонецЕсли; 
	КонецЕсли;
КонецПроцедуры 

Показать


как и где мне обратиться к тч "марка серии номенклатуры" в документе чеки ккм и записать эти коды марки вместе с номенклатурой и еи?
По теме из базы знаний
Ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
2. user2109808 06.12.24 09:29 Сейчас в теме
забыл, еще же на форме кнопка ок должна быть, записать или "запомнить" код марки
Прикрепленные файлы:
Оставьте свое сообщение

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот