У меня есть справочник номенклатура со списком материалов и их стоимостью. Я создал справочник СписокУслуг в который добавил табличную часть ИспользованныеМатериалы с регистрами Материал и Цена Материал типа СправочникСсылка.Номенклатура. Как мне сделать так что бы при выборе Номенклатуры реквизит Цена заполнялся соответствующим по справочнику Номенклатура значением?
P. S. Я в 1с глубокий новичок и заранее извиняюсь если что-то не правильно сформулировал.
P. S. Я в 1с глубокий новичок и заранее извиняюсь если что-то не правильно сформулировал.
По теме из базы знаний
- Ведение взаиморасчетов в конфигурациях «Комплексная автоматизация 1.1» и «Управление производственным предприятием 1.3» - часть 2
- Не спеша, эффективно и правильно – путь разработки. Часть 3. Практика
- Как читать чужой код? Часть 3. Разбор и доработка запросов
- Я - ЗУПер! Часть 1. Компетенции сотрудников.
- Результаты ревью кода 1500+ решений каталога Инфостарт: наиболее частые ошибки разработчиков в коде
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(1)
Событие "При изменении" элемента формы, в котором отображается использованный материал. А дальше в зависимости от того, под какой режим пишете. Если управляемый интерфейс / Такси, то уходите на сервер и вытаскиваете реквизит из элемента справочника Номенклатура.
добавил табличную часть
Событие "При изменении" элемента формы, в котором отображается использованный материал. А дальше в зависимости от того, под какой режим пишете. Если управляемый интерфейс / Такси, то уходите на сервер и вытаскиваете реквизит из элемента справочника Номенклатура.
(1) Вообще Справочники со список материалов и Ценой?*** звучит как то странно...может таблица в каком то документе?
Процедура ТоварыНоменклатураПриИзменении(Элемент)
СтрокаТЧ = ЭлементыФормы.Товары.ТекущиеДанные;
СтрокаТЧ.Цена = ВернутьЦену(СтрокаТЧ.Номенклатура);
КонецПроцедуры
Функция ВернутьЦену(Номенклатура)
Запрос = Новый Запрос;
Запрос.Текст = "ТЕКСТ ВАШЕГО ЗАПРОСА К РЕГИСТРУ СВЕДЕНИЙ";
Результат = Запрос.Выполнить().Выбрать();
Если Результат.Следующий() Тогда
Возврат Результат.Цена;
Иначе
Сообщить("Нет цены");
КонецЕсли;
КонецФункции
Показать
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот