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

Обход элемента формы ТабличныйДокумент

Автор Funt432286, 31 окт 2023, 15:55

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

Funt432286

Вот такие значения появляются в параметре Выборка из Запроса

Funt432286

хотя параметр приход в запрос нормально

Максим75

Funt432286, может из-за двойных кавычек в наименовании, не знаю...
попробуйте через СправочникМенеджер найти, без запроса. Я писал как.

LexaK

Максим75, хм, потратить кучу времени на переписку, на сетования что ни чего не работает,
а просто надо в СП заглянуть и все будет ясно! для получения данных из выборки нужно использовать комаду
Следующий() вот пример
лкРезультат = Запрос.Выполнить();
Если лкРезультат.Пустой() Тогда
Сообщить("! " + Номенклатура + " не заполена!");
Иначе
лкВыборка = лкРезультат.Выбрать();   
Пока лкВыборка.Следующий() Цикл
Сообщить("! " + Выборка.Ссылка + " !" + " - " + Выборка.Наименование)       
КонецЦикла;
КонецЕсли;
 
если помогло нажмите: Спасибо!

Funt432286

Максим75, вроде получилось, код отработал без ошибок, в итоге код получился вот такой:
&НаСервере
Процедура ЗагрузкаСправочникНаСервере(НаимСправ, ДанныеСтруктура)

СсылкаСправ = Справочники.Номенклатура.НайтиПоНаименованию(НаимСправ);
Если Не СсылкаСправ.Пустая() Тогда
Док = СсылкаСправ.ПолучитьОбъект();
Док.ФП_Серийник = ДанныеСтруктура.Серийник;
Док.Артикул = ДанныеСтруктура.Артикул;
Док.Записать();
Сообщить("! "+НаимСправ)
КонецЕсли;

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

&НаКлиенте
Процедура ЗагрузкаСправочник(Команда)

Для НомСтр = 1 По ТабличныйДокумент.ВысотаТаблицы Цикл

Серийник = ТабличныйДокумент.Область("R" + (НомСтр) + "C2").Текст;
Артикул = ТабличныйДокумент.Область("R" + (НомСтр) + "C3").Текст;
Наименование = ТабличныйДокумент.Область("R" + (НомСтр) + "C4").Текст;

ДанныеЗапись = Новый Структура;
ДанныеЗапись.Вставить("Серийник", Серийник);
ДанныеЗапись.Вставить("Артикул", Артикул);

Если ЗначениеЗаполнено(Серийник) Тогда

Сообщить(Серийник + " - " + Наименование);
ЗагрузкаСправочникНаСервере(ТабличныйДокумент.Область("R" + (НомСтр) + "C4").Текст, ДанныеЗапись);
КонецЕсли;
КонецЦикла;
КонецПроцедуры

Спасибо всем больше за помощь!

Теги:

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

Рейтинг@Mail.ru

Поиск