Настройка кассира: продажа в минус всех товаров кроме групп Алкоголь и Пиво — различия между версиями
Материал из wiki.standart-n.ru
Natali (обсуждение | вклад) |
Aleksnick (обсуждение | вклад) |
||
| (не показано 7 промежуточных версии 2 участников) | |||
| Строка 1: | Строка 1: | ||
| − | === | + | ===Разрешение продажи в минус всех товаров кроме групп Алкоголь и Пиво=== |
| − | + | (Настраивается через ТМС) | |
| − | + | *Обновить кассира до версии 2.2.1.52 или выше (44-52 неправильно работает событие "перед добавлением позиции в чек") | |
| − | + | ||
| − | + | ||
| − | + | ||
| − | + | ||
| − | + | ||
| − | + | ||
| − | + | ||
| − | + | ||
| − | + | ||
| − | + | ||
| − | + | ||
| − | + | ||
| − | + | ||
| − | + | ||
| − | *Обновить кассира до версии 2.2.1. | + | |
*исправить тмс "перед добавлением позиции в чек" | *исправить тмс "перед добавлением позиции в чек" | ||
| + | *и включить параметр - "Разрешение продажи в минус" | ||
<PRE> | <PRE> | ||
uses zkassa, chequelist, scriptres,DB; | uses zkassa, chequelist, scriptres,DB; | ||
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) | ||
| − | + | or (PartInGroup(ChequeList.ActivePID, -20) <> 1)) then | |
begin | begin | ||
ScriptRes.Code := -1; | ScriptRes.Code := -1; | ||
Текущая версия на 15:38, 1 сентября 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;
