Выделить строки программно

Форум Программирование Общие вопросы программирования (Dev)

1. HaIIpuKoJIe 30.09.19 11:30 Сейчас в теме

Добрый день. Подскажите пожалуйста как программно выделить все строки ТЧ? С внешней обработки запускаю команду из формы документа, необходимо перед выполнением команды выделить все строки ТЧ товары.

Форма = ПолучитьФорму("Документ.ЗаказКлиента.Форма.ФормаДокумента",,Объект.Ссылка);
Форма.ЗаполнитьОбеспечениеПрок(Неопределено);

&НаКлиенте
Процедура ЗаполнитьОбеспечениеПрок(Команда) Экспорт 
	
	ПараметрыПроверки = ОбеспечениеКлиентСервер.ИнициализироватьПараметрыПроверкиЗаполнения();
	ПараметрыПроверки.Поля.Удалить("Подразделение");

	Если ОбеспечениеКлиент.ПроверитьЗаполнение(
		Объект, Объект.Товары, Элементы.Товары.ВыделенныеСтроки, ПараметрыПроверки, Неопределено, Объект.Склад) Тогда

		ПараметрыФормы = ОбеспечениеКлиентСервер.ПараметрыФормыИсполнениеЗаказа(ТипЗнч(Объект.Ссылка),
			Объект.Товары, Элементы.Товары.ВыделенныеСтроки);
		ОткрытьФорму("Перечисление.ВариантыОбеспечения.Форма.ИсполнениеЗаказа", ПараметрыФормы,
			ЭтаФорма, УникальныйИдентификатор);

	КонецЕсли;

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

Показать

По теме из базы знаний

Найденные решения

2. dhurricane 30.09.19 11:40 Сейчас в теме

(1) Попробуйте заполнить свойство таблицы "ВыделенныеСтроки":

ВыделенныеСтроки = Элементы.Товары.ВыделенныеСтроки;
ВыделенныеСтроки.Очистить();

Для каждого СтрокаТаблицы Из Объект.Товары Цикл
   ВыделенныеСтроки.Добавить(СтрокаТаблицы.ПолучитьИдентификатор());
КонецЦикла;

Ответить

Остальные ответы

Подписаться на ответы Инфостарт бот

Свернуть все

2. dhurricane 30.09.19 11:40 Сейчас в теме

(1) Попробуйте заполнить свойство таблицы "ВыделенныеСтроки":

ВыделенныеСтроки = Элементы.Товары.ВыделенныеСтроки;
ВыделенныеСтроки.Очистить();

Для каждого СтрокаТаблицы Из Объект.Товары Цикл
   ВыделенныеСтроки.Добавить(СтрокаТаблицы.ПолучитьИдентификатор());
КонецЦикла;

Ответить

3. HaIIpuKoJIe 30.09.19 11:53 Сейчас в теме

(2)

Объект.Товары

пустая коллекция.

4. dhurricane 30.09.19 11:54 Сейчас в теме

(3) Тогда что Вы пытаетесь выделить? :-)

5. HaIIpuKoJIe 30.09.19 12:43 Сейчас в теме

(4)Не могу разобраться как мне передать туда нужный мне объект.

6. dhurricane 30.09.19 14:52 Сейчас в теме

(5) Извините, но куда это "туда"? И какой объект Вам нужен?

8. HaIIpuKoJIe 30.09.19 16:55 Сейчас в теме

(6)Необходимо из внешней обработки запустить команду на форме документа. Как ее запустить я разобрался.


Форма = ПолучитьФорму("Документ.ЗаказКлиента.Форма.ФормаДокумента",,Объект.Ссылка);
Форма.ЗаполнитьОбеспечениеПрок(Неопределено);

Но в таком случае ТЧ Объект.Товары пустая. Если бы я выполнял эту команду интерактивно то ТЧ Объект.Товары заполнялась бы из документа.

10. dhurricane 01.10.19 00:20 Сейчас в теме

(8) Извините, но я отвечал на вопрос, как выделить строки таблицы программно. Как заполнить саму таблицу в Вашем случае, я не знаю. Опишите подробнее задачу о заполнении нового документа.

11. HaIIpuKoJIe 01.10.19 08:27 Сейчас в теме

(10)Все верно, ответ дан правильный. Тему пока не закрываю в надежде получить еще один ответ.
Задача из внешней обработки запустить команду формы документа.
Команда работает с ТЧ Объект.Товары. Проблема в том, что при вызове команды формы документа из внешней обработки ТЧ пустая и я не могу получить ее на клиенте.

12. SlavaKron 01.10.19 11:43 Сейчас в теме

(11) Неправильно получаете форму существующего документа. Изучите синтаксис метода ПолучитьФорму.

13. HaIIpuKoJIe 01.10.19 12:56 Сейчас в теме

(12)Изучу. Пока решил так:

ЗаказКлиента = СсылкаНаОбъектПрок.ПолучитьОбъект();
ЗначениеВДанныеФормы(ЗаказКлиента,Объект);
Возврат Объект;

9. user_2010 952 30.09.19 21:28 Сейчас в теме

(3) Может быть надо: ИЗ Элементы.Товары?

7. IvanovIvan 30.09.19 14:58 Сейчас в теме

ПереченьВариантов = Новый Массив();

Элементы.Товары.ВыделенныеСтроки.Очистить();
Для каждого стр из Объект.Товары Цикл
Элементы.Товары.ВыделенныеСтроки.Добавить(стр.ПолучитьИдентификатор());
КонецЦикла;

ПереченьВариантов.Добавить(ПредопределенноеЗначение("Перечисление.ВариантыОбеспечения.СоСклада"));
ПереченьВариантов.Добавить(ПредопределенноеЗначение("Перечисление.ВариантыОбеспечения.Требуется"));
Результат = Новый Структура("ПереченьВариантов, ЗаполнятьЦелымиУпаковками");
Результат.ПереченьВариантов = ПереченьВариантов;
Результат.ЗаполнятьЦелымиУпаковками = Ложь;

Детали = ЗаполнитьОбеспечениеВУстановленномПорядке(Результат);

Оставьте свое сообщение

E-mail: