TRKCardInfo = class(TPersistent)

published

property CardCode : string read fCardCode write fCardCode;

property RKInterface : TRK7Device read fRKInterface write fRKInterface;

property InterfaceType : integer read fInterfaceType write fInterfaceType;

property ProtocolVersion: integer read fProtocolVersion write fProtocolVersion;

property Dish : tItemCode read fDish write fDish;
A dish code

property Modifier : tItemCode read fModifier write fModifier;
A modifier code

property Discount : tItemCode read fDiscount write fDiscount;
A discount code

property Bonus : tItemCode read fBonus write fBonus;
A bonus code

property Currency : tItemCode read fCurrency write fCurrency;
A currency code

property Employee : tItemCode read fEmployee write fEmployee;
An employee code

property Consumator : tItemCode read fConsumator write fConsumator;
A consumator code

property FunctionKey : tItemCode read fFunctionKey write fFunctionKey;
A function key code

property ObjectGroup : tItemCode read fObjectGroup write fObjectGroup;
A code of the object group to select

property Holder : ShortString read fHolder write fHolder
A cardholder

property ServerError : tInterfaceError read fServerError write fServerError;
If not 0 - the reason for the inoperability of the card

property ServerErrorText: property ServerErrorText: ShortString read fServerErrorText write fServerErrorText;
The reason for the inoperability of the card, when ServerError <> 0

property NeedMan : Byte read fNeedMan write fNeedMan;
1 — to apply with manager confirmation, 0 – without it

property MaxSum : int64 read fMaxSum write fMaxSum;
The amount available for withdrawal Now (including credit for debit cards), 0 if you can't pay

property Amount : int64 read fAmount write fAmount;
The remaining balance (excluding credit for debit cards), independently of the possibility to apply now

property MaxDisc : int64 read fMaxDisc write fMaxDisc;
The maximum discount amount (positive), 0 — unlimited

property MaxReserved1 : int64 read fMaxReserved1 write fMaxReserved1;

property MaxReserved2 : int64 read fMaxReserved2 write fMaxReserved2;

property Sex : Byte read fSex write fSex;
0-m 1-f

property ExpDate : integer read fExpDate write fExpDate;

property AccountIdent : int64 read fAccountIdent write fAccountIdent;
An account number, including for the hotel

property TransactionID : Integer read fTransactionID write fTransactionID;

property Options : tInterfaceEventOptions read fOptions write fOptions;

property CardAddInfo : ShortString read fCardAddInfo write fCardAddInfo;
Card additional information

property UnpayCode : tItemCode read fUnpayCode write fUnpayCode;
A defaulter code

property MaxSum2 : int64 read fMaxSum2 write fMaxSum2;
The amount available for withdrawal Now on the second sub-account

property MaxSum3 : int64 read fMaxSum3 write fMaxSum3;

property MaxSum4 : int64 read fMaxSum4 write fMaxSum4;

property MaxSum5 : int64 read fMaxSum5 write fMaxSum5;

property MaxSum6 : int64 read fMaxSum6 write fMaxSum6;

property MaxSum7 : int64 read fMaxSum7 write fMaxSum7;

property MaxSum8 : int64 read fMaxSum8 write fMaxSum8;

SYS (TSYSNameSpace = class(TCommonScriptsNamespace))

  • No labels