TSYSLevel3 Control

Properties   Methods   Events   Configuration Settings   Errors  

The TSYSLevel3 component is a tool used to create Level3 Corporate Purchasing Card addendum aggregates, which can then be passed to the TSYSSETTLE component and settled.

Syntax

TSYSLevel3

Remarks

This TSYSLevel3 control creates Level III addendum data, which can be sent in the settlement to achieve a better interchange rate when accepting corporate purchasing cards. The Level III addendum allows the merchant to send very detailed information about every item that was purchased by the card holder, as well as tax and shipping information.

This control creates a different addendum aggregate based on the CardType. Visa and MasterCard addendums differ slightly, and therefore a slightly different set of properties are required for each.

The following properties are valid for both ctVisa and ctMasterCard CardTypes.

• PurchaseIdentifier
• LocalTax
• NationalTax
• PurchaseOrder
• FreightAmount
• DutyAmount
• DestinationZip
• ShipFromZip
• DestinationCountry
• LineItemDescription
• LineItemDiscountAmount
• LineItemProductCode
• LineItemQuantity
• LineItemTaxAmount
• LineItemTaxRate
• LineItemTotal
• LineItemUnits

• MerchantTaxId
• CustomerTaxId
• CommodityCode
• DiscountAmount
• TaxInvoiceNumber
• OrderDate
• FreightTaxAmount
• FreightTaxRate
• LineItemCommodityCode
• LineItemUnitCost

Additional properties for the ctMasterCard CardType include:

• AlternateTaxAmount
• AlternateTaxId
• LineItemDiscountRate
• LineItemTaxIncluded
• LineItemTaxType

The following example illustrates how to build a Level III addendum for the ctVisa CardType:

  'First authorize the credit card
  TSYSECommerce1.TransactionAmount = "53"
  TSYSECommerce.Authorize()
  
  'Then, put the result into the settlement component
  TSYSSettle.DetailRecordCount = 1
  TSYSSettle.DetailAggregate[0] = TSYSECommerce.GetDetailAggregate()

  'Now build the Level3 Extension. 
  'The following properties are required for a Visa Corporate Purchasing Card:
  TSYSLevel3.CardType = ctVisa
  TSYSLevel3.LocalTax = "EXEMPT"
  TSYSLevel3.NationalTax = "0"
  TSYSLevel3.PurchaseOrder = "purchOrdNum"
  TSYSLevel3.MerchantTaxId = "merchantTaxId"
  TSYSLevel3.CustomerTaxId = "customerTaxId"
  TSYSLevel3.CommodityCode = "fake"
  TSYSLevel3.DiscountAmount = "0"
  TSYSLevel3.FreightAmount = "0"
  TSYSLevel3.DutyAmount = "0"
  TSYSLevel3.DestinationZip = "27709"
  TSYSLevel3.ShipFromZip = "27709"
  TSYSLevel3.DestinationCountry = "840"
  TSYSLevel3.TaxInvoiceNumber = "VATInvoiceRefNo"
  TSYSLevel3.OrderDate = "060526"
  TSYSLevel3.FreightTaxAmount = "0"
  TSYSLevel3.FreightTaxRate = "0"
  
  'Begin adding line items:
  TSYSLevel3.LineItemCount = 2
  
  TSYSLevel3.LineItemCommodityCode(0) = "fake"
  TSYSLevel3.LineItemDescription(0) = "hardware"
  TSYSLevel3.LineItemProductCode(0) = "productCode123"
  TSYSLevel3.LineItemQuantity(0) = 1
  TSYSLevel3.LineItemUnits(0) = ""
  TSYSLevel3.LineItemUnitCost(0) = "33"
  TSYSLevel3.LineItemTaxAmount(0) = "0"
  TSYSLevel3.LineItemTaxRate(0) = "0"
  TSYSLevel3.LineItemDiscountAmount(0) = "0"
  TSYSLevel3.LineItemTotal(0) = "33"
  
  TSYSLevel3.LineItemCommodityCode(1) = "fake"
  TSYSLevel3.LineItemDescription(1) = "hardware"
  TSYSLevel3.LineItemProductCode(1) = "productCode124"
  TSYSLevel3.LineItemQuantity(1) = 1
  TSYSLevel3.LineItemUnits(1) = ""
  TSYSLevel3.LineItemUnitCost(1) = "20"
  TSYSLevel3.LineItemTaxAmount(1) = "0"
  TSYSLevel3.LineItemTaxRate(1) = "0"
  TSYSLevel3.LineItemDiscountAmount(1) = "0"
  TSYSLevel3.LineItemTotal(1) = "20"
  
  'Finally, add the Level3 addendum to the same index in the settlement.
  TSYSSettle.DetailRecordAddendum(0) = TSYSLevel31.GetAddendum()

A Level III addendum for the ctMasterCard CardType is constructed similarly:

  'First authorize the credit card
  TSYSECommerce1.TransactionAmount = "200"
  TSYSECommerce.Authorize()
  
  'Then, put the result into the settlement component
  TSYSSettle.DetailRecordCount = 2
  TSYSSettle.DetailAggregate[1] = TSYSECommerce.GetDetailAggregate()

  'Now build the Level3 Extension. 
  TSYSLevel3.cardType = ctMasterCard
  TSYSLevel3.LocalTax = "EXEMPT"
  TSYSLevel3.NationalTax = "0"
  TSYSLevel3.PurchaseOrder = "cardholderRefId"
  TSYSLevel3.FreightAmount = "0"
  TSYSLevel3.DutyAmount = "0"
  TSYSLevel3.DestinationZip = "27709"
  TSYSLevel3.ShipFromZip = "27709"
  TSYSLevel3.DestinationCountry = "USA"
  TSYSLevel3.AlternateTaxAmount = "0"
  TSYSLevel3.AlternateTaxId = "altTaxId"
  
  'Begin adding line items:
	
  TSYSLevel3.LineItemCount = 2 
  
  TSYSLevel3.LineItemDescription(0) = "bolt"
  TSYSLevel3.LineItemProductCode(0) = "BOLT6x20"
  TSYSLevel3.LineItemQuantity(0) = 2
  TSYSLevel3.LineItemUnits(0) = "each"  
  TSYSLevel3.LineItemTaxRate(0) = "0"
  TSYSLevel3.LineItemTaxType(0) = "taxType"
  TSYSLevel3.LineItemTaxAmount(0) = "0"
  TSYSLevel3.LineItemDiscountAmount(0) = "0"
  TSYSLevel3.LineItemTaxIncluded(0) = False
  TSYSLevel3.LineItemTotal(0) = "100"
  TSYSLevel3.LineItemDiscountAmount(0) = "0"
  TSYSLevel3.LineItemDiscountRate(0) = "0"
  
  TSYSLevel3.LineItemDescription(1) = "flange nut"
  TSYSLevel3.LineItemProductCode(1) = "FLANGE6"
  TSYSLevel3.LineItemQuantity(1) = 1
  TSYSLevel3.LineItemUnits(1) = "each"  
  TSYSLevel3.LineItemTaxRate(1) = "0"
  TSYSLevel3.LineItemTaxType(1) = "taxType"
  TSYSLevel3.LineItemTaxAmount(1) = "0"
  TSYSLevel3.LineItemDiscountAmount(1) = "0"
  TSYSLevel3.LineItemTaxIncluded(1) = False
  TSYSLevel3.LineItemTotal(1) = "100"
  TSYSLevel3.LineItemDiscountAmount(1) = "0"
  TSYSLevel3.LineItemDiscountRate(1) = "0"
  
  'Finally, add the Level3 addendum to the same index in the settlement.
  TSYSSettle1.DetailAddendum(1) = TSYSLevel3.GetAddendum()
	
  

Note that while Level3 addendum data is only applicable to corporate purchasing cards, however you may send Level3 data for all Visa and Master Card cards if you wish.