Да.
| Цитата |
|---|
Пономарев Дмитрий написал:
Вы считаете, что раз вы 1с-программист, то и все остальные должны разбираться в программировании? |
Я считаю, что не стоит лезть в конфигуратор 1С, если не знакомы с азами программирования на встроенном в платформу 1С языке.
Ответ "
Скорректируйте функцию "ПолучитьСсылкуНаУчастникаИзДокумента" под себя."
| Код |
|---|
// Для документов будет возвращено значение реквизита "Контрагент"
// Для справочников - возвращается ссылка на элемент
// В случае ошибки возвращается "Неопределено"
//
Функция ПолучитьСсылкуНаУчастникаИзДокумента(Знач Ссылка) Экспорт
Если Справочники.ТипВсеСсылки().СодержитТип(ТипЗнч(Ссылка)) Тогда
МассивОбъектов = Новый Массив(1);
МассивОбъектов[0] = Ссылка;
Возврат МассивОбъектов;
ИначеЕсли Документы.ТипВсеСсылки().СодержитТип(ТипЗнч(Ссылка)) Тогда
МассивОбъектов = Новый Массив;
ДобавитьЗначениеРеквизитаВМассив(Ссылка, МассивОбъектов, "Контрагент");
ДобавитьЗначениеРеквизитаВМассив(Ссылка, МассивОбъектов, "Партнер");
ДобавитьЗначениеРеквизитаВМассив(Ссылка, МассивОбъектов, "КонтактноеЛицо");
ДобавитьЗначениеРеквизитаВМассив(Ссылка, МассивОбъектов, "АбонентКонтакт");
Возврат МассивОбъектов;
КонецЕсли;
КонецФункции // ПолучитьСсылкуНаУчастникаИзДокумента()
|
Добавлена строка
| Код |
|---|
ДобавитьЗначениеРеквизитаВМассив(Ссылка, МассивОбъектов, "АбонентКонтакт"); |
"
АбонентКонтакт", "
Контрагент", "
Партнер", это имена реквизитов, где может содержаться ссылка на контакт.
