Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
22 ноя 2024, 11:25

Автоматический расчет доли стоимости

Автор tema-201, 18 янв 2013, 13:39

0 Пользователей и 1 гость просматривают эту тему.

tema-201

Помогите пожалуйста с расчетом доли стоимости.
На данный момент не могу правильно указать параметры в функции получить цену. Я вообще на верном пути?

Процедура КомплектующиеКоличествоПриИзменении(Элемент)

СсылкаНаКомплект=ЭлементыФормы.Номенклатура.Значение.Ссылка;

ЦенаКомплекта=Ценообразование.ПолучитьЦенуНоменклатуры (СсылкаНаКомплект,ХарактеристикаНоменклатуры, Справочники.ТипыЦенНоменклатуры.НайтиПоКоду("00002"), ДокументОбъект.Дата, СсылкаНаКомплект.ЕдиницаХраненияОстатков,ДокументОбъект.мВалютаРегламентированногоУчета,ЗаполнениеДокументов.КурсДокумента(ДокументОбъект.мВалютаРегламентированногоУчета, ),ЗаполнениеДокументов.КратностьДокумента(, ),ЗаполнениеДокументов.КратностьДокумента(, ), ,,ОбщегоНазначения.ПолучитьРеквизитШапки("УсловияПродаж", ДокументОбъект, ));
   
КоличествоКомплектов=ЭлементыФормы.Количество.Значение;
   
СтрокаТабличнойЧасти=ЭлементыФормы.Комплектующие.ТекущаяСтрока;

Цена = Ценообразование.ПолучитьЦенуНоменклатуры(СтрокаТабличнойЧасти.Номенклатура, ХарактеристикаНоменклатуры, Справочники.ТипыЦенНоменклатуры.НайтиПоКоду("00002"), ДокументОбъект.Дата,СтрокаТабличнойЧасти.Номенклатура.ЕдиницаХраненияОстатков, ДокументОбъект.ВалютаРегламентированногоУчета,ЗаполнениеДокументов.КурсДокумента(ДокументОбъект.мВалютаРегламентированногоУчета,),ЗаполнениеДокументов.КратностьДокумента(, ), ,,ОбщегоНазначения.ПолучитьРеквизитШапки("УсловияПродаж", ДокументОбъект, ));

СтрокаТабличнойЧасти.ДоляСтоимости=Цена * СтрокаТабличнойЧасти.Количество /(КоличествоКомплектов*ЦенаКомплекта);

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


tema-201


Gunner


Похожие темы (5)

Рейтинг@Mail.ru

Поиск