[Overview][Constants][Types][Classes][Procedures and functions][Variables][Index]

Reference for unit 'KKM_Atol' (#atol_ecr)

TAtollKKM.CheckType

Тип чека

Declaration

Source position: kkm_atol.pas line 252

public property TAtollKKM.CheckType : Byte read FCheckType write SetCheckType;

Description

Данное свойство опеределяет тип чека во время выполнения операции.

Допустимые значения:

Тип чека	Расшифорвка
1	продажа
2	возврат продажи
3	аннулирование продажи
4	покупка
5	возврат покупки
6	аннулирование покупки

Example

//Пример демонстрирует регистрацию продажи товара
var
  C:Currency;
begin
  //Входим в режим регистрации
  ECRDriver.SetMode(1);
  //Тип чепка - продажи
  ECRDriver.CheckType:=1;
  //Откроем чек
  ECRDriver.OpenCheck;

  C:=0;
  //Регистрируем первую позицию
  ECRDriver.PrintLine('Мороженное');
  ECRDriver.Price:=12.1;
  C:=C + ECRDriver.Price;
  ECRDriver.Quantity:=2;
  ECRDriver.Department:=1;
  ECRDriver.Registration;

  //Регистрируем вторую позицию
  ECRDriver.PrintLine('Пироженное');
  ECRDriver.Price:=10.50;
  C:=C + ECRDriver.Price;
  ECRDriver.Quantity:=2;
  ECRDriver.Department:=1;
  ECRDriver.Registration;

  //Регистрируем 3-ю позицию
  ECRDriver.PrintLine('Мармелад');
  ECRDriver.Price:=21.5;
  C:=C + ECRDriver.Price;
  ECRDriver.Quantity:=2;
  ECRDriver.Department:=1;
  ECRDriver.Registration;

  //Укажем общую сумму покупки
  ECRDriver.Summ:=C;
  //Закроем чек
  ECRDriver.CloseCheck;
  //Вернёмся в режим выбора
  ECRDriver.ResetMode;
end