ТМС:Кассир

Материал из wiki.standart-n.ru
Перейти к: навигация, поиск

Классы

 TFR          - класс для работы с ККМ
 ChequeList   - список активных чеков
 ScriptRes    - для вывода результата работы скрипта
 Barcode      - для работы со ШК и диск. картами
 TErrFinder   - класс для поиска ошибок в кассовых документах

Прочие константы, переменные и подпрограммы

 Global - объект-глобальное хранилище элементов
 Application
 MsgBox - обертка над Application.MessageBox
 Работа с базой данных
 myFormatString - Функция форматирования строки
 SetLine - Функции для работы с дисплеем покупателя
 GetWeight - Функции для работы с весами
 Работа с HTML окнами


 SetDocsAgent		- установить контрагента активной очереди чеков
   iAgentID		- ID агента активной очереди чеков
 BarcodeText		- свойство для чтения, возвращающее значение введенного штрихкода

ПОМЕЧЕНО К УДАЛЕНИЮ, РЕКОМЕНДУЕТСЯ ВМЕСТО ЭТОГО ИСПОЛЬЗОВАТЬ КЛАСС Barcode

   Пример: ShowMessage('Введен штрихкод: ' + BarcodeText);
 DoReport		- работа с отчетами (просмотр/редактирование/печать)
   iReportID		- ID отчета
   sParam		- доп.параметры отчета (макроподстановка)
   ReportMode		- тип вывода отчета: rmView - просмотр, rmDesign - редактирование, rmPrint - печать
   sPrinter		- имя принтера для печати ( - принтер по умолчанию)
   Пример: DoReport(12, 'compname=NICKY', rmPrint, '\\buhi\HP LaserJet5');
 ManualDiscount	- вызов формы выбора скидки/суммовой скидки
 IsRegistered		- св-во, указывающее на наличие регистрации базы автоматизации
 SendKey		- посылает нажатие клавиши
   iKeyCode		- код клавиши
   bCtrl		- состояние клавиши Ctrl (True - нажата)
   bAlt		- аналогично Alt
   bShift		- аналогично Shift
   Пример: SendKey(VK_F5, False, True, False); //посылает нажатие сочетания Alt-F5
 PayByCard		- оплата банковской картой, возвращаемое значение: 0-ошибка, 1-успешно
   fSumm		- сумма оплаты
   Пример: PayByCard(10.50); //провести списание по карте суммы 10.50
 GetTrans		- получить транзакцию для работы в ее рамках (нельзя стартовать, закрывать и откатывать такую транзакцию!)

ВНИМАНИЕ! Транзакции типа TpFIBTransaction, т.е. из состава компонентов FibPlus, а не IBX! Для работы требуется подключить модуть FIBPlus

   iTransType		- тип запрашиваемой транзакции
   Поддерживаемые типы транзакций:
   0 (TRANS_CLOSECHEQUE) - транзакция при закрытии чека
 Пример (после печати чека):
   uses zkassa, fibplus, classes, chequelist;
   var fiq: tpfibquery;
   begin                    
     fiq := tpfibquery.create(nil);
     fiq.Transaction := GetTrans(0);
     fiq.SQL.Text := 'update docs set device_num = трали-вали where id = ' + IntToStr(chequelist.Active.ID);
     fiq.ExecQuery;
     fiq.Free;
   end;
 OpenDefByID		- открыть отложенный чек по ID документа
   iDocID		- ID документа
 Add2Cheque		- добавить позицию в чек по PartID 
   iPartID		- ID позиции
   fQuant		- добавляемое количество
 Пример:
   uses zkassa;
   var i: integer;
   begin
     for i := 0 to 10 do 
       try
         Add2Cheque(127 + i, i + 1);
       except
       end;
   end;