Advertisement
Guest User

Untitled

a guest
Feb 25th, 2020
94
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pascal 3.60 KB | None | 0 0
  1.   TStBankSubPaymentInfo = packed record
  2.     &type: UInt16;
  3.     amount: UInt32;
  4.     name: string;
  5.   end;
  6.   TStBankSubPaymentInfos = Array of TStBankSubPaymentInfo;
  7.  
  8.   TStCardInfo = packed record
  9.     inputType: Byte;
  10.     pan: string;
  11.     holderName: string;
  12.     &type: string;
  13.   end;
  14.  
  15.   TStPaymentErrMessage = packed record
  16.     ErrorCode: string;
  17.     ErrorMsg: string;
  18.     AppErrorCode: string;
  19.     AppErrorMsg: string;
  20.   end;
  21.  
  22.   TStBankPaymentInfo = packed record
  23.     batchNo: UInt32;
  24.     stan: UInt32;
  25.     balance: UInt32;
  26.     bankBkmId: UInt16;
  27.     numberOfdiscount: Byte;
  28.     numberOfbonus: Byte;
  29.     authorizeCode: string;
  30.     transFlag: string;
  31.     terminalId: string;
  32.     rrn: string;
  33.     merchantId: string;
  34.     bankName: string;
  35.     numberOfInstallments: Byte;
  36.     numberOfsubPayment: Byte;
  37.     numberOferrorMessage: Byte;
  38.     LoyaltyCustomerId: string;
  39.     PaymentProvisionId: string;
  40.     LoyaltyServiceId: UInt16;
  41.     BankPaymentUniqueId: string;
  42.     stBankSubPaymentInfo: TStBankSubPaymentInfos;
  43.     stCard: TStCardInfo;
  44.     stPaymentErrMessage: TStPaymentErrMessage;
  45.   end;
  46.  
  47.   TStPayment = packed record
  48.     flags: Byte;
  49.     dateOfPayment: UInt32;
  50.     typeOfPayment: UInt32;
  51.     subtypeOfPayment: Byte;
  52.     orgAmount: UInt32;
  53.     orgAmountCurrencyCode: UInt16;
  54.     payAmount: UInt32;
  55.     payAmountCurrencyCode: UInt16;
  56.     cashBackAmountInTL: UInt32;
  57.     cashBackAmountInDoviz: UInt32;
  58.     paymentName: string;
  59.     paymentInfo: string;
  60.     stBankPayment: TStBankPaymentInfo;
  61.   end;
  62.   TStPayments = Array of TStPayment;
  63.  
  64.   TStVATDetail = packed record
  65.     u32VAT: Integer;
  66.     u32Amount: Integer;
  67.     u16VATPercentage: UInt16;
  68.   end;
  69.   TStVATDetails = Array of TStVATDetail;
  70.  
  71.   TStPrinterDataForOneLine = packed record
  72.     Flag: UInt32;
  73.     lineLen: Byte;
  74.     line: string;
  75.   end;
  76.   TStPrinterDataLines = Array of TStPrinterDataForOneLine;
  77.  
  78.   TStLoyaltyServiceInfo = packed record
  79.     name: Array[0..23] of Byte;
  80.     CustomerId: string;
  81.     ServiceId: UInt16;
  82.     u16AppId: UInt16;
  83.     CustomerIdType: UInt16;
  84.     TotalDiscountAmount: UInt32;
  85.   end;
  86.   TStLoyaltyServiceInfos = Array of TStLoyaltyServiceInfo;
  87.  
  88.   TStTicket = packed record
  89.     TransactionFlags: UInt32;
  90.     OptionFlags: UInt32;
  91.     ZNo: UInt16;
  92.     FNo: UInt16;
  93.     EJNo: UInt16;
  94.     TotalReceiptAmount: UInt32;
  95.     TotalReceiptTax: UInt32;
  96.     TotalReceiptDiscount: UInt32;
  97.     TotalReceiptIncrement: UInt32;
  98.     CashBackAmount: UInt32;
  99.     TotalReceiptItemCancel: UInt32;
  100.     TotalReceiptPayment: UInt32;
  101.     TotalReceiptReversedPayment: UInt32;
  102.     KasaAvansAmount: UInt32;
  103.     KasaPaymentAmount: UInt32;
  104.     invoiceAmount: UInt32;
  105.     invoiceAmountCurrency: UInt32;
  106.     KatkiPayiAmount: UInt32;
  107.     TaxFreeRefund: UInt32;
  108.     TaxFreeCalculated: UInt32;
  109.     szTicketDate: string;
  110.     szTicketTime: string;
  111.     SourceVasAppID: UInt16;
  112.     PaymentVasAppID: UInt16;
  113.     BankVasAppID: UInt16;
  114.     ticketType: Byte;
  115.     totalNumberOfItems: UInt16;
  116.     numberOfItemsInThis: UInt16;
  117.     totalNumberOfPayments: UInt16;
  118.     numberOfPaymentsInThis: UInt16;
  119.     numberOfLoyaltyInThis: UInt16;
  120.     TckNo: string;
  121.     invoiceNo: string;
  122.     invoiceDate: UInt32;
  123.     invoiceType: Byte;
  124.     totalNumberOfPrinterLines: Integer;
  125.     numberOfPrinterLinesInThis: Integer;
  126.     uniqueId: string;
  127.     rawData: string;
  128.     rawDataLen: UInt16;
  129.     SaleInfo: TStSaleinfos; // 512
  130.     stPayment: TStPayments; // 24
  131.     stTaxDetails: TStVATDetails; // 8
  132.     stPrinterCopy: TStPrinterDataLines; // 1024
  133.     UserData: string;
  134.     stLoyaltyService: TStLoyaltyServiceInfos;  // [0..MAX_LOYALITY_TRANS_NUMBER]
  135.   end;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement