Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- // ************************************************************************ //
- // The types declared in this file were generated from data read from the
- // WSDL File described below:
- // WSDL : https://api.authorize.net/soap/v1/Service.asmx?WSDL
- // >Import : https://api.authorize.net/soap/v1/Service.asmx?WSDL>0
- // Encoding : utf-8
- // Version : 1.0
- // (1/20/2011 10:46:02 AM - - $Rev: 19514 $)
- // ************************************************************************ //
- unit AuthService;
- interface
- uses InvokeRegistry, SOAPHTTPClient, Types, XSBuiltIns;
- const
- IS_OPTN = $0001;
- IS_UNBD = $0002;
- IS_NLBL = $0004;
- IS_REF = $0080;
- type
- // ************************************************************************ //
- // The following types, referred to in the WSDL document are not being represented
- // in this file. They are either aliases[@] of other types represented or were referred
- // to but never[!] declared in the document. The types from the latter category
- // typically map to predefined/known XML or Borland types; however, they could also
- // indicate incorrect WSDL documents that failed to declare or import a schema type.
- // ************************************************************************ //
- // !:string - "http://www.w3.org/2001/XMLSchema"[Gbl]
- // !:decimal - "http://www.w3.org/2001/XMLSchema"[Gbl]
- // !:date - "http://www.w3.org/2001/XMLSchema"[Gbl]
- // !:short - "http://www.w3.org/2001/XMLSchema"[Gbl]
- // !:gYearMonth - "http://www.w3.org/2001/XMLSchema"[Gbl]
- // !:long - "http://www.w3.org/2001/XMLSchema"[Gbl]
- // !:boolean - "http://www.w3.org/2001/XMLSchema"[Gbl]
- // !:dateTime - "http://www.w3.org/2001/XMLSchema"[Gbl]
- // !:int - "http://www.w3.org/2001/XMLSchema"[Gbl]
- ANetApiResponseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- MessagesTypeMessage = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- MerchantAuthenticationType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- ARBSubscriptionType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- PaymentType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- OrderType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- NameAndAddressType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- PaymentScheduleType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- PaymentScheduleTypeInterval = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- CreditCardSimpleType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- CreditCardType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- BankAccountBaseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- BankAccountType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- CustomerType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- DriversLicenseBaseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- DriversLicenseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- ARBCreateSubscriptionResponseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- ARBUpdateSubscriptionResponseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- ARBCancelSubscriptionResponseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- ARBGetSubscriptionStatusResponseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- CustomerProfileBaseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- CustomerProfileType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- CustomerPaymentProfileBaseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- CustomerPaymentProfileType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- CustomerAddressType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- CreateCustomerProfileResponseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- CreateCustomerPaymentProfileResponseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- CreateCustomerShippingAddressResponseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- GetCustomerProfileResponseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- CustomerProfileExType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- CustomerProfileMaskedType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- CustomerPaymentProfileMaskedType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- PaymentMaskedType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- DriversLicenseMaskedType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- CreditCardMaskedType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- BankAccountMaskedType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- CustomerAddressExType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- GetCustomerPaymentProfileResponseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- GetCustomerShippingAddressResponseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- UpdateCustomerProfileResponseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- CustomerPaymentProfileExType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- UpdateCustomerPaymentProfileResponseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- UpdateCustomerShippingAddressResponseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- DeleteCustomerProfileResponseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- DeleteCustomerPaymentProfileResponseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- DeleteCustomerShippingAddressResponseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- ProfileTransactionType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- ProfileTransVoidType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- OrderExType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- ExtendedAmountType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- LineItemType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- CreateCustomerProfileTransactionResponseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- ValidateCustomerPaymentProfileResponseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- GetCustomerProfileIdsResponseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- UpdateSplitTenderGroupResponseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- GetTransactionDetailsResponseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- CustomerDataType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- FDSFilterType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- BatchDetailsType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- BatchStatisticType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- GetSettledBatchListRequestType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- GetSettledBatchListResponseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- GetTransactionListRequestType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- GetTransactionListResponseType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- TransactionSummaryType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- FDSFilter = class; { "https://api.authorize.net/soap/v1/"[Alias] }
- statistic = class; { "https://api.authorize.net/soap/v1/"[Alias] }
- batch = class; { "https://api.authorize.net/soap/v1/"[Alias] }
- transaction = class; { "https://api.authorize.net/soap/v1/"[Alias] }
- TransactionDetailsType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- ProfileTransAmountType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- ProfileTransOrderType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- ProfileTransAuthOnlyType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- ProfileTransAuthCaptureType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- ProfileTransCaptureOnlyType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- ProfileTransRefundType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- ProfileTransPriorAuthCaptureType = class; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- {$SCOPEDENUMS ON}
- { "https://api.authorize.net/soap/v1/"[GblSmpl] }
- MessageTypeEnum = (Ok, Error);
- { "https://api.authorize.net/soap/v1/"[GblSmpl] }
- ARBSubscriptionUnitEnum = (days, months);
- { "https://api.authorize.net/soap/v1/"[GblSmpl] }
- BankAccountTypeEnum = (checking, savings, businessChecking);
- { "https://api.authorize.net/soap/v1/"[GblSmpl] }
- EcheckTypeEnum = (PPD, WEB, CCD, TEL);
- { "https://api.authorize.net/soap/v1/"[GblSmpl] }
- CustomerTypeEnum = (individual, business);
- { "https://api.authorize.net/soap/v1/"[GblSmpl] }
- ARBSubscriptionStatusEnum = (active, expired, suspended, canceled, terminated);
- { "https://api.authorize.net/soap/v1/"[GblSmpl] }
- ValidationModeEnum = (none, testMode, liveMode, oldLiveMode);
- { "https://api.authorize.net/soap/v1/"[GblSmpl] }
- SplitTenderStatusEnum = (completed, held, voided);
- {$SCOPEDENUMS OFF}
- ArrayOfMessagesTypeMessage = array of MessagesTypeMessage; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- // ************************************************************************ //
- // XML : ANetApiResponseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- ANetApiResponseType = class(TRemotable)
- private
- FresultCode: MessageTypeEnum;
- Fmessages: ArrayOfMessagesTypeMessage;
- Fmessages_Specified: boolean;
- procedure Setmessages(Index: Integer; const AArrayOfMessagesTypeMessage: ArrayOfMessagesTypeMessage);
- function messages_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property resultCode: MessageTypeEnum read FresultCode write FresultCode;
- property messages: ArrayOfMessagesTypeMessage Index (IS_OPTN) read Fmessages write Setmessages stored messages_Specified;
- end;
- // ************************************************************************ //
- // XML : MessagesTypeMessage, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- MessagesTypeMessage = class(TRemotable)
- private
- Fcode: string;
- Fcode_Specified: boolean;
- Ftext: string;
- Ftext_Specified: boolean;
- procedure Setcode(Index: Integer; const Astring: string);
- function code_Specified(Index: Integer): boolean;
- procedure Settext(Index: Integer; const Astring: string);
- function text_Specified(Index: Integer): boolean;
- published
- property code: string Index (IS_OPTN) read Fcode write Setcode stored code_Specified;
- property text: string Index (IS_OPTN) read Ftext write Settext stored text_Specified;
- end;
- // ************************************************************************ //
- // XML : MerchantAuthenticationType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- MerchantAuthenticationType = class(TRemotable)
- private
- Fname_: string;
- Fname__Specified: boolean;
- FtransactionKey: string;
- FtransactionKey_Specified: boolean;
- procedure Setname_(Index: Integer; const Astring: string);
- function name__Specified(Index: Integer): boolean;
- procedure SettransactionKey(Index: Integer; const Astring: string);
- function transactionKey_Specified(Index: Integer): boolean;
- published
- property name_: string Index (IS_OPTN) read Fname_ write Setname_ stored name__Specified;
- property transactionKey: string Index (IS_OPTN) read FtransactionKey write SettransactionKey stored transactionKey_Specified;
- end;
- // ************************************************************************ //
- // XML : ARBSubscriptionType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- ARBSubscriptionType = class(TRemotable)
- private
- Fname_: string;
- Fname__Specified: boolean;
- FpaymentSchedule: PaymentScheduleType;
- FpaymentSchedule_Specified: boolean;
- Famount: TXSDecimal;
- Famount_Specified: boolean;
- FtrialAmount: TXSDecimal;
- FtrialAmount_Specified: boolean;
- Fpayment: PaymentType;
- Fpayment_Specified: boolean;
- Forder: OrderType;
- Forder_Specified: boolean;
- Fcustomer: CustomerType;
- Fcustomer_Specified: boolean;
- FbillTo: NameAndAddressType;
- FbillTo_Specified: boolean;
- FshipTo: NameAndAddressType;
- FshipTo_Specified: boolean;
- procedure Setname_(Index: Integer; const Astring: string);
- function name__Specified(Index: Integer): boolean;
- procedure SetpaymentSchedule(Index: Integer; const APaymentScheduleType: PaymentScheduleType);
- function paymentSchedule_Specified(Index: Integer): boolean;
- procedure Setamount(Index: Integer; const ATXSDecimal: TXSDecimal);
- function amount_Specified(Index: Integer): boolean;
- procedure SettrialAmount(Index: Integer; const ATXSDecimal: TXSDecimal);
- function trialAmount_Specified(Index: Integer): boolean;
- procedure Setpayment(Index: Integer; const APaymentType: PaymentType);
- function payment_Specified(Index: Integer): boolean;
- procedure Setorder(Index: Integer; const AOrderType: OrderType);
- function order_Specified(Index: Integer): boolean;
- procedure Setcustomer(Index: Integer; const ACustomerType: CustomerType);
- function customer_Specified(Index: Integer): boolean;
- procedure SetbillTo(Index: Integer; const ANameAndAddressType: NameAndAddressType);
- function billTo_Specified(Index: Integer): boolean;
- procedure SetshipTo(Index: Integer; const ANameAndAddressType: NameAndAddressType);
- function shipTo_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property name_: string Index (IS_OPTN) read Fname_ write Setname_ stored name__Specified;
- property paymentSchedule: PaymentScheduleType Index (IS_OPTN) read FpaymentSchedule write SetpaymentSchedule stored paymentSchedule_Specified;
- property amount: TXSDecimal Index (IS_OPTN) read Famount write Setamount stored amount_Specified;
- property trialAmount: TXSDecimal Index (IS_OPTN) read FtrialAmount write SettrialAmount stored trialAmount_Specified;
- property payment: PaymentType Index (IS_OPTN) read Fpayment write Setpayment stored payment_Specified;
- property order: OrderType Index (IS_OPTN) read Forder write Setorder stored order_Specified;
- property customer: CustomerType Index (IS_OPTN) read Fcustomer write Setcustomer stored customer_Specified;
- property billTo: NameAndAddressType Index (IS_OPTN) read FbillTo write SetbillTo stored billTo_Specified;
- property shipTo: NameAndAddressType Index (IS_OPTN) read FshipTo write SetshipTo stored shipTo_Specified;
- end;
- // ************************************************************************ //
- // XML : PaymentType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- PaymentType = class(TRemotable)
- private
- FcreditCard: CreditCardType;
- FcreditCard_Specified: boolean;
- FbankAccount: BankAccountType;
- FbankAccount_Specified: boolean;
- procedure SetcreditCard(Index: Integer; const ACreditCardType: CreditCardType);
- function creditCard_Specified(Index: Integer): boolean;
- procedure SetbankAccount(Index: Integer; const ABankAccountType: BankAccountType);
- function bankAccount_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property creditCard: CreditCardType Index (IS_OPTN) read FcreditCard write SetcreditCard stored creditCard_Specified;
- property bankAccount: BankAccountType Index (IS_OPTN) read FbankAccount write SetbankAccount stored bankAccount_Specified;
- end;
- // ************************************************************************ //
- // XML : OrderType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- OrderType = class(TRemotable)
- private
- FinvoiceNumber: string;
- FinvoiceNumber_Specified: boolean;
- Fdescription: string;
- Fdescription_Specified: boolean;
- procedure SetinvoiceNumber(Index: Integer; const Astring: string);
- function invoiceNumber_Specified(Index: Integer): boolean;
- procedure Setdescription(Index: Integer; const Astring: string);
- function description_Specified(Index: Integer): boolean;
- published
- property invoiceNumber: string Index (IS_OPTN) read FinvoiceNumber write SetinvoiceNumber stored invoiceNumber_Specified;
- property description: string Index (IS_OPTN) read Fdescription write Setdescription stored description_Specified;
- end;
- // ************************************************************************ //
- // XML : NameAndAddressType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- NameAndAddressType = class(TRemotable)
- private
- FfirstName: string;
- FfirstName_Specified: boolean;
- FlastName: string;
- FlastName_Specified: boolean;
- Fcompany: string;
- Fcompany_Specified: boolean;
- Faddress: string;
- Faddress_Specified: boolean;
- Fcity: string;
- Fcity_Specified: boolean;
- Fstate: string;
- Fstate_Specified: boolean;
- Fzip: string;
- Fzip_Specified: boolean;
- Fcountry: string;
- Fcountry_Specified: boolean;
- procedure SetfirstName(Index: Integer; const Astring: string);
- function firstName_Specified(Index: Integer): boolean;
- procedure SetlastName(Index: Integer; const Astring: string);
- function lastName_Specified(Index: Integer): boolean;
- procedure Setcompany(Index: Integer; const Astring: string);
- function company_Specified(Index: Integer): boolean;
- procedure Setaddress(Index: Integer; const Astring: string);
- function address_Specified(Index: Integer): boolean;
- procedure Setcity(Index: Integer; const Astring: string);
- function city_Specified(Index: Integer): boolean;
- procedure Setstate(Index: Integer; const Astring: string);
- function state_Specified(Index: Integer): boolean;
- procedure Setzip(Index: Integer; const Astring: string);
- function zip_Specified(Index: Integer): boolean;
- procedure Setcountry(Index: Integer; const Astring: string);
- function country_Specified(Index: Integer): boolean;
- published
- property firstName: string Index (IS_OPTN) read FfirstName write SetfirstName stored firstName_Specified;
- property lastName: string Index (IS_OPTN) read FlastName write SetlastName stored lastName_Specified;
- property company: string Index (IS_OPTN) read Fcompany write Setcompany stored company_Specified;
- property address: string Index (IS_OPTN) read Faddress write Setaddress stored address_Specified;
- property city: string Index (IS_OPTN) read Fcity write Setcity stored city_Specified;
- property state: string Index (IS_OPTN) read Fstate write Setstate stored state_Specified;
- property zip: string Index (IS_OPTN) read Fzip write Setzip stored zip_Specified;
- property country: string Index (IS_OPTN) read Fcountry write Setcountry stored country_Specified;
- end;
- // ************************************************************************ //
- // XML : PaymentScheduleType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- PaymentScheduleType = class(TRemotable)
- private
- Finterval: PaymentScheduleTypeInterval;
- Finterval_Specified: boolean;
- FstartDate: TXSDate;
- FstartDate_Specified: boolean;
- FtotalOccurrences: SmallInt;
- FtotalOccurrences_Specified: boolean;
- FtrialOccurrences: SmallInt;
- FtrialOccurrences_Specified: boolean;
- procedure Setinterval(Index: Integer; const APaymentScheduleTypeInterval: PaymentScheduleTypeInterval);
- function interval_Specified(Index: Integer): boolean;
- procedure SetstartDate(Index: Integer; const ATXSDate: TXSDate);
- function startDate_Specified(Index: Integer): boolean;
- procedure SettotalOccurrences(Index: Integer; const ASmallInt: SmallInt);
- function totalOccurrences_Specified(Index: Integer): boolean;
- procedure SettrialOccurrences(Index: Integer; const ASmallInt: SmallInt);
- function trialOccurrences_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property interval: PaymentScheduleTypeInterval Index (IS_OPTN) read Finterval write Setinterval stored interval_Specified;
- property startDate: TXSDate Index (IS_OPTN) read FstartDate write SetstartDate stored startDate_Specified;
- property totalOccurrences: SmallInt Index (IS_OPTN) read FtotalOccurrences write SettotalOccurrences stored totalOccurrences_Specified;
- property trialOccurrences: SmallInt Index (IS_OPTN) read FtrialOccurrences write SettrialOccurrences stored trialOccurrences_Specified;
- end;
- // ************************************************************************ //
- // XML : PaymentScheduleTypeInterval, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- PaymentScheduleTypeInterval = class(TRemotable)
- private
- Flength: SmallInt;
- Funit_: ARBSubscriptionUnitEnum;
- published
- property length: SmallInt read Flength write Flength;
- property unit_: ARBSubscriptionUnitEnum read Funit_ write Funit_;
- end;
- // ************************************************************************ //
- // XML : CreditCardSimpleType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- CreditCardSimpleType = class(TRemotable)
- private
- FcardNumber: string;
- FcardNumber_Specified: boolean;
- FexpirationDate: string;
- FexpirationDate_Specified: boolean;
- procedure SetcardNumber(Index: Integer; const Astring: string);
- function cardNumber_Specified(Index: Integer): boolean;
- procedure SetexpirationDate(Index: Integer; const Astring: string);
- function expirationDate_Specified(Index: Integer): boolean;
- published
- property cardNumber: string Index (IS_OPTN) read FcardNumber write SetcardNumber stored cardNumber_Specified;
- property expirationDate: string Index (IS_OPTN) read FexpirationDate write SetexpirationDate stored expirationDate_Specified;
- end;
- // ************************************************************************ //
- // XML : CreditCardType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- CreditCardType = class(CreditCardSimpleType)
- private
- FcardCode: string;
- FcardCode_Specified: boolean;
- procedure SetcardCode(Index: Integer; const Astring: string);
- function cardCode_Specified(Index: Integer): boolean;
- published
- property cardCode: string Index (IS_OPTN) read FcardCode write SetcardCode stored cardCode_Specified;
- end;
- // ************************************************************************ //
- // XML : BankAccountBaseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- BankAccountBaseType = class(TRemotable)
- private
- FaccountType: BankAccountTypeEnum;
- FaccountType_Specified: boolean;
- FnameOnAccount: string;
- FnameOnAccount_Specified: boolean;
- FecheckType: EcheckTypeEnum;
- FecheckType_Specified: boolean;
- FbankName: string;
- FbankName_Specified: boolean;
- procedure SetaccountType(Index: Integer; const ABankAccountTypeEnum: BankAccountTypeEnum);
- function accountType_Specified(Index: Integer): boolean;
- procedure SetnameOnAccount(Index: Integer; const Astring: string);
- function nameOnAccount_Specified(Index: Integer): boolean;
- procedure SetecheckType(Index: Integer; const AEcheckTypeEnum: EcheckTypeEnum);
- function echeckType_Specified(Index: Integer): boolean;
- procedure SetbankName(Index: Integer; const Astring: string);
- function bankName_Specified(Index: Integer): boolean;
- published
- property accountType: BankAccountTypeEnum Index (IS_OPTN) read FaccountType write SetaccountType stored accountType_Specified;
- property nameOnAccount: string Index (IS_OPTN) read FnameOnAccount write SetnameOnAccount stored nameOnAccount_Specified;
- property echeckType: EcheckTypeEnum Index (IS_OPTN) read FecheckType write SetecheckType stored echeckType_Specified;
- property bankName: string Index (IS_OPTN) read FbankName write SetbankName stored bankName_Specified;
- end;
- // ************************************************************************ //
- // XML : BankAccountType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- BankAccountType = class(BankAccountBaseType)
- private
- FroutingNumber: string;
- FroutingNumber_Specified: boolean;
- FaccountNumber: string;
- FaccountNumber_Specified: boolean;
- procedure SetroutingNumber(Index: Integer; const Astring: string);
- function routingNumber_Specified(Index: Integer): boolean;
- procedure SetaccountNumber(Index: Integer; const Astring: string);
- function accountNumber_Specified(Index: Integer): boolean;
- published
- property routingNumber: string Index (IS_OPTN) read FroutingNumber write SetroutingNumber stored routingNumber_Specified;
- property accountNumber: string Index (IS_OPTN) read FaccountNumber write SetaccountNumber stored accountNumber_Specified;
- end;
- // ************************************************************************ //
- // XML : CustomerType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- CustomerType = class(TRemotable)
- private
- Ftype_: CustomerTypeEnum;
- Ftype__Specified: boolean;
- Fid: string;
- Fid_Specified: boolean;
- Femail: string;
- Femail_Specified: boolean;
- FphoneNumber: string;
- FphoneNumber_Specified: boolean;
- FfaxNumber: string;
- FfaxNumber_Specified: boolean;
- FdriversLicense: DriversLicenseType;
- FdriversLicense_Specified: boolean;
- FtaxId: string;
- FtaxId_Specified: boolean;
- procedure Settype_(Index: Integer; const ACustomerTypeEnum: CustomerTypeEnum);
- function type__Specified(Index: Integer): boolean;
- procedure Setid(Index: Integer; const Astring: string);
- function id_Specified(Index: Integer): boolean;
- procedure Setemail(Index: Integer; const Astring: string);
- function email_Specified(Index: Integer): boolean;
- procedure SetphoneNumber(Index: Integer; const Astring: string);
- function phoneNumber_Specified(Index: Integer): boolean;
- procedure SetfaxNumber(Index: Integer; const Astring: string);
- function faxNumber_Specified(Index: Integer): boolean;
- procedure SetdriversLicense(Index: Integer; const ADriversLicenseType: DriversLicenseType);
- function driversLicense_Specified(Index: Integer): boolean;
- procedure SettaxId(Index: Integer; const Astring: string);
- function taxId_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property type_: CustomerTypeEnum Index (IS_OPTN) read Ftype_ write Settype_ stored type__Specified;
- property id: string Index (IS_OPTN) read Fid write Setid stored id_Specified;
- property email: string Index (IS_OPTN) read Femail write Setemail stored email_Specified;
- property phoneNumber: string Index (IS_OPTN) read FphoneNumber write SetphoneNumber stored phoneNumber_Specified;
- property faxNumber: string Index (IS_OPTN) read FfaxNumber write SetfaxNumber stored faxNumber_Specified;
- property driversLicense: DriversLicenseType Index (IS_OPTN) read FdriversLicense write SetdriversLicense stored driversLicense_Specified;
- property taxId: string Index (IS_OPTN) read FtaxId write SettaxId stored taxId_Specified;
- end;
- // ************************************************************************ //
- // XML : DriversLicenseBaseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- DriversLicenseBaseType = class(TRemotable)
- private
- Fstate: string;
- Fstate_Specified: boolean;
- procedure Setstate(Index: Integer; const Astring: string);
- function state_Specified(Index: Integer): boolean;
- published
- property state: string Index (IS_OPTN) read Fstate write Setstate stored state_Specified;
- end;
- // ************************************************************************ //
- // XML : DriversLicenseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- DriversLicenseType = class(DriversLicenseBaseType)
- private
- Fnumber: string;
- Fnumber_Specified: boolean;
- FdateOfBirth: string;
- FdateOfBirth_Specified: boolean;
- procedure Setnumber(Index: Integer; const Astring: string);
- function number_Specified(Index: Integer): boolean;
- procedure SetdateOfBirth(Index: Integer; const Astring: string);
- function dateOfBirth_Specified(Index: Integer): boolean;
- published
- property number: string Index (IS_OPTN) read Fnumber write Setnumber stored number_Specified;
- property dateOfBirth: string Index (IS_OPTN) read FdateOfBirth write SetdateOfBirth stored dateOfBirth_Specified;
- end;
- // ************************************************************************ //
- // XML : ARBCreateSubscriptionResponseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- ARBCreateSubscriptionResponseType = class(ANetApiResponseType)
- private
- FsubscriptionId: Int64;
- published
- property subscriptionId: Int64 read FsubscriptionId write FsubscriptionId;
- end;
- // ************************************************************************ //
- // XML : ARBUpdateSubscriptionResponseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- ARBUpdateSubscriptionResponseType = class(ANetApiResponseType)
- private
- published
- end;
- // ************************************************************************ //
- // XML : ARBCancelSubscriptionResponseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- ARBCancelSubscriptionResponseType = class(ANetApiResponseType)
- private
- published
- end;
- // ************************************************************************ //
- // XML : ARBGetSubscriptionStatusResponseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- ARBGetSubscriptionStatusResponseType = class(ANetApiResponseType)
- private
- Fstatus: ARBSubscriptionStatusEnum;
- published
- property status: ARBSubscriptionStatusEnum read Fstatus write Fstatus;
- end;
- // ************************************************************************ //
- // XML : CustomerProfileBaseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- CustomerProfileBaseType = class(TRemotable)
- private
- FmerchantCustomerId: string;
- FmerchantCustomerId_Specified: boolean;
- Fdescription: string;
- Fdescription_Specified: boolean;
- Femail: string;
- Femail_Specified: boolean;
- procedure SetmerchantCustomerId(Index: Integer; const Astring: string);
- function merchantCustomerId_Specified(Index: Integer): boolean;
- procedure Setdescription(Index: Integer; const Astring: string);
- function description_Specified(Index: Integer): boolean;
- procedure Setemail(Index: Integer; const Astring: string);
- function email_Specified(Index: Integer): boolean;
- published
- property merchantCustomerId: string Index (IS_OPTN) read FmerchantCustomerId write SetmerchantCustomerId stored merchantCustomerId_Specified;
- property description: string Index (IS_OPTN) read Fdescription write Setdescription stored description_Specified;
- property email: string Index (IS_OPTN) read Femail write Setemail stored email_Specified;
- end;
- ArrayOfCustomerPaymentProfileType = array of CustomerPaymentProfileType; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- ArrayOfCustomerAddressType = array of CustomerAddressType; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- // ************************************************************************ //
- // XML : CustomerProfileType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- CustomerProfileType = class(CustomerProfileBaseType)
- private
- FpaymentProfiles: ArrayOfCustomerPaymentProfileType;
- FpaymentProfiles_Specified: boolean;
- FshipToList: ArrayOfCustomerAddressType;
- FshipToList_Specified: boolean;
- procedure SetpaymentProfiles(Index: Integer; const AArrayOfCustomerPaymentProfileType: ArrayOfCustomerPaymentProfileType);
- function paymentProfiles_Specified(Index: Integer): boolean;
- procedure SetshipToList(Index: Integer; const AArrayOfCustomerAddressType: ArrayOfCustomerAddressType);
- function shipToList_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property paymentProfiles: ArrayOfCustomerPaymentProfileType Index (IS_OPTN) read FpaymentProfiles write SetpaymentProfiles stored paymentProfiles_Specified;
- property shipToList: ArrayOfCustomerAddressType Index (IS_OPTN) read FshipToList write SetshipToList stored shipToList_Specified;
- end;
- // ************************************************************************ //
- // XML : CustomerPaymentProfileBaseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- CustomerPaymentProfileBaseType = class(TRemotable)
- private
- FcustomerType: CustomerTypeEnum;
- FcustomerType_Specified: boolean;
- FbillTo: CustomerAddressType;
- FbillTo_Specified: boolean;
- procedure SetcustomerType(Index: Integer; const ACustomerTypeEnum: CustomerTypeEnum);
- function customerType_Specified(Index: Integer): boolean;
- procedure SetbillTo(Index: Integer; const ACustomerAddressType: CustomerAddressType);
- function billTo_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property customerType: CustomerTypeEnum Index (IS_OPTN) read FcustomerType write SetcustomerType stored customerType_Specified;
- property billTo: CustomerAddressType Index (IS_OPTN) read FbillTo write SetbillTo stored billTo_Specified;
- end;
- // ************************************************************************ //
- // XML : CustomerPaymentProfileType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- CustomerPaymentProfileType = class(CustomerPaymentProfileBaseType)
- private
- Fpayment: PaymentType;
- Fpayment_Specified: boolean;
- FdriversLicense: DriversLicenseType;
- FdriversLicense_Specified: boolean;
- FtaxId: string;
- FtaxId_Specified: boolean;
- procedure Setpayment(Index: Integer; const APaymentType: PaymentType);
- function payment_Specified(Index: Integer): boolean;
- procedure SetdriversLicense(Index: Integer; const ADriversLicenseType: DriversLicenseType);
- function driversLicense_Specified(Index: Integer): boolean;
- procedure SettaxId(Index: Integer; const Astring: string);
- function taxId_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property payment: PaymentType Index (IS_OPTN) read Fpayment write Setpayment stored payment_Specified;
- property driversLicense: DriversLicenseType Index (IS_OPTN) read FdriversLicense write SetdriversLicense stored driversLicense_Specified;
- property taxId: string Index (IS_OPTN) read FtaxId write SettaxId stored taxId_Specified;
- end;
- // ************************************************************************ //
- // XML : CustomerAddressType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- CustomerAddressType = class(NameAndAddressType)
- private
- FphoneNumber: string;
- FphoneNumber_Specified: boolean;
- FfaxNumber: string;
- FfaxNumber_Specified: boolean;
- procedure SetphoneNumber(Index: Integer; const Astring: string);
- function phoneNumber_Specified(Index: Integer): boolean;
- procedure SetfaxNumber(Index: Integer; const Astring: string);
- function faxNumber_Specified(Index: Integer): boolean;
- published
- property phoneNumber: string Index (IS_OPTN) read FphoneNumber write SetphoneNumber stored phoneNumber_Specified;
- property faxNumber: string Index (IS_OPTN) read FfaxNumber write SetfaxNumber stored faxNumber_Specified;
- end;
- ArrayOfLong = array of Int64; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- ArrayOfString = array of string; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- // ************************************************************************ //
- // XML : CreateCustomerProfileResponseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- CreateCustomerProfileResponseType = class(ANetApiResponseType)
- private
- FcustomerProfileId: Int64;
- FcustomerPaymentProfileIdList: ArrayOfLong;
- FcustomerPaymentProfileIdList_Specified: boolean;
- FcustomerShippingAddressIdList: ArrayOfLong;
- FcustomerShippingAddressIdList_Specified: boolean;
- FvalidationDirectResponseList: ArrayOfString;
- FvalidationDirectResponseList_Specified: boolean;
- procedure SetcustomerPaymentProfileIdList(Index: Integer; const AArrayOfLong: ArrayOfLong);
- function customerPaymentProfileIdList_Specified(Index: Integer): boolean;
- procedure SetcustomerShippingAddressIdList(Index: Integer; const AArrayOfLong: ArrayOfLong);
- function customerShippingAddressIdList_Specified(Index: Integer): boolean;
- procedure SetvalidationDirectResponseList(Index: Integer; const AArrayOfString: ArrayOfString);
- function validationDirectResponseList_Specified(Index: Integer): boolean;
- published
- property customerProfileId: Int64 read FcustomerProfileId write FcustomerProfileId;
- property customerPaymentProfileIdList: ArrayOfLong Index (IS_OPTN) read FcustomerPaymentProfileIdList write SetcustomerPaymentProfileIdList stored customerPaymentProfileIdList_Specified;
- property customerShippingAddressIdList: ArrayOfLong Index (IS_OPTN) read FcustomerShippingAddressIdList write SetcustomerShippingAddressIdList stored customerShippingAddressIdList_Specified;
- property validationDirectResponseList: ArrayOfString Index (IS_OPTN) read FvalidationDirectResponseList write SetvalidationDirectResponseList stored validationDirectResponseList_Specified;
- end;
- // ************************************************************************ //
- // XML : CreateCustomerPaymentProfileResponseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- CreateCustomerPaymentProfileResponseType = class(ANetApiResponseType)
- private
- FcustomerPaymentProfileId: Int64;
- FvalidationDirectResponse: string;
- FvalidationDirectResponse_Specified: boolean;
- procedure SetvalidationDirectResponse(Index: Integer; const Astring: string);
- function validationDirectResponse_Specified(Index: Integer): boolean;
- published
- property customerPaymentProfileId: Int64 read FcustomerPaymentProfileId write FcustomerPaymentProfileId;
- property validationDirectResponse: string Index (IS_OPTN) read FvalidationDirectResponse write SetvalidationDirectResponse stored validationDirectResponse_Specified;
- end;
- // ************************************************************************ //
- // XML : CreateCustomerShippingAddressResponseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- CreateCustomerShippingAddressResponseType = class(ANetApiResponseType)
- private
- FcustomerAddressId: Int64;
- published
- property customerAddressId: Int64 read FcustomerAddressId write FcustomerAddressId;
- end;
- // ************************************************************************ //
- // XML : GetCustomerProfileResponseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- GetCustomerProfileResponseType = class(ANetApiResponseType)
- private
- Fprofile: CustomerProfileMaskedType;
- Fprofile_Specified: boolean;
- procedure Setprofile(Index: Integer; const ACustomerProfileMaskedType: CustomerProfileMaskedType);
- function profile_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property profile: CustomerProfileMaskedType Index (IS_OPTN) read Fprofile write Setprofile stored profile_Specified;
- end;
- // ************************************************************************ //
- // XML : CustomerProfileExType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- CustomerProfileExType = class(CustomerProfileBaseType)
- private
- FcustomerProfileId: Int64;
- published
- property customerProfileId: Int64 read FcustomerProfileId write FcustomerProfileId;
- end;
- ArrayOfCustomerPaymentProfileMaskedType = array of CustomerPaymentProfileMaskedType; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- ArrayOfCustomerAddressExType = array of CustomerAddressExType; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- // ************************************************************************ //
- // XML : CustomerProfileMaskedType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- CustomerProfileMaskedType = class(CustomerProfileExType)
- private
- FpaymentProfiles: ArrayOfCustomerPaymentProfileMaskedType;
- FpaymentProfiles_Specified: boolean;
- FshipToList: ArrayOfCustomerAddressExType;
- FshipToList_Specified: boolean;
- procedure SetpaymentProfiles(Index: Integer; const AArrayOfCustomerPaymentProfileMaskedType: ArrayOfCustomerPaymentProfileMaskedType);
- function paymentProfiles_Specified(Index: Integer): boolean;
- procedure SetshipToList(Index: Integer; const AArrayOfCustomerAddressExType: ArrayOfCustomerAddressExType);
- function shipToList_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property paymentProfiles: ArrayOfCustomerPaymentProfileMaskedType Index (IS_OPTN) read FpaymentProfiles write SetpaymentProfiles stored paymentProfiles_Specified;
- property shipToList: ArrayOfCustomerAddressExType Index (IS_OPTN) read FshipToList write SetshipToList stored shipToList_Specified;
- end;
- // ************************************************************************ //
- // XML : CustomerPaymentProfileMaskedType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- CustomerPaymentProfileMaskedType = class(CustomerPaymentProfileBaseType)
- private
- FcustomerPaymentProfileId: Int64;
- Fpayment: PaymentMaskedType;
- Fpayment_Specified: boolean;
- FdriversLicense: DriversLicenseMaskedType;
- FdriversLicense_Specified: boolean;
- FtaxId: string;
- FtaxId_Specified: boolean;
- procedure Setpayment(Index: Integer; const APaymentMaskedType: PaymentMaskedType);
- function payment_Specified(Index: Integer): boolean;
- procedure SetdriversLicense(Index: Integer; const ADriversLicenseMaskedType: DriversLicenseMaskedType);
- function driversLicense_Specified(Index: Integer): boolean;
- procedure SettaxId(Index: Integer; const Astring: string);
- function taxId_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property customerPaymentProfileId: Int64 read FcustomerPaymentProfileId write FcustomerPaymentProfileId;
- property payment: PaymentMaskedType Index (IS_OPTN) read Fpayment write Setpayment stored payment_Specified;
- property driversLicense: DriversLicenseMaskedType Index (IS_OPTN) read FdriversLicense write SetdriversLicense stored driversLicense_Specified;
- property taxId: string Index (IS_OPTN) read FtaxId write SettaxId stored taxId_Specified;
- end;
- // ************************************************************************ //
- // XML : PaymentMaskedType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- PaymentMaskedType = class(TRemotable)
- private
- FcreditCard: CreditCardMaskedType;
- FcreditCard_Specified: boolean;
- FbankAccount: BankAccountMaskedType;
- FbankAccount_Specified: boolean;
- procedure SetcreditCard(Index: Integer; const ACreditCardMaskedType: CreditCardMaskedType);
- function creditCard_Specified(Index: Integer): boolean;
- procedure SetbankAccount(Index: Integer; const ABankAccountMaskedType: BankAccountMaskedType);
- function bankAccount_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property creditCard: CreditCardMaskedType Index (IS_OPTN) read FcreditCard write SetcreditCard stored creditCard_Specified;
- property bankAccount: BankAccountMaskedType Index (IS_OPTN) read FbankAccount write SetbankAccount stored bankAccount_Specified;
- end;
- // ************************************************************************ //
- // XML : DriversLicenseMaskedType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- DriversLicenseMaskedType = class(DriversLicenseBaseType)
- private
- Fnumber: string;
- Fnumber_Specified: boolean;
- FdateOfBirth: string;
- FdateOfBirth_Specified: boolean;
- procedure Setnumber(Index: Integer; const Astring: string);
- function number_Specified(Index: Integer): boolean;
- procedure SetdateOfBirth(Index: Integer; const Astring: string);
- function dateOfBirth_Specified(Index: Integer): boolean;
- published
- property number: string Index (IS_OPTN) read Fnumber write Setnumber stored number_Specified;
- property dateOfBirth: string Index (IS_OPTN) read FdateOfBirth write SetdateOfBirth stored dateOfBirth_Specified;
- end;
- // ************************************************************************ //
- // XML : CreditCardMaskedType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- CreditCardMaskedType = class(TRemotable)
- private
- FcardNumber: string;
- FcardNumber_Specified: boolean;
- FexpirationDate: string;
- FexpirationDate_Specified: boolean;
- FcardType: string;
- FcardType_Specified: boolean;
- procedure SetcardNumber(Index: Integer; const Astring: string);
- function cardNumber_Specified(Index: Integer): boolean;
- procedure SetexpirationDate(Index: Integer; const Astring: string);
- function expirationDate_Specified(Index: Integer): boolean;
- procedure SetcardType(Index: Integer; const Astring: string);
- function cardType_Specified(Index: Integer): boolean;
- published
- property cardNumber: string Index (IS_OPTN) read FcardNumber write SetcardNumber stored cardNumber_Specified;
- property expirationDate: string Index (IS_OPTN) read FexpirationDate write SetexpirationDate stored expirationDate_Specified;
- property cardType: string Index (IS_OPTN) read FcardType write SetcardType stored cardType_Specified;
- end;
- // ************************************************************************ //
- // XML : BankAccountMaskedType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- BankAccountMaskedType = class(BankAccountBaseType)
- private
- FroutingNumber: string;
- FroutingNumber_Specified: boolean;
- FaccountNumber: string;
- FaccountNumber_Specified: boolean;
- procedure SetroutingNumber(Index: Integer; const Astring: string);
- function routingNumber_Specified(Index: Integer): boolean;
- procedure SetaccountNumber(Index: Integer; const Astring: string);
- function accountNumber_Specified(Index: Integer): boolean;
- published
- property routingNumber: string Index (IS_OPTN) read FroutingNumber write SetroutingNumber stored routingNumber_Specified;
- property accountNumber: string Index (IS_OPTN) read FaccountNumber write SetaccountNumber stored accountNumber_Specified;
- end;
- // ************************************************************************ //
- // XML : CustomerAddressExType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- CustomerAddressExType = class(CustomerAddressType)
- private
- FcustomerAddressId: Int64;
- published
- property customerAddressId: Int64 read FcustomerAddressId write FcustomerAddressId;
- end;
- // ************************************************************************ //
- // XML : GetCustomerPaymentProfileResponseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- GetCustomerPaymentProfileResponseType = class(ANetApiResponseType)
- private
- FpaymentProfile: CustomerPaymentProfileMaskedType;
- FpaymentProfile_Specified: boolean;
- procedure SetpaymentProfile(Index: Integer; const ACustomerPaymentProfileMaskedType: CustomerPaymentProfileMaskedType);
- function paymentProfile_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property paymentProfile: CustomerPaymentProfileMaskedType Index (IS_OPTN) read FpaymentProfile write SetpaymentProfile stored paymentProfile_Specified;
- end;
- // ************************************************************************ //
- // XML : GetCustomerShippingAddressResponseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- GetCustomerShippingAddressResponseType = class(ANetApiResponseType)
- private
- Faddress: CustomerAddressExType;
- Faddress_Specified: boolean;
- procedure Setaddress(Index: Integer; const ACustomerAddressExType: CustomerAddressExType);
- function address_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property address: CustomerAddressExType Index (IS_OPTN) read Faddress write Setaddress stored address_Specified;
- end;
- // ************************************************************************ //
- // XML : UpdateCustomerProfileResponseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- UpdateCustomerProfileResponseType = class(ANetApiResponseType)
- private
- published
- end;
- // ************************************************************************ //
- // XML : CustomerPaymentProfileExType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- CustomerPaymentProfileExType = class(CustomerPaymentProfileType)
- private
- FcustomerPaymentProfileId: Int64;
- published
- property customerPaymentProfileId: Int64 read FcustomerPaymentProfileId write FcustomerPaymentProfileId;
- end;
- // ************************************************************************ //
- // XML : UpdateCustomerPaymentProfileResponseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- UpdateCustomerPaymentProfileResponseType = class(ANetApiResponseType)
- private
- FvalidationDirectResponse: string;
- FvalidationDirectResponse_Specified: boolean;
- procedure SetvalidationDirectResponse(Index: Integer; const Astring: string);
- function validationDirectResponse_Specified(Index: Integer): boolean;
- published
- property validationDirectResponse: string Index (IS_OPTN) read FvalidationDirectResponse write SetvalidationDirectResponse stored validationDirectResponse_Specified;
- end;
- // ************************************************************************ //
- // XML : UpdateCustomerShippingAddressResponseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- UpdateCustomerShippingAddressResponseType = class(ANetApiResponseType)
- private
- published
- end;
- // ************************************************************************ //
- // XML : DeleteCustomerProfileResponseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- DeleteCustomerProfileResponseType = class(ANetApiResponseType)
- private
- published
- end;
- // ************************************************************************ //
- // XML : DeleteCustomerPaymentProfileResponseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- DeleteCustomerPaymentProfileResponseType = class(ANetApiResponseType)
- private
- published
- end;
- // ************************************************************************ //
- // XML : DeleteCustomerShippingAddressResponseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- DeleteCustomerShippingAddressResponseType = class(ANetApiResponseType)
- private
- published
- end;
- // ************************************************************************ //
- // XML : ProfileTransactionType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- ProfileTransactionType = class(TRemotable)
- private
- FprofileTransVoid: ProfileTransVoidType;
- FprofileTransVoid_Specified: boolean;
- FprofileTransRefund: ProfileTransRefundType;
- FprofileTransRefund_Specified: boolean;
- FprofileTransAuthOnly: ProfileTransAuthOnlyType;
- FprofileTransAuthOnly_Specified: boolean;
- FprofileTransPriorAuthCapture: ProfileTransPriorAuthCaptureType;
- FprofileTransPriorAuthCapture_Specified: boolean;
- FprofileTransAuthCapture: ProfileTransAuthCaptureType;
- FprofileTransAuthCapture_Specified: boolean;
- FprofileTransCaptureOnly: ProfileTransCaptureOnlyType;
- FprofileTransCaptureOnly_Specified: boolean;
- procedure SetprofileTransVoid(Index: Integer; const AProfileTransVoidType: ProfileTransVoidType);
- function profileTransVoid_Specified(Index: Integer): boolean;
- procedure SetprofileTransRefund(Index: Integer; const AProfileTransRefundType: ProfileTransRefundType);
- function profileTransRefund_Specified(Index: Integer): boolean;
- procedure SetprofileTransAuthOnly(Index: Integer; const AProfileTransAuthOnlyType: ProfileTransAuthOnlyType);
- function profileTransAuthOnly_Specified(Index: Integer): boolean;
- procedure SetprofileTransPriorAuthCapture(Index: Integer; const AProfileTransPriorAuthCaptureType: ProfileTransPriorAuthCaptureType);
- function profileTransPriorAuthCapture_Specified(Index: Integer): boolean;
- procedure SetprofileTransAuthCapture(Index: Integer; const AProfileTransAuthCaptureType: ProfileTransAuthCaptureType);
- function profileTransAuthCapture_Specified(Index: Integer): boolean;
- procedure SetprofileTransCaptureOnly(Index: Integer; const AProfileTransCaptureOnlyType: ProfileTransCaptureOnlyType);
- function profileTransCaptureOnly_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property profileTransVoid: ProfileTransVoidType Index (IS_OPTN) read FprofileTransVoid write SetprofileTransVoid stored profileTransVoid_Specified;
- property profileTransRefund: ProfileTransRefundType Index (IS_OPTN) read FprofileTransRefund write SetprofileTransRefund stored profileTransRefund_Specified;
- property profileTransAuthOnly: ProfileTransAuthOnlyType Index (IS_OPTN) read FprofileTransAuthOnly write SetprofileTransAuthOnly stored profileTransAuthOnly_Specified;
- property profileTransPriorAuthCapture: ProfileTransPriorAuthCaptureType Index (IS_OPTN) read FprofileTransPriorAuthCapture write SetprofileTransPriorAuthCapture stored profileTransPriorAuthCapture_Specified;
- property profileTransAuthCapture: ProfileTransAuthCaptureType Index (IS_OPTN) read FprofileTransAuthCapture write SetprofileTransAuthCapture stored profileTransAuthCapture_Specified;
- property profileTransCaptureOnly: ProfileTransCaptureOnlyType Index (IS_OPTN) read FprofileTransCaptureOnly write SetprofileTransCaptureOnly stored profileTransCaptureOnly_Specified;
- end;
- // ************************************************************************ //
- // XML : ProfileTransVoidType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- ProfileTransVoidType = class(TRemotable)
- private
- FcustomerProfileId: Int64;
- FcustomerProfileId_Specified: boolean;
- FcustomerPaymentProfileId: Int64;
- FcustomerPaymentProfileId_Specified: boolean;
- FcustomerShippingAddressId: Int64;
- FcustomerShippingAddressId_Specified: boolean;
- FtransId: string;
- FtransId_Specified: boolean;
- procedure SetcustomerProfileId(Index: Integer; const AInt64: Int64);
- function customerProfileId_Specified(Index: Integer): boolean;
- procedure SetcustomerPaymentProfileId(Index: Integer; const AInt64: Int64);
- function customerPaymentProfileId_Specified(Index: Integer): boolean;
- procedure SetcustomerShippingAddressId(Index: Integer; const AInt64: Int64);
- function customerShippingAddressId_Specified(Index: Integer): boolean;
- procedure SettransId(Index: Integer; const Astring: string);
- function transId_Specified(Index: Integer): boolean;
- published
- property customerProfileId: Int64 Index (IS_OPTN) read FcustomerProfileId write SetcustomerProfileId stored customerProfileId_Specified;
- property customerPaymentProfileId: Int64 Index (IS_OPTN) read FcustomerPaymentProfileId write SetcustomerPaymentProfileId stored customerPaymentProfileId_Specified;
- property customerShippingAddressId: Int64 Index (IS_OPTN) read FcustomerShippingAddressId write SetcustomerShippingAddressId stored customerShippingAddressId_Specified;
- property transId: string Index (IS_OPTN) read FtransId write SettransId stored transId_Specified;
- end;
- // ************************************************************************ //
- // XML : OrderExType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- OrderExType = class(OrderType)
- private
- FpurchaseOrderNumber: string;
- FpurchaseOrderNumber_Specified: boolean;
- procedure SetpurchaseOrderNumber(Index: Integer; const Astring: string);
- function purchaseOrderNumber_Specified(Index: Integer): boolean;
- published
- property purchaseOrderNumber: string Index (IS_OPTN) read FpurchaseOrderNumber write SetpurchaseOrderNumber stored purchaseOrderNumber_Specified;
- end;
- // ************************************************************************ //
- // XML : ExtendedAmountType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- ExtendedAmountType = class(TRemotable)
- private
- Famount: TXSDecimal;
- Fname_: string;
- Fname__Specified: boolean;
- Fdescription: string;
- Fdescription_Specified: boolean;
- procedure Setname_(Index: Integer; const Astring: string);
- function name__Specified(Index: Integer): boolean;
- procedure Setdescription(Index: Integer; const Astring: string);
- function description_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property amount: TXSDecimal read Famount write Famount;
- property name_: string Index (IS_OPTN) read Fname_ write Setname_ stored name__Specified;
- property description: string Index (IS_OPTN) read Fdescription write Setdescription stored description_Specified;
- end;
- // ************************************************************************ //
- // XML : LineItemType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- LineItemType = class(TRemotable)
- private
- FitemId: string;
- FitemId_Specified: boolean;
- Fname_: string;
- Fname__Specified: boolean;
- Fdescription: string;
- Fdescription_Specified: boolean;
- Fquantity: TXSDecimal;
- FunitPrice: TXSDecimal;
- Ftaxable: Boolean;
- Ftaxable_Specified: boolean;
- procedure SetitemId(Index: Integer; const Astring: string);
- function itemId_Specified(Index: Integer): boolean;
- procedure Setname_(Index: Integer; const Astring: string);
- function name__Specified(Index: Integer): boolean;
- procedure Setdescription(Index: Integer; const Astring: string);
- function description_Specified(Index: Integer): boolean;
- procedure Settaxable(Index: Integer; const ABoolean: Boolean);
- function taxable_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property itemId: string Index (IS_OPTN) read FitemId write SetitemId stored itemId_Specified;
- property name_: string Index (IS_OPTN) read Fname_ write Setname_ stored name__Specified;
- property description: string Index (IS_OPTN) read Fdescription write Setdescription stored description_Specified;
- property quantity: TXSDecimal read Fquantity write Fquantity;
- property unitPrice: TXSDecimal read FunitPrice write FunitPrice;
- property taxable: Boolean Index (IS_OPTN) read Ftaxable write Settaxable stored taxable_Specified;
- end;
- // ************************************************************************ //
- // XML : CreateCustomerProfileTransactionResponseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- CreateCustomerProfileTransactionResponseType = class(ANetApiResponseType)
- private
- FdirectResponse: string;
- FdirectResponse_Specified: boolean;
- procedure SetdirectResponse(Index: Integer; const Astring: string);
- function directResponse_Specified(Index: Integer): boolean;
- published
- property directResponse: string Index (IS_OPTN) read FdirectResponse write SetdirectResponse stored directResponse_Specified;
- end;
- // ************************************************************************ //
- // XML : ValidateCustomerPaymentProfileResponseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- ValidateCustomerPaymentProfileResponseType = class(ANetApiResponseType)
- private
- FdirectResponse: string;
- FdirectResponse_Specified: boolean;
- procedure SetdirectResponse(Index: Integer; const Astring: string);
- function directResponse_Specified(Index: Integer): boolean;
- published
- property directResponse: string Index (IS_OPTN) read FdirectResponse write SetdirectResponse stored directResponse_Specified;
- end;
- // ************************************************************************ //
- // XML : GetCustomerProfileIdsResponseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- GetCustomerProfileIdsResponseType = class(ANetApiResponseType)
- private
- Fids: ArrayOfLong;
- Fids_Specified: boolean;
- procedure Setids(Index: Integer; const AArrayOfLong: ArrayOfLong);
- function ids_Specified(Index: Integer): boolean;
- published
- property ids: ArrayOfLong Index (IS_OPTN) read Fids write Setids stored ids_Specified;
- end;
- // ************************************************************************ //
- // XML : UpdateSplitTenderGroupResponseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- UpdateSplitTenderGroupResponseType = class(ANetApiResponseType)
- private
- published
- end;
- // ************************************************************************ //
- // XML : GetTransactionDetailsResponseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- GetTransactionDetailsResponseType = class(ANetApiResponseType)
- private
- Ftransaction: TransactionDetailsType;
- Ftransaction_Specified: boolean;
- procedure Settransaction(Index: Integer; const ATransactionDetailsType: TransactionDetailsType);
- function transaction_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property transaction: TransactionDetailsType Index (IS_OPTN) read Ftransaction write Settransaction stored transaction_Specified;
- end;
- ArrayOfFDSFilterType = array of FDSFilter; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- // ************************************************************************ //
- // XML : CustomerDataType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- CustomerDataType = class(TRemotable)
- private
- Ftype_: CustomerTypeEnum;
- Ftype__Specified: boolean;
- Fid: string;
- Fid_Specified: boolean;
- Femail: string;
- Femail_Specified: boolean;
- FdriversLicense: DriversLicenseType;
- FdriversLicense_Specified: boolean;
- FtaxId: string;
- FtaxId_Specified: boolean;
- procedure Settype_(Index: Integer; const ACustomerTypeEnum: CustomerTypeEnum);
- function type__Specified(Index: Integer): boolean;
- procedure Setid(Index: Integer; const Astring: string);
- function id_Specified(Index: Integer): boolean;
- procedure Setemail(Index: Integer; const Astring: string);
- function email_Specified(Index: Integer): boolean;
- procedure SetdriversLicense(Index: Integer; const ADriversLicenseType: DriversLicenseType);
- function driversLicense_Specified(Index: Integer): boolean;
- procedure SettaxId(Index: Integer; const Astring: string);
- function taxId_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property type_: CustomerTypeEnum Index (IS_OPTN) read Ftype_ write Settype_ stored type__Specified;
- property id: string Index (IS_OPTN) read Fid write Setid stored id_Specified;
- property email: string Index (IS_OPTN) read Femail write Setemail stored email_Specified;
- property driversLicense: DriversLicenseType Index (IS_OPTN) read FdriversLicense write SetdriversLicense stored driversLicense_Specified;
- property taxId: string Index (IS_OPTN) read FtaxId write SettaxId stored taxId_Specified;
- end;
- // ************************************************************************ //
- // XML : FDSFilterType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- FDSFilterType = class(TRemotable)
- private
- Fname_: string;
- Fname__Specified: boolean;
- Faction: string;
- Faction_Specified: boolean;
- procedure Setname_(Index: Integer; const Astring: string);
- function name__Specified(Index: Integer): boolean;
- procedure Setaction(Index: Integer; const Astring: string);
- function action_Specified(Index: Integer): boolean;
- published
- property name_: string Index (IS_OPTN) read Fname_ write Setname_ stored name__Specified;
- property action: string Index (IS_OPTN) read Faction write Setaction stored action_Specified;
- end;
- ArrayOfBatchStatisticType = array of statistic; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- // ************************************************************************ //
- // XML : BatchDetailsType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- BatchDetailsType = class(TRemotable)
- private
- FbatchId: string;
- FbatchId_Specified: boolean;
- FsettlementTimeUTC: TXSDateTime;
- FsettlementTimeUTC_Specified: boolean;
- FsettlementTimeLocal: TXSDateTime;
- FsettlementTimeLocal_Specified: boolean;
- FsettlementState: string;
- FsettlementState_Specified: boolean;
- FpaymentMethod: string;
- FpaymentMethod_Specified: boolean;
- Fstatistics: ArrayOfBatchStatisticType;
- Fstatistics_Specified: boolean;
- procedure SetbatchId(Index: Integer; const Astring: string);
- function batchId_Specified(Index: Integer): boolean;
- procedure SetsettlementTimeUTC(Index: Integer; const ATXSDateTime: TXSDateTime);
- function settlementTimeUTC_Specified(Index: Integer): boolean;
- procedure SetsettlementTimeLocal(Index: Integer; const ATXSDateTime: TXSDateTime);
- function settlementTimeLocal_Specified(Index: Integer): boolean;
- procedure SetsettlementState(Index: Integer; const Astring: string);
- function settlementState_Specified(Index: Integer): boolean;
- procedure SetpaymentMethod(Index: Integer; const Astring: string);
- function paymentMethod_Specified(Index: Integer): boolean;
- procedure Setstatistics(Index: Integer; const AArrayOfBatchStatisticType: ArrayOfBatchStatisticType);
- function statistics_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property batchId: string Index (IS_OPTN) read FbatchId write SetbatchId stored batchId_Specified;
- property settlementTimeUTC: TXSDateTime Index (IS_OPTN) read FsettlementTimeUTC write SetsettlementTimeUTC stored settlementTimeUTC_Specified;
- property settlementTimeLocal: TXSDateTime Index (IS_OPTN) read FsettlementTimeLocal write SetsettlementTimeLocal stored settlementTimeLocal_Specified;
- property settlementState: string Index (IS_OPTN) read FsettlementState write SetsettlementState stored settlementState_Specified;
- property paymentMethod: string Index (IS_OPTN) read FpaymentMethod write SetpaymentMethod stored paymentMethod_Specified;
- property statistics: ArrayOfBatchStatisticType Index (IS_OPTN) read Fstatistics write Setstatistics stored statistics_Specified;
- end;
- // ************************************************************************ //
- // XML : BatchStatisticType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- BatchStatisticType = class(TRemotable)
- private
- FaccountType: string;
- FaccountType_Specified: boolean;
- FcurrencyCode: string;
- FcurrencyCode_Specified: boolean;
- FchargeAmount: TXSDecimal;
- FchargeCount: Integer;
- FrefundAmount: TXSDecimal;
- FrefundCount: Integer;
- FvoidCount: Integer;
- FdeclineCount: Integer;
- FerrorCount: Integer;
- FreturnedItemAmount: TXSDecimal;
- FreturnedItemAmount_Specified: boolean;
- FreturnedItemAmountSpecified: Boolean;
- FreturnedItemCount: Integer;
- FreturnedItemCount_Specified: boolean;
- FreturnedItemCountSpecified: Boolean;
- FchargebackAmount: TXSDecimal;
- FchargebackAmount_Specified: boolean;
- FchargebackAmountSpecified: Boolean;
- FchargebackCount: Integer;
- FchargebackCount_Specified: boolean;
- FchargebackCountSpecified: Boolean;
- FcorrectionNoticeCount: Integer;
- FcorrectionNoticeCount_Specified: boolean;
- FcorrectionNoticeCountSpecified: Boolean;
- FchargeChargeBackAmount: TXSDecimal;
- FchargeChargeBackAmount_Specified: boolean;
- FchargeChargeBackAmountSpecified: Boolean;
- FchargeChargeBackCount: Integer;
- FchargeChargeBackCount_Specified: boolean;
- FchargeChargeBackCountSpecified: Boolean;
- FrefundChargeBackAmount: TXSDecimal;
- FrefundChargeBackAmount_Specified: boolean;
- FrefundChargeBackAmountSpecified: Boolean;
- FrefundChargeBackCount: Integer;
- FrefundChargeBackCount_Specified: boolean;
- FrefundChargeBackCountSpecified: Boolean;
- FchargeReturnedItemsAmount: TXSDecimal;
- FchargeReturnedItemsAmount_Specified: boolean;
- FchargeReturnedItemsAmountSpecified: Boolean;
- FchargeReturnedItemsCount: Integer;
- FchargeReturnedItemsCount_Specified: boolean;
- FchargeReturnedItemsCountSpecified: Boolean;
- FrefundReturnedItemsAmount: TXSDecimal;
- FrefundReturnedItemsAmount_Specified: boolean;
- FrefundReturnedItemsAmountSpecified: Boolean;
- FrefundReturnedItemsCount: Integer;
- FrefundReturnedItemsCount_Specified: boolean;
- FrefundReturnedItemsCountSpecified: Boolean;
- procedure SetaccountType(Index: Integer; const Astring: string);
- function accountType_Specified(Index: Integer): boolean;
- procedure SetcurrencyCode(Index: Integer; const Astring: string);
- function currencyCode_Specified(Index: Integer): boolean;
- procedure SetreturnedItemAmount(Index: Integer; const ATXSDecimal: TXSDecimal);
- function returnedItemAmount_Specified(Index: Integer): boolean;
- procedure SetreturnedItemCount(Index: Integer; const AInteger: Integer);
- function returnedItemCount_Specified(Index: Integer): boolean;
- procedure SetchargebackAmount(Index: Integer; const ATXSDecimal: TXSDecimal);
- function chargebackAmount_Specified(Index: Integer): boolean;
- procedure SetchargebackCount(Index: Integer; const AInteger: Integer);
- function chargebackCount_Specified(Index: Integer): boolean;
- procedure SetcorrectionNoticeCount(Index: Integer; const AInteger: Integer);
- function correctionNoticeCount_Specified(Index: Integer): boolean;
- procedure SetchargeChargeBackAmount(Index: Integer; const ATXSDecimal: TXSDecimal);
- function chargeChargeBackAmount_Specified(Index: Integer): boolean;
- procedure SetchargeChargeBackCount(Index: Integer; const AInteger: Integer);
- function chargeChargeBackCount_Specified(Index: Integer): boolean;
- procedure SetrefundChargeBackAmount(Index: Integer; const ATXSDecimal: TXSDecimal);
- function refundChargeBackAmount_Specified(Index: Integer): boolean;
- procedure SetrefundChargeBackCount(Index: Integer; const AInteger: Integer);
- function refundChargeBackCount_Specified(Index: Integer): boolean;
- procedure SetchargeReturnedItemsAmount(Index: Integer; const ATXSDecimal: TXSDecimal);
- function chargeReturnedItemsAmount_Specified(Index: Integer): boolean;
- procedure SetchargeReturnedItemsCount(Index: Integer; const AInteger: Integer);
- function chargeReturnedItemsCount_Specified(Index: Integer): boolean;
- procedure SetrefundReturnedItemsAmount(Index: Integer; const ATXSDecimal: TXSDecimal);
- function refundReturnedItemsAmount_Specified(Index: Integer): boolean;
- procedure SetrefundReturnedItemsCount(Index: Integer; const AInteger: Integer);
- function refundReturnedItemsCount_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property accountType: string Index (IS_OPTN) read FaccountType write SetaccountType stored accountType_Specified;
- property currencyCode: string Index (IS_OPTN) read FcurrencyCode write SetcurrencyCode stored currencyCode_Specified;
- property chargeAmount: TXSDecimal read FchargeAmount write FchargeAmount;
- property chargeCount: Integer read FchargeCount write FchargeCount;
- property refundAmount: TXSDecimal read FrefundAmount write FrefundAmount;
- property refundCount: Integer read FrefundCount write FrefundCount;
- property voidCount: Integer read FvoidCount write FvoidCount;
- property declineCount: Integer read FdeclineCount write FdeclineCount;
- property errorCount: Integer read FerrorCount write FerrorCount;
- property returnedItemAmount: TXSDecimal Index (IS_OPTN) read FreturnedItemAmount write SetreturnedItemAmount stored returnedItemAmount_Specified;
- property returnedItemAmountSpecified: Boolean read FreturnedItemAmountSpecified write FreturnedItemAmountSpecified;
- property returnedItemCount: Integer Index (IS_OPTN) read FreturnedItemCount write SetreturnedItemCount stored returnedItemCount_Specified;
- property returnedItemCountSpecified: Boolean read FreturnedItemCountSpecified write FreturnedItemCountSpecified;
- property chargebackAmount: TXSDecimal Index (IS_OPTN) read FchargebackAmount write SetchargebackAmount stored chargebackAmount_Specified;
- property chargebackAmountSpecified: Boolean read FchargebackAmountSpecified write FchargebackAmountSpecified;
- property chargebackCount: Integer Index (IS_OPTN) read FchargebackCount write SetchargebackCount stored chargebackCount_Specified;
- property chargebackCountSpecified: Boolean read FchargebackCountSpecified write FchargebackCountSpecified;
- property correctionNoticeCount: Integer Index (IS_OPTN) read FcorrectionNoticeCount write SetcorrectionNoticeCount stored correctionNoticeCount_Specified;
- property correctionNoticeCountSpecified: Boolean read FcorrectionNoticeCountSpecified write FcorrectionNoticeCountSpecified;
- property chargeChargeBackAmount: TXSDecimal Index (IS_OPTN) read FchargeChargeBackAmount write SetchargeChargeBackAmount stored chargeChargeBackAmount_Specified;
- property chargeChargeBackAmountSpecified: Boolean read FchargeChargeBackAmountSpecified write FchargeChargeBackAmountSpecified;
- property chargeChargeBackCount: Integer Index (IS_OPTN) read FchargeChargeBackCount write SetchargeChargeBackCount stored chargeChargeBackCount_Specified;
- property chargeChargeBackCountSpecified: Boolean read FchargeChargeBackCountSpecified write FchargeChargeBackCountSpecified;
- property refundChargeBackAmount: TXSDecimal Index (IS_OPTN) read FrefundChargeBackAmount write SetrefundChargeBackAmount stored refundChargeBackAmount_Specified;
- property refundChargeBackAmountSpecified: Boolean read FrefundChargeBackAmountSpecified write FrefundChargeBackAmountSpecified;
- property refundChargeBackCount: Integer Index (IS_OPTN) read FrefundChargeBackCount write SetrefundChargeBackCount stored refundChargeBackCount_Specified;
- property refundChargeBackCountSpecified: Boolean read FrefundChargeBackCountSpecified write FrefundChargeBackCountSpecified;
- property chargeReturnedItemsAmount: TXSDecimal Index (IS_OPTN) read FchargeReturnedItemsAmount write SetchargeReturnedItemsAmount stored chargeReturnedItemsAmount_Specified;
- property chargeReturnedItemsAmountSpecified: Boolean read FchargeReturnedItemsAmountSpecified write FchargeReturnedItemsAmountSpecified;
- property chargeReturnedItemsCount: Integer Index (IS_OPTN) read FchargeReturnedItemsCount write SetchargeReturnedItemsCount stored chargeReturnedItemsCount_Specified;
- property chargeReturnedItemsCountSpecified: Boolean read FchargeReturnedItemsCountSpecified write FchargeReturnedItemsCountSpecified;
- property refundReturnedItemsAmount: TXSDecimal Index (IS_OPTN) read FrefundReturnedItemsAmount write SetrefundReturnedItemsAmount stored refundReturnedItemsAmount_Specified;
- property refundReturnedItemsAmountSpecified: Boolean read FrefundReturnedItemsAmountSpecified write FrefundReturnedItemsAmountSpecified;
- property refundReturnedItemsCount: Integer Index (IS_OPTN) read FrefundReturnedItemsCount write SetrefundReturnedItemsCount stored refundReturnedItemsCount_Specified;
- property refundReturnedItemsCountSpecified: Boolean read FrefundReturnedItemsCountSpecified write FrefundReturnedItemsCountSpecified;
- end;
- // ************************************************************************ //
- // XML : GetSettledBatchListRequestType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- GetSettledBatchListRequestType = class(TRemotable)
- private
- FincludeStatistics: Boolean;
- FincludeStatistics_Specified: boolean;
- FfirstSettlementDate: TXSDateTime;
- FfirstSettlementDate_Specified: boolean;
- FlastSettlementDate: TXSDateTime;
- FlastSettlementDate_Specified: boolean;
- procedure SetincludeStatistics(Index: Integer; const ABoolean: Boolean);
- function includeStatistics_Specified(Index: Integer): boolean;
- procedure SetfirstSettlementDate(Index: Integer; const ATXSDateTime: TXSDateTime);
- function firstSettlementDate_Specified(Index: Integer): boolean;
- procedure SetlastSettlementDate(Index: Integer; const ATXSDateTime: TXSDateTime);
- function lastSettlementDate_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property includeStatistics: Boolean Index (IS_OPTN) read FincludeStatistics write SetincludeStatistics stored includeStatistics_Specified;
- property firstSettlementDate: TXSDateTime Index (IS_OPTN) read FfirstSettlementDate write SetfirstSettlementDate stored firstSettlementDate_Specified;
- property lastSettlementDate: TXSDateTime Index (IS_OPTN) read FlastSettlementDate write SetlastSettlementDate stored lastSettlementDate_Specified;
- end;
- ArrayOfBatchDetailsType = array of batch; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- // ************************************************************************ //
- // XML : GetSettledBatchListResponseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- GetSettledBatchListResponseType = class(ANetApiResponseType)
- private
- FbatchList: ArrayOfBatchDetailsType;
- FbatchList_Specified: boolean;
- procedure SetbatchList(Index: Integer; const AArrayOfBatchDetailsType: ArrayOfBatchDetailsType);
- function batchList_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property batchList: ArrayOfBatchDetailsType Index (IS_OPTN) read FbatchList write SetbatchList stored batchList_Specified;
- end;
- // ************************************************************************ //
- // XML : GetTransactionListRequestType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- GetTransactionListRequestType = class(TRemotable)
- private
- FbatchId: string;
- FbatchId_Specified: boolean;
- procedure SetbatchId(Index: Integer; const Astring: string);
- function batchId_Specified(Index: Integer): boolean;
- published
- property batchId: string Index (IS_OPTN) read FbatchId write SetbatchId stored batchId_Specified;
- end;
- ArrayOfTransactionSummaryType = array of transaction; { "https://api.authorize.net/soap/v1/"[GblCplx] }
- // ************************************************************************ //
- // XML : GetTransactionListResponseType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- GetTransactionListResponseType = class(ANetApiResponseType)
- private
- Ftransactions: ArrayOfTransactionSummaryType;
- Ftransactions_Specified: boolean;
- procedure Settransactions(Index: Integer; const AArrayOfTransactionSummaryType: ArrayOfTransactionSummaryType);
- function transactions_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property transactions: ArrayOfTransactionSummaryType Index (IS_OPTN) read Ftransactions write Settransactions stored transactions_Specified;
- end;
- // ************************************************************************ //
- // XML : TransactionSummaryType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- TransactionSummaryType = class(TRemotable)
- private
- FtransId: string;
- FtransId_Specified: boolean;
- FsubmitTimeUTC: TXSDateTime;
- FsubmitTimeLocal: TXSDateTime;
- FtransactionStatus: string;
- FtransactionStatus_Specified: boolean;
- FinvoiceNumber: string;
- FinvoiceNumber_Specified: boolean;
- FfirstName: string;
- FfirstName_Specified: boolean;
- FlastName: string;
- FlastName_Specified: boolean;
- FaccountType: string;
- FaccountType_Specified: boolean;
- FaccountNumber: string;
- FaccountNumber_Specified: boolean;
- FsettleAmount: TXSDecimal;
- procedure SettransId(Index: Integer; const Astring: string);
- function transId_Specified(Index: Integer): boolean;
- procedure SettransactionStatus(Index: Integer; const Astring: string);
- function transactionStatus_Specified(Index: Integer): boolean;
- procedure SetinvoiceNumber(Index: Integer; const Astring: string);
- function invoiceNumber_Specified(Index: Integer): boolean;
- procedure SetfirstName(Index: Integer; const Astring: string);
- function firstName_Specified(Index: Integer): boolean;
- procedure SetlastName(Index: Integer; const Astring: string);
- function lastName_Specified(Index: Integer): boolean;
- procedure SetaccountType(Index: Integer; const Astring: string);
- function accountType_Specified(Index: Integer): boolean;
- procedure SetaccountNumber(Index: Integer; const Astring: string);
- function accountNumber_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property transId: string Index (IS_OPTN) read FtransId write SettransId stored transId_Specified;
- property submitTimeUTC: TXSDateTime read FsubmitTimeUTC write FsubmitTimeUTC;
- property submitTimeLocal: TXSDateTime read FsubmitTimeLocal write FsubmitTimeLocal;
- property transactionStatus: string Index (IS_OPTN) read FtransactionStatus write SettransactionStatus stored transactionStatus_Specified;
- property invoiceNumber: string Index (IS_OPTN) read FinvoiceNumber write SetinvoiceNumber stored invoiceNumber_Specified;
- property firstName: string Index (IS_OPTN) read FfirstName write SetfirstName stored firstName_Specified;
- property lastName: string Index (IS_OPTN) read FlastName write SetlastName stored lastName_Specified;
- property accountType: string Index (IS_OPTN) read FaccountType write SetaccountType stored accountType_Specified;
- property accountNumber: string Index (IS_OPTN) read FaccountNumber write SetaccountNumber stored accountNumber_Specified;
- property settleAmount: TXSDecimal read FsettleAmount write FsettleAmount;
- end;
- // ************************************************************************ //
- // XML : FDSFilter, alias
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- FDSFilter = class(FDSFilterType)
- private
- published
- end;
- // ************************************************************************ //
- // XML : statistic, alias
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- statistic = class(BatchStatisticType)
- private
- published
- end;
- // ************************************************************************ //
- // XML : batch, alias
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- batch = class(BatchDetailsType)
- private
- published
- end;
- // ************************************************************************ //
- // XML : transaction, alias
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- transaction = class(TransactionSummaryType)
- private
- published
- end;
- Array_Of_LineItemType = array of LineItemType; { "https://api.authorize.net/soap/v1/"[GblUbnd] }
- // ************************************************************************ //
- // XML : TransactionDetailsType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- TransactionDetailsType = class(TRemotable)
- private
- FtransId: string;
- FtransId_Specified: boolean;
- FrefTransId: string;
- FrefTransId_Specified: boolean;
- FsplitTenderId: Int64;
- FsplitTenderId_Specified: boolean;
- FsubmitTimeUTC: TXSDateTime;
- FsubmitTimeLocal: TXSDateTime;
- FtransactionType: string;
- FtransactionType_Specified: boolean;
- FtransactionStatus: string;
- FtransactionStatus_Specified: boolean;
- FresponseCode: Integer;
- FresponseReasonCode: Integer;
- FresponseReasonDescription: string;
- FresponseReasonDescription_Specified: boolean;
- FauthCode: string;
- FauthCode_Specified: boolean;
- FAVSResponse: string;
- FAVSResponse_Specified: boolean;
- FcardCodeResponse: string;
- FcardCodeResponse_Specified: boolean;
- FCAVVResponse: string;
- FCAVVResponse_Specified: boolean;
- FFDSFilterAction: string;
- FFDSFilterAction_Specified: boolean;
- FFDSFilters: ArrayOfFDSFilterType;
- FFDSFilters_Specified: boolean;
- Fbatch: BatchDetailsType;
- Fbatch_Specified: boolean;
- Forder: OrderExType;
- Forder_Specified: boolean;
- FrequestedAmount: TXSDecimal;
- FrequestedAmount_Specified: boolean;
- FauthAmount: TXSDecimal;
- FsettleAmount: TXSDecimal;
- Ftax: ExtendedAmountType;
- Ftax_Specified: boolean;
- Fshipping: ExtendedAmountType;
- Fshipping_Specified: boolean;
- Fduty: ExtendedAmountType;
- Fduty_Specified: boolean;
- FlineItems: Array_Of_LineItemType;
- FlineItems_Specified: boolean;
- FprepaidBalanceRemaining: TXSDecimal;
- FprepaidBalanceRemaining_Specified: boolean;
- FcurrencyCode: string;
- FcurrencyCode_Specified: boolean;
- FtaxExempt: Boolean;
- FtaxExempt_Specified: boolean;
- Fpayment: PaymentMaskedType;
- Fpayment_Specified: boolean;
- Fcustomer: CustomerDataType;
- Fcustomer_Specified: boolean;
- FbillTo: CustomerAddressType;
- FbillTo_Specified: boolean;
- FshipTo: NameAndAddressType;
- FshipTo_Specified: boolean;
- FrecurringBilling: Boolean;
- FrecurringBilling_Specified: boolean;
- FcustomerIP: string;
- FcustomerIP_Specified: boolean;
- procedure SettransId(Index: Integer; const Astring: string);
- function transId_Specified(Index: Integer): boolean;
- procedure SetrefTransId(Index: Integer; const Astring: string);
- function refTransId_Specified(Index: Integer): boolean;
- procedure SetsplitTenderId(Index: Integer; const AInt64: Int64);
- function splitTenderId_Specified(Index: Integer): boolean;
- procedure SettransactionType(Index: Integer; const Astring: string);
- function transactionType_Specified(Index: Integer): boolean;
- procedure SettransactionStatus(Index: Integer; const Astring: string);
- function transactionStatus_Specified(Index: Integer): boolean;
- procedure SetresponseReasonDescription(Index: Integer; const Astring: string);
- function responseReasonDescription_Specified(Index: Integer): boolean;
- procedure SetauthCode(Index: Integer; const Astring: string);
- function authCode_Specified(Index: Integer): boolean;
- procedure SetAVSResponse(Index: Integer; const Astring: string);
- function AVSResponse_Specified(Index: Integer): boolean;
- procedure SetcardCodeResponse(Index: Integer; const Astring: string);
- function cardCodeResponse_Specified(Index: Integer): boolean;
- procedure SetCAVVResponse(Index: Integer; const Astring: string);
- function CAVVResponse_Specified(Index: Integer): boolean;
- procedure SetFDSFilterAction(Index: Integer; const Astring: string);
- function FDSFilterAction_Specified(Index: Integer): boolean;
- procedure SetFDSFilters(Index: Integer; const AArrayOfFDSFilterType: ArrayOfFDSFilterType);
- function FDSFilters_Specified(Index: Integer): boolean;
- procedure Setbatch(Index: Integer; const ABatchDetailsType: BatchDetailsType);
- function batch_Specified(Index: Integer): boolean;
- procedure Setorder(Index: Integer; const AOrderExType: OrderExType);
- function order_Specified(Index: Integer): boolean;
- procedure SetrequestedAmount(Index: Integer; const ATXSDecimal: TXSDecimal);
- function requestedAmount_Specified(Index: Integer): boolean;
- procedure Settax(Index: Integer; const AExtendedAmountType: ExtendedAmountType);
- function tax_Specified(Index: Integer): boolean;
- procedure Setshipping(Index: Integer; const AExtendedAmountType: ExtendedAmountType);
- function shipping_Specified(Index: Integer): boolean;
- procedure Setduty(Index: Integer; const AExtendedAmountType: ExtendedAmountType);
- function duty_Specified(Index: Integer): boolean;
- procedure SetlineItems(Index: Integer; const AArray_Of_LineItemType: Array_Of_LineItemType);
- function lineItems_Specified(Index: Integer): boolean;
- procedure SetprepaidBalanceRemaining(Index: Integer; const ATXSDecimal: TXSDecimal);
- function prepaidBalanceRemaining_Specified(Index: Integer): boolean;
- procedure SetcurrencyCode(Index: Integer; const Astring: string);
- function currencyCode_Specified(Index: Integer): boolean;
- procedure SettaxExempt(Index: Integer; const ABoolean: Boolean);
- function taxExempt_Specified(Index: Integer): boolean;
- procedure Setpayment(Index: Integer; const APaymentMaskedType: PaymentMaskedType);
- function payment_Specified(Index: Integer): boolean;
- procedure Setcustomer(Index: Integer; const ACustomerDataType: CustomerDataType);
- function customer_Specified(Index: Integer): boolean;
- procedure SetbillTo(Index: Integer; const ACustomerAddressType: CustomerAddressType);
- function billTo_Specified(Index: Integer): boolean;
- procedure SetshipTo(Index: Integer; const ANameAndAddressType: NameAndAddressType);
- function shipTo_Specified(Index: Integer): boolean;
- procedure SetrecurringBilling(Index: Integer; const ABoolean: Boolean);
- function recurringBilling_Specified(Index: Integer): boolean;
- procedure SetcustomerIP(Index: Integer; const Astring: string);
- function customerIP_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property transId: string Index (IS_OPTN) read FtransId write SettransId stored transId_Specified;
- property refTransId: string Index (IS_OPTN) read FrefTransId write SetrefTransId stored refTransId_Specified;
- property splitTenderId: Int64 Index (IS_OPTN) read FsplitTenderId write SetsplitTenderId stored splitTenderId_Specified;
- property submitTimeUTC: TXSDateTime read FsubmitTimeUTC write FsubmitTimeUTC;
- property submitTimeLocal: TXSDateTime read FsubmitTimeLocal write FsubmitTimeLocal;
- property transactionType: string Index (IS_OPTN) read FtransactionType write SettransactionType stored transactionType_Specified;
- property transactionStatus: string Index (IS_OPTN) read FtransactionStatus write SettransactionStatus stored transactionStatus_Specified;
- property responseCode: Integer read FresponseCode write FresponseCode;
- property responseReasonCode: Integer read FresponseReasonCode write FresponseReasonCode;
- property responseReasonDescription: string Index (IS_OPTN) read FresponseReasonDescription write SetresponseReasonDescription stored responseReasonDescription_Specified;
- property authCode: string Index (IS_OPTN) read FauthCode write SetauthCode stored authCode_Specified;
- property AVSResponse: string Index (IS_OPTN) read FAVSResponse write SetAVSResponse stored AVSResponse_Specified;
- property cardCodeResponse: string Index (IS_OPTN) read FcardCodeResponse write SetcardCodeResponse stored cardCodeResponse_Specified;
- property CAVVResponse: string Index (IS_OPTN) read FCAVVResponse write SetCAVVResponse stored CAVVResponse_Specified;
- property FDSFilterAction: string Index (IS_OPTN) read FFDSFilterAction write SetFDSFilterAction stored FDSFilterAction_Specified;
- property FDSFilters: ArrayOfFDSFilterType Index (IS_OPTN) read FFDSFilters write SetFDSFilters stored FDSFilters_Specified;
- property batch: BatchDetailsType Index (IS_OPTN) read Fbatch write Setbatch stored batch_Specified;
- property order: OrderExType Index (IS_OPTN) read Forder write Setorder stored order_Specified;
- property requestedAmount: TXSDecimal Index (IS_OPTN) read FrequestedAmount write SetrequestedAmount stored requestedAmount_Specified;
- property authAmount: TXSDecimal read FauthAmount write FauthAmount;
- property settleAmount: TXSDecimal read FsettleAmount write FsettleAmount;
- property tax: ExtendedAmountType Index (IS_OPTN) read Ftax write Settax stored tax_Specified;
- property shipping: ExtendedAmountType Index (IS_OPTN) read Fshipping write Setshipping stored shipping_Specified;
- property duty: ExtendedAmountType Index (IS_OPTN) read Fduty write Setduty stored duty_Specified;
- property lineItems: Array_Of_LineItemType Index (IS_OPTN or IS_UNBD) read FlineItems write SetlineItems stored lineItems_Specified;
- property prepaidBalanceRemaining: TXSDecimal Index (IS_OPTN) read FprepaidBalanceRemaining write SetprepaidBalanceRemaining stored prepaidBalanceRemaining_Specified;
- property currencyCode: string Index (IS_OPTN) read FcurrencyCode write SetcurrencyCode stored currencyCode_Specified;
- property taxExempt: Boolean Index (IS_OPTN) read FtaxExempt write SettaxExempt stored taxExempt_Specified;
- property payment: PaymentMaskedType Index (IS_OPTN) read Fpayment write Setpayment stored payment_Specified;
- property customer: CustomerDataType Index (IS_OPTN) read Fcustomer write Setcustomer stored customer_Specified;
- property billTo: CustomerAddressType Index (IS_OPTN) read FbillTo write SetbillTo stored billTo_Specified;
- property shipTo: NameAndAddressType Index (IS_OPTN) read FshipTo write SetshipTo stored shipTo_Specified;
- property recurringBilling: Boolean Index (IS_OPTN) read FrecurringBilling write SetrecurringBilling stored recurringBilling_Specified;
- property customerIP: string Index (IS_OPTN) read FcustomerIP write SetcustomerIP stored customerIP_Specified;
- end;
- // ************************************************************************ //
- // XML : ProfileTransAmountType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- ProfileTransAmountType = class(TRemotable)
- private
- Famount: TXSDecimal;
- Ftax: ExtendedAmountType;
- Ftax_Specified: boolean;
- Fshipping: ExtendedAmountType;
- Fshipping_Specified: boolean;
- Fduty: ExtendedAmountType;
- Fduty_Specified: boolean;
- FlineItems: Array_Of_LineItemType;
- FlineItems_Specified: boolean;
- procedure Settax(Index: Integer; const AExtendedAmountType: ExtendedAmountType);
- function tax_Specified(Index: Integer): boolean;
- procedure Setshipping(Index: Integer; const AExtendedAmountType: ExtendedAmountType);
- function shipping_Specified(Index: Integer): boolean;
- procedure Setduty(Index: Integer; const AExtendedAmountType: ExtendedAmountType);
- function duty_Specified(Index: Integer): boolean;
- procedure SetlineItems(Index: Integer; const AArray_Of_LineItemType: Array_Of_LineItemType);
- function lineItems_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property amount: TXSDecimal read Famount write Famount;
- property tax: ExtendedAmountType Index (IS_OPTN) read Ftax write Settax stored tax_Specified;
- property shipping: ExtendedAmountType Index (IS_OPTN) read Fshipping write Setshipping stored shipping_Specified;
- property duty: ExtendedAmountType Index (IS_OPTN) read Fduty write Setduty stored duty_Specified;
- property lineItems: Array_Of_LineItemType Index (IS_OPTN or IS_UNBD) read FlineItems write SetlineItems stored lineItems_Specified;
- end;
- // ************************************************************************ //
- // XML : ProfileTransOrderType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- ProfileTransOrderType = class(ProfileTransAmountType)
- private
- FcustomerProfileId: Int64;
- FcustomerPaymentProfileId: Int64;
- FcustomerShippingAddressId: Int64;
- FcustomerShippingAddressId_Specified: boolean;
- Forder: OrderExType;
- Forder_Specified: boolean;
- FtaxExempt: Boolean;
- FtaxExempt_Specified: boolean;
- FrecurringBilling: Boolean;
- FrecurringBilling_Specified: boolean;
- FcardCode: string;
- FcardCode_Specified: boolean;
- FsplitTenderId: Int64;
- FsplitTenderId_Specified: boolean;
- procedure SetcustomerShippingAddressId(Index: Integer; const AInt64: Int64);
- function customerShippingAddressId_Specified(Index: Integer): boolean;
- procedure Setorder(Index: Integer; const AOrderExType: OrderExType);
- function order_Specified(Index: Integer): boolean;
- procedure SettaxExempt(Index: Integer; const ABoolean: Boolean);
- function taxExempt_Specified(Index: Integer): boolean;
- procedure SetrecurringBilling(Index: Integer; const ABoolean: Boolean);
- function recurringBilling_Specified(Index: Integer): boolean;
- procedure SetcardCode(Index: Integer; const Astring: string);
- function cardCode_Specified(Index: Integer): boolean;
- procedure SetsplitTenderId(Index: Integer; const AInt64: Int64);
- function splitTenderId_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property customerProfileId: Int64 read FcustomerProfileId write FcustomerProfileId;
- property customerPaymentProfileId: Int64 read FcustomerPaymentProfileId write FcustomerPaymentProfileId;
- property customerShippingAddressId: Int64 Index (IS_OPTN) read FcustomerShippingAddressId write SetcustomerShippingAddressId stored customerShippingAddressId_Specified;
- property order: OrderExType Index (IS_OPTN) read Forder write Setorder stored order_Specified;
- property taxExempt: Boolean Index (IS_OPTN) read FtaxExempt write SettaxExempt stored taxExempt_Specified;
- property recurringBilling: Boolean Index (IS_OPTN) read FrecurringBilling write SetrecurringBilling stored recurringBilling_Specified;
- property cardCode: string Index (IS_OPTN) read FcardCode write SetcardCode stored cardCode_Specified;
- property splitTenderId: Int64 Index (IS_OPTN) read FsplitTenderId write SetsplitTenderId stored splitTenderId_Specified;
- end;
- // ************************************************************************ //
- // XML : ProfileTransAuthOnlyType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- ProfileTransAuthOnlyType = class(ProfileTransOrderType)
- private
- published
- end;
- // ************************************************************************ //
- // XML : ProfileTransAuthCaptureType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- ProfileTransAuthCaptureType = class(ProfileTransOrderType)
- private
- published
- end;
- // ************************************************************************ //
- // XML : ProfileTransCaptureOnlyType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- ProfileTransCaptureOnlyType = class(ProfileTransOrderType)
- private
- FapprovalCode: string;
- FapprovalCode_Specified: boolean;
- procedure SetapprovalCode(Index: Integer; const Astring: string);
- function approvalCode_Specified(Index: Integer): boolean;
- published
- property approvalCode: string Index (IS_OPTN) read FapprovalCode write SetapprovalCode stored approvalCode_Specified;
- end;
- // ************************************************************************ //
- // XML : ProfileTransRefundType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- ProfileTransRefundType = class(ProfileTransAmountType)
- private
- FcustomerProfileId: Int64;
- FcustomerProfileId_Specified: boolean;
- FcustomerPaymentProfileId: Int64;
- FcustomerPaymentProfileId_Specified: boolean;
- FcustomerShippingAddressId: Int64;
- FcustomerShippingAddressId_Specified: boolean;
- FcreditCardNumberMasked: string;
- FcreditCardNumberMasked_Specified: boolean;
- FbankRoutingNumberMasked: string;
- FbankRoutingNumberMasked_Specified: boolean;
- FbankAccountNumberMasked: string;
- FbankAccountNumberMasked_Specified: boolean;
- Forder: OrderExType;
- Forder_Specified: boolean;
- FtransId: string;
- FtransId_Specified: boolean;
- procedure SetcustomerProfileId(Index: Integer; const AInt64: Int64);
- function customerProfileId_Specified(Index: Integer): boolean;
- procedure SetcustomerPaymentProfileId(Index: Integer; const AInt64: Int64);
- function customerPaymentProfileId_Specified(Index: Integer): boolean;
- procedure SetcustomerShippingAddressId(Index: Integer; const AInt64: Int64);
- function customerShippingAddressId_Specified(Index: Integer): boolean;
- procedure SetcreditCardNumberMasked(Index: Integer; const Astring: string);
- function creditCardNumberMasked_Specified(Index: Integer): boolean;
- procedure SetbankRoutingNumberMasked(Index: Integer; const Astring: string);
- function bankRoutingNumberMasked_Specified(Index: Integer): boolean;
- procedure SetbankAccountNumberMasked(Index: Integer; const Astring: string);
- function bankAccountNumberMasked_Specified(Index: Integer): boolean;
- procedure Setorder(Index: Integer; const AOrderExType: OrderExType);
- function order_Specified(Index: Integer): boolean;
- procedure SettransId(Index: Integer; const Astring: string);
- function transId_Specified(Index: Integer): boolean;
- public
- destructor Destroy; override;
- published
- property customerProfileId: Int64 Index (IS_OPTN) read FcustomerProfileId write SetcustomerProfileId stored customerProfileId_Specified;
- property customerPaymentProfileId: Int64 Index (IS_OPTN) read FcustomerPaymentProfileId write SetcustomerPaymentProfileId stored customerPaymentProfileId_Specified;
- property customerShippingAddressId: Int64 Index (IS_OPTN) read FcustomerShippingAddressId write SetcustomerShippingAddressId stored customerShippingAddressId_Specified;
- property creditCardNumberMasked: string Index (IS_OPTN) read FcreditCardNumberMasked write SetcreditCardNumberMasked stored creditCardNumberMasked_Specified;
- property bankRoutingNumberMasked: string Index (IS_OPTN) read FbankRoutingNumberMasked write SetbankRoutingNumberMasked stored bankRoutingNumberMasked_Specified;
- property bankAccountNumberMasked: string Index (IS_OPTN) read FbankAccountNumberMasked write SetbankAccountNumberMasked stored bankAccountNumberMasked_Specified;
- property order: OrderExType Index (IS_OPTN) read Forder write Setorder stored order_Specified;
- property transId: string Index (IS_OPTN) read FtransId write SettransId stored transId_Specified;
- end;
- // ************************************************************************ //
- // XML : ProfileTransPriorAuthCaptureType, global, <complexType>
- // Namespace : https://api.authorize.net/soap/v1/
- // ************************************************************************ //
- ProfileTransPriorAuthCaptureType = class(ProfileTransAmountType)
- private
- FcustomerProfileId: Int64;
- FcustomerProfileId_Specified: boolean;
- FcustomerPaymentProfileId: Int64;
- FcustomerPaymentProfileId_Specified: boolean;
- FcustomerShippingAddressId: Int64;
- FcustomerShippingAddressId_Specified: boolean;
- FtransId: string;
- FtransId_Specified: boolean;
- procedure SetcustomerProfileId(Index: Integer; const AInt64: Int64);
- function customerProfileId_Specified(Index: Integer): boolean;
- procedure SetcustomerPaymentProfileId(Index: Integer; const AInt64: Int64);
- function customerPaymentProfileId_Specified(Index: Integer): boolean;
- procedure SetcustomerShippingAddressId(Index: Integer; const AInt64: Int64);
- function customerShippingAddressId_Specified(Index: Integer): boolean;
- procedure SettransId(Index: Integer; const Astring: string);
- function transId_Specified(Index: Integer): boolean;
- published
- property customerProfileId: Int64 Index (IS_OPTN) read FcustomerProfileId write SetcustomerProfileId stored customerProfileId_Specified;
- property customerPaymentProfileId: Int64 Index (IS_OPTN) read FcustomerPaymentProfileId write SetcustomerPaymentProfileId stored customerPaymentProfileId_Specified;
- property customerShippingAddressId: Int64 Index (IS_OPTN) read FcustomerShippingAddressId write SetcustomerShippingAddressId stored customerShippingAddressId_Specified;
- property transId: string Index (IS_OPTN) read FtransId write SettransId stored transId_Specified;
- end;
- // ************************************************************************ //
- // Namespace : https://api.authorize.net/soap/v1/
- // soapAction: https://api.authorize.net/soap/v1/%operationName%
- // transport : http://schemas.xmlsoap.org/soap/http
- // style : document
- // binding : ServiceSoap
- // service : Service
- // port : ServiceSoap
- // URL : https://api.authorize.net/soap/v1/Service.asmx
- // ************************************************************************ //
- ServiceSoap = interface(IInvokable)
- ['{14FA0016-3E08-DE31-674C-F45020FEB618}']
- function IsAlive: ANetApiResponseType; stdcall;
- function AuthenticateTest(const merchantAuthentication: MerchantAuthenticationType): ANetApiResponseType; stdcall;
- function ARBCreateSubscription(const merchantAuthentication: MerchantAuthenticationType; const subscription: ARBSubscriptionType): ARBCreateSubscriptionResponseType; stdcall;
- function ARBUpdateSubscription(const merchantAuthentication: MerchantAuthenticationType; const subscriptionId: Int64; const subscription: ARBSubscriptionType): ARBUpdateSubscriptionResponseType; stdcall;
- function ARBCancelSubscription(const merchantAuthentication: MerchantAuthenticationType; const subscriptionId: Int64): ARBCancelSubscriptionResponseType; stdcall;
- function ARBGetSubscriptionStatus(const merchantAuthentication: MerchantAuthenticationType; const subscriptionId: Int64): ARBGetSubscriptionStatusResponseType; stdcall;
- function CreateCustomerProfile(const merchantAuthentication: MerchantAuthenticationType; const profile: CustomerProfileType; const validationMode: ValidationModeEnum): CreateCustomerProfileResponseType; stdcall;
- function CreateCustomerPaymentProfile(const merchantAuthentication: MerchantAuthenticationType; const customerProfileId: Int64; const paymentProfile: CustomerPaymentProfileType; const validationMode: ValidationModeEnum): CreateCustomerPaymentProfileResponseType; stdcall;
- function CreateCustomerShippingAddress(const merchantAuthentication: MerchantAuthenticationType; const customerProfileId: Int64; const address: CustomerAddressType): CreateCustomerShippingAddressResponseType; stdcall;
- function GetCustomerProfile(const merchantAuthentication: MerchantAuthenticationType; const customerProfileId: Int64): GetCustomerProfileResponseType; stdcall;
- function GetCustomerPaymentProfile(const merchantAuthentication: MerchantAuthenticationType; const customerProfileId: Int64; const customerPaymentProfileId: Int64): GetCustomerPaymentProfileResponseType; stdcall;
- function GetCustomerShippingAddress(const merchantAuthentication: MerchantAuthenticationType; const customerProfileId: Int64; const customerAddressId: Int64): GetCustomerShippingAddressResponseType; stdcall;
- function UpdateCustomerProfile(const merchantAuthentication: MerchantAuthenticationType; const profile: CustomerProfileExType): UpdateCustomerProfileResponseType; stdcall;
- function UpdateCustomerPaymentProfile(const merchantAuthentication: MerchantAuthenticationType; const customerProfileId: Int64; const paymentProfile: CustomerPaymentProfileExType; const validationMode: ValidationModeEnum): UpdateCustomerPaymentProfileResponseType; stdcall;
- function UpdateCustomerShippingAddress(const merchantAuthentication: MerchantAuthenticationType; const customerProfileId: Int64; const address: CustomerAddressExType): UpdateCustomerShippingAddressResponseType; stdcall;
- function DeleteCustomerProfile(const merchantAuthentication: MerchantAuthenticationType; const customerProfileId: Int64): DeleteCustomerProfileResponseType; stdcall;
- function DeleteCustomerPaymentProfile(const merchantAuthentication: MerchantAuthenticationType; const customerProfileId: Int64; const customerPaymentProfileId: Int64): DeleteCustomerPaymentProfileResponseType; stdcall;
- function DeleteCustomerShippingAddress(const merchantAuthentication: MerchantAuthenticationType; const customerProfileId: Int64; const customerAddressId: Int64): DeleteCustomerShippingAddressResponseType; stdcall;
- function CreateCustomerProfileTransaction(const merchantAuthentication: MerchantAuthenticationType; const transaction: ProfileTransactionType; const extraOptions: string): CreateCustomerProfileTransactionResponseType; stdcall;
- function ValidateCustomerPaymentProfile(const merchantAuthentication: MerchantAuthenticationType; const customerProfileId: Int64; const customerPaymentProfileId: Int64; const customerShippingAddressId: Int64; const cardCode: string; const validationMode: ValidationModeEnum
- ): ValidateCustomerPaymentProfileResponseType; stdcall;
- function GetCustomerProfileIds(const merchantAuthentication: MerchantAuthenticationType): GetCustomerProfileIdsResponseType; stdcall;
- function UpdateSplitTenderGroup(const merchantAuthentication: MerchantAuthenticationType; const splitTenderId: Int64; const splitTenderStatus: SplitTenderStatusEnum): UpdateSplitTenderGroupResponseType; stdcall;
- function GetTransactionDetails(const merchantAuthentication: MerchantAuthenticationType; const transId: string): GetTransactionDetailsResponseType; stdcall;
- function GetSettledBatchList(const merchantAuthentication: MerchantAuthenticationType; const request: GetSettledBatchListRequestType): GetSettledBatchListResponseType; stdcall;
- function GetTransactionList(const merchantAuthentication: MerchantAuthenticationType; const request: GetTransactionListRequestType): GetTransactionListResponseType; stdcall;
- end;
- function GetServiceSoap(UseWSDL: Boolean=System.False; Addr: string=''; HTTPRIO: THTTPRIO = nil): ServiceSoap;
- implementation
- uses SysUtils;
- function GetServiceSoap(UseWSDL: Boolean; Addr: string; HTTPRIO: THTTPRIO): ServiceSoap;
- const
- defWSDL = 'https://api.authorize.net/soap/v1/Service.asmx?WSDL';
- // defURL = 'https://apitest.authorize.net/soap/v1/Service.asmx';
- defURL = 'https://api.authorize.net/soap/v1/Service.asmx';
- defSvc = 'Service';
- defPrt = 'ServiceSoap';
- var
- RIO: THTTPRIO;
- begin
- Result := nil;
- if (Addr = '') then
- begin
- if UseWSDL then
- Addr := defWSDL
- else
- Addr := defURL;
- end;
- if HTTPRIO = nil then
- RIO := THTTPRIO.Create(nil)
- else
- RIO := HTTPRIO;
- try
- Result := (RIO as ServiceSoap);
- if UseWSDL then
- begin
- RIO.WSDLLocation := Addr;
- RIO.Service := defSvc;
- RIO.Port := defPrt;
- end else
- RIO.URL := Addr;
- finally
- if (Result = nil) and (HTTPRIO = nil) then
- RIO.Free;
- end;
- end;
- destructor ANetApiResponseType.Destroy;
- var
- I: Integer;
- begin
- for I := 0 to System.Length(Fmessages)-1 do
- SysUtils.FreeAndNil(Fmessages[I]);
- System.SetLength(Fmessages, 0);
- inherited Destroy;
- end;
- procedure ANetApiResponseType.Setmessages(Index: Integer; const AArrayOfMessagesTypeMessage: ArrayOfMessagesTypeMessage);
- begin
- Fmessages := AArrayOfMessagesTypeMessage;
- Fmessages_Specified := True;
- end;
- function ANetApiResponseType.messages_Specified(Index: Integer): boolean;
- begin
- Result := Fmessages_Specified;
- end;
- procedure MessagesTypeMessage.Setcode(Index: Integer; const Astring: string);
- begin
- Fcode := Astring;
- Fcode_Specified := True;
- end;
- function MessagesTypeMessage.code_Specified(Index: Integer): boolean;
- begin
- Result := Fcode_Specified;
- end;
- procedure MessagesTypeMessage.Settext(Index: Integer; const Astring: string);
- begin
- Ftext := Astring;
- Ftext_Specified := True;
- end;
- function MessagesTypeMessage.text_Specified(Index: Integer): boolean;
- begin
- Result := Ftext_Specified;
- end;
- procedure MerchantAuthenticationType.Setname_(Index: Integer; const Astring: string);
- begin
- Fname_ := Astring;
- Fname__Specified := True;
- end;
- function MerchantAuthenticationType.name__Specified(Index: Integer): boolean;
- begin
- Result := Fname__Specified;
- end;
- procedure MerchantAuthenticationType.SettransactionKey(Index: Integer; const Astring: string);
- begin
- FtransactionKey := Astring;
- FtransactionKey_Specified := True;
- end;
- function MerchantAuthenticationType.transactionKey_Specified(Index: Integer): boolean;
- begin
- Result := FtransactionKey_Specified;
- end;
- destructor ARBSubscriptionType.Destroy;
- begin
- SysUtils.FreeAndNil(FpaymentSchedule);
- SysUtils.FreeAndNil(Famount);
- SysUtils.FreeAndNil(FtrialAmount);
- SysUtils.FreeAndNil(Fpayment);
- SysUtils.FreeAndNil(Forder);
- SysUtils.FreeAndNil(Fcustomer);
- SysUtils.FreeAndNil(FbillTo);
- SysUtils.FreeAndNil(FshipTo);
- inherited Destroy;
- end;
- procedure ARBSubscriptionType.Setname_(Index: Integer; const Astring: string);
- begin
- Fname_ := Astring;
- Fname__Specified := True;
- end;
- function ARBSubscriptionType.name__Specified(Index: Integer): boolean;
- begin
- Result := Fname__Specified;
- end;
- procedure ARBSubscriptionType.SetpaymentSchedule(Index: Integer; const APaymentScheduleType: PaymentScheduleType);
- begin
- FpaymentSchedule := APaymentScheduleType;
- FpaymentSchedule_Specified := True;
- end;
- function ARBSubscriptionType.paymentSchedule_Specified(Index: Integer): boolean;
- begin
- Result := FpaymentSchedule_Specified;
- end;
- procedure ARBSubscriptionType.Setamount(Index: Integer; const ATXSDecimal: TXSDecimal);
- begin
- Famount := ATXSDecimal;
- Famount_Specified := True;
- end;
- function ARBSubscriptionType.amount_Specified(Index: Integer): boolean;
- begin
- Result := Famount_Specified;
- end;
- procedure ARBSubscriptionType.SettrialAmount(Index: Integer; const ATXSDecimal: TXSDecimal);
- begin
- FtrialAmount := ATXSDecimal;
- FtrialAmount_Specified := True;
- end;
- function ARBSubscriptionType.trialAmount_Specified(Index: Integer): boolean;
- begin
- Result := FtrialAmount_Specified;
- end;
- procedure ARBSubscriptionType.Setpayment(Index: Integer; const APaymentType: PaymentType);
- begin
- Fpayment := APaymentType;
- Fpayment_Specified := True;
- end;
- function ARBSubscriptionType.payment_Specified(Index: Integer): boolean;
- begin
- Result := Fpayment_Specified;
- end;
- procedure ARBSubscriptionType.Setorder(Index: Integer; const AOrderType: OrderType);
- begin
- Forder := AOrderType;
- Forder_Specified := True;
- end;
- function ARBSubscriptionType.order_Specified(Index: Integer): boolean;
- begin
- Result := Forder_Specified;
- end;
- procedure ARBSubscriptionType.Setcustomer(Index: Integer; const ACustomerType: CustomerType);
- begin
- Fcustomer := ACustomerType;
- Fcustomer_Specified := True;
- end;
- function ARBSubscriptionType.customer_Specified(Index: Integer): boolean;
- begin
- Result := Fcustomer_Specified;
- end;
- procedure ARBSubscriptionType.SetbillTo(Index: Integer; const ANameAndAddressType: NameAndAddressType);
- begin
- FbillTo := ANameAndAddressType;
- FbillTo_Specified := True;
- end;
- function ARBSubscriptionType.billTo_Specified(Index: Integer): boolean;
- begin
- Result := FbillTo_Specified;
- end;
- procedure ARBSubscriptionType.SetshipTo(Index: Integer; const ANameAndAddressType: NameAndAddressType);
- begin
- FshipTo := ANameAndAddressType;
- FshipTo_Specified := True;
- end;
- function ARBSubscriptionType.shipTo_Specified(Index: Integer): boolean;
- begin
- Result := FshipTo_Specified;
- end;
- destructor PaymentType.Destroy;
- begin
- SysUtils.FreeAndNil(FcreditCard);
- SysUtils.FreeAndNil(FbankAccount);
- inherited Destroy;
- end;
- procedure PaymentType.SetcreditCard(Index: Integer; const ACreditCardType: CreditCardType);
- begin
- FcreditCard := ACreditCardType;
- FcreditCard_Specified := True;
- end;
- function PaymentType.creditCard_Specified(Index: Integer): boolean;
- begin
- Result := FcreditCard_Specified;
- end;
- procedure PaymentType.SetbankAccount(Index: Integer; const ABankAccountType: BankAccountType);
- begin
- FbankAccount := ABankAccountType;
- FbankAccount_Specified := True;
- end;
- function PaymentType.bankAccount_Specified(Index: Integer): boolean;
- begin
- Result := FbankAccount_Specified;
- end;
- procedure OrderType.SetinvoiceNumber(Index: Integer; const Astring: string);
- begin
- FinvoiceNumber := Astring;
- FinvoiceNumber_Specified := True;
- end;
- function OrderType.invoiceNumber_Specified(Index: Integer): boolean;
- begin
- Result := FinvoiceNumber_Specified;
- end;
- procedure OrderType.Setdescription(Index: Integer; const Astring: string);
- begin
- Fdescription := Astring;
- Fdescription_Specified := True;
- end;
- function OrderType.description_Specified(Index: Integer): boolean;
- begin
- Result := Fdescription_Specified;
- end;
- procedure NameAndAddressType.SetfirstName(Index: Integer; const Astring: string);
- begin
- FfirstName := Astring;
- FfirstName_Specified := True;
- end;
- function NameAndAddressType.firstName_Specified(Index: Integer): boolean;
- begin
- Result := FfirstName_Specified;
- end;
- procedure NameAndAddressType.SetlastName(Index: Integer; const Astring: string);
- begin
- FlastName := Astring;
- FlastName_Specified := True;
- end;
- function NameAndAddressType.lastName_Specified(Index: Integer): boolean;
- begin
- Result := FlastName_Specified;
- end;
- procedure NameAndAddressType.Setcompany(Index: Integer; const Astring: string);
- begin
- Fcompany := Astring;
- Fcompany_Specified := True;
- end;
- function NameAndAddressType.company_Specified(Index: Integer): boolean;
- begin
- Result := Fcompany_Specified;
- end;
- procedure NameAndAddressType.Setaddress(Index: Integer; const Astring: string);
- begin
- Faddress := Astring;
- Faddress_Specified := True;
- end;
- function NameAndAddressType.address_Specified(Index: Integer): boolean;
- begin
- Result := Faddress_Specified;
- end;
- procedure NameAndAddressType.Setcity(Index: Integer; const Astring: string);
- begin
- Fcity := Astring;
- Fcity_Specified := True;
- end;
- function NameAndAddressType.city_Specified(Index: Integer): boolean;
- begin
- Result := Fcity_Specified;
- end;
- procedure NameAndAddressType.Setstate(Index: Integer; const Astring: string);
- begin
- Fstate := Astring;
- Fstate_Specified := True;
- end;
- function NameAndAddressType.state_Specified(Index: Integer): boolean;
- begin
- Result := Fstate_Specified;
- end;
- procedure NameAndAddressType.Setzip(Index: Integer; const Astring: string);
- begin
- Fzip := Astring;
- Fzip_Specified := True;
- end;
- function NameAndAddressType.zip_Specified(Index: Integer): boolean;
- begin
- Result := Fzip_Specified;
- end;
- procedure NameAndAddressType.Setcountry(Index: Integer; const Astring: string);
- begin
- Fcountry := Astring;
- Fcountry_Specified := True;
- end;
- function NameAndAddressType.country_Specified(Index: Integer): boolean;
- begin
- Result := Fcountry_Specified;
- end;
- destructor PaymentScheduleType.Destroy;
- begin
- SysUtils.FreeAndNil(Finterval);
- SysUtils.FreeAndNil(FstartDate);
- inherited Destroy;
- end;
- procedure PaymentScheduleType.Setinterval(Index: Integer; const APaymentScheduleTypeInterval: PaymentScheduleTypeInterval);
- begin
- Finterval := APaymentScheduleTypeInterval;
- Finterval_Specified := True;
- end;
- function PaymentScheduleType.interval_Specified(Index: Integer): boolean;
- begin
- Result := Finterval_Specified;
- end;
- procedure PaymentScheduleType.SetstartDate(Index: Integer; const ATXSDate: TXSDate);
- begin
- FstartDate := ATXSDate;
- FstartDate_Specified := True;
- end;
- function PaymentScheduleType.startDate_Specified(Index: Integer): boolean;
- begin
- Result := FstartDate_Specified;
- end;
- procedure PaymentScheduleType.SettotalOccurrences(Index: Integer; const ASmallInt: SmallInt);
- begin
- FtotalOccurrences := ASmallInt;
- FtotalOccurrences_Specified := True;
- end;
- function PaymentScheduleType.totalOccurrences_Specified(Index: Integer): boolean;
- begin
- Result := FtotalOccurrences_Specified;
- end;
- procedure PaymentScheduleType.SettrialOccurrences(Index: Integer; const ASmallInt: SmallInt);
- begin
- FtrialOccurrences := ASmallInt;
- FtrialOccurrences_Specified := True;
- end;
- function PaymentScheduleType.trialOccurrences_Specified(Index: Integer): boolean;
- begin
- Result := FtrialOccurrences_Specified;
- end;
- procedure CreditCardSimpleType.SetcardNumber(Index: Integer; const Astring: string);
- begin
- FcardNumber := Astring;
- FcardNumber_Specified := True;
- end;
- function CreditCardSimpleType.cardNumber_Specified(Index: Integer): boolean;
- begin
- Result := FcardNumber_Specified;
- end;
- procedure CreditCardSimpleType.SetexpirationDate(Index: Integer; const Astring: string);
- begin
- FexpirationDate := Astring;
- FexpirationDate_Specified := True;
- end;
- function CreditCardSimpleType.expirationDate_Specified(Index: Integer): boolean;
- begin
- Result := FexpirationDate_Specified;
- end;
- procedure CreditCardType.SetcardCode(Index: Integer; const Astring: string);
- begin
- FcardCode := Astring;
- FcardCode_Specified := True;
- end;
- function CreditCardType.cardCode_Specified(Index: Integer): boolean;
- begin
- Result := FcardCode_Specified;
- end;
- procedure BankAccountBaseType.SetaccountType(Index: Integer; const ABankAccountTypeEnum: BankAccountTypeEnum);
- begin
- FaccountType := ABankAccountTypeEnum;
- FaccountType_Specified := True;
- end;
- function BankAccountBaseType.accountType_Specified(Index: Integer): boolean;
- begin
- Result := FaccountType_Specified;
- end;
- procedure BankAccountBaseType.SetnameOnAccount(Index: Integer; const Astring: string);
- begin
- FnameOnAccount := Astring;
- FnameOnAccount_Specified := True;
- end;
- function BankAccountBaseType.nameOnAccount_Specified(Index: Integer): boolean;
- begin
- Result := FnameOnAccount_Specified;
- end;
- procedure BankAccountBaseType.SetecheckType(Index: Integer; const AEcheckTypeEnum: EcheckTypeEnum);
- begin
- FecheckType := AEcheckTypeEnum;
- FecheckType_Specified := True;
- end;
- function BankAccountBaseType.echeckType_Specified(Index: Integer): boolean;
- begin
- Result := FecheckType_Specified;
- end;
- procedure BankAccountBaseType.SetbankName(Index: Integer; const Astring: string);
- begin
- FbankName := Astring;
- FbankName_Specified := True;
- end;
- function BankAccountBaseType.bankName_Specified(Index: Integer): boolean;
- begin
- Result := FbankName_Specified;
- end;
- procedure BankAccountType.SetroutingNumber(Index: Integer; const Astring: string);
- begin
- FroutingNumber := Astring;
- FroutingNumber_Specified := True;
- end;
- function BankAccountType.routingNumber_Specified(Index: Integer): boolean;
- begin
- Result := FroutingNumber_Specified;
- end;
- procedure BankAccountType.SetaccountNumber(Index: Integer; const Astring: string);
- begin
- FaccountNumber := Astring;
- FaccountNumber_Specified := True;
- end;
- function BankAccountType.accountNumber_Specified(Index: Integer): boolean;
- begin
- Result := FaccountNumber_Specified;
- end;
- destructor CustomerType.Destroy;
- begin
- SysUtils.FreeAndNil(FdriversLicense);
- inherited Destroy;
- end;
- procedure CustomerType.Settype_(Index: Integer; const ACustomerTypeEnum: CustomerTypeEnum);
- begin
- Ftype_ := ACustomerTypeEnum;
- Ftype__Specified := True;
- end;
- function CustomerType.type__Specified(Index: Integer): boolean;
- begin
- Result := Ftype__Specified;
- end;
- procedure CustomerType.Setid(Index: Integer; const Astring: string);
- begin
- Fid := Astring;
- Fid_Specified := True;
- end;
- function CustomerType.id_Specified(Index: Integer): boolean;
- begin
- Result := Fid_Specified;
- end;
- procedure CustomerType.Setemail(Index: Integer; const Astring: string);
- begin
- Femail := Astring;
- Femail_Specified := True;
- end;
- function CustomerType.email_Specified(Index: Integer): boolean;
- begin
- Result := Femail_Specified;
- end;
- procedure CustomerType.SetphoneNumber(Index: Integer; const Astring: string);
- begin
- FphoneNumber := Astring;
- FphoneNumber_Specified := True;
- end;
- function CustomerType.phoneNumber_Specified(Index: Integer): boolean;
- begin
- Result := FphoneNumber_Specified;
- end;
- procedure CustomerType.SetfaxNumber(Index: Integer; const Astring: string);
- begin
- FfaxNumber := Astring;
- FfaxNumber_Specified := True;
- end;
- function CustomerType.faxNumber_Specified(Index: Integer): boolean;
- begin
- Result := FfaxNumber_Specified;
- end;
- procedure CustomerType.SetdriversLicense(Index: Integer; const ADriversLicenseType: DriversLicenseType);
- begin
- FdriversLicense := ADriversLicenseType;
- FdriversLicense_Specified := True;
- end;
- function CustomerType.driversLicense_Specified(Index: Integer): boolean;
- begin
- Result := FdriversLicense_Specified;
- end;
- procedure CustomerType.SettaxId(Index: Integer; const Astring: string);
- begin
- FtaxId := Astring;
- FtaxId_Specified := True;
- end;
- function CustomerType.taxId_Specified(Index: Integer): boolean;
- begin
- Result := FtaxId_Specified;
- end;
- procedure DriversLicenseBaseType.Setstate(Index: Integer; const Astring: string);
- begin
- Fstate := Astring;
- Fstate_Specified := True;
- end;
- function DriversLicenseBaseType.state_Specified(Index: Integer): boolean;
- begin
- Result := Fstate_Specified;
- end;
- procedure DriversLicenseType.Setnumber(Index: Integer; const Astring: string);
- begin
- Fnumber := Astring;
- Fnumber_Specified := True;
- end;
- function DriversLicenseType.number_Specified(Index: Integer): boolean;
- begin
- Result := Fnumber_Specified;
- end;
- procedure DriversLicenseType.SetdateOfBirth(Index: Integer; const Astring: string);
- begin
- FdateOfBirth := Astring;
- FdateOfBirth_Specified := True;
- end;
- function DriversLicenseType.dateOfBirth_Specified(Index: Integer): boolean;
- begin
- Result := FdateOfBirth_Specified;
- end;
- procedure CustomerProfileBaseType.SetmerchantCustomerId(Index: Integer; const Astring: string);
- begin
- FmerchantCustomerId := Astring;
- FmerchantCustomerId_Specified := True;
- end;
- function CustomerProfileBaseType.merchantCustomerId_Specified(Index: Integer): boolean;
- begin
- Result := FmerchantCustomerId_Specified;
- end;
- procedure CustomerProfileBaseType.Setdescription(Index: Integer; const Astring: string);
- begin
- Fdescription := Astring;
- Fdescription_Specified := True;
- end;
- function CustomerProfileBaseType.description_Specified(Index: Integer): boolean;
- begin
- Result := Fdescription_Specified;
- end;
- procedure CustomerProfileBaseType.Setemail(Index: Integer; const Astring: string);
- begin
- Femail := Astring;
- Femail_Specified := True;
- end;
- function CustomerProfileBaseType.email_Specified(Index: Integer): boolean;
- begin
- Result := Femail_Specified;
- end;
- destructor CustomerProfileType.Destroy;
- var
- I: Integer;
- begin
- for I := 0 to System.Length(FpaymentProfiles)-1 do
- SysUtils.FreeAndNil(FpaymentProfiles[I]);
- System.SetLength(FpaymentProfiles, 0);
- for I := 0 to System.Length(FshipToList)-1 do
- SysUtils.FreeAndNil(FshipToList[I]);
- System.SetLength(FshipToList, 0);
- inherited Destroy;
- end;
- procedure CustomerProfileType.SetpaymentProfiles(Index: Integer; const AArrayOfCustomerPaymentProfileType: ArrayOfCustomerPaymentProfileType);
- begin
- FpaymentProfiles := AArrayOfCustomerPaymentProfileType;
- FpaymentProfiles_Specified := True;
- end;
- function CustomerProfileType.paymentProfiles_Specified(Index: Integer): boolean;
- begin
- Result := FpaymentProfiles_Specified;
- end;
- procedure CustomerProfileType.SetshipToList(Index: Integer; const AArrayOfCustomerAddressType: ArrayOfCustomerAddressType);
- begin
- FshipToList := AArrayOfCustomerAddressType;
- FshipToList_Specified := True;
- end;
- function CustomerProfileType.shipToList_Specified(Index: Integer): boolean;
- begin
- Result := FshipToList_Specified;
- end;
- destructor CustomerPaymentProfileBaseType.Destroy;
- begin
- SysUtils.FreeAndNil(FbillTo);
- inherited Destroy;
- end;
- procedure CustomerPaymentProfileBaseType.SetcustomerType(Index: Integer; const ACustomerTypeEnum: CustomerTypeEnum);
- begin
- FcustomerType := ACustomerTypeEnum;
- FcustomerType_Specified := True;
- end;
- function CustomerPaymentProfileBaseType.customerType_Specified(Index: Integer): boolean;
- begin
- Result := FcustomerType_Specified;
- end;
- procedure CustomerPaymentProfileBaseType.SetbillTo(Index: Integer; const ACustomerAddressType: CustomerAddressType);
- begin
- FbillTo := ACustomerAddressType;
- FbillTo_Specified := True;
- end;
- function CustomerPaymentProfileBaseType.billTo_Specified(Index: Integer): boolean;
- begin
- Result := FbillTo_Specified;
- end;
- destructor CustomerPaymentProfileType.Destroy;
- begin
- SysUtils.FreeAndNil(Fpayment);
- SysUtils.FreeAndNil(FdriversLicense);
- inherited Destroy;
- end;
- procedure CustomerPaymentProfileType.Setpayment(Index: Integer; const APaymentType: PaymentType);
- begin
- Fpayment := APaymentType;
- Fpayment_Specified := True;
- end;
- function CustomerPaymentProfileType.payment_Specified(Index: Integer): boolean;
- begin
- Result := Fpayment_Specified;
- end;
- procedure CustomerPaymentProfileType.SetdriversLicense(Index: Integer; const ADriversLicenseType: DriversLicenseType);
- begin
- FdriversLicense := ADriversLicenseType;
- FdriversLicense_Specified := True;
- end;
- function CustomerPaymentProfileType.driversLicense_Specified(Index: Integer): boolean;
- begin
- Result := FdriversLicense_Specified;
- end;
- procedure CustomerPaymentProfileType.SettaxId(Index: Integer; const Astring: string);
- begin
- FtaxId := Astring;
- FtaxId_Specified := True;
- end;
- function CustomerPaymentProfileType.taxId_Specified(Index: Integer): boolean;
- begin
- Result := FtaxId_Specified;
- end;
- procedure CustomerAddressType.SetphoneNumber(Index: Integer; const Astring: string);
- begin
- FphoneNumber := Astring;
- FphoneNumber_Specified := True;
- end;
- function CustomerAddressType.phoneNumber_Specified(Index: Integer): boolean;
- begin
- Result := FphoneNumber_Specified;
- end;
- procedure CustomerAddressType.SetfaxNumber(Index: Integer; const Astring: string);
- begin
- FfaxNumber := Astring;
- FfaxNumber_Specified := True;
- end;
- function CustomerAddressType.faxNumber_Specified(Index: Integer): boolean;
- begin
- Result := FfaxNumber_Specified;
- end;
- procedure CreateCustomerProfileResponseType.SetcustomerPaymentProfileIdList(Index: Integer; const AArrayOfLong: ArrayOfLong);
- begin
- FcustomerPaymentProfileIdList := AArrayOfLong;
- FcustomerPaymentProfileIdList_Specified := True;
- end;
- function CreateCustomerProfileResponseType.customerPaymentProfileIdList_Specified(Index: Integer): boolean;
- begin
- Result := FcustomerPaymentProfileIdList_Specified;
- end;
- procedure CreateCustomerProfileResponseType.SetcustomerShippingAddressIdList(Index: Integer; const AArrayOfLong: ArrayOfLong);
- begin
- FcustomerShippingAddressIdList := AArrayOfLong;
- FcustomerShippingAddressIdList_Specified := True;
- end;
- function CreateCustomerProfileResponseType.customerShippingAddressIdList_Specified(Index: Integer): boolean;
- begin
- Result := FcustomerShippingAddressIdList_Specified;
- end;
- procedure CreateCustomerProfileResponseType.SetvalidationDirectResponseList(Index: Integer; const AArrayOfString: ArrayOfString);
- begin
- FvalidationDirectResponseList := AArrayOfString;
- FvalidationDirectResponseList_Specified := True;
- end;
- function CreateCustomerProfileResponseType.validationDirectResponseList_Specified(Index: Integer): boolean;
- begin
- Result := FvalidationDirectResponseList_Specified;
- end;
- procedure CreateCustomerPaymentProfileResponseType.SetvalidationDirectResponse(Index: Integer; const Astring: string);
- begin
- FvalidationDirectResponse := Astring;
- FvalidationDirectResponse_Specified := True;
- end;
- function CreateCustomerPaymentProfileResponseType.validationDirectResponse_Specified(Index: Integer): boolean;
- begin
- Result := FvalidationDirectResponse_Specified;
- end;
- destructor GetCustomerProfileResponseType.Destroy;
- begin
- SysUtils.FreeAndNil(Fprofile);
- inherited Destroy;
- end;
- procedure GetCustomerProfileResponseType.Setprofile(Index: Integer; const ACustomerProfileMaskedType: CustomerProfileMaskedType);
- begin
- Fprofile := ACustomerProfileMaskedType;
- Fprofile_Specified := True;
- end;
- function GetCustomerProfileResponseType.profile_Specified(Index: Integer): boolean;
- begin
- Result := Fprofile_Specified;
- end;
- destructor CustomerProfileMaskedType.Destroy;
- var
- I: Integer;
- begin
- for I := 0 to System.Length(FpaymentProfiles)-1 do
- SysUtils.FreeAndNil(FpaymentProfiles[I]);
- System.SetLength(FpaymentProfiles, 0);
- for I := 0 to System.Length(FshipToList)-1 do
- SysUtils.FreeAndNil(FshipToList[I]);
- System.SetLength(FshipToList, 0);
- inherited Destroy;
- end;
- procedure CustomerProfileMaskedType.SetpaymentProfiles(Index: Integer; const AArrayOfCustomerPaymentProfileMaskedType: ArrayOfCustomerPaymentProfileMaskedType);
- begin
- FpaymentProfiles := AArrayOfCustomerPaymentProfileMaskedType;
- FpaymentProfiles_Specified := True;
- end;
- function CustomerProfileMaskedType.paymentProfiles_Specified(Index: Integer): boolean;
- begin
- Result := FpaymentProfiles_Specified;
- end;
- procedure CustomerProfileMaskedType.SetshipToList(Index: Integer; const AArrayOfCustomerAddressExType: ArrayOfCustomerAddressExType);
- begin
- FshipToList := AArrayOfCustomerAddressExType;
- FshipToList_Specified := True;
- end;
- function CustomerProfileMaskedType.shipToList_Specified(Index: Integer): boolean;
- begin
- Result := FshipToList_Specified;
- end;
- destructor CustomerPaymentProfileMaskedType.Destroy;
- begin
- SysUtils.FreeAndNil(Fpayment);
- SysUtils.FreeAndNil(FdriversLicense);
- inherited Destroy;
- end;
- procedure CustomerPaymentProfileMaskedType.Setpayment(Index: Integer; const APaymentMaskedType: PaymentMaskedType);
- begin
- Fpayment := APaymentMaskedType;
- Fpayment_Specified := True;
- end;
- function CustomerPaymentProfileMaskedType.payment_Specified(Index: Integer): boolean;
- begin
- Result := Fpayment_Specified;
- end;
- procedure CustomerPaymentProfileMaskedType.SetdriversLicense(Index: Integer; const ADriversLicenseMaskedType: DriversLicenseMaskedType);
- begin
- FdriversLicense := ADriversLicenseMaskedType;
- FdriversLicense_Specified := True;
- end;
- function CustomerPaymentProfileMaskedType.driversLicense_Specified(Index: Integer): boolean;
- begin
- Result := FdriversLicense_Specified;
- end;
- procedure CustomerPaymentProfileMaskedType.SettaxId(Index: Integer; const Astring: string);
- begin
- FtaxId := Astring;
- FtaxId_Specified := True;
- end;
- function CustomerPaymentProfileMaskedType.taxId_Specified(Index: Integer): boolean;
- begin
- Result := FtaxId_Specified;
- end;
- destructor PaymentMaskedType.Destroy;
- begin
- SysUtils.FreeAndNil(FcreditCard);
- SysUtils.FreeAndNil(FbankAccount);
- inherited Destroy;
- end;
- procedure PaymentMaskedType.SetcreditCard(Index: Integer; const ACreditCardMaskedType: CreditCardMaskedType);
- begin
- FcreditCard := ACreditCardMaskedType;
- FcreditCard_Specified := True;
- end;
- function PaymentMaskedType.creditCard_Specified(Index: Integer): boolean;
- begin
- Result := FcreditCard_Specified;
- end;
- procedure PaymentMaskedType.SetbankAccount(Index: Integer; const ABankAccountMaskedType: BankAccountMaskedType);
- begin
- FbankAccount := ABankAccountMaskedType;
- FbankAccount_Specified := True;
- end;
- function PaymentMaskedType.bankAccount_Specified(Index: Integer): boolean;
- begin
- Result := FbankAccount_Specified;
- end;
- procedure DriversLicenseMaskedType.Setnumber(Index: Integer; const Astring: string);
- begin
- Fnumber := Astring;
- Fnumber_Specified := True;
- end;
- function DriversLicenseMaskedType.number_Specified(Index: Integer): boolean;
- begin
- Result := Fnumber_Specified;
- end;
- procedure DriversLicenseMaskedType.SetdateOfBirth(Index: Integer; const Astring: string);
- begin
- FdateOfBirth := Astring;
- FdateOfBirth_Specified := True;
- end;
- function DriversLicenseMaskedType.dateOfBirth_Specified(Index: Integer): boolean;
- begin
- Result := FdateOfBirth_Specified;
- end;
- procedure CreditCardMaskedType.SetcardNumber(Index: Integer; const Astring: string);
- begin
- FcardNumber := Astring;
- FcardNumber_Specified := True;
- end;
- function CreditCardMaskedType.cardNumber_Specified(Index: Integer): boolean;
- begin
- Result := FcardNumber_Specified;
- end;
- procedure CreditCardMaskedType.SetexpirationDate(Index: Integer; const Astring: string);
- begin
- FexpirationDate := Astring;
- FexpirationDate_Specified := True;
- end;
- function CreditCardMaskedType.expirationDate_Specified(Index: Integer): boolean;
- begin
- Result := FexpirationDate_Specified;
- end;
- procedure CreditCardMaskedType.SetcardType(Index: Integer; const Astring: string);
- begin
- FcardType := Astring;
- FcardType_Specified := True;
- end;
- function CreditCardMaskedType.cardType_Specified(Index: Integer): boolean;
- begin
- Result := FcardType_Specified;
- end;
- procedure BankAccountMaskedType.SetroutingNumber(Index: Integer; const Astring: string);
- begin
- FroutingNumber := Astring;
- FroutingNumber_Specified := True;
- end;
- function BankAccountMaskedType.routingNumber_Specified(Index: Integer): boolean;
- begin
- Result := FroutingNumber_Specified;
- end;
- procedure BankAccountMaskedType.SetaccountNumber(Index: Integer; const Astring: string);
- begin
- FaccountNumber := Astring;
- FaccountNumber_Specified := True;
- end;
- function BankAccountMaskedType.accountNumber_Specified(Index: Integer): boolean;
- begin
- Result := FaccountNumber_Specified;
- end;
- destructor GetCustomerPaymentProfileResponseType.Destroy;
- begin
- SysUtils.FreeAndNil(FpaymentProfile);
- inherited Destroy;
- end;
- procedure GetCustomerPaymentProfileResponseType.SetpaymentProfile(Index: Integer; const ACustomerPaymentProfileMaskedType: CustomerPaymentProfileMaskedType);
- begin
- FpaymentProfile := ACustomerPaymentProfileMaskedType;
- FpaymentProfile_Specified := True;
- end;
- function GetCustomerPaymentProfileResponseType.paymentProfile_Specified(Index: Integer): boolean;
- begin
- Result := FpaymentProfile_Specified;
- end;
- destructor GetCustomerShippingAddressResponseType.Destroy;
- begin
- SysUtils.FreeAndNil(Faddress);
- inherited Destroy;
- end;
- procedure GetCustomerShippingAddressResponseType.Setaddress(Index: Integer; const ACustomerAddressExType: CustomerAddressExType);
- begin
- Faddress := ACustomerAddressExType;
- Faddress_Specified := True;
- end;
- function GetCustomerShippingAddressResponseType.address_Specified(Index: Integer): boolean;
- begin
- Result := Faddress_Specified;
- end;
- procedure UpdateCustomerPaymentProfileResponseType.SetvalidationDirectResponse(Index: Integer; const Astring: string);
- begin
- FvalidationDirectResponse := Astring;
- FvalidationDirectResponse_Specified := True;
- end;
- function UpdateCustomerPaymentProfileResponseType.validationDirectResponse_Specified(Index: Integer): boolean;
- begin
- Result := FvalidationDirectResponse_Specified;
- end;
- destructor ProfileTransactionType.Destroy;
- begin
- SysUtils.FreeAndNil(FprofileTransVoid);
- SysUtils.FreeAndNil(FprofileTransRefund);
- SysUtils.FreeAndNil(FprofileTransAuthOnly);
- SysUtils.FreeAndNil(FprofileTransPriorAuthCapture);
- SysUtils.FreeAndNil(FprofileTransAuthCapture);
- SysUtils.FreeAndNil(FprofileTransCaptureOnly);
- inherited Destroy;
- end;
- procedure ProfileTransactionType.SetprofileTransVoid(Index: Integer; const AProfileTransVoidType: ProfileTransVoidType);
- begin
- FprofileTransVoid := AProfileTransVoidType;
- FprofileTransVoid_Specified := True;
- end;
- function ProfileTransactionType.profileTransVoid_Specified(Index: Integer): boolean;
- begin
- Result := FprofileTransVoid_Specified;
- end;
- procedure ProfileTransactionType.SetprofileTransRefund(Index: Integer; const AProfileTransRefundType: ProfileTransRefundType);
- begin
- FprofileTransRefund := AProfileTransRefundType;
- FprofileTransRefund_Specified := True;
- end;
- function ProfileTransactionType.profileTransRefund_Specified(Index: Integer): boolean;
- begin
- Result := FprofileTransRefund_Specified;
- end;
- procedure ProfileTransactionType.SetprofileTransAuthOnly(Index: Integer; const AProfileTransAuthOnlyType: ProfileTransAuthOnlyType);
- begin
- FprofileTransAuthOnly := AProfileTransAuthOnlyType;
- FprofileTransAuthOnly_Specified := True;
- end;
- function ProfileTransactionType.profileTransAuthOnly_Specified(Index: Integer): boolean;
- begin
- Result := FprofileTransAuthOnly_Specified;
- end;
- procedure ProfileTransactionType.SetprofileTransPriorAuthCapture(Index: Integer; const AProfileTransPriorAuthCaptureType: ProfileTransPriorAuthCaptureType);
- begin
- FprofileTransPriorAuthCapture := AProfileTransPriorAuthCaptureType;
- FprofileTransPriorAuthCapture_Specified := True;
- end;
- function ProfileTransactionType.profileTransPriorAuthCapture_Specified(Index: Integer): boolean;
- begin
- Result := FprofileTransPriorAuthCapture_Specified;
- end;
- procedure ProfileTransactionType.SetprofileTransAuthCapture(Index: Integer; const AProfileTransAuthCaptureType: ProfileTransAuthCaptureType);
- begin
- FprofileTransAuthCapture := AProfileTransAuthCaptureType;
- FprofileTransAuthCapture_Specified := True;
- end;
- function ProfileTransactionType.profileTransAuthCapture_Specified(Index: Integer): boolean;
- begin
- Result := FprofileTransAuthCapture_Specified;
- end;
- procedure ProfileTransactionType.SetprofileTransCaptureOnly(Index: Integer; const AProfileTransCaptureOnlyType: ProfileTransCaptureOnlyType);
- begin
- FprofileTransCaptureOnly := AProfileTransCaptureOnlyType;
- FprofileTransCaptureOnly_Specified := True;
- end;
- function ProfileTransactionType.profileTransCaptureOnly_Specified(Index: Integer): boolean;
- begin
- Result := FprofileTransCaptureOnly_Specified;
- end;
- procedure ProfileTransVoidType.SetcustomerProfileId(Index: Integer; const AInt64: Int64);
- begin
- FcustomerProfileId := AInt64;
- FcustomerProfileId_Specified := True;
- end;
- function ProfileTransVoidType.customerProfileId_Specified(Index: Integer): boolean;
- begin
- Result := FcustomerProfileId_Specified;
- end;
- procedure ProfileTransVoidType.SetcustomerPaymentProfileId(Index: Integer; const AInt64: Int64);
- begin
- FcustomerPaymentProfileId := AInt64;
- FcustomerPaymentProfileId_Specified := True;
- end;
- function ProfileTransVoidType.customerPaymentProfileId_Specified(Index: Integer): boolean;
- begin
- Result := FcustomerPaymentProfileId_Specified;
- end;
- procedure ProfileTransVoidType.SetcustomerShippingAddressId(Index: Integer; const AInt64: Int64);
- begin
- FcustomerShippingAddressId := AInt64;
- FcustomerShippingAddressId_Specified := True;
- end;
- function ProfileTransVoidType.customerShippingAddressId_Specified(Index: Integer): boolean;
- begin
- Result := FcustomerShippingAddressId_Specified;
- end;
- procedure ProfileTransVoidType.SettransId(Index: Integer; const Astring: string);
- begin
- FtransId := Astring;
- FtransId_Specified := True;
- end;
- function ProfileTransVoidType.transId_Specified(Index: Integer): boolean;
- begin
- Result := FtransId_Specified;
- end;
- procedure OrderExType.SetpurchaseOrderNumber(Index: Integer; const Astring: string);
- begin
- FpurchaseOrderNumber := Astring;
- FpurchaseOrderNumber_Specified := True;
- end;
- function OrderExType.purchaseOrderNumber_Specified(Index: Integer): boolean;
- begin
- Result := FpurchaseOrderNumber_Specified;
- end;
- destructor ExtendedAmountType.Destroy;
- begin
- SysUtils.FreeAndNil(Famount);
- inherited Destroy;
- end;
- procedure ExtendedAmountType.Setname_(Index: Integer; const Astring: string);
- begin
- Fname_ := Astring;
- Fname__Specified := True;
- end;
- function ExtendedAmountType.name__Specified(Index: Integer): boolean;
- begin
- Result := Fname__Specified;
- end;
- procedure ExtendedAmountType.Setdescription(Index: Integer; const Astring: string);
- begin
- Fdescription := Astring;
- Fdescription_Specified := True;
- end;
- function ExtendedAmountType.description_Specified(Index: Integer): boolean;
- begin
- Result := Fdescription_Specified;
- end;
- destructor LineItemType.Destroy;
- begin
- SysUtils.FreeAndNil(Fquantity);
- SysUtils.FreeAndNil(FunitPrice);
- inherited Destroy;
- end;
- procedure LineItemType.SetitemId(Index: Integer; const Astring: string);
- begin
- FitemId := Astring;
- FitemId_Specified := True;
- end;
- function LineItemType.itemId_Specified(Index: Integer): boolean;
- begin
- Result := FitemId_Specified;
- end;
- procedure LineItemType.Setname_(Index: Integer; const Astring: string);
- begin
- Fname_ := Astring;
- Fname__Specified := True;
- end;
- function LineItemType.name__Specified(Index: Integer): boolean;
- begin
- Result := Fname__Specified;
- end;
- procedure LineItemType.Setdescription(Index: Integer; const Astring: string);
- begin
- Fdescription := Astring;
- Fdescription_Specified := True;
- end;
- function LineItemType.description_Specified(Index: Integer): boolean;
- begin
- Result := Fdescription_Specified;
- end;
- procedure LineItemType.Settaxable(Index: Integer; const ABoolean: Boolean);
- begin
- Ftaxable := ABoolean;
- Ftaxable_Specified := True;
- end;
- function LineItemType.taxable_Specified(Index: Integer): boolean;
- begin
- Result := Ftaxable_Specified;
- end;
- procedure CreateCustomerProfileTransactionResponseType.SetdirectResponse(Index: Integer; const Astring: string);
- begin
- FdirectResponse := Astring;
- FdirectResponse_Specified := True;
- end;
- function CreateCustomerProfileTransactionResponseType.directResponse_Specified(Index: Integer): boolean;
- begin
- Result := FdirectResponse_Specified;
- end;
- procedure ValidateCustomerPaymentProfileResponseType.SetdirectResponse(Index: Integer; const Astring: string);
- begin
- FdirectResponse := Astring;
- FdirectResponse_Specified := True;
- end;
- function ValidateCustomerPaymentProfileResponseType.directResponse_Specified(Index: Integer): boolean;
- begin
- Result := FdirectResponse_Specified;
- end;
- procedure GetCustomerProfileIdsResponseType.Setids(Index: Integer; const AArrayOfLong: ArrayOfLong);
- begin
- Fids := AArrayOfLong;
- Fids_Specified := True;
- end;
- function GetCustomerProfileIdsResponseType.ids_Specified(Index: Integer): boolean;
- begin
- Result := Fids_Specified;
- end;
- destructor GetTransactionDetailsResponseType.Destroy;
- begin
- SysUtils.FreeAndNil(Ftransaction);
- inherited Destroy;
- end;
- procedure GetTransactionDetailsResponseType.Settransaction(Index: Integer; const ATransactionDetailsType: TransactionDetailsType);
- begin
- Ftransaction := ATransactionDetailsType;
- Ftransaction_Specified := True;
- end;
- function GetTransactionDetailsResponseType.transaction_Specified(Index: Integer): boolean;
- begin
- Result := Ftransaction_Specified;
- end;
- destructor CustomerDataType.Destroy;
- begin
- SysUtils.FreeAndNil(FdriversLicense);
- inherited Destroy;
- end;
- procedure CustomerDataType.Settype_(Index: Integer; const ACustomerTypeEnum: CustomerTypeEnum);
- begin
- Ftype_ := ACustomerTypeEnum;
- Ftype__Specified := True;
- end;
- function CustomerDataType.type__Specified(Index: Integer): boolean;
- begin
- Result := Ftype__Specified;
- end;
- procedure CustomerDataType.Setid(Index: Integer; const Astring: string);
- begin
- Fid := Astring;
- Fid_Specified := True;
- end;
- function CustomerDataType.id_Specified(Index: Integer): boolean;
- begin
- Result := Fid_Specified;
- end;
- procedure CustomerDataType.Setemail(Index: Integer; const Astring: string);
- begin
- Femail := Astring;
- Femail_Specified := True;
- end;
- function CustomerDataType.email_Specified(Index: Integer): boolean;
- begin
- Result := Femail_Specified;
- end;
- procedure CustomerDataType.SetdriversLicense(Index: Integer; const ADriversLicenseType: DriversLicenseType);
- begin
- FdriversLicense := ADriversLicenseType;
- FdriversLicense_Specified := True;
- end;
- function CustomerDataType.driversLicense_Specified(Index: Integer): boolean;
- begin
- Result := FdriversLicense_Specified;
- end;
- procedure CustomerDataType.SettaxId(Index: Integer; const Astring: string);
- begin
- FtaxId := Astring;
- FtaxId_Specified := True;
- end;
- function CustomerDataType.taxId_Specified(Index: Integer): boolean;
- begin
- Result := FtaxId_Specified;
- end;
- procedure FDSFilterType.Setname_(Index: Integer; const Astring: string);
- begin
- Fname_ := Astring;
- Fname__Specified := True;
- end;
- function FDSFilterType.name__Specified(Index: Integer): boolean;
- begin
- Result := Fname__Specified;
- end;
- procedure FDSFilterType.Setaction(Index: Integer; const Astring: string);
- begin
- Faction := Astring;
- Faction_Specified := True;
- end;
- function FDSFilterType.action_Specified(Index: Integer): boolean;
- begin
- Result := Faction_Specified;
- end;
- destructor BatchDetailsType.Destroy;
- var
- I: Integer;
- begin
- for I := 0 to System.Length(Fstatistics)-1 do
- SysUtils.FreeAndNil(Fstatistics[I]);
- System.SetLength(Fstatistics, 0);
- SysUtils.FreeAndNil(FsettlementTimeUTC);
- SysUtils.FreeAndNil(FsettlementTimeLocal);
- inherited Destroy;
- end;
- procedure BatchDetailsType.SetbatchId(Index: Integer; const Astring: string);
- begin
- FbatchId := Astring;
- FbatchId_Specified := True;
- end;
- function BatchDetailsType.batchId_Specified(Index: Integer): boolean;
- begin
- Result := FbatchId_Specified;
- end;
- procedure BatchDetailsType.SetsettlementTimeUTC(Index: Integer; const ATXSDateTime: TXSDateTime);
- begin
- FsettlementTimeUTC := ATXSDateTime;
- FsettlementTimeUTC_Specified := True;
- end;
- function BatchDetailsType.settlementTimeUTC_Specified(Index: Integer): boolean;
- begin
- Result := FsettlementTimeUTC_Specified;
- end;
- procedure BatchDetailsType.SetsettlementTimeLocal(Index: Integer; const ATXSDateTime: TXSDateTime);
- begin
- FsettlementTimeLocal := ATXSDateTime;
- FsettlementTimeLocal_Specified := True;
- end;
- function BatchDetailsType.settlementTimeLocal_Specified(Index: Integer): boolean;
- begin
- Result := FsettlementTimeLocal_Specified;
- end;
- procedure BatchDetailsType.SetsettlementState(Index: Integer; const Astring: string);
- begin
- FsettlementState := Astring;
- FsettlementState_Specified := True;
- end;
- function BatchDetailsType.settlementState_Specified(Index: Integer): boolean;
- begin
- Result := FsettlementState_Specified;
- end;
- procedure BatchDetailsType.SetpaymentMethod(Index: Integer; const Astring: string);
- begin
- FpaymentMethod := Astring;
- FpaymentMethod_Specified := True;
- end;
- function BatchDetailsType.paymentMethod_Specified(Index: Integer): boolean;
- begin
- Result := FpaymentMethod_Specified;
- end;
- procedure BatchDetailsType.Setstatistics(Index: Integer; const AArrayOfBatchStatisticType: ArrayOfBatchStatisticType);
- begin
- Fstatistics := AArrayOfBatchStatisticType;
- Fstatistics_Specified := True;
- end;
- function BatchDetailsType.statistics_Specified(Index: Integer): boolean;
- begin
- Result := Fstatistics_Specified;
- end;
- destructor BatchStatisticType.Destroy;
- begin
- SysUtils.FreeAndNil(FchargeAmount);
- SysUtils.FreeAndNil(FrefundAmount);
- SysUtils.FreeAndNil(FreturnedItemAmount);
- SysUtils.FreeAndNil(FchargebackAmount);
- SysUtils.FreeAndNil(FchargeChargeBackAmount);
- SysUtils.FreeAndNil(FrefundChargeBackAmount);
- SysUtils.FreeAndNil(FchargeReturnedItemsAmount);
- SysUtils.FreeAndNil(FrefundReturnedItemsAmount);
- inherited Destroy;
- end;
- procedure BatchStatisticType.SetaccountType(Index: Integer; const Astring: string);
- begin
- FaccountType := Astring;
- FaccountType_Specified := True;
- end;
- function BatchStatisticType.accountType_Specified(Index: Integer): boolean;
- begin
- Result := FaccountType_Specified;
- end;
- procedure BatchStatisticType.SetcurrencyCode(Index: Integer; const Astring: string);
- begin
- FcurrencyCode := Astring;
- FcurrencyCode_Specified := True;
- end;
- function BatchStatisticType.currencyCode_Specified(Index: Integer): boolean;
- begin
- Result := FcurrencyCode_Specified;
- end;
- procedure BatchStatisticType.SetreturnedItemAmount(Index: Integer; const ATXSDecimal: TXSDecimal);
- begin
- FreturnedItemAmount := ATXSDecimal;
- FreturnedItemAmount_Specified := True;
- end;
- function BatchStatisticType.returnedItemAmount_Specified(Index: Integer): boolean;
- begin
- Result := FreturnedItemAmount_Specified;
- end;
- procedure BatchStatisticType.SetreturnedItemCount(Index: Integer; const AInteger: Integer);
- begin
- FreturnedItemCount := AInteger;
- FreturnedItemCount_Specified := True;
- end;
- function BatchStatisticType.returnedItemCount_Specified(Index: Integer): boolean;
- begin
- Result := FreturnedItemCount_Specified;
- end;
- procedure BatchStatisticType.SetchargebackAmount(Index: Integer; const ATXSDecimal: TXSDecimal);
- begin
- FchargebackAmount := ATXSDecimal;
- FchargebackAmount_Specified := True;
- end;
- function BatchStatisticType.chargebackAmount_Specified(Index: Integer): boolean;
- begin
- Result := FchargebackAmount_Specified;
- end;
- procedure BatchStatisticType.SetchargebackCount(Index: Integer; const AInteger: Integer);
- begin
- FchargebackCount := AInteger;
- FchargebackCount_Specified := True;
- end;
- function BatchStatisticType.chargebackCount_Specified(Index: Integer): boolean;
- begin
- Result := FchargebackCount_Specified;
- end;
- procedure BatchStatisticType.SetcorrectionNoticeCount(Index: Integer; const AInteger: Integer);
- begin
- FcorrectionNoticeCount := AInteger;
- FcorrectionNoticeCount_Specified := True;
- end;
- function BatchStatisticType.correctionNoticeCount_Specified(Index: Integer): boolean;
- begin
- Result := FcorrectionNoticeCount_Specified;
- end;
- procedure BatchStatisticType.SetchargeChargeBackAmount(Index: Integer; const ATXSDecimal: TXSDecimal);
- begin
- FchargeChargeBackAmount := ATXSDecimal;
- FchargeChargeBackAmount_Specified := True;
- end;
- function BatchStatisticType.chargeChargeBackAmount_Specified(Index: Integer): boolean;
- begin
- Result := FchargeChargeBackAmount_Specified;
- end;
- procedure BatchStatisticType.SetchargeChargeBackCount(Index: Integer; const AInteger: Integer);
- begin
- FchargeChargeBackCount := AInteger;
- FchargeChargeBackCount_Specified := True;
- end;
- function BatchStatisticType.chargeChargeBackCount_Specified(Index: Integer): boolean;
- begin
- Result := FchargeChargeBackCount_Specified;
- end;
- procedure BatchStatisticType.SetrefundChargeBackAmount(Index: Integer; const ATXSDecimal: TXSDecimal);
- begin
- FrefundChargeBackAmount := ATXSDecimal;
- FrefundChargeBackAmount_Specified := True;
- end;
- function BatchStatisticType.refundChargeBackAmount_Specified(Index: Integer): boolean;
- begin
- Result := FrefundChargeBackAmount_Specified;
- end;
- procedure BatchStatisticType.SetrefundChargeBackCount(Index: Integer; const AInteger: Integer);
- begin
- FrefundChargeBackCount := AInteger;
- FrefundChargeBackCount_Specified := True;
- end;
- function BatchStatisticType.refundChargeBackCount_Specified(Index: Integer): boolean;
- begin
- Result := FrefundChargeBackCount_Specified;
- end;
- procedure BatchStatisticType.SetchargeReturnedItemsAmount(Index: Integer; const ATXSDecimal: TXSDecimal);
- begin
- FchargeReturnedItemsAmount := ATXSDecimal;
- FchargeReturnedItemsAmount_Specified := True;
- end;
- function BatchStatisticType.chargeReturnedItemsAmount_Specified(Index: Integer): boolean;
- begin
- Result := FchargeReturnedItemsAmount_Specified;
- end;
- procedure BatchStatisticType.SetchargeReturnedItemsCount(Index: Integer; const AInteger: Integer);
- begin
- FchargeReturnedItemsCount := AInteger;
- FchargeReturnedItemsCount_Specified := True;
- end;
- function BatchStatisticType.chargeReturnedItemsCount_Specified(Index: Integer): boolean;
- begin
- Result := FchargeReturnedItemsCount_Specified;
- end;
- procedure BatchStatisticType.SetrefundReturnedItemsAmount(Index: Integer; const ATXSDecimal: TXSDecimal);
- begin
- FrefundReturnedItemsAmount := ATXSDecimal;
- FrefundReturnedItemsAmount_Specified := True;
- end;
- function BatchStatisticType.refundReturnedItemsAmount_Specified(Index: Integer): boolean;
- begin
- Result := FrefundReturnedItemsAmount_Specified;
- end;
- procedure BatchStatisticType.SetrefundReturnedItemsCount(Index: Integer; const AInteger: Integer);
- begin
- FrefundReturnedItemsCount := AInteger;
- FrefundReturnedItemsCount_Specified := True;
- end;
- function BatchStatisticType.refundReturnedItemsCount_Specified(Index: Integer): boolean;
- begin
- Result := FrefundReturnedItemsCount_Specified;
- end;
- destructor GetSettledBatchListRequestType.Destroy;
- begin
- SysUtils.FreeAndNil(FfirstSettlementDate);
- SysUtils.FreeAndNil(FlastSettlementDate);
- inherited Destroy;
- end;
- procedure GetSettledBatchListRequestType.SetincludeStatistics(Index: Integer; const ABoolean: Boolean);
- begin
- FincludeStatistics := ABoolean;
- FincludeStatistics_Specified := True;
- end;
- function GetSettledBatchListRequestType.includeStatistics_Specified(Index: Integer): boolean;
- begin
- Result := FincludeStatistics_Specified;
- end;
- procedure GetSettledBatchListRequestType.SetfirstSettlementDate(Index: Integer; const ATXSDateTime: TXSDateTime);
- begin
- FfirstSettlementDate := ATXSDateTime;
- FfirstSettlementDate_Specified := True;
- end;
- function GetSettledBatchListRequestType.firstSettlementDate_Specified(Index: Integer): boolean;
- begin
- Result := FfirstSettlementDate_Specified;
- end;
- procedure GetSettledBatchListRequestType.SetlastSettlementDate(Index: Integer; const ATXSDateTime: TXSDateTime);
- begin
- FlastSettlementDate := ATXSDateTime;
- FlastSettlementDate_Specified := True;
- end;
- function GetSettledBatchListRequestType.lastSettlementDate_Specified(Index: Integer): boolean;
- begin
- Result := FlastSettlementDate_Specified;
- end;
- destructor GetSettledBatchListResponseType.Destroy;
- var
- I: Integer;
- begin
- for I := 0 to System.Length(FbatchList)-1 do
- SysUtils.FreeAndNil(FbatchList[I]);
- System.SetLength(FbatchList, 0);
- inherited Destroy;
- end;
- procedure GetSettledBatchListResponseType.SetbatchList(Index: Integer; const AArrayOfBatchDetailsType: ArrayOfBatchDetailsType);
- begin
- FbatchList := AArrayOfBatchDetailsType;
- FbatchList_Specified := True;
- end;
- function GetSettledBatchListResponseType.batchList_Specified(Index: Integer): boolean;
- begin
- Result := FbatchList_Specified;
- end;
- procedure GetTransactionListRequestType.SetbatchId(Index: Integer; const Astring: string);
- begin
- FbatchId := Astring;
- FbatchId_Specified := True;
- end;
- function GetTransactionListRequestType.batchId_Specified(Index: Integer): boolean;
- begin
- Result := FbatchId_Specified;
- end;
- destructor GetTransactionListResponseType.Destroy;
- var
- I: Integer;
- begin
- for I := 0 to System.Length(Ftransactions)-1 do
- SysUtils.FreeAndNil(Ftransactions[I]);
- System.SetLength(Ftransactions, 0);
- inherited Destroy;
- end;
- procedure GetTransactionListResponseType.Settransactions(Index: Integer; const AArrayOfTransactionSummaryType: ArrayOfTransactionSummaryType);
- begin
- Ftransactions := AArrayOfTransactionSummaryType;
- Ftransactions_Specified := True;
- end;
- function GetTransactionListResponseType.transactions_Specified(Index: Integer): boolean;
- begin
- Result := Ftransactions_Specified;
- end;
- destructor TransactionSummaryType.Destroy;
- begin
- SysUtils.FreeAndNil(FsubmitTimeUTC);
- SysUtils.FreeAndNil(FsubmitTimeLocal);
- SysUtils.FreeAndNil(FsettleAmount);
- inherited Destroy;
- end;
- procedure TransactionSummaryType.SettransId(Index: Integer; const Astring: string);
- begin
- FtransId := Astring;
- FtransId_Specified := True;
- end;
- function TransactionSummaryType.transId_Specified(Index: Integer): boolean;
- begin
- Result := FtransId_Specified;
- end;
- procedure TransactionSummaryType.SettransactionStatus(Index: Integer; const Astring: string);
- begin
- FtransactionStatus := Astring;
- FtransactionStatus_Specified := True;
- end;
- function TransactionSummaryType.transactionStatus_Specified(Index: Integer): boolean;
- begin
- Result := FtransactionStatus_Specified;
- end;
- procedure TransactionSummaryType.SetinvoiceNumber(Index: Integer; const Astring: string);
- begin
- FinvoiceNumber := Astring;
- FinvoiceNumber_Specified := True;
- end;
- function TransactionSummaryType.invoiceNumber_Specified(Index: Integer): boolean;
- begin
- Result := FinvoiceNumber_Specified;
- end;
- procedure TransactionSummaryType.SetfirstName(Index: Integer; const Astring: string);
- begin
- FfirstName := Astring;
- FfirstName_Specified := True;
- end;
- function TransactionSummaryType.firstName_Specified(Index: Integer): boolean;
- begin
- Result := FfirstName_Specified;
- end;
- procedure TransactionSummaryType.SetlastName(Index: Integer; const Astring: string);
- begin
- FlastName := Astring;
- FlastName_Specified := True;
- end;
- function TransactionSummaryType.lastName_Specified(Index: Integer): boolean;
- begin
- Result := FlastName_Specified;
- end;
- procedure TransactionSummaryType.SetaccountType(Index: Integer; const Astring: string);
- begin
- FaccountType := Astring;
- FaccountType_Specified := True;
- end;
- function TransactionSummaryType.accountType_Specified(Index: Integer): boolean;
- begin
- Result := FaccountType_Specified;
- end;
- procedure TransactionSummaryType.SetaccountNumber(Index: Integer; const Astring: string);
- begin
- FaccountNumber := Astring;
- FaccountNumber_Specified := True;
- end;
- function TransactionSummaryType.accountNumber_Specified(Index: Integer): boolean;
- begin
- Result := FaccountNumber_Specified;
- end;
- destructor TransactionDetailsType.Destroy;
- var
- I: Integer;
- begin
- for I := 0 to System.Length(FFDSFilters)-1 do
- SysUtils.FreeAndNil(FFDSFilters[I]);
- System.SetLength(FFDSFilters, 0);
- for I := 0 to System.Length(FlineItems)-1 do
- SysUtils.FreeAndNil(FlineItems[I]);
- System.SetLength(FlineItems, 0);
- SysUtils.FreeAndNil(FsubmitTimeUTC);
- SysUtils.FreeAndNil(FsubmitTimeLocal);
- SysUtils.FreeAndNil(Fbatch);
- SysUtils.FreeAndNil(Forder);
- SysUtils.FreeAndNil(FrequestedAmount);
- SysUtils.FreeAndNil(FauthAmount);
- SysUtils.FreeAndNil(FsettleAmount);
- SysUtils.FreeAndNil(Ftax);
- SysUtils.FreeAndNil(Fshipping);
- SysUtils.FreeAndNil(Fduty);
- SysUtils.FreeAndNil(FprepaidBalanceRemaining);
- SysUtils.FreeAndNil(Fpayment);
- SysUtils.FreeAndNil(Fcustomer);
- SysUtils.FreeAndNil(FbillTo);
- SysUtils.FreeAndNil(FshipTo);
- inherited Destroy;
- end;
- procedure TransactionDetailsType.SettransId(Index: Integer; const Astring: string);
- begin
- FtransId := Astring;
- FtransId_Specified := True;
- end;
- function TransactionDetailsType.transId_Specified(Index: Integer): boolean;
- begin
- Result := FtransId_Specified;
- end;
- procedure TransactionDetailsType.SetrefTransId(Index: Integer; const Astring: string);
- begin
- FrefTransId := Astring;
- FrefTransId_Specified := True;
- end;
- function TransactionDetailsType.refTransId_Specified(Index: Integer): boolean;
- begin
- Result := FrefTransId_Specified;
- end;
- procedure TransactionDetailsType.SetsplitTenderId(Index: Integer; const AInt64: Int64);
- begin
- FsplitTenderId := AInt64;
- FsplitTenderId_Specified := True;
- end;
- function TransactionDetailsType.splitTenderId_Specified(Index: Integer): boolean;
- begin
- Result := FsplitTenderId_Specified;
- end;
- procedure TransactionDetailsType.SettransactionType(Index: Integer; const Astring: string);
- begin
- FtransactionType := Astring;
- FtransactionType_Specified := True;
- end;
- function TransactionDetailsType.transactionType_Specified(Index: Integer): boolean;
- begin
- Result := FtransactionType_Specified;
- end;
- procedure TransactionDetailsType.SettransactionStatus(Index: Integer; const Astring: string);
- begin
- FtransactionStatus := Astring;
- FtransactionStatus_Specified := True;
- end;
- function TransactionDetailsType.transactionStatus_Specified(Index: Integer): boolean;
- begin
- Result := FtransactionStatus_Specified;
- end;
- procedure TransactionDetailsType.SetresponseReasonDescription(Index: Integer; const Astring: string);
- begin
- FresponseReasonDescription := Astring;
- FresponseReasonDescription_Specified := True;
- end;
- function TransactionDetailsType.responseReasonDescription_Specified(Index: Integer): boolean;
- begin
- Result := FresponseReasonDescription_Specified;
- end;
- procedure TransactionDetailsType.SetauthCode(Index: Integer; const Astring: string);
- begin
- FauthCode := Astring;
- FauthCode_Specified := True;
- end;
- function TransactionDetailsType.authCode_Specified(Index: Integer): boolean;
- begin
- Result := FauthCode_Specified;
- end;
- procedure TransactionDetailsType.SetAVSResponse(Index: Integer; const Astring: string);
- begin
- FAVSResponse := Astring;
- FAVSResponse_Specified := True;
- end;
- function TransactionDetailsType.AVSResponse_Specified(Index: Integer): boolean;
- begin
- Result := FAVSResponse_Specified;
- end;
- procedure TransactionDetailsType.SetcardCodeResponse(Index: Integer; const Astring: string);
- begin
- FcardCodeResponse := Astring;
- FcardCodeResponse_Specified := True;
- end;
- function TransactionDetailsType.cardCodeResponse_Specified(Index: Integer): boolean;
- begin
- Result := FcardCodeResponse_Specified;
- end;
- procedure TransactionDetailsType.SetCAVVResponse(Index: Integer; const Astring: string);
- begin
- FCAVVResponse := Astring;
- FCAVVResponse_Specified := True;
- end;
- function TransactionDetailsType.CAVVResponse_Specified(Index: Integer): boolean;
- begin
- Result := FCAVVResponse_Specified;
- end;
- procedure TransactionDetailsType.SetFDSFilterAction(Index: Integer; const Astring: string);
- begin
- FFDSFilterAction := Astring;
- FFDSFilterAction_Specified := True;
- end;
- function TransactionDetailsType.FDSFilterAction_Specified(Index: Integer): boolean;
- begin
- Result := FFDSFilterAction_Specified;
- end;
- procedure TransactionDetailsType.SetFDSFilters(Index: Integer; const AArrayOfFDSFilterType: ArrayOfFDSFilterType);
- begin
- FFDSFilters := AArrayOfFDSFilterType;
- FFDSFilters_Specified := True;
- end;
- function TransactionDetailsType.FDSFilters_Specified(Index: Integer): boolean;
- begin
- Result := FFDSFilters_Specified;
- end;
- procedure TransactionDetailsType.Setbatch(Index: Integer; const ABatchDetailsType: BatchDetailsType);
- begin
- Fbatch := ABatchDetailsType;
- Fbatch_Specified := True;
- end;
- function TransactionDetailsType.batch_Specified(Index: Integer): boolean;
- begin
- Result := Fbatch_Specified;
- end;
- procedure TransactionDetailsType.Setorder(Index: Integer; const AOrderExType: OrderExType);
- begin
- Forder := AOrderExType;
- Forder_Specified := True;
- end;
- function TransactionDetailsType.order_Specified(Index: Integer): boolean;
- begin
- Result := Forder_Specified;
- end;
- procedure TransactionDetailsType.SetrequestedAmount(Index: Integer; const ATXSDecimal: TXSDecimal);
- begin
- FrequestedAmount := ATXSDecimal;
- FrequestedAmount_Specified := True;
- end;
- function TransactionDetailsType.requestedAmount_Specified(Index: Integer): boolean;
- begin
- Result := FrequestedAmount_Specified;
- end;
- procedure TransactionDetailsType.Settax(Index: Integer; const AExtendedAmountType: ExtendedAmountType);
- begin
- Ftax := AExtendedAmountType;
- Ftax_Specified := True;
- end;
- function TransactionDetailsType.tax_Specified(Index: Integer): boolean;
- begin
- Result := Ftax_Specified;
- end;
- procedure TransactionDetailsType.Setshipping(Index: Integer; const AExtendedAmountType: ExtendedAmountType);
- begin
- Fshipping := AExtendedAmountType;
- Fshipping_Specified := True;
- end;
- function TransactionDetailsType.shipping_Specified(Index: Integer): boolean;
- begin
- Result := Fshipping_Specified;
- end;
- procedure TransactionDetailsType.Setduty(Index: Integer; const AExtendedAmountType: ExtendedAmountType);
- begin
- Fduty := AExtendedAmountType;
- Fduty_Specified := True;
- end;
- function TransactionDetailsType.duty_Specified(Index: Integer): boolean;
- begin
- Result := Fduty_Specified;
- end;
- procedure TransactionDetailsType.SetlineItems(Index: Integer; const AArray_Of_LineItemType: Array_Of_LineItemType);
- begin
- FlineItems := AArray_Of_LineItemType;
- FlineItems_Specified := True;
- end;
- function TransactionDetailsType.lineItems_Specified(Index: Integer): boolean;
- begin
- Result := FlineItems_Specified;
- end;
- procedure TransactionDetailsType.SetprepaidBalanceRemaining(Index: Integer; const ATXSDecimal: TXSDecimal);
- begin
- FprepaidBalanceRemaining := ATXSDecimal;
- FprepaidBalanceRemaining_Specified := True;
- end;
- function TransactionDetailsType.prepaidBalanceRemaining_Specified(Index: Integer): boolean;
- begin
- Result := FprepaidBalanceRemaining_Specified;
- end;
- procedure TransactionDetailsType.SetcurrencyCode(Index: Integer; const Astring: string);
- begin
- FcurrencyCode := Astring;
- FcurrencyCode_Specified := True;
- end;
- function TransactionDetailsType.currencyCode_Specified(Index: Integer): boolean;
- begin
- Result := FcurrencyCode_Specified;
- end;
- procedure TransactionDetailsType.SettaxExempt(Index: Integer; const ABoolean: Boolean);
- begin
- FtaxExempt := ABoolean;
- FtaxExempt_Specified := True;
- end;
- function TransactionDetailsType.taxExempt_Specified(Index: Integer): boolean;
- begin
- Result := FtaxExempt_Specified;
- end;
- procedure TransactionDetailsType.Setpayment(Index: Integer; const APaymentMaskedType: PaymentMaskedType);
- begin
- Fpayment := APaymentMaskedType;
- Fpayment_Specified := True;
- end;
- function TransactionDetailsType.payment_Specified(Index: Integer): boolean;
- begin
- Result := Fpayment_Specified;
- end;
- procedure TransactionDetailsType.Setcustomer(Index: Integer; const ACustomerDataType: CustomerDataType);
- begin
- Fcustomer := ACustomerDataType;
- Fcustomer_Specified := True;
- end;
- function TransactionDetailsType.customer_Specified(Index: Integer): boolean;
- begin
- Result := Fcustomer_Specified;
- end;
- procedure TransactionDetailsType.SetbillTo(Index: Integer; const ACustomerAddressType: CustomerAddressType);
- begin
- FbillTo := ACustomerAddressType;
- FbillTo_Specified := True;
- end;
- function TransactionDetailsType.billTo_Specified(Index: Integer): boolean;
- begin
- Result := FbillTo_Specified;
- end;
- procedure TransactionDetailsType.SetshipTo(Index: Integer; const ANameAndAddressType: NameAndAddressType);
- begin
- FshipTo := ANameAndAddressType;
- FshipTo_Specified := True;
- end;
- function TransactionDetailsType.shipTo_Specified(Index: Integer): boolean;
- begin
- Result := FshipTo_Specified;
- end;
- procedure TransactionDetailsType.SetrecurringBilling(Index: Integer; const ABoolean: Boolean);
- begin
- FrecurringBilling := ABoolean;
- FrecurringBilling_Specified := True;
- end;
- function TransactionDetailsType.recurringBilling_Specified(Index: Integer): boolean;
- begin
- Result := FrecurringBilling_Specified;
- end;
- procedure TransactionDetailsType.SetcustomerIP(Index: Integer; const Astring: string);
- begin
- FcustomerIP := Astring;
- FcustomerIP_Specified := True;
- end;
- function TransactionDetailsType.customerIP_Specified(Index: Integer): boolean;
- begin
- Result := FcustomerIP_Specified;
- end;
- destructor ProfileTransAmountType.Destroy;
- var
- I: Integer;
- begin
- for I := 0 to System.Length(FlineItems)-1 do
- SysUtils.FreeAndNil(FlineItems[I]);
- System.SetLength(FlineItems, 0);
- SysUtils.FreeAndNil(Famount);
- SysUtils.FreeAndNil(Ftax);
- SysUtils.FreeAndNil(Fshipping);
- SysUtils.FreeAndNil(Fduty);
- inherited Destroy;
- end;
- procedure ProfileTransAmountType.Settax(Index: Integer; const AExtendedAmountType: ExtendedAmountType);
- begin
- Ftax := AExtendedAmountType;
- Ftax_Specified := True;
- end;
- function ProfileTransAmountType.tax_Specified(Index: Integer): boolean;
- begin
- Result := Ftax_Specified;
- end;
- procedure ProfileTransAmountType.Setshipping(Index: Integer; const AExtendedAmountType: ExtendedAmountType);
- begin
- Fshipping := AExtendedAmountType;
- Fshipping_Specified := True;
- end;
- function ProfileTransAmountType.shipping_Specified(Index: Integer): boolean;
- begin
- Result := Fshipping_Specified;
- end;
- procedure ProfileTransAmountType.Setduty(Index: Integer; const AExtendedAmountType: ExtendedAmountType);
- begin
- Fduty := AExtendedAmountType;
- Fduty_Specified := True;
- end;
- function ProfileTransAmountType.duty_Specified(Index: Integer): boolean;
- begin
- Result := Fduty_Specified;
- end;
- procedure ProfileTransAmountType.SetlineItems(Index: Integer; const AArray_Of_LineItemType: Array_Of_LineItemType);
- begin
- FlineItems := AArray_Of_LineItemType;
- FlineItems_Specified := True;
- end;
- function ProfileTransAmountType.lineItems_Specified(Index: Integer): boolean;
- begin
- Result := FlineItems_Specified;
- end;
- destructor ProfileTransOrderType.Destroy;
- begin
- SysUtils.FreeAndNil(Forder);
- inherited Destroy;
- end;
- procedure ProfileTransOrderType.SetcustomerShippingAddressId(Index: Integer; const AInt64: Int64);
- begin
- FcustomerShippingAddressId := AInt64;
- FcustomerShippingAddressId_Specified := True;
- end;
- function ProfileTransOrderType.customerShippingAddressId_Specified(Index: Integer): boolean;
- begin
- Result := FcustomerShippingAddressId_Specified;
- end;
- procedure ProfileTransOrderType.Setorder(Index: Integer; const AOrderExType: OrderExType);
- begin
- Forder := AOrderExType;
- Forder_Specified := True;
- end;
- function ProfileTransOrderType.order_Specified(Index: Integer): boolean;
- begin
- Result := Forder_Specified;
- end;
- procedure ProfileTransOrderType.SettaxExempt(Index: Integer; const ABoolean: Boolean);
- begin
- FtaxExempt := ABoolean;
- FtaxExempt_Specified := True;
- end;
- function ProfileTransOrderType.taxExempt_Specified(Index: Integer): boolean;
- begin
- Result := FtaxExempt_Specified;
- end;
- procedure ProfileTransOrderType.SetrecurringBilling(Index: Integer; const ABoolean: Boolean);
- begin
- FrecurringBilling := ABoolean;
- FrecurringBilling_Specified := True;
- end;
- function ProfileTransOrderType.recurringBilling_Specified(Index: Integer): boolean;
- begin
- Result := FrecurringBilling_Specified;
- end;
- procedure ProfileTransOrderType.SetcardCode(Index: Integer; const Astring: string);
- begin
- FcardCode := Astring;
- FcardCode_Specified := True;
- end;
- function ProfileTransOrderType.cardCode_Specified(Index: Integer): boolean;
- begin
- Result := FcardCode_Specified;
- end;
- procedure ProfileTransOrderType.SetsplitTenderId(Index: Integer; const AInt64: Int64);
- begin
- FsplitTenderId := AInt64;
- FsplitTenderId_Specified := True;
- end;
- function ProfileTransOrderType.splitTenderId_Specified(Index: Integer): boolean;
- begin
- Result := FsplitTenderId_Specified;
- end;
- procedure ProfileTransCaptureOnlyType.SetapprovalCode(Index: Integer; const Astring: string);
- begin
- FapprovalCode := Astring;
- FapprovalCode_Specified := True;
- end;
- function ProfileTransCaptureOnlyType.approvalCode_Specified(Index: Integer): boolean;
- begin
- Result := FapprovalCode_Specified;
- end;
- destructor ProfileTransRefundType.Destroy;
- begin
- SysUtils.FreeAndNil(Forder);
- inherited Destroy;
- end;
- procedure ProfileTransRefundType.SetcustomerProfileId(Index: Integer; const AInt64: Int64);
- begin
- FcustomerProfileId := AInt64;
- FcustomerProfileId_Specified := True;
- end;
- function ProfileTransRefundType.customerProfileId_Specified(Index: Integer): boolean;
- begin
- Result := FcustomerProfileId_Specified;
- end;
- procedure ProfileTransRefundType.SetcustomerPaymentProfileId(Index: Integer; const AInt64: Int64);
- begin
- FcustomerPaymentProfileId := AInt64;
- FcustomerPaymentProfileId_Specified := True;
- end;
- function ProfileTransRefundType.customerPaymentProfileId_Specified(Index: Integer): boolean;
- begin
- Result := FcustomerPaymentProfileId_Specified;
- end;
- procedure ProfileTransRefundType.SetcustomerShippingAddressId(Index: Integer; const AInt64: Int64);
- begin
- FcustomerShippingAddressId := AInt64;
- FcustomerShippingAddressId_Specified := True;
- end;
- function ProfileTransRefundType.customerShippingAddressId_Specified(Index: Integer): boolean;
- begin
- Result := FcustomerShippingAddressId_Specified;
- end;
- procedure ProfileTransRefundType.SetcreditCardNumberMasked(Index: Integer; const Astring: string);
- begin
- FcreditCardNumberMasked := Astring;
- FcreditCardNumberMasked_Specified := True;
- end;
- function ProfileTransRefundType.creditCardNumberMasked_Specified(Index: Integer): boolean;
- begin
- Result := FcreditCardNumberMasked_Specified;
- end;
- procedure ProfileTransRefundType.SetbankRoutingNumberMasked(Index: Integer; const Astring: string);
- begin
- FbankRoutingNumberMasked := Astring;
- FbankRoutingNumberMasked_Specified := True;
- end;
- function ProfileTransRefundType.bankRoutingNumberMasked_Specified(Index: Integer): boolean;
- begin
- Result := FbankRoutingNumberMasked_Specified;
- end;
- procedure ProfileTransRefundType.SetbankAccountNumberMasked(Index: Integer; const Astring: string);
- begin
- FbankAccountNumberMasked := Astring;
- FbankAccountNumberMasked_Specified := True;
- end;
- function ProfileTransRefundType.bankAccountNumberMasked_Specified(Index: Integer): boolean;
- begin
- Result := FbankAccountNumberMasked_Specified;
- end;
- procedure ProfileTransRefundType.Setorder(Index: Integer; const AOrderExType: OrderExType);
- begin
- Forder := AOrderExType;
- Forder_Specified := True;
- end;
- function ProfileTransRefundType.order_Specified(Index: Integer): boolean;
- begin
- Result := Forder_Specified;
- end;
- procedure ProfileTransRefundType.SettransId(Index: Integer; const Astring: string);
- begin
- FtransId := Astring;
- FtransId_Specified := True;
- end;
- function ProfileTransRefundType.transId_Specified(Index: Integer): boolean;
- begin
- Result := FtransId_Specified;
- end;
- procedure ProfileTransPriorAuthCaptureType.SetcustomerProfileId(Index: Integer; const AInt64: Int64);
- begin
- FcustomerProfileId := AInt64;
- FcustomerProfileId_Specified := True;
- end;
- function ProfileTransPriorAuthCaptureType.customerProfileId_Specified(Index: Integer): boolean;
- begin
- Result := FcustomerProfileId_Specified;
- end;
- procedure ProfileTransPriorAuthCaptureType.SetcustomerPaymentProfileId(Index: Integer; const AInt64: Int64);
- begin
- FcustomerPaymentProfileId := AInt64;
- FcustomerPaymentProfileId_Specified := True;
- end;
- function ProfileTransPriorAuthCaptureType.customerPaymentProfileId_Specified(Index: Integer): boolean;
- begin
- Result := FcustomerPaymentProfileId_Specified;
- end;
- procedure ProfileTransPriorAuthCaptureType.SetcustomerShippingAddressId(Index: Integer; const AInt64: Int64);
- begin
- FcustomerShippingAddressId := AInt64;
- FcustomerShippingAddressId_Specified := True;
- end;
- function ProfileTransPriorAuthCaptureType.customerShippingAddressId_Specified(Index: Integer): boolean;
- begin
- Result := FcustomerShippingAddressId_Specified;
- end;
- procedure ProfileTransPriorAuthCaptureType.SettransId(Index: Integer; const Astring: string);
- begin
- FtransId := Astring;
- FtransId_Specified := True;
- end;
- function ProfileTransPriorAuthCaptureType.transId_Specified(Index: Integer): boolean;
- begin
- Result := FtransId_Specified;
- end;
- initialization
- InvRegistry.RegisterInterface(TypeInfo(ServiceSoap), 'https://api.authorize.net/soap/v1/', 'utf-8');
- InvRegistry.RegisterDefaultSOAPAction(TypeInfo(ServiceSoap), 'https://api.authorize.net/soap/v1/%operationName%');
- InvRegistry.RegisterInvokeOptions(TypeInfo(ServiceSoap), ioDocument);
- RemClassRegistry.RegisterXSInfo(TypeInfo(MessageTypeEnum), 'https://api.authorize.net/soap/v1/', 'MessageTypeEnum');
- RemClassRegistry.RegisterXSInfo(TypeInfo(ArrayOfMessagesTypeMessage), 'https://api.authorize.net/soap/v1/', 'ArrayOfMessagesTypeMessage');
- RemClassRegistry.RegisterXSClass(ANetApiResponseType, 'https://api.authorize.net/soap/v1/', 'ANetApiResponseType');
- RemClassRegistry.RegisterXSClass(MessagesTypeMessage, 'https://api.authorize.net/soap/v1/', 'MessagesTypeMessage');
- RemClassRegistry.RegisterXSClass(MerchantAuthenticationType, 'https://api.authorize.net/soap/v1/', 'MerchantAuthenticationType');
- RemClassRegistry.RegisterExternalPropName(TypeInfo(MerchantAuthenticationType), 'name_', 'name');
- RemClassRegistry.RegisterXSClass(ARBSubscriptionType, 'https://api.authorize.net/soap/v1/', 'ARBSubscriptionType');
- RemClassRegistry.RegisterExternalPropName(TypeInfo(ARBSubscriptionType), 'name_', 'name');
- RemClassRegistry.RegisterXSClass(PaymentType, 'https://api.authorize.net/soap/v1/', 'PaymentType');
- RemClassRegistry.RegisterXSClass(OrderType, 'https://api.authorize.net/soap/v1/', 'OrderType');
- RemClassRegistry.RegisterXSClass(NameAndAddressType, 'https://api.authorize.net/soap/v1/', 'NameAndAddressType');
- RemClassRegistry.RegisterXSClass(PaymentScheduleType, 'https://api.authorize.net/soap/v1/', 'PaymentScheduleType');
- RemClassRegistry.RegisterXSInfo(TypeInfo(ARBSubscriptionUnitEnum), 'https://api.authorize.net/soap/v1/', 'ARBSubscriptionUnitEnum');
- RemClassRegistry.RegisterXSClass(PaymentScheduleTypeInterval, 'https://api.authorize.net/soap/v1/', 'PaymentScheduleTypeInterval');
- RemClassRegistry.RegisterExternalPropName(TypeInfo(PaymentScheduleTypeInterval), 'unit_', 'unit');
- RemClassRegistry.RegisterXSClass(CreditCardSimpleType, 'https://api.authorize.net/soap/v1/', 'CreditCardSimpleType');
- RemClassRegistry.RegisterXSClass(CreditCardType, 'https://api.authorize.net/soap/v1/', 'CreditCardType');
- RemClassRegistry.RegisterXSInfo(TypeInfo(BankAccountTypeEnum), 'https://api.authorize.net/soap/v1/', 'BankAccountTypeEnum');
- RemClassRegistry.RegisterXSInfo(TypeInfo(EcheckTypeEnum), 'https://api.authorize.net/soap/v1/', 'EcheckTypeEnum');
- RemClassRegistry.RegisterXSClass(BankAccountBaseType, 'https://api.authorize.net/soap/v1/', 'BankAccountBaseType');
- RemClassRegistry.RegisterXSClass(BankAccountType, 'https://api.authorize.net/soap/v1/', 'BankAccountType');
- RemClassRegistry.RegisterXSInfo(TypeInfo(CustomerTypeEnum), 'https://api.authorize.net/soap/v1/', 'CustomerTypeEnum');
- RemClassRegistry.RegisterXSClass(CustomerType, 'https://api.authorize.net/soap/v1/', 'CustomerType');
- RemClassRegistry.RegisterExternalPropName(TypeInfo(CustomerType), 'type_', 'type');
- RemClassRegistry.RegisterXSClass(DriversLicenseBaseType, 'https://api.authorize.net/soap/v1/', 'DriversLicenseBaseType');
- RemClassRegistry.RegisterXSClass(DriversLicenseType, 'https://api.authorize.net/soap/v1/', 'DriversLicenseType');
- RemClassRegistry.RegisterXSClass(ARBCreateSubscriptionResponseType, 'https://api.authorize.net/soap/v1/', 'ARBCreateSubscriptionResponseType');
- RemClassRegistry.RegisterXSClass(ARBUpdateSubscriptionResponseType, 'https://api.authorize.net/soap/v1/', 'ARBUpdateSubscriptionResponseType');
- RemClassRegistry.RegisterXSClass(ARBCancelSubscriptionResponseType, 'https://api.authorize.net/soap/v1/', 'ARBCancelSubscriptionResponseType');
- RemClassRegistry.RegisterXSInfo(TypeInfo(ARBSubscriptionStatusEnum), 'https://api.authorize.net/soap/v1/', 'ARBSubscriptionStatusEnum');
- RemClassRegistry.RegisterXSClass(ARBGetSubscriptionStatusResponseType, 'https://api.authorize.net/soap/v1/', 'ARBGetSubscriptionStatusResponseType');
- RemClassRegistry.RegisterXSClass(CustomerProfileBaseType, 'https://api.authorize.net/soap/v1/', 'CustomerProfileBaseType');
- RemClassRegistry.RegisterXSInfo(TypeInfo(ArrayOfCustomerPaymentProfileType), 'https://api.authorize.net/soap/v1/', 'ArrayOfCustomerPaymentProfileType');
- RemClassRegistry.RegisterXSInfo(TypeInfo(ArrayOfCustomerAddressType), 'https://api.authorize.net/soap/v1/', 'ArrayOfCustomerAddressType');
- RemClassRegistry.RegisterXSClass(CustomerProfileType, 'https://api.authorize.net/soap/v1/', 'CustomerProfileType');
- RemClassRegistry.RegisterXSClass(CustomerPaymentProfileBaseType, 'https://api.authorize.net/soap/v1/', 'CustomerPaymentProfileBaseType');
- RemClassRegistry.RegisterXSClass(CustomerPaymentProfileType, 'https://api.authorize.net/soap/v1/', 'CustomerPaymentProfileType');
- RemClassRegistry.RegisterXSClass(CustomerAddressType, 'https://api.authorize.net/soap/v1/', 'CustomerAddressType');
- RemClassRegistry.RegisterXSInfo(TypeInfo(ArrayOfLong), 'https://api.authorize.net/soap/v1/', 'ArrayOfLong');
- RemClassRegistry.RegisterXSInfo(TypeInfo(ArrayOfString), 'https://api.authorize.net/soap/v1/', 'ArrayOfString');
- RemClassRegistry.RegisterXSClass(CreateCustomerProfileResponseType, 'https://api.authorize.net/soap/v1/', 'CreateCustomerProfileResponseType');
- RemClassRegistry.RegisterXSClass(CreateCustomerPaymentProfileResponseType, 'https://api.authorize.net/soap/v1/', 'CreateCustomerPaymentProfileResponseType');
- RemClassRegistry.RegisterXSClass(CreateCustomerShippingAddressResponseType, 'https://api.authorize.net/soap/v1/', 'CreateCustomerShippingAddressResponseType');
- RemClassRegistry.RegisterXSClass(GetCustomerProfileResponseType, 'https://api.authorize.net/soap/v1/', 'GetCustomerProfileResponseType');
- RemClassRegistry.RegisterXSClass(CustomerProfileExType, 'https://api.authorize.net/soap/v1/', 'CustomerProfileExType');
- RemClassRegistry.RegisterXSInfo(TypeInfo(ArrayOfCustomerPaymentProfileMaskedType), 'https://api.authorize.net/soap/v1/', 'ArrayOfCustomerPaymentProfileMaskedType');
- RemClassRegistry.RegisterXSInfo(TypeInfo(ArrayOfCustomerAddressExType), 'https://api.authorize.net/soap/v1/', 'ArrayOfCustomerAddressExType');
- RemClassRegistry.RegisterXSClass(CustomerProfileMaskedType, 'https://api.authorize.net/soap/v1/', 'CustomerProfileMaskedType');
- RemClassRegistry.RegisterXSClass(CustomerPaymentProfileMaskedType, 'https://api.authorize.net/soap/v1/', 'CustomerPaymentProfileMaskedType');
- RemClassRegistry.RegisterXSClass(PaymentMaskedType, 'https://api.authorize.net/soap/v1/', 'PaymentMaskedType');
- RemClassRegistry.RegisterXSClass(DriversLicenseMaskedType, 'https://api.authorize.net/soap/v1/', 'DriversLicenseMaskedType');
- RemClassRegistry.RegisterXSClass(CreditCardMaskedType, 'https://api.authorize.net/soap/v1/', 'CreditCardMaskedType');
- RemClassRegistry.RegisterXSClass(BankAccountMaskedType, 'https://api.authorize.net/soap/v1/', 'BankAccountMaskedType');
- RemClassRegistry.RegisterXSClass(CustomerAddressExType, 'https://api.authorize.net/soap/v1/', 'CustomerAddressExType');
- RemClassRegistry.RegisterXSClass(GetCustomerPaymentProfileResponseType, 'https://api.authorize.net/soap/v1/', 'GetCustomerPaymentProfileResponseType');
- RemClassRegistry.RegisterXSClass(GetCustomerShippingAddressResponseType, 'https://api.authorize.net/soap/v1/', 'GetCustomerShippingAddressResponseType');
- RemClassRegistry.RegisterXSClass(UpdateCustomerProfileResponseType, 'https://api.authorize.net/soap/v1/', 'UpdateCustomerProfileResponseType');
- RemClassRegistry.RegisterXSClass(CustomerPaymentProfileExType, 'https://api.authorize.net/soap/v1/', 'CustomerPaymentProfileExType');
- RemClassRegistry.RegisterXSClass(UpdateCustomerPaymentProfileResponseType, 'https://api.authorize.net/soap/v1/', 'UpdateCustomerPaymentProfileResponseType');
- RemClassRegistry.RegisterXSClass(UpdateCustomerShippingAddressResponseType, 'https://api.authorize.net/soap/v1/', 'UpdateCustomerShippingAddressResponseType');
- RemClassRegistry.RegisterXSClass(DeleteCustomerProfileResponseType, 'https://api.authorize.net/soap/v1/', 'DeleteCustomerProfileResponseType');
- RemClassRegistry.RegisterXSClass(DeleteCustomerPaymentProfileResponseType, 'https://api.authorize.net/soap/v1/', 'DeleteCustomerPaymentProfileResponseType');
- RemClassRegistry.RegisterXSClass(DeleteCustomerShippingAddressResponseType, 'https://api.authorize.net/soap/v1/', 'DeleteCustomerShippingAddressResponseType');
- RemClassRegistry.RegisterXSClass(ProfileTransactionType, 'https://api.authorize.net/soap/v1/', 'ProfileTransactionType');
- RemClassRegistry.RegisterXSClass(ProfileTransVoidType, 'https://api.authorize.net/soap/v1/', 'ProfileTransVoidType');
- RemClassRegistry.RegisterXSClass(OrderExType, 'https://api.authorize.net/soap/v1/', 'OrderExType');
- RemClassRegistry.RegisterXSClass(ExtendedAmountType, 'https://api.authorize.net/soap/v1/', 'ExtendedAmountType');
- RemClassRegistry.RegisterExternalPropName(TypeInfo(ExtendedAmountType), 'name_', 'name');
- RemClassRegistry.RegisterXSClass(LineItemType, 'https://api.authorize.net/soap/v1/', 'LineItemType');
- RemClassRegistry.RegisterExternalPropName(TypeInfo(LineItemType), 'name_', 'name');
- RemClassRegistry.RegisterXSClass(CreateCustomerProfileTransactionResponseType, 'https://api.authorize.net/soap/v1/', 'CreateCustomerProfileTransactionResponseType');
- RemClassRegistry.RegisterXSClass(ValidateCustomerPaymentProfileResponseType, 'https://api.authorize.net/soap/v1/', 'ValidateCustomerPaymentProfileResponseType');
- RemClassRegistry.RegisterXSClass(GetCustomerProfileIdsResponseType, 'https://api.authorize.net/soap/v1/', 'GetCustomerProfileIdsResponseType');
- RemClassRegistry.RegisterXSClass(UpdateSplitTenderGroupResponseType, 'https://api.authorize.net/soap/v1/', 'UpdateSplitTenderGroupResponseType');
- RemClassRegistry.RegisterXSClass(GetTransactionDetailsResponseType, 'https://api.authorize.net/soap/v1/', 'GetTransactionDetailsResponseType');
- RemClassRegistry.RegisterXSInfo(TypeInfo(ArrayOfFDSFilterType), 'https://api.authorize.net/soap/v1/', 'ArrayOfFDSFilterType');
- RemClassRegistry.RegisterXSClass(CustomerDataType, 'https://api.authorize.net/soap/v1/', 'CustomerDataType');
- RemClassRegistry.RegisterExternalPropName(TypeInfo(CustomerDataType), 'type_', 'type');
- RemClassRegistry.RegisterXSClass(FDSFilterType, 'https://api.authorize.net/soap/v1/', 'FDSFilterType');
- RemClassRegistry.RegisterExternalPropName(TypeInfo(FDSFilterType), 'name_', 'name');
- RemClassRegistry.RegisterXSInfo(TypeInfo(ArrayOfBatchStatisticType), 'https://api.authorize.net/soap/v1/', 'ArrayOfBatchStatisticType');
- RemClassRegistry.RegisterXSClass(BatchDetailsType, 'https://api.authorize.net/soap/v1/', 'BatchDetailsType');
- RemClassRegistry.RegisterXSClass(BatchStatisticType, 'https://api.authorize.net/soap/v1/', 'BatchStatisticType');
- RemClassRegistry.RegisterXSClass(GetSettledBatchListRequestType, 'https://api.authorize.net/soap/v1/', 'GetSettledBatchListRequestType');
- RemClassRegistry.RegisterXSInfo(TypeInfo(ArrayOfBatchDetailsType), 'https://api.authorize.net/soap/v1/', 'ArrayOfBatchDetailsType');
- RemClassRegistry.RegisterXSClass(GetSettledBatchListResponseType, 'https://api.authorize.net/soap/v1/', 'GetSettledBatchListResponseType');
- RemClassRegistry.RegisterXSClass(GetTransactionListRequestType, 'https://api.authorize.net/soap/v1/', 'GetTransactionListRequestType');
- RemClassRegistry.RegisterXSInfo(TypeInfo(ArrayOfTransactionSummaryType), 'https://api.authorize.net/soap/v1/', 'ArrayOfTransactionSummaryType');
- RemClassRegistry.RegisterXSClass(GetTransactionListResponseType, 'https://api.authorize.net/soap/v1/', 'GetTransactionListResponseType');
- RemClassRegistry.RegisterXSClass(TransactionSummaryType, 'https://api.authorize.net/soap/v1/', 'TransactionSummaryType');
- RemClassRegistry.RegisterXSInfo(TypeInfo(ValidationModeEnum), 'https://api.authorize.net/soap/v1/', 'ValidationModeEnum');
- RemClassRegistry.RegisterXSInfo(TypeInfo(SplitTenderStatusEnum), 'https://api.authorize.net/soap/v1/', 'SplitTenderStatusEnum');
- RemClassRegistry.RegisterXSClass(FDSFilter, 'https://api.authorize.net/soap/v1/', 'FDSFilter');
- RemClassRegistry.RegisterXSClass(statistic, 'https://api.authorize.net/soap/v1/', 'statistic');
- RemClassRegistry.RegisterXSClass(batch, 'https://api.authorize.net/soap/v1/', 'batch');
- RemClassRegistry.RegisterXSClass(transaction, 'https://api.authorize.net/soap/v1/', 'transaction');
- RemClassRegistry.RegisterXSInfo(TypeInfo(Array_Of_LineItemType), 'https://api.authorize.net/soap/v1/', 'Array_Of_LineItemType');
- RemClassRegistry.RegisterXSClass(TransactionDetailsType, 'https://api.authorize.net/soap/v1/', 'TransactionDetailsType');
- RemClassRegistry.RegisterXSClass(ProfileTransAmountType, 'https://api.authorize.net/soap/v1/', 'ProfileTransAmountType');
- RemClassRegistry.RegisterXSClass(ProfileTransOrderType, 'https://api.authorize.net/soap/v1/', 'ProfileTransOrderType');
- RemClassRegistry.RegisterXSClass(ProfileTransAuthOnlyType, 'https://api.authorize.net/soap/v1/', 'ProfileTransAuthOnlyType');
- RemClassRegistry.RegisterXSClass(ProfileTransAuthCaptureType, 'https://api.authorize.net/soap/v1/', 'ProfileTransAuthCaptureType');
- RemClassRegistry.RegisterXSClass(ProfileTransCaptureOnlyType, 'https://api.authorize.net/soap/v1/', 'ProfileTransCaptureOnlyType');
- RemClassRegistry.RegisterXSClass(ProfileTransRefundType, 'https://api.authorize.net/soap/v1/', 'ProfileTransRefundType');
- RemClassRegistry.RegisterXSClass(ProfileTransPriorAuthCaptureType, 'https://api.authorize.net/soap/v1/', 'ProfileTransPriorAuthCaptureType');
- end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement