Настройка кассира: продажа в минус всех товаров кроме групп Алкоголь и Пиво — различия между версиями

Материал из wiki.standart-n.ru
Перейти к: навигация, поиск
м (Настраивается через ТМС)
Строка 1: Строка 1:
===Настраивается через ТМС===
 
*Обновить кассира до версии 2.2.1.44 или выше
 
*исправить тмс "перед добавлением позиции в чек"
 
*и включить параметр - "Разрешение продажи в минус"
 
<PRE>
 
  uses zkassa, chequelist, scriptres,DB;
 
  begin
 
  if (Base.FieldByName('quant').AsFloat - ChequeList.ActiveQuant < 0) and ((PartInGroup(ChequeList.ActivePID, -21) = 1)
 
          or (PartInGroup(ChequeList.ActivePID, -20) = 1)) then
 
    begin
 
      ScriptRes.Code := -1;
 
      ScriptRes.Desc := 'Запрет продажи в "минус" данной группы товаров';
 
    end;
 
  end;
 
</PRE>
 
 
 
===Запрет продажи в минус всех товаров кроме групп Алкоголь и Пиво===
 
===Запрет продажи в минус всех товаров кроме групп Алкоголь и Пиво===
 
(Настраивается через ТМС)
 
(Настраивается через ТМС)
*Обновить кассира до версии 2.2.1.44 или выше
+
*Обновить кассира до версии 2.2.1.52 или выше (44-52 неправильно работает событие "перед добавлением позиции в чек")
 
*исправить тмс "перед добавлением позиции в чек"
 
*исправить тмс "перед добавлением позиции в чек"
 
*и включить параметр - "Разрешение продажи в минус"
 
*и включить параметр - "Разрешение продажи в минус"
Строка 24: Строка 8:
 
   begin
 
   begin
 
   if (Base.FieldByName('quant').AsFloat - ChequeList.ActiveQuant < 0) and ((PartInGroup(ChequeList.ActivePID, -21) <> 1)
 
   if (Base.FieldByName('quant').AsFloat - ChequeList.ActiveQuant < 0) and ((PartInGroup(ChequeList.ActivePID, -21) <> 1)
           and (PartInGroup(ChequeList.ActivePID, -20) <> 1)) then
+
           or (PartInGroup(ChequeList.ActivePID, -20) <> 1)) then
 
     begin
 
     begin
 
       ScriptRes.Code := -1;
 
       ScriptRes.Code := -1;

Версия 18:49, 12 мая 2017

Запрет продажи в минус всех товаров кроме групп Алкоголь и Пиво

(Настраивается через ТМС)

  • Обновить кассира до версии 2.2.1.52 или выше (44-52 неправильно работает событие "перед добавлением позиции в чек")
  • исправить тмс "перед добавлением позиции в чек"
  • и включить параметр - "Разрешение продажи в минус"
  uses zkassa, chequelist, scriptres,DB;
  begin
   if (Base.FieldByName('quant').AsFloat - ChequeList.ActiveQuant < 0) and ((PartInGroup(ChequeList.ActivePID, -21) <> 1)
           or (PartInGroup(ChequeList.ActivePID, -20) <> 1)) then
     begin
       ScriptRes.Code := -1;
       ScriptRes.Desc := 'Запрет продажи в "минус" данной группы товаров';
     end;
  end;