Внешняя обработка 8.3?

Question

[TataRus]

Добрый день! Начала осваивать 1с совсем недавно и столкнулась с такой задачей: нужно написать внешнюю обработку, которая будет выводить в свою табличную часть из документа ПоступлениеНаРасчетныйСчет договор контрагента в одну колонку и откуда именно взят договор в документе (из счета, реквизитов, табличной части документа) во второй колонке. Пустые документы не выводить. Создала форму с возможностью выбора нужного документа. Добавила на форму кнопку С генерировать, при нажатии на которую, будет осуществляться необходимый функционал. Как правильно задать команды, которые она должна выполнять?

Comments

[Sgr_A]

TataRus, не совсем понимаю что требуется. Получается, из одного поступления на РС может быть извлечено множество договоров?

[TataRus]

В одном документе есть несколько мест, где указан ДоговорКонтрагента: в шапке, в табчасти. Нужно все эти места определить и вывести в таблицу вместе с договором

Answer 1

[TataRus]

Спасибо, Александр, как раз такой специалист и поставил задачу, но разбираться сама должна, мне бы кусочек кода, для наглядности)

Comments

[Александр Прохорович]

Примерно как связаны команда, кнопка и процедура:


Пример кода, как это работает, немного упростил, чтобы было нагляднее. Обратите внимание, что обратиться к объектам конфигурации Вы сможете только из серверной процедуры/функции:

&НаКлиенте
Процедура ПоказатьКоды(Команда)
	
	МассивТоваров = ПолучитьКодыНаСервере();

	Для Каждого ТекСтр Из МассивТоваров Цикл   
		ДД = Base64Значение(ТекСтр);
		КодМаркировки = ПолучитьСтрокуИзДвоичныхДанных(ДД);
	КонецЦикла;                              

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

&НаСервере
Функция ПолучитьКодыНаСервере()
	Запрос = Новый Запрос;
	Запрос.Текст = "ВЫБРАТЬ
	               |	ПулКодовМаркировкиСУЗ.ПолныйКодМаркировки КАК ПолныйКодМаркировки
	               |ИЗ
	               |	РегистрСведений.ПулКодовМаркировкиСУЗ КАК ПулКодовМаркировкиСУЗ
	               |ГДЕ
	               |	ПулКодовМаркировкиСУЗ.ЗаказНаЭмиссию = &ЗаказНаЭмиссию";
	Запрос.УстановитьПараметр("ЗаказНаЭмиссию",Объект.ЗаказНаЭмиссию);
	Выборка = Запрос.Выполнить().Выбрать();
	МассивДокументов = Новый Массив;
	Пока Выборка.Следующий() Цикл	
		МассивДокументов.Добавить(Выборка.ПолныйКодМаркировки);
	КонецЦикла;    
	Возврат МассивДокументов;
	
КонецФункции

Код, может, и кривоватый, но задачу свою решал, а писался за пару минут на коленке, прошу строго не судить)

[TataRus]

Спасибо, через запрос я предлагала решение, сказали, что тут решается через обращение к реквизиту и никакой запрос не нужен

[Александр Прохорович]

В Вашем случае, наверное, будет что-то типа такого, выполнение на сервере:

Если Объект.Док.Договор <> Справочники.Договоры.ПустаяСсылка() Тогда
ТекСтр = Объект.ТЧ.Добавить();
ТекСтр.Договор = Объект.Док.Договор;
ТекСтр. Откуда = "Реквизит";
КонецЕсли;
Если Объект.Док.Счет.Договор<> Справочники.Договоры.ПустаяСсылка() Тогда
ТекСтр = Объект.ТЧ.Добавить();
ТекСтр.Договор = Объект.Док.Счет.Договор;
ТекСтр. Откуда = "Счет";
КонецЕсли;
Для Каждого Стр Из Объект.Док.ТабличнаяЧасть Цикл
Если Стр.Договор <>  Справочники.Договоры.ПустаяСсылка() Тогда
ТекСтр = Объект.ТЧ.Добавить();
ТекСтр.Договор = Стр.Договор;
ТекСтр. Откуда = "ТЧ";
КонецЕсли;
КонецЦикла;

Написал не в 1С, мог допустить ошибки, плюс не уверен, что правильно суть задачи понял. И, конечно, имена объектов конфигурации надо на реальные менять.

[TataRus]

Ок, спасибо, вечером попробую)

[Михаил Е]

TataRus,

сказали, что тут решается через обращение к реквизиту и никакой запрос не нужен

Ну и справедливости ради, при обращении к реквизиту через точку, 1С платформа, также генерит запрос.
И ваше решение через запрос "В общем случае является наиболее эффективным", "а обращение к реквизитам через точку, не лучшая " практика
Можете просветить "Специалиста" ))

Answer 2

[Александр Прохорович]

К кнопке привязываются команды, к командам привязываются процедуры модуля формы, из этих процедур можно уже обращаться к остальным объектам конфигурации. В целом начинать надо с команды, а не с кнопки. Перетащив команду на форму, Вы сгенерируете кнопку, плюс из той же команды в один клик можно сгенерировать процедуру в модуле формы.

В целом Ваш вопрос очень обширен, а задача несколько сложнее, чем для недавно начавшего изучать 1С человека, в двух словах сложно ответить. Лучше всего обратиться к специалисту, который наглядно покажет как это все делается, ну или в идеале на курсы от самой фирмы 1С сходить. Надеюсь, хоть немного помог.