TRKCardInfo = class(TPersistent)
Информация о платежной карте. Свойства:
| Название | Тип | Описание |
|---|---|---|
| property CardCode : string read fCardCode write fCardCode; | string, RW | Номер карты |
| property RKInterface : TRK7Device read fRKInterface write fRKInterface; | RW | Интерфейс в r_keeper |
| property InterfaceType : integer read fInterfaceType write fInterfaceType; | integer, RW | Тип интерфейса |
| property ProtocolVersion: integer read fProtocolVersion write fProtocolVersion; | integer, RW | Версия протокола |
| property Dish:tItemCode read fDish write fDish; | RW | Код блюда |
| property Modifier: tItemCode read fModifier write fModifier; | RW | Код модификатора |
| property Discount: tItemCode read fDiscount write fDiscount; | RW | Код скидки |
| property Bonus : tItemCode read fBonus write fBonus; | RW | Код бонуса |
| property Currency : tItemCode read fCurrency write fCurrency; | RW | Код валюты |
| property Employee : tItemCode read fEmployee write fEmployee; | RW | Код сотрудника |
| property Consumator: tItemCode read fConsumator write fConsumator; | RW | Код консуматора |
| property FunctionKey : tItemCode read fFunctionKey write fFunctionKey; | RW | Код функциональной клавиши |
| property ObjectGroup : tItemCode read fObjectGroup write fObjectGroup; | RW | Код группы объектов, для выбора |
| property Holder: ShortString read fHolder write fHolder; | RW | Держатель карты |
| property ServerError : tInterfaceError read fServerError write fServerError; | RW | Если не 0 — причина неработоспособности карты |
| property ServerErrorText: ShortString read fServerErrorText write fServerErrorText; | RW | Причина неработоспособности карты, при ServerError<>0 |
| property NeedMan: Byte read fNeedMan write fNeedMan; | RW | Подтверждение менеджера:
|
| property MaxSum : int64 read fMaxSum write fMaxSum; | RW | Сумма, доступная к снятию на данный момент с учетом кредита для дебетовых карт.
|
| property Amount : int64 read fAmount write fAmount; | RW | Остаток без учета кредита для для дебетовых карт. На возможность "применить сейчас" не смотрит. |
| property MaxDisc : int64 read fMaxDisc write fMaxDisc; | RW | Предельный размер скидки, положительная величина.
|
| property MaxReserved1: int64 read fMaxReserved1 write fMaxReserved1; | RW | |
| property MaxReserved2: int64 read fMaxReserved2 write fMaxReserved2; | RW | |
| property Sex : Byte read fSex write fSex; | RW | Пол:
|
| property ExpDate : integer read fExpDate write fExpDate; | RW | Срок действия карты |
| property AccountIdent : int64 read fAccountIdent write fAccountIdent; | RW | Номер счета, в том числе для гостиницы |
| property TransactionID: Integer read fTransactionID write fTransactionID; | RW | Идентификатор транзакции |
| property Options : tInterfaceEventOptions read fOptions write fOptions; | RW | |
| property CardAddInfo : ShortString read fCardAddInfo write fCardAddInfo; | RW | Дополнительная информация о карте |
| property UnpayCode : tItemCode read fUnpayCode write fUnpayCode; | RW | Код неплательщика |
| property MaxSum2 : int64 read fMaxSum2 write fMaxSum2; | RW | Сумма, доступная к снятию на данный момент по второму субсчету |
| property MaxSum3 : int64 read fMaxSum3 write fMaxSum3; | RW | Сумма, доступная к снятию на данный момент по третьему субсчету |
| property MaxSum4 : int64 read fMaxSum4 write fMaxSum4; | RW | Сумма, доступная к снятию на данный момент по четвертому субсчету |
| property MaxSum5 : int64 read fMaxSum5 write fMaxSum5; | RW | Сумма, доступная к снятию на данный момент по пятому субсчету |
| property MaxSum6 : int64 read fMaxSum6 write fMaxSum6; | RW | Сумма, доступная к снятию на данный момент по шестому субсчету |
| property MaxSum7 : int64 read fMaxSum7 write fMaxSum7; | RW | Сумма, доступная к снятию на данный момент по седьмому субсчету |
| property MaxSum8 : int64 read fMaxSum8 write fMaxSum8; | RW | Сумма, доступная к снятию на данный момент по восьмому субсчету |
SYS (TSYSNameSpace = class(TCommonScriptsNamespace))