Получение цены для склада и номенклатуры на встроенном языке
Добрый вечер, помогите дописать код
&НаСервере
Функция НаценкаДляСклада(Идентификатор)
Наценка = Константы.НаценкаПоУмолчанию.Получить();
//ниже надо дописать логику получения цены для склада и номенклатуры
СтрокаТоваров = Объект.Товары.НайтиПоИдентификатору(Идентификатор);
если ЗначениеЗаполнено(СтрокаТоваров.Номенклатура)и ЗначениеЗаполнено(Объект.Склад) тогда
Номенклатура = СтрокаТоваров.Номенклатура;
Склад = Объект.Склад;
//....
//Наценка = ...;
Конецесли;
//а пока процедура возвращает только константу
Возврат Наценка;
КонецФункции
ПоказатьПо теме из базы знаний
- Сравнение 1С8 и Navision
- Загрузка документов и номенклатуры из Excel в 1С "одним нажатием": УПД, ТОРГ-12, отчеты маркетплейсов, заказы, счета, прайсы
- Разработка и сценарное тестирование с Vanessa-ADD. Практические примеры сценариев. Шаги встроенной библиотеки
- Распознавание и загрузка сканов в 1С "одним нажатием": УПД, ТОРГ-12, накладные, счета, номенклатура, заказы и т.д.
- Интеграция 1С с маркетплейсами Ozon и Wildberries для УТ10.3, КА 1.1, УПП 1.3
Найденные решения
немного неправильно сделана структура хранения данных
по хорошему нужно переделать
создать рег сведений с измерениями номенклатура, ТипСклада
и реквизитом цена, если цены нужно хранить по периодам то рег сведений должен быть периодическим
из справочника перенести данный в рег сведений обработкой
удалить ТЧ
на форме уже обращаемся к регистру и получаем наценку,
по хорошему нужно переделать
создать рег сведений с измерениями номенклатура, ТипСклада
и реквизитом цена, если цены нужно хранить по периодам то рег сведений должен быть периодическим
из справочника перенести данный в рег сведений обработкой
удалить ТЧ
на форме уже обращаемся к регистру и получаем наценку,
Остальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(4)
&НаКлиенте
Процедура ТоварыЦенаПриИзменении(Элемент)
//В этом случа нам надо посчитать сумм но и в зависмости от слада получить наценку, поэтому работаем с ТекущаяСтрока
Идентификатор = Элементы.Товары.ТекущаяСтрока;
Если Идентификатор = Неопределено Тогда
Возврат; //исключаем ошибки в случае отсутствия данных
КонецЕсли;
СтрокаТоваров = Объект.Товары.НайтиПоИдентификатору(Идентификатор);
Если СтрокаТоваров = Неопределено Тогда
Возврат; //исключаем ошибки в случае отсутствия данных
КонецЕсли;
СтрокаТоваров.Сумма=Окр(СтрокаТоваров.Количество*СтрокаТоваров.Цена,2);
Если СкладРозничный() Тогда
СтрокаТоваров.ЦенаВРознице=Окр(СтрокаТоваров.Цена+СтрокаТоваров.Цена*НаценкаДляСклада(Идентификатор)/100);
КонецЕсли;
КонецПроцедуры
&НаСервере
Функция НаценкаДляСклада(Идентификатор)
Наценка = Константы.НаценкаПоУмолчанию.Получить();
СтрокаТоваров = Объект.Товары.НайтиПоИдентификатору(Идентификатор);
Если ЗначениеЗаполнено(СтрокаТоваров.Номенклатура) и ЗначениеЗаполнено(Объект.Склад) Тогда
Номенклатура = СтрокаТоваров.Номенклатура;
Склад = Объект.Склад;
//....
//Наценка = ...;
Конецесли;
Возврат Наценка;
КонецФункции
Показать
немного неправильно сделана структура хранения данных
по хорошему нужно переделать
создать рег сведений с измерениями номенклатура, ТипСклада
и реквизитом цена, если цены нужно хранить по периодам то рег сведений должен быть периодическим
из справочника перенести данный в рег сведений обработкой
удалить ТЧ
на форме уже обращаемся к регистру и получаем наценку,
по хорошему нужно переделать
создать рег сведений с измерениями номенклатура, ТипСклада
и реквизитом цена, если цены нужно хранить по периодам то рег сведений должен быть периодическим
из справочника перенести данный в рег сведений обработкой
удалить ТЧ
на форме уже обращаемся к регистру и получаем наценку,
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот