Оглавление | ||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|
|
Ответственное хранение
Если товар находится на ответственном хранении либо отпускается по Гос. программе, то базовая, максимальная и минимальная розничные цены и процент надбавки не рассчитываются:
Блок кода |
---|
СтруктураРезультат.Вставить("ПроцентНаценкиРозница",0);
Подсказка = Подсказка + Символы.ПС + " ПроцентНаценки = 0";
СтруктураРезультат.Вставить("ЦенаРасчРозн",ЦенаУчетная);
Подсказка = Подсказка + Символы.ПС + " ЦенаРасчетнаяБезНДС = ЦенаУчетнаяБезНДС";
СтруктураРезультат.Вставить("ПроцентРозничнойНадбавки", 0);
Подсказка = Подсказка + Символы.ПС + " ПроцентНадбавки = 0";
СтруктураРезультат.Вставить("ЦенаРасчРозницаПрочееМинимальная",0);
Подсказка = Подсказка + Символы.ПС + " ЦенаРасчетнаяМинимальнаяБезНДС = 0";
СтруктураРезультат.Вставить("ЦенаРасчРозницаПрочее",ЦенаУчетная);
СтруктураРезультат.Вставить("ЦенаРасчРозницаПрочееМаксимальная",9999999.00);
Подсказка = Подсказка + Символы.ПС + " ЦенаРасчетнаяМаксимальнаяБезНДС = 9999999.00";
СтруктураРезультат.Вставить("ЦенаБазРозн",ЦенаУчетная);
Подсказка = Подсказка + Символы.ПС + " ЦенаБазоваяСНДС = ЦенаУчетная";
СтруктураРезультат.Вставить("ЦенаМаксРозн", 9999999.00);
Подсказка = Подсказка + Символы.ПС + " ЦенаМаксимальнаяСНДС = 9999999.00";
СтруктураРезультат.Вставить("ЦенаМинРозн", 0);
Подсказка = Подсказка + Символы.ПС + " ЦенаМинимальнаяСНДС = 0"; |
Для товара с признаком госпрограмме, тогда
Цена розничная базовая = Цена учетная
Максимальная цена розничная = 9999999.00
Минимальная цена розничная = 0
Процент надбавки = 0
Процент наценки = 0
ЖНВЛП
Если закуплен товар у производителя, то
...
ПроцентПоПостановлению = Процент по постановлению для опта + Процент по постановлению для розницы, иначе Процент по постановлению для розницы
Если ЦенаПроизводителя <= ЦенаУчетная и ЦенаПроизводителя <= ЦенаУчетная]ЦенаРеестра, то розничная цена рассчитывается по формуле:
ЦенаРасчРозн =Блок кода
ПроцентДоходЖНВЛСРозн
ЦенаРасчетнаяПоПостановлениюБезНДС =
Цел(100*((ЦенаПроизводителя*ПроцентПоПостановлению/100)+
ЦенаУчетнаяЦенаУчетнаяБезНДС))/100
;Если цена производителя находится между учетной ценой (не включая) и ценой реестра (включая)[ЦенаУчетная< ЦенаПроизводителя <=ЦенаРеестра], то розничная цена рассчитывается по формуле:
ЦенаРасчРозн =Блок кода ЦенаПроизводителя>ЦенаУчетная и ЦенаПроизводителя<=ЦенаРеестра, то ЦенаРасчетнаяПоПостановлениюБезНДС =
ПроцентДоходЖНВЛСРозн
Цел(100*((ЦенаПроизводителя*ПроцентПоПостановлению/100)+
ЦенаУчетнаяЦенаУчетнаяБезНДС))/100
;Если цена производителя находится между ценой реестра (не включая) и учетной ценой (включая) [ЦенаРеестра<
ЦенаРеестра < ЦенаПроизводителя и ЦенаПроизводителя <= ЦенаУчетная]ЦенаУчетнаяБезНДС, то розничная цена рассчитывается по формуле:
ЦенаРасчРозн =Блок кода ЦенаРасчетнаяПоПостановлениюБезНДС =
ПроцентДоходЖНВЛСРозн
Цел(100*((ЦенаРеестра*ПроцентПоПостановлению/100)+
ЦенаУчетнаяЦенаУчетнаяБезНДС))/100
;Если учетная цена находится между ценой реестра (включая) и ценой производителя (не включая)[
ЦенаРеестра<ЦенаПроизводителя и ЦенаПроизводителя>ЦенаУчетная и ЦенаРеестра<=ЦенаУчетная < ЦенаПроизводителя], то розничная цена рассчитывается по формуле:
ЦенаРасчРозн =Блок кода ЦенаРасчетнаяПоПостановлениюБезНДС =
ПроцентДоходЖНВЛСРозн
Цел(100*((ЦенаРеестра*ПроцентПоПостановлению/100)+
ЦенаУчетнаяЦенаУчетнаяБезНДС))/100
;Если цена реестра находится между учетной ценой (не включая) и ценой производителя (не включая)[ЦенаУчетная <ЦенаРеестра< ЦенаПроизводителя], то розничная цена рассчитывается по формуле:
ЦенаРасчРознБлок кода ЦенаРеестра < ЦенаПроизводителя и ЦенаПроизводителя > ЦенаУчетнаяБезНДС и ЦенаРеестра > ЦенаУчетнаяБезНДС, то ЦенаРасчетнаяПоПостановлениюБезНДС = Цел(100*((ЦенаРеестра*
ПроцентДоходЖНВЛСРознПроцентПоПостановлению/100)+
ЦенаУчетнаяЦенаУчетнаяБезНДС))/100
;Максимальная розничная цена рассчитывается по формуле:
ЦенаМаксРозн =Блок кода МаксимальнаяЦенаСНДС =
ЦенаРасчРозн*
Цел(100 *ЦенаРасчетнаяПоПостановлениюБезНДС(1+СтавкаНДСПродажи/100))/100
;Если максимальная розничная цена больше 100 рублей, то базовая розничная цена приравнивается к ней по формуле:
Блок кода ЦенаБазРозн = Цел(ЦенаМаксРозн);
Иначе, если максимальная розничная цена меньше или равна 100 рублям, то базовая розничная цена приравнивается к ней по формуле:
Блок кода ЦенаБазРозн = ЦенаМаксРозн;
Процент розничной надбавки рассчитается по формуле:
(ЦенаБазРозн-ЦенаУчетнаяБлок кода МаксимальнаяЦенаСНДС > 100, то БазоваяЦенаСНДС = Цел(МаксимальнаяЦенаСНДС), иначе МаксимальнаяЦенаСНДС
МинимальнаяЦенаСНДС = 0.01+Цел(100*ЦенаУчетнаяБезНДС(1+СтавкаНДСПродажи/100))/100)
ПроцентНаценки = ПроцентПоПостановлению
ЦенаРасчетнаяСНДС = МаксимальнаяЦенаСНДС
ПроцентНадбавки = (БазоваяЦенаСНДС-ЦенаУчетнаяБезНДС*(1+СтавкаНДСПродажи/100))/(
ЦенаУчетнаяЦенаУчетнаяБезНДС*(1+СтавкаНДСПродажи/100))*100
Минимальная розничная цена рассчитается по формуле:
Блок кода )
ЦенаРасчетнаяМинимальнаяБезНДС = ЦенаУчетнаяБезНДС
ЦенаРасчетнаяБазоваяБезНДС = ЦенаРасчетнаяПоПостановлениюБезНДС
ЦенаРасчетнаяМаксимальнаяБезНДС = ЦенаРасчетнаяПоПостановлениюБезНДС
МинимальнаяЦенаСНДС = 0.01
+
Цел(100
*
ЦенаУчетная
*
(1
+
СтавкаНДСПродажи/100))
/
100"
Акционная цена встает при условии что, Цена акции больше 0, Цена акции меньше либо равна максимальной розничной цены и цена акции больше минимальной розничной цены[ заполняется, если ЦенаАкции > 0 И ЦенаАкции <= СтруктураРезультат.ЦенаМаксРозн МаксимальнаяЦенаСНДС И ЦенаАкции >= СтруктураРезультат.ЦенаМинРозн]
Для товаров без признака ЖНВЛП
Учетная цена с НДС рассчитывается по формуле:
Блок кода ЦенаУчетнаяСНДС = ЦенаУчетная * (1 + СтавкаНДСПродажи / 100);
Расчетная розничная цена без НДС рассчитывается по формуле:
Блок кода ЦенаРасчРознБезНДС = Окр(ЦенаУчетная*(1+ПроцентДоходПрочееРозн/100),2);
Базовая розничная цена рассчитывается по формуле:
Блок кода ЦенаБазРозн = Цел(Окр(ЦенаРасчРознБезНДС*(1+СтавкаНДСПродажи/100),2)+0.99);
Процент розничной надбавки рассчитывается по формуле:
Блок кода ПроцентРозничнойНадбавки = (ЦенаБазРозн-ЦенаУчетная*(1+СтавкаНДСПродажи/100))/(ЦенаУчетная*(1+СтавкаНДСПродажи/100))*100;
Минимальная, расчетная, максимальная цены, наценка и надбавка рассчитываются по формуле:
СтруктураРезультат.Вставить("ЦенаРасчРозницаПрочееМинимальная",ЦенаУчетная); Подсказка = Подсказка + Символы.ПС + " МинимальнаяЦенаБезНДС = ЦенаУчетнаяБезНДС"; СтруктураРезультат.Вставить("ЦенаРасчРозницаПрочее",ЦенаРасчРознБезНДС); Подсказка = Подсказка + Символы.ПС + " ЦенаРасчетнаяОтДоходностиБезНДС =Блок кода МинимальнаяЦенаСНДС из действующего документа Акция
Не ЖНВЛП
ПроцентДоходности = Процент базовый из документа установки наценок по Товарной категории
МинимальнаяЦенаБезНДС = ЦенаУчетнаяБезНДС
ЦенаРасчетнаяОтДоходностиБезНДС = Окр(ЦенаУчетнаяБезНДС*(1+ПроцентДоходности/100),2)
"; СтруктураРезультат.Вставить("ЦенаРасчРозницаПрочееМаксимальная",9999999.00); Подсказка = Подсказка + Символы.ПС + " МаксимальнаяЦенаБезНДС = 999999999"; СтруктураРезультат.Вставить("ЦенаРасчРозн",ЦенаБазРозн); Подсказка = Подсказка + Символы.ПС + " ЦенаРасчетнаяСНДС =МаксимальнаяЦенаБезНДС = 999999999
ЦенаРасчетнаяСНДС =
"; СтруктураРезультат.Вставить("ПроцентНаценкиРозница",ПроцентДоходПрочееРозн); Подсказка = Подсказка + Символы.ПС + " ПроцентНаценки = ПроцентДоходности"; СтруктураРезультат.Вставить("ПроцентРозничнойНадбавки",ПроцентРозничнойНадбавки); Подсказка = Подсказка + Символы.ПС + " ПроцентНадбавки =
Цел(Окр(ЦенаРасчетнаяОтДоходностиБезНДС*(1+СтавкаНДСПродажи/100),2)+0.99)ПроцентНаценки = ПроцентДоходности
ПроцентНадбавки = (БазоваяЦенаСНДС-ЦенаУчетнаяБезНДС*(1+СтавкаНДСПродажи/100))/(ЦенаУчетнаяБезНДС*(1+СтавкаНДСПродажи/100))*100)
"; СтруктураРезультат.Вставить("ЦенаБазРозн",ЦенаБазРозн); Подсказка = Подсказка + Символы.ПС + " БазоваяЦенаСНДС = ЦенаРасчетнаяСНДС"; СтруктураРезультат.Вставить("ЦенаМаксРозн", 9999999.00); Подсказка = Подсказка + Символы.ПС + " МаксимальнаяЦенаСНДС = 99999999";Для наркотических препаратов минимальная розничная цена рассчитывается по формуле:
0.01 + Цел(100 * ЦенаУчетная * (1 +Блок кода БазоваяЦенаСНДС = ЦенаРасчетнаяСНДС
МаксимальнаяЦенаСНДС = 99999999
НС и ПВ
МинимальнаяЦенаСНДС = 0.01+Цел(100ЦенаУчетнаяБезНДС(1+СтавкаНДСПродажи/100))
/
100
;)
Для наркотических препаратов базовая розничная цена рассчитывается по формуле:
Окр(ЦенаРасчРознБезНДСБлок кода Цена базовая с НДС для наркотики = Цена матриц Премиум, Дискаунтер, Базовая = Окр(ЦенаРасчетнаяОтДоходностиБезНДС*(1+СтавкаНДСПродажи/100),2)
Для наркотических препаратов Акционная цена встает при условии что, Цена акции больше 0, Цена акции меньше либо равна максимальной розничной цены и цена акции больше минимальной розничной цены[
Не ЖНВЛП и не НС и ПВ
МинимальнаяЦенаСНДС = МинНаценка(константа)/100*ЦенаУчетнаяСНДС + ЦенаУчетнаяСНДС
ЦенаМатрицаБазовая = Наценка по матрице Базовая для ценовой группы/100 * ЦенаУчетнаяСНДС + ЦенаУчетнаяСНДС
ЦенаМатрицаДискаунтер = Наценка по матрице Дискаунтер для ценовой группы/100 * ЦенаУчетнаяСНДС + ЦенаУчетнаяСНДС
ЦенаМатрицаПремиум = Наценка по матрице Премиум для ценовой группы/100 * ЦенаУчетнаяСНДС + ЦенаУчетнаяСНДС
Цена акции заполняется, если ЦенаАкции > 0 И ЦенаАкции <=
...
МаксимальнаяЦенаСНДС И ЦенаАкции >=
...
Если товар не является ЖНВЛП и не является наркотическим препаратом, то минимальная наценка и минимальная розничная цена рассчитывается по формуле:
Блок кода |
---|
МинНаценка = Константы.ФАРМ_МинимальныйПроцентНаценкиРозничнойЦены.Получить();
СтруктураРезультат.Вставить("ЦенаМинРозн", МинНаценка/100*ЦенаУчетнаяСНДС + ЦенаУчетнаяСНДС); |
...
МинимальнаяЦенаСНДС из действующего документа Акция
Процент торговой надбавки = ((Цена /(100+НДС продажи)/100)-ЦенаУчетная) /ЦенаПроизводителя*100