[Overview][Constants][Types][Classes][Procedures and functions][Variables][Index] |
Выход из текущего режима
Source position: kkm_atol.pas line 223
public procedure TAtollKKM.ResetMode; |
Команда предназначена для перевода ККМ из любого режима в режим 0 (ВЫБОР).
Remark: | 1.Нельзя выйти из режима Регистрация при открытом чеке. Для выхода в режим Выбор надо сначала закрыть или отменить чек. 2. Метод ResetMode необходимо также использовать для выхода из режима Перевод времени на летнее/зимнее время |
//Пример демонстрирует регистрацию продажи товара 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