Кассир:Бонусы кассиру — различия между версиями

Материал из wiki.standart-n.ru
Перейти к: навигация, поиск
(Типы бонусов)
 
(не показано 5 промежуточных версии этого же участника)
Строка 1: Строка 1:
 
=Бонусы кассиру=
 
=Бонусы кассиру=
[[Файл:Bonus kassa1.png]]
+
[[Файл:Bonus kassa1.png|300x300px]]
  
 
==Настройка ==
 
==Настройка ==
 
Добавляем через интерфейс модуля кассир желаемые бонусы
 
Добавляем через интерфейс модуля кассир желаемые бонусы
  
[[Файл:Bonus kassir2.png]]
+
[[Файл:Bonus kassir2.png|600x600px]] [[Файл:Bonus kassir3.png|600x600px]]
  
 
===Типы бонусов===
 
===Типы бонусов===
 
1. по количеству в чеке товара заданной группы
 
1. по количеству в чеке товара заданной группы
<p>
+
<code>
uses Zkassa;
+
 
 +
uses Zkassa;
 
  begin
 
  begin
 
   Chequelist.Active.FillGroups;
 
   Chequelist.Active.FillGroups;
Строка 21: Строка 22:
 
     result:=-1*Chequelist.Active.GroupQuant(group_bonus)*bonus;
 
     result:=-1*Chequelist.Active.GroupQuant(group_bonus)*bonus;
 
  end;
 
  end;
</p>
+
</code>
<p>
+
 
uses Zkassa;
+
 
begin
+
2. по сумме продажи товара заданной группы
 +
<code>
 +
uses Zkassa;
 +
begin
 
   Chequelist.Active.FillGroups;
 
   Chequelist.Active.FillGroups;
 
   //Премия 3% от продажи товаров из группы Акция
 
   //Премия 3% от продажи товаров из группы Акция
 +
  bonus = 0.03;              // размер бонуса
 +
  group_bonus = 10033;      // ИД группы товара для бонуса
 
   If (::doc_type = 3) Then
 
   If (::doc_type = 3) Then
     result:=Chequelist.Active.GroupSumm(10472)*0.03;  
+
     result:=Chequelist.Active.GroupSumm(group_bonus)*bonus;  
 
   Else
 
   Else
     result:=-1*Chequelist.Active.GroupSumm(10472)*0.03;
+
     result:=-1*Chequelist.Active.GroupSumm(group_bonus)*bonus;
end;
+
end;
</p>
+
</code>
 +
 
 +
===ТМС для отображения ===

Текущая версия на 12:07, 31 августа 2022

Бонусы кассиру

Bonus kassa1.png

Настройка

Добавляем через интерфейс модуля кассир желаемые бонусы

Bonus kassir2.png Bonus kassir3.png

Типы бонусов

1. по количеству в чеке товара заданной группы

uses Zkassa;
begin
 Chequelist.Active.FillGroups;
 //Премия 100 тнг
 bonus = 100;              // размер бонуса
 group_bonus = 10033;      // ИД группы товара для бонуса
 If (::doc_type = 3) Then
   result:=Chequelist.Active.GroupQuant(group_bonus)*bonus 
 Else
   result:=-1*Chequelist.Active.GroupQuant(group_bonus)*bonus;
end;


2. по сумме продажи товара заданной группы

uses Zkassa;
begin
 Chequelist.Active.FillGroups;
 //Премия 3% от продажи товаров из группы Акция
 bonus = 0.03;              // размер бонуса
 group_bonus = 10033;      // ИД группы товара для бонуса
 If (::doc_type = 3) Then
   result:=Chequelist.Active.GroupSumm(group_bonus)*bonus; 
 Else
   result:=-1*Chequelist.Active.GroupSumm(group_bonus)*bonus;
end;

ТМС для отображения