auto-merge: trunk -> InterfaceRTTIinterfacertti

git-svn-id: http://svn.freepascal.org/svn/fpc/branches/interfacertti@33858 3ad0048d-3df7-0310-abae-a5850022a9f2
author: steve <steve@3ad0048d-3df7-0310-abae-a5850022a9f2> 2016-05-30 16:57:13 +0000
committer: steve <steve@3ad0048d-3df7-0310-abae-a5850022a9f2> 2016-05-30 16:57:13 +0000
commit: 6b082ee8b43e52fe18c5799f8f4c82a8c7519f5b (patch)
tree: f906b179f5b20f4be91a286f8f5a01fc4fac51e2 /packages/googleapi/src/googlecontent.pp
parent: 554d71b9e544a9776797dcca9983060fd998fd0b (diff)
parent: ba5f910eaac131cb7d3553c9bef173a81c422a1c (diff)
download: fpc-6b082ee8b43e52fe18c5799f8f4c82a8c7519f5b.tar.gz
1 files changed, 5943 insertions, 444 deletions
diff --git a/packages/googleapi/src/googlecontent.pp b/packages/googleapi/src/googlecontent.pp
index 4a8241d5a7..c1a70715d0 100644
--- a/packages/googleapi/src/googlecontent.pp
+++ b/packages/googleapi/src/googlecontent.pp
@@ -1,19 +1,4 @@
 unit googlecontent;
-{
-   **********************************************************************
-      This file is part of the Free Component Library (FCL)
-      Copyright (c) 2015 The free pascal team.
-  
-      See the file COPYING.FPC, included in this distribution,
-      for details about the copyright.
-  
-      This program is distributed in the hope that it will be useful,
-      but WITHOUT ANY WARRANTY; without even the implied warranty of
-      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-  
-   **********************************************************************
-}
-//Generated on: 16-5-15 08:53:01
 {$MODE objfpc}
 {$H+}
 
@@ -82,6 +67,7 @@ type
   TDatafeedstatusesListResponse = Class;
   TError = Class;
   TErrors = Class;
+  TInstallment = Class;
   TInventory = Class;
   TInventoryCustomBatchRequest = Class;
   TInventoryCustomBatchRequestEntry = Class;
@@ -90,13 +76,62 @@ type
   TInventorySetRequest = Class;
   TInventorySetResponse = Class;
   TLoyaltyPoints = Class;
+  TOrder = Class;
+  TOrderAddress = Class;
+  TOrderCancellation = Class;
+  TOrderCustomer = Class;
+  TOrderDeliveryDetails = Class;
+  TOrderLineItem = Class;
+  TOrderLineItemProduct = Class;
+  TOrderLineItemProductVariantAttribute = Class;
+  TOrderLineItemReturnInfo = Class;
+  TOrderLineItemShippingDetails = Class;
+  TOrderLineItemShippingDetailsMethod = Class;
+  TOrderPaymentMethod = Class;
+  TOrderPromotion = Class;
+  TOrderPromotionBenefit = Class;
+  TOrderRefund = Class;
+  TOrderReturn = Class;
+  TOrderShipment = Class;
+  TOrderShipmentLineItemShipment = Class;
+  TOrdersAcknowledgeRequest = Class;
+  TOrdersAcknowledgeResponse = Class;
+  TOrdersAdvanceTestOrderResponse = Class;
+  TOrdersCancelLineItemRequest = Class;
+  TOrdersCancelLineItemResponse = Class;
+  TOrdersCancelRequest = Class;
+  TOrdersCancelResponse = Class;
+  TOrdersCreateTestOrderRequest = Class;
+  TOrdersCreateTestOrderResponse = Class;
+  TOrdersCustomBatchRequest = Class;
+  TOrdersCustomBatchRequestEntry = Class;
+  TOrdersCustomBatchRequestEntryCancel = Class;
+  TOrdersCustomBatchRequestEntryCancelLineItem = Class;
+  TOrdersCustomBatchRequestEntryRefund = Class;
+  TOrdersCustomBatchRequestEntryReturnLineItem = Class;
+  TOrdersCustomBatchRequestEntryShipLineItems = Class;
+  TOrdersCustomBatchRequestEntryUpdateShipment = Class;
+  TOrdersCustomBatchResponse = Class;
+  TOrdersCustomBatchResponseEntry = Class;
+  TOrdersGetByMerchantOrderIdResponse = Class;
+  TOrdersGetTestOrderTemplateResponse = Class;
+  TOrdersListResponse = Class;
+  TOrdersRefundRequest = Class;
+  TOrdersRefundResponse = Class;
+  TOrdersReturnLineItemRequest = Class;
+  TOrdersReturnLineItemResponse = Class;
+  TOrdersShipLineItemsRequest = Class;
+  TOrdersShipLineItemsResponse = Class;
+  TOrdersUpdateMerchantOrderIdRequest = Class;
+  TOrdersUpdateMerchantOrderIdResponse = Class;
+  TOrdersUpdateShipmentRequest = Class;
+  TOrdersUpdateShipmentResponse = Class;
   TPrice = Class;
   TProduct = Class;
   TProductAspect = Class;
   TProductCustomAttribute = Class;
   TProductCustomGroup = Class;
   TProductDestination = Class;
-  TProductInstallment = Class;
   TProductShipping = Class;
   TProductShippingDimension = Class;
   TProductShippingWeight = Class;
@@ -116,6 +151,11 @@ type
   TProductstatusesCustomBatchResponse = Class;
   TProductstatusesCustomBatchResponseEntry = Class;
   TProductstatusesListResponse = Class;
+  TTestOrder = Class;
+  TTestOrderCustomer = Class;
+  TTestOrderLineItem = Class;
+  TTestOrderLineItemProduct = Class;
+  TTestOrderPaymentMethod = Class;
   TWeight = Class;
   TAccountArray = Array of TAccount;
   TAccountAdwordsLinkArray = Array of TAccountAdwordsLink;
@@ -175,6 +215,7 @@ type
   TDatafeedstatusesListResponseArray = Array of TDatafeedstatusesListResponse;
   TErrorArray = Array of TError;
   TErrorsArray = Array of TErrors;
+  TInstallmentArray = Array of TInstallment;
   TInventoryArray = Array of TInventory;
   TInventoryCustomBatchRequestArray = Array of TInventoryCustomBatchRequest;
   TInventoryCustomBatchRequestEntryArray = Array of TInventoryCustomBatchRequestEntry;
@@ -183,13 +224,62 @@ type
   TInventorySetRequestArray = Array of TInventorySetRequest;
   TInventorySetResponseArray = Array of TInventorySetResponse;
   TLoyaltyPointsArray = Array of TLoyaltyPoints;
+  TOrderArray = Array of TOrder;
+  TOrderAddressArray = Array of TOrderAddress;
+  TOrderCancellationArray = Array of TOrderCancellation;
+  TOrderCustomerArray = Array of TOrderCustomer;
+  TOrderDeliveryDetailsArray = Array of TOrderDeliveryDetails;
+  TOrderLineItemArray = Array of TOrderLineItem;
+  TOrderLineItemProductArray = Array of TOrderLineItemProduct;
+  TOrderLineItemProductVariantAttributeArray = Array of TOrderLineItemProductVariantAttribute;
+  TOrderLineItemReturnInfoArray = Array of TOrderLineItemReturnInfo;
+  TOrderLineItemShippingDetailsArray = Array of TOrderLineItemShippingDetails;
+  TOrderLineItemShippingDetailsMethodArray = Array of TOrderLineItemShippingDetailsMethod;
+  TOrderPaymentMethodArray = Array of TOrderPaymentMethod;
+  TOrderPromotionArray = Array of TOrderPromotion;
+  TOrderPromotionBenefitArray = Array of TOrderPromotionBenefit;
+  TOrderRefundArray = Array of TOrderRefund;
+  TOrderReturnArray = Array of TOrderReturn;
+  TOrderShipmentArray = Array of TOrderShipment;
+  TOrderShipmentLineItemShipmentArray = Array of TOrderShipmentLineItemShipment;
+  TOrdersAcknowledgeRequestArray = Array of TOrdersAcknowledgeRequest;
+  TOrdersAcknowledgeResponseArray = Array of TOrdersAcknowledgeResponse;
+  TOrdersAdvanceTestOrderResponseArray = Array of TOrdersAdvanceTestOrderResponse;
+  TOrdersCancelLineItemRequestArray = Array of TOrdersCancelLineItemRequest;
+  TOrdersCancelLineItemResponseArray = Array of TOrdersCancelLineItemResponse;
+  TOrdersCancelRequestArray = Array of TOrdersCancelRequest;
+  TOrdersCancelResponseArray = Array of TOrdersCancelResponse;
+  TOrdersCreateTestOrderRequestArray = Array of TOrdersCreateTestOrderRequest;
+  TOrdersCreateTestOrderResponseArray = Array of TOrdersCreateTestOrderResponse;
+  TOrdersCustomBatchRequestArray = Array of TOrdersCustomBatchRequest;
+  TOrdersCustomBatchRequestEntryArray = Array of TOrdersCustomBatchRequestEntry;
+  TOrdersCustomBatchRequestEntryCancelArray = Array of TOrdersCustomBatchRequestEntryCancel;
+  TOrdersCustomBatchRequestEntryCancelLineItemArray = Array of TOrdersCustomBatchRequestEntryCancelLineItem;
+  TOrdersCustomBatchRequestEntryRefundArray = Array of TOrdersCustomBatchRequestEntryRefund;
+  TOrdersCustomBatchRequestEntryReturnLineItemArray = Array of TOrdersCustomBatchRequestEntryReturnLineItem;
+  TOrdersCustomBatchRequestEntryShipLineItemsArray = Array of TOrdersCustomBatchRequestEntryShipLineItems;
+  TOrdersCustomBatchRequestEntryUpdateShipmentArray = Array of TOrdersCustomBatchRequestEntryUpdateShipment;
+  TOrdersCustomBatchResponseArray = Array of TOrdersCustomBatchResponse;
+  TOrdersCustomBatchResponseEntryArray = Array of TOrdersCustomBatchResponseEntry;
+  TOrdersGetByMerchantOrderIdResponseArray = Array of TOrdersGetByMerchantOrderIdResponse;
+  TOrdersGetTestOrderTemplateResponseArray = Array of TOrdersGetTestOrderTemplateResponse;
+  TOrdersListResponseArray = Array of TOrdersListResponse;
+  TOrdersRefundRequestArray = Array of TOrdersRefundRequest;
+  TOrdersRefundResponseArray = Array of TOrdersRefundResponse;
+  TOrdersReturnLineItemRequestArray = Array of TOrdersReturnLineItemRequest;
+  TOrdersReturnLineItemResponseArray = Array of TOrdersReturnLineItemResponse;
+  TOrdersShipLineItemsRequestArray = Array of TOrdersShipLineItemsRequest;
+  TOrdersShipLineItemsResponseArray = Array of TOrdersShipLineItemsResponse;
+  TOrdersUpdateMerchantOrderIdRequestArray = Array of TOrdersUpdateMerchantOrderIdRequest;
+  TOrdersUpdateMerchantOrderIdResponseArray = Array of TOrdersUpdateMerchantOrderIdResponse;
+  TOrdersUpdateShipmentRequestArray = Array of TOrdersUpdateShipmentRequest;
+  TOrdersUpdateShipmentResponseArray = Array of TOrdersUpdateShipmentResponse;
   TPriceArray = Array of TPrice;
   TProductArray = Array of TProduct;
   TProductAspectArray = Array of TProductAspect;
   TProductCustomAttributeArray = Array of TProductCustomAttribute;
   TProductCustomGroupArray = Array of TProductCustomGroup;
   TProductDestinationArray = Array of TProductDestination;
-  TProductInstallmentArray = Array of TProductInstallment;
   TProductShippingArray = Array of TProductShipping;
   TProductShippingDimensionArray = Array of TProductShippingDimension;
   TProductShippingWeightArray = Array of TProductShippingWeight;
@@ -209,6 +299,11 @@ type
   TProductstatusesCustomBatchResponseArray = Array of TProductstatusesCustomBatchResponse;
   TProductstatusesCustomBatchResponseEntryArray = Array of TProductstatusesCustomBatchResponseEntry;
   TProductstatusesListResponseArray = Array of TProductstatusesListResponse;
+  TTestOrderArray = Array of TTestOrder;
+  TTestOrderCustomerArray = Array of TTestOrderCustomer;
+  TTestOrderLineItemArray = Array of TTestOrderLineItem;
+  TTestOrderLineItemProductArray = Array of TTestOrderLineItemProduct;
+  TTestOrderPaymentMethodArray = Array of TTestOrderPaymentMethod;
   TWeightArray = Array of TWeight;
   //Anonymous types, using auto-generated names
   TAccountTypeadwordsLinksArray = Array of TAccountAdwordsLink;
@@ -248,6 +343,20 @@ type
   TErrorsTypeerrorsArray = Array of TError;
   TInventoryCustomBatchRequestTypeentriesArray = Array of TInventoryCustomBatchRequestEntry;
   TInventoryCustomBatchResponseTypeentriesArray = Array of TInventoryCustomBatchResponseEntry;
+  TOrderTypelineItemsArray = Array of TOrderLineItem;
+  TOrderTypepromotionsArray = Array of TOrderPromotion;
+  TOrderTyperefundsArray = Array of TOrderRefund;
+  TOrderTypeshipmentsArray = Array of TOrderShipment;
+  TOrderLineItemTypecancellationsArray = Array of TOrderCancellation;
+  TOrderLineItemTypereturnsArray = Array of TOrderReturn;
+  TOrderLineItemProductTypevariantAttributesArray = Array of TOrderLineItemProductVariantAttribute;
+  TOrderPromotionTypebenefitsArray = Array of TOrderPromotionBenefit;
+  TOrderShipmentTypelineItemsArray = Array of TOrderShipmentLineItemShipment;
+  TOrdersCustomBatchRequestTypeentriesArray = Array of TOrdersCustomBatchRequestEntry;
+  TOrdersCustomBatchRequestEntryShipLineItemsTypelineItemsArray = Array of TOrderShipmentLineItemShipment;
+  TOrdersCustomBatchResponseTypeentriesArray = Array of TOrdersCustomBatchResponseEntry;
+  TOrdersListResponseTyperesourcesArray = Array of TOrder;
+  TOrdersShipLineItemsRequestTypelineItemsArray = Array of TOrderShipmentLineItemShipment;
   TProductTypeaspectsArray = Array of TProductAspect;
   TProductTypecustomAttributesArray = Array of TProductCustomAttribute;
   TProductTypecustomGroupsArray = Array of TProductCustomGroup;
@@ -264,6 +373,9 @@ type
   TProductstatusesCustomBatchRequestTypeentriesArray = Array of TProductstatusesCustomBatchRequestEntry;
   TProductstatusesCustomBatchResponseTypeentriesArray = Array of TProductstatusesCustomBatchResponseEntry;
   TProductstatusesListResponseTyperesourcesArray = Array of TProductStatus;
+  TTestOrderTypelineItemsArray = Array of TTestOrderLineItem;
+  TTestOrderTypepromotionsArray = Array of TOrderPromotion;
+  TTestOrderLineItemProductTypevariantAttributesArray = Array of TOrderLineItemProductVariantAttribute;
   
   { --------------------------------------------------------------------
     TAccount
@@ -282,14 +394,14 @@ type
     FwebsiteUrl : String;
   Protected
     //Property setters
-    Procedure SetadultContent(AIndex : Integer; AValue : boolean); virtual;
-    Procedure SetadwordsLinks(AIndex : Integer; AValue : TAccountTypeadwordsLinksArray); virtual;
+    Procedure SetadultContent(AIndex : Integer; const AValue : boolean); virtual;
+    Procedure SetadwordsLinks(AIndex : Integer; const AValue : TAccountTypeadwordsLinksArray); virtual;
     Procedure Setid(AIndex : Integer; const AValue : String); virtual;
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
     Procedure Setname(AIndex : Integer; const AValue : String); virtual;
     Procedure SetreviewsUrl(AIndex : Integer; const AValue : String); virtual;
     Procedure SetsellerId(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setusers(AIndex : Integer; AValue : TAccountTypeusersArray); virtual;
+    Procedure Setusers(AIndex : Integer; const AValue : TAccountTypeusersArray); virtual;
     Procedure SetwebsiteUrl(AIndex : Integer; const AValue : String); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
@@ -362,11 +474,11 @@ type
   Protected
     //Property setters
     Procedure SetaccountId(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetcarrierRates(AIndex : Integer; AValue : TAccountShippingTypecarrierRatesArray); virtual;
+    Procedure SetcarrierRates(AIndex : Integer; const AValue : TAccountShippingTypecarrierRatesArray); virtual;
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetlocationGroups(AIndex : Integer; AValue : TAccountShippingTypelocationGroupsArray); virtual;
-    Procedure SetrateTables(AIndex : Integer; AValue : TAccountShippingTyperateTablesArray); virtual;
-    Procedure Setservices(AIndex : Integer; AValue : TAccountShippingTypeservicesArray); virtual;
+    Procedure SetlocationGroups(AIndex : Integer; const AValue : TAccountShippingTypelocationGroupsArray); virtual;
+    Procedure SetrateTables(AIndex : Integer; const AValue : TAccountShippingTyperateTablesArray); virtual;
+    Procedure Setservices(AIndex : Integer; const AValue : TAccountShippingTypeservicesArray); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
     Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
@@ -399,7 +511,7 @@ type
     //Property setters
     Procedure Setcarrier(AIndex : Integer; const AValue : String); virtual;
     Procedure SetcarrierService(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetmodifierFlatRate(AIndex : Integer; AValue : TPrice); virtual;
+    Procedure SetmodifierFlatRate(AIndex : Integer; const AValue : TPrice); virtual;
     Procedure SetmodifierPercent(AIndex : Integer; const AValue : String); virtual;
     Procedure Setname(AIndex : Integer; const AValue : String); virtual;
     Procedure SetsaleCountry(AIndex : Integer; const AValue : String); virtual;
@@ -434,10 +546,10 @@ type
     Procedure SetdeliveryLocationGroup(AIndex : Integer; const AValue : String); virtual;
     Procedure SetdeliveryLocationId(AIndex : Integer; const AValue : String); virtual;
     Procedure SetdeliveryPostalCode(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetdeliveryPostalCodeRange(AIndex : Integer; AValue : TAccountShippingPostalCodeRange); virtual;
-    Procedure SetpriceMax(AIndex : Integer; AValue : TPrice); virtual;
+    Procedure SetdeliveryPostalCodeRange(AIndex : Integer; const AValue : TAccountShippingPostalCodeRange); virtual;
+    Procedure SetpriceMax(AIndex : Integer; const AValue : TPrice); virtual;
     Procedure SetshippingLabel(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetweightMax(AIndex : Integer; AValue : TWeight); virtual;
+    Procedure SetweightMax(AIndex : Integer; const AValue : TWeight); virtual;
   Public
   Published
     Property deliveryLocationGroup : String Index 0 Read FdeliveryLocationGroup Write SetdeliveryLocationGroup;
@@ -464,10 +576,10 @@ type
   Protected
     //Property setters
     Procedure Setcountry(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetlocationIds(AIndex : Integer; AValue : TStringArray); virtual;
+    Procedure SetlocationIds(AIndex : Integer; const AValue : TStringArray); virtual;
     Procedure Setname(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetpostalCodeRanges(AIndex : Integer; AValue : TAccountShippingLocationGroupTypepostalCodeRangesArray); virtual;
-    Procedure SetpostalCodes(AIndex : Integer; AValue : TStringArray); virtual;
+    Procedure SetpostalCodeRanges(AIndex : Integer; const AValue : TAccountShippingLocationGroupTypepostalCodeRangesArray); virtual;
+    Procedure SetpostalCodes(AIndex : Integer; const AValue : TStringArray); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
     Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
@@ -513,7 +625,7 @@ type
     FsaleCountry : String;
   Protected
     //Property setters
-    Procedure Setcontent(AIndex : Integer; AValue : TAccountShippingRateTableTypecontentArray); virtual;
+    Procedure Setcontent(AIndex : Integer; const AValue : TAccountShippingRateTableTypecontentArray); virtual;
     Procedure Setname(AIndex : Integer; const AValue : String); virtual;
     Procedure SetsaleCountry(AIndex : Integer; const AValue : String); virtual;
     //2.6.4. bug workaround
@@ -538,8 +650,8 @@ type
     Frate : TPrice;
   Protected
     //Property setters
-    Procedure Setcondition(AIndex : Integer; AValue : TAccountShippingCondition); virtual;
-    Procedure Setrate(AIndex : Integer; AValue : TPrice); virtual;
+    Procedure Setcondition(AIndex : Integer; const AValue : TAccountShippingCondition); virtual;
+    Procedure Setrate(AIndex : Integer; const AValue : TPrice); virtual;
   Public
   Published
     Property condition : TAccountShippingCondition Index 0 Read Fcondition Write Setcondition;
@@ -560,9 +672,9 @@ type
     FsaleCountry : String;
   Protected
     //Property setters
-    Procedure Setactive(AIndex : Integer; AValue : boolean); virtual;
-    Procedure SetcalculationMethod(AIndex : Integer; AValue : TAccountShippingShippingServiceCalculationMethod); virtual;
-    Procedure SetcostRuleTree(AIndex : Integer; AValue : TAccountShippingShippingServiceCostRule); virtual;
+    Procedure Setactive(AIndex : Integer; const AValue : boolean); virtual;
+    Procedure SetcalculationMethod(AIndex : Integer; const AValue : TAccountShippingShippingServiceCalculationMethod); virtual;
+    Procedure SetcostRuleTree(AIndex : Integer; const AValue : TAccountShippingShippingServiceCostRule); virtual;
     Procedure Setname(AIndex : Integer; const AValue : String); virtual;
     Procedure SetsaleCountry(AIndex : Integer; const AValue : String); virtual;
   Public
@@ -589,8 +701,8 @@ type
   Protected
     //Property setters
     Procedure SetcarrierRate(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setexcluded(AIndex : Integer; AValue : boolean); virtual;
-    Procedure SetflatRate(AIndex : Integer; AValue : TPrice); virtual;
+    Procedure Setexcluded(AIndex : Integer; const AValue : boolean); virtual;
+    Procedure SetflatRate(AIndex : Integer; const AValue : TPrice); virtual;
     Procedure SetpercentageRate(AIndex : Integer; const AValue : String); virtual;
     Procedure SetrateTable(AIndex : Integer; const AValue : String); virtual;
   Public
@@ -614,9 +726,9 @@ type
     Fcondition : TAccountShippingCondition;
   Protected
     //Property setters
-    Procedure SetcalculationMethod(AIndex : Integer; AValue : TAccountShippingShippingServiceCalculationMethod); virtual;
-    Procedure Setchildren(AIndex : Integer; AValue : TAccountShippingShippingServiceCostRuleTypechildrenArray); virtual;
-    Procedure Setcondition(AIndex : Integer; AValue : TAccountShippingCondition); virtual;
+    Procedure SetcalculationMethod(AIndex : Integer; const AValue : TAccountShippingShippingServiceCalculationMethod); virtual;
+    Procedure Setchildren(AIndex : Integer; const AValue : TAccountShippingShippingServiceCostRuleTypechildrenArray); virtual;
+    Procedure Setcondition(AIndex : Integer; const AValue : TAccountShippingCondition); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
     Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
@@ -641,7 +753,7 @@ type
   Protected
     //Property setters
     Procedure SetaccountId(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetdataQualityIssues(AIndex : Integer; AValue : TAccountStatusTypedataQualityIssuesArray); virtual;
+    Procedure SetdataQualityIssues(AIndex : Integer; const AValue : TAccountStatusTypedataQualityIssuesArray); virtual;
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
@@ -673,10 +785,10 @@ type
     //Property setters
     Procedure Setcountry(AIndex : Integer; const AValue : String); virtual;
     Procedure SetdisplayedValue(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetexampleItems(AIndex : Integer; AValue : TAccountStatusDataQualityIssueTypeexampleItemsArray); virtual;
+    Procedure SetexampleItems(AIndex : Integer; const AValue : TAccountStatusDataQualityIssueTypeexampleItemsArray); virtual;
     Procedure Setid(AIndex : Integer; const AValue : String); virtual;
     Procedure SetlastChecked(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetnumItems(AIndex : Integer; AValue : integer); virtual;
+    Procedure SetnumItems(AIndex : Integer; const AValue : integer); virtual;
     Procedure Setseverity(AIndex : Integer; const AValue : String); virtual;
     Procedure SetsubmittedValue(AIndex : Integer; const AValue : String); virtual;
     //2.6.4. bug workaround
@@ -737,7 +849,7 @@ type
     //Property setters
     Procedure SetaccountId(AIndex : Integer; const AValue : String); virtual;
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setrules(AIndex : Integer; AValue : TAccountTaxTyperulesArray); virtual;
+    Procedure Setrules(AIndex : Integer; const AValue : TAccountTaxTyperulesArray); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
     Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
@@ -766,8 +878,8 @@ type
     Procedure Setcountry(AIndex : Integer; const AValue : String); virtual;
     Procedure SetlocationId(AIndex : Integer; const AValue : String); virtual;
     Procedure SetratePercent(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetshippingTaxed(AIndex : Integer; AValue : boolean); virtual;
-    Procedure SetuseGlobalRate(AIndex : Integer; AValue : boolean); virtual;
+    Procedure SetshippingTaxed(AIndex : Integer; const AValue : boolean); virtual;
+    Procedure SetuseGlobalRate(AIndex : Integer; const AValue : boolean); virtual;
   Public
   Published
     Property country : String Index 0 Read Fcountry Write Setcountry;
@@ -788,7 +900,7 @@ type
     FemailAddress : String;
   Protected
     //Property setters
-    Procedure Setadmin(AIndex : Integer; AValue : boolean); virtual;
+    Procedure Setadmin(AIndex : Integer; const AValue : boolean); virtual;
     Procedure SetemailAddress(AIndex : Integer; const AValue : String); virtual;
   Public
   Published
@@ -807,7 +919,7 @@ type
     Fkind : String;
   Protected
     //Property setters
-    Procedure SetaccountIdentifiers(AIndex : Integer; AValue : TAccountsAuthInfoResponseTypeaccountIdentifiersArray); virtual;
+    Procedure SetaccountIdentifiers(AIndex : Integer; const AValue : TAccountsAuthInfoResponseTypeaccountIdentifiersArray); virtual;
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
@@ -829,7 +941,7 @@ type
     Fentries : TAccountsCustomBatchRequestTypeentriesArray;
   Protected
     //Property setters
-    Procedure Setentries(AIndex : Integer; AValue : TAccountsCustomBatchRequestTypeentriesArray); virtual;
+    Procedure Setentries(AIndex : Integer; const AValue : TAccountsCustomBatchRequestTypeentriesArray); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
     Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
@@ -853,9 +965,9 @@ type
     Fmethod : String;
   Protected
     //Property setters
-    Procedure Setaccount(AIndex : Integer; AValue : TAccount); virtual;
+    Procedure Setaccount(AIndex : Integer; const AValue : TAccount); virtual;
     Procedure SetaccountId(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetbatchId(AIndex : Integer; AValue : integer); virtual;
+    Procedure SetbatchId(AIndex : Integer; const AValue : integer); virtual;
     Procedure SetmerchantId(AIndex : Integer; const AValue : String); virtual;
     Procedure Setmethod(AIndex : Integer; const AValue : String); virtual;
   Public
@@ -878,7 +990,7 @@ type
     Fkind : String;
   Protected
     //Property setters
-    Procedure Setentries(AIndex : Integer; AValue : TAccountsCustomBatchResponseTypeentriesArray); virtual;
+    Procedure Setentries(AIndex : Integer; const AValue : TAccountsCustomBatchResponseTypeentriesArray); virtual;
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
@@ -903,9 +1015,9 @@ type
     Fkind : String;
   Protected
     //Property setters
-    Procedure Setaccount(AIndex : Integer; AValue : TAccount); virtual;
-    Procedure SetbatchId(AIndex : Integer; AValue : integer); virtual;
-    Procedure Seterrors(AIndex : Integer; AValue : TErrors); virtual;
+    Procedure Setaccount(AIndex : Integer; const AValue : TAccount); virtual;
+    Procedure SetbatchId(AIndex : Integer; const AValue : integer); virtual;
+    Procedure Seterrors(AIndex : Integer; const AValue : TErrors); virtual;
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
   Public
   Published
@@ -929,7 +1041,7 @@ type
     //Property setters
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
     Procedure SetnextPageToken(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setresources(AIndex : Integer; AValue : TAccountsListResponseTyperesourcesArray); virtual;
+    Procedure Setresources(AIndex : Integer; const AValue : TAccountsListResponseTyperesourcesArray); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
     Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
@@ -951,7 +1063,7 @@ type
     Fentries : TAccountshippingCustomBatchRequestTypeentriesArray;
   Protected
     //Property setters
-    Procedure Setentries(AIndex : Integer; AValue : TAccountshippingCustomBatchRequestTypeentriesArray); virtual;
+    Procedure Setentries(AIndex : Integer; const AValue : TAccountshippingCustomBatchRequestTypeentriesArray); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
     Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
@@ -976,8 +1088,8 @@ type
   Protected
     //Property setters
     Procedure SetaccountId(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetaccountShipping(AIndex : Integer; AValue : TAccountShipping); virtual;
-    Procedure SetbatchId(AIndex : Integer; AValue : integer); virtual;
+    Procedure SetaccountShipping(AIndex : Integer; const AValue : TAccountShipping); virtual;
+    Procedure SetbatchId(AIndex : Integer; const AValue : integer); virtual;
     Procedure SetmerchantId(AIndex : Integer; const AValue : String); virtual;
     Procedure Setmethod(AIndex : Integer; const AValue : String); virtual;
   Public
@@ -1000,7 +1112,7 @@ type
     Fkind : String;
   Protected
     //Property setters
-    Procedure Setentries(AIndex : Integer; AValue : TAccountshippingCustomBatchResponseTypeentriesArray); virtual;
+    Procedure Setentries(AIndex : Integer; const AValue : TAccountshippingCustomBatchResponseTypeentriesArray); virtual;
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
@@ -1025,9 +1137,9 @@ type
     Fkind : String;
   Protected
     //Property setters
-    Procedure SetaccountShipping(AIndex : Integer; AValue : TAccountShipping); virtual;
-    Procedure SetbatchId(AIndex : Integer; AValue : integer); virtual;
-    Procedure Seterrors(AIndex : Integer; AValue : TErrors); virtual;
+    Procedure SetaccountShipping(AIndex : Integer; const AValue : TAccountShipping); virtual;
+    Procedure SetbatchId(AIndex : Integer; const AValue : integer); virtual;
+    Procedure Seterrors(AIndex : Integer; const AValue : TErrors); virtual;
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
   Public
   Published
@@ -1051,7 +1163,7 @@ type
     //Property setters
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
     Procedure SetnextPageToken(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setresources(AIndex : Integer; AValue : TAccountshippingListResponseTyperesourcesArray); virtual;
+    Procedure Setresources(AIndex : Integer; const AValue : TAccountshippingListResponseTyperesourcesArray); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
     Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
@@ -1073,7 +1185,7 @@ type
     Fentries : TAccountstatusesCustomBatchRequestTypeentriesArray;
   Protected
     //Property setters
-    Procedure Setentries(AIndex : Integer; AValue : TAccountstatusesCustomBatchRequestTypeentriesArray); virtual;
+    Procedure Setentries(AIndex : Integer; const AValue : TAccountstatusesCustomBatchRequestTypeentriesArray); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
     Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
@@ -1097,7 +1209,7 @@ type
   Protected
     //Property setters
     Procedure SetaccountId(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetbatchId(AIndex : Integer; AValue : integer); virtual;
+    Procedure SetbatchId(AIndex : Integer; const AValue : integer); virtual;
     Procedure SetmerchantId(AIndex : Integer; const AValue : String); virtual;
     Procedure Setmethod(AIndex : Integer; const AValue : String); virtual;
   Public
@@ -1119,7 +1231,7 @@ type
     Fkind : String;
   Protected
     //Property setters
-    Procedure Setentries(AIndex : Integer; AValue : TAccountstatusesCustomBatchResponseTypeentriesArray); virtual;
+    Procedure Setentries(AIndex : Integer; const AValue : TAccountstatusesCustomBatchResponseTypeentriesArray); virtual;
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
@@ -1143,9 +1255,9 @@ type
     Ferrors : TErrors;
   Protected
     //Property setters
-    Procedure SetaccountStatus(AIndex : Integer; AValue : TAccountStatus); virtual;
-    Procedure SetbatchId(AIndex : Integer; AValue : integer); virtual;
-    Procedure Seterrors(AIndex : Integer; AValue : TErrors); virtual;
+    Procedure SetaccountStatus(AIndex : Integer; const AValue : TAccountStatus); virtual;
+    Procedure SetbatchId(AIndex : Integer; const AValue : integer); virtual;
+    Procedure Seterrors(AIndex : Integer; const AValue : TErrors); virtual;
   Public
   Published
     Property accountStatus : TAccountStatus Index 0 Read FaccountStatus Write SetaccountStatus;
@@ -1167,7 +1279,7 @@ type
     //Property setters
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
     Procedure SetnextPageToken(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setresources(AIndex : Integer; AValue : TAccountstatusesListResponseTyperesourcesArray); virtual;
+    Procedure Setresources(AIndex : Integer; const AValue : TAccountstatusesListResponseTyperesourcesArray); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
     Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
@@ -1189,7 +1301,7 @@ type
     Fentries : TAccounttaxCustomBatchRequestTypeentriesArray;
   Protected
     //Property setters
-    Procedure Setentries(AIndex : Integer; AValue : TAccounttaxCustomBatchRequestTypeentriesArray); virtual;
+    Procedure Setentries(AIndex : Integer; const AValue : TAccounttaxCustomBatchRequestTypeentriesArray); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
     Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
@@ -1214,8 +1326,8 @@ type
   Protected
     //Property setters
     Procedure SetaccountId(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetaccountTax(AIndex : Integer; AValue : TAccountTax); virtual;
-    Procedure SetbatchId(AIndex : Integer; AValue : integer); virtual;
+    Procedure SetaccountTax(AIndex : Integer; const AValue : TAccountTax); virtual;
+    Procedure SetbatchId(AIndex : Integer; const AValue : integer); virtual;
     Procedure SetmerchantId(AIndex : Integer; const AValue : String); virtual;
     Procedure Setmethod(AIndex : Integer; const AValue : String); virtual;
   Public
@@ -1238,7 +1350,7 @@ type
     Fkind : String;
   Protected
     //Property setters
-    Procedure Setentries(AIndex : Integer; AValue : TAccounttaxCustomBatchResponseTypeentriesArray); virtual;
+    Procedure Setentries(AIndex : Integer; const AValue : TAccounttaxCustomBatchResponseTypeentriesArray); virtual;
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
@@ -1263,9 +1375,9 @@ type
     Fkind : String;
   Protected
     //Property setters
-    Procedure SetaccountTax(AIndex : Integer; AValue : TAccountTax); virtual;
-    Procedure SetbatchId(AIndex : Integer; AValue : integer); virtual;
-    Procedure Seterrors(AIndex : Integer; AValue : TErrors); virtual;
+    Procedure SetaccountTax(AIndex : Integer; const AValue : TAccountTax); virtual;
+    Procedure SetbatchId(AIndex : Integer; const AValue : integer); virtual;
+    Procedure Seterrors(AIndex : Integer; const AValue : TErrors); virtual;
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
   Public
   Published
@@ -1289,7 +1401,7 @@ type
     //Property setters
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
     Procedure SetnextPageToken(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setresources(AIndex : Integer; AValue : TAccounttaxListResponseTyperesourcesArray); virtual;
+    Procedure Setresources(AIndex : Integer; const AValue : TAccounttaxListResponseTyperesourcesArray); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
     Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
@@ -1324,11 +1436,11 @@ type
     Procedure SetattributeLanguage(AIndex : Integer; const AValue : String); virtual;
     Procedure SetcontentLanguage(AIndex : Integer; const AValue : String); virtual;
     Procedure SetcontentType(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetfetchSchedule(AIndex : Integer; AValue : TDatafeedFetchSchedule); virtual;
+    Procedure SetfetchSchedule(AIndex : Integer; const AValue : TDatafeedFetchSchedule); virtual;
     Procedure SetfileName(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setformat(AIndex : Integer; AValue : TDatafeedFormat); virtual;
+    Procedure Setformat(AIndex : Integer; const AValue : TDatafeedFormat); virtual;
     Procedure Setid(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetintendedDestinations(AIndex : Integer; AValue : TStringArray); virtual;
+    Procedure SetintendedDestinations(AIndex : Integer; const AValue : TStringArray); virtual;
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
     Procedure Setname(AIndex : Integer; const AValue : String); virtual;
     Procedure SettargetCountry(AIndex : Integer; const AValue : String); virtual;
@@ -1361,15 +1473,17 @@ type
     FdayOfMonth : integer;
     FfetchUrl : String;
     Fhour : integer;
+    FminuteOfHour : integer;
     Fpassword : String;
     FtimeZone : String;
     Fusername : String;
     Fweekday : String;
   Protected
     //Property setters
-    Procedure SetdayOfMonth(AIndex : Integer; AValue : integer); virtual;
+    Procedure SetdayOfMonth(AIndex : Integer; const AValue : integer); virtual;
     Procedure SetfetchUrl(AIndex : Integer; const AValue : String); virtual;
-    Procedure Sethour(AIndex : Integer; AValue : integer); virtual;
+    Procedure Sethour(AIndex : Integer; const AValue : integer); virtual;
+    Procedure SetminuteOfHour(AIndex : Integer; const AValue : integer); virtual;
     Procedure Setpassword(AIndex : Integer; const AValue : String); virtual;
     Procedure SettimeZone(AIndex : Integer; const AValue : String); virtual;
     Procedure Setusername(AIndex : Integer; const AValue : String); virtual;
@@ -1379,10 +1493,11 @@ type
     Property dayOfMonth : integer Index 0 Read FdayOfMonth Write SetdayOfMonth;
     Property fetchUrl : String Index 8 Read FfetchUrl Write SetfetchUrl;
     Property hour : integer Index 16 Read Fhour Write Sethour;
-    Property password : String Index 24 Read Fpassword Write Setpassword;
-    Property timeZone : String Index 32 Read FtimeZone Write SettimeZone;
-    Property username : String Index 40 Read Fusername Write Setusername;
-    Property weekday : String Index 48 Read Fweekday Write Setweekday;
+    Property minuteOfHour : integer Index 24 Read FminuteOfHour Write SetminuteOfHour;
+    Property password : String Index 32 Read Fpassword Write Setpassword;
+    Property timeZone : String Index 40 Read FtimeZone Write SettimeZone;
+    Property username : String Index 48 Read Fusername Write Setusername;
+    Property weekday : String Index 56 Read Fweekday Write Setweekday;
   end;
   TDatafeedFetchScheduleClass = Class of TDatafeedFetchSchedule;
   
@@ -1425,13 +1540,13 @@ type
   Protected
     //Property setters
     Procedure SetdatafeedId(AIndex : Integer; const AValue : String); virtual;
-    Procedure Seterrors(AIndex : Integer; AValue : TDatafeedStatusTypeerrorsArray); virtual;
+    Procedure Seterrors(AIndex : Integer; const AValue : TDatafeedStatusTypeerrorsArray); virtual;
     Procedure SetitemsTotal(AIndex : Integer; const AValue : String); virtual;
     Procedure SetitemsValid(AIndex : Integer; const AValue : String); virtual;
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
     Procedure SetlastUploadDate(AIndex : Integer; const AValue : String); virtual;
     Procedure SetprocessingStatus(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setwarnings(AIndex : Integer; AValue : TDatafeedStatusTypewarningsArray); virtual;
+    Procedure Setwarnings(AIndex : Integer; const AValue : TDatafeedStatusTypewarningsArray); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
     Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
@@ -1463,7 +1578,7 @@ type
     //Property setters
     Procedure Setcode(AIndex : Integer; const AValue : String); virtual;
     Procedure Setcount(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setexamples(AIndex : Integer; AValue : TDatafeedStatusErrorTypeexamplesArray); virtual;
+    Procedure Setexamples(AIndex : Integer; const AValue : TDatafeedStatusErrorTypeexamplesArray); virtual;
     Procedure Setmessage(AIndex : Integer; const AValue : String); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
@@ -1509,7 +1624,7 @@ type
     Fentries : TDatafeedsCustomBatchRequestTypeentriesArray;
   Protected
     //Property setters
-    Procedure Setentries(AIndex : Integer; AValue : TDatafeedsCustomBatchRequestTypeentriesArray); virtual;
+    Procedure Setentries(AIndex : Integer; const AValue : TDatafeedsCustomBatchRequestTypeentriesArray); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
     Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
@@ -1533,8 +1648,8 @@ type
     Fmethod : String;
   Protected
     //Property setters
-    Procedure SetbatchId(AIndex : Integer; AValue : integer); virtual;
-    Procedure Setdatafeed(AIndex : Integer; AValue : TDatafeed); virtual;
+    Procedure SetbatchId(AIndex : Integer; const AValue : integer); virtual;
+    Procedure Setdatafeed(AIndex : Integer; const AValue : TDatafeed); virtual;
     Procedure SetdatafeedId(AIndex : Integer; const AValue : String); virtual;
     Procedure SetmerchantId(AIndex : Integer; const AValue : String); virtual;
     Procedure Setmethod(AIndex : Integer; const AValue : String); virtual;
@@ -1558,7 +1673,7 @@ type
     Fkind : String;
   Protected
     //Property setters
-    Procedure Setentries(AIndex : Integer; AValue : TDatafeedsCustomBatchResponseTypeentriesArray); virtual;
+    Procedure Setentries(AIndex : Integer; const AValue : TDatafeedsCustomBatchResponseTypeentriesArray); virtual;
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
@@ -1582,9 +1697,9 @@ type
     Ferrors : TErrors;
   Protected
     //Property setters
-    Procedure SetbatchId(AIndex : Integer; AValue : integer); virtual;
-    Procedure Setdatafeed(AIndex : Integer; AValue : TDatafeed); virtual;
-    Procedure Seterrors(AIndex : Integer; AValue : TErrors); virtual;
+    Procedure SetbatchId(AIndex : Integer; const AValue : integer); virtual;
+    Procedure Setdatafeed(AIndex : Integer; const AValue : TDatafeed); virtual;
+    Procedure Seterrors(AIndex : Integer; const AValue : TErrors); virtual;
   Public
   Published
     Property batchId : integer Index 0 Read FbatchId Write SetbatchId;
@@ -1606,7 +1721,7 @@ type
     //Property setters
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
     Procedure SetnextPageToken(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setresources(AIndex : Integer; AValue : TDatafeedsListResponseTyperesourcesArray); virtual;
+    Procedure Setresources(AIndex : Integer; const AValue : TDatafeedsListResponseTyperesourcesArray); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
     Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
@@ -1628,7 +1743,7 @@ type
     Fentries : TDatafeedstatusesCustomBatchRequestTypeentriesArray;
   Protected
     //Property setters
-    Procedure Setentries(AIndex : Integer; AValue : TDatafeedstatusesCustomBatchRequestTypeentriesArray); virtual;
+    Procedure Setentries(AIndex : Integer; const AValue : TDatafeedstatusesCustomBatchRequestTypeentriesArray); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
     Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
@@ -1651,7 +1766,7 @@ type
     Fmethod : String;
   Protected
     //Property setters
-    Procedure SetbatchId(AIndex : Integer; AValue : integer); virtual;
+    Procedure SetbatchId(AIndex : Integer; const AValue : integer); virtual;
     Procedure SetdatafeedId(AIndex : Integer; const AValue : String); virtual;
     Procedure SetmerchantId(AIndex : Integer; const AValue : String); virtual;
     Procedure Setmethod(AIndex : Integer; const AValue : String); virtual;
@@ -1674,7 +1789,7 @@ type
     Fkind : String;
   Protected
     //Property setters
-    Procedure Setentries(AIndex : Integer; AValue : TDatafeedstatusesCustomBatchResponseTypeentriesArray); virtual;
+    Procedure Setentries(AIndex : Integer; const AValue : TDatafeedstatusesCustomBatchResponseTypeentriesArray); virtual;
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
@@ -1698,9 +1813,9 @@ type
     Ferrors : TErrors;
   Protected
     //Property setters
-    Procedure SetbatchId(AIndex : Integer; AValue : integer); virtual;
-    Procedure SetdatafeedStatus(AIndex : Integer; AValue : TDatafeedStatus); virtual;
-    Procedure Seterrors(AIndex : Integer; AValue : TErrors); virtual;
+    Procedure SetbatchId(AIndex : Integer; const AValue : integer); virtual;
+    Procedure SetdatafeedStatus(AIndex : Integer; const AValue : TDatafeedStatus); virtual;
+    Procedure Seterrors(AIndex : Integer; const AValue : TErrors); virtual;
   Public
   Published
     Property batchId : integer Index 0 Read FbatchId Write SetbatchId;
@@ -1722,7 +1837,7 @@ type
     //Property setters
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
     Procedure SetnextPageToken(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setresources(AIndex : Integer; AValue : TDatafeedstatusesListResponseTyperesourcesArray); virtual;
+    Procedure Setresources(AIndex : Integer; const AValue : TDatafeedstatusesListResponseTyperesourcesArray); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
     Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
@@ -1768,8 +1883,8 @@ type
     Fmessage : String;
   Protected
     //Property setters
-    Procedure Setcode(AIndex : Integer; AValue : integer); virtual;
-    Procedure Seterrors(AIndex : Integer; AValue : TErrorsTypeerrorsArray); virtual;
+    Procedure Setcode(AIndex : Integer; const AValue : integer); virtual;
+    Procedure Seterrors(AIndex : Integer; const AValue : TErrorsTypeerrorsArray); virtual;
     Procedure Setmessage(AIndex : Integer; const AValue : String); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
@@ -1784,33 +1899,61 @@ type
   TErrorsClass = Class of TErrors;
   
   { --------------------------------------------------------------------
+    TInstallment
+    --------------------------------------------------------------------}
+  
+  TInstallment = Class(TGoogleBaseObject)
+  Private
+    Famount : TPrice;
+    Fmonths : String;
+  Protected
+    //Property setters
+    Procedure Setamount(AIndex : Integer; const AValue : TPrice); virtual;
+    Procedure Setmonths(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property amount : TPrice Index 0 Read Famount Write Setamount;
+    Property months : String Index 8 Read Fmonths Write Setmonths;
+  end;
+  TInstallmentClass = Class of TInstallment;
+  
+  { --------------------------------------------------------------------
     TInventory
     --------------------------------------------------------------------}
   
   TInventory = Class(TGoogleBaseObject)
   Private
     Favailability : String;
+    Finstallment : TInstallment;
     Fkind : String;
+    FloyaltyPoints : TLoyaltyPoints;
     Fprice : TPrice;
     Fquantity : integer;
     FsalePrice : TPrice;
     FsalePriceEffectiveDate : String;
+    FsellOnGoogleQuantity : integer;
   Protected
     //Property setters
     Procedure Setavailability(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setinstallment(AIndex : Integer; const AValue : TInstallment); virtual;
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setprice(AIndex : Integer; AValue : TPrice); virtual;
-    Procedure Setquantity(AIndex : Integer; AValue : integer); virtual;
-    Procedure SetsalePrice(AIndex : Integer; AValue : TPrice); virtual;
+    Procedure SetloyaltyPoints(AIndex : Integer; const AValue : TLoyaltyPoints); virtual;
+    Procedure Setprice(AIndex : Integer; const AValue : TPrice); virtual;
+    Procedure Setquantity(AIndex : Integer; const AValue : integer); virtual;
+    Procedure SetsalePrice(AIndex : Integer; const AValue : TPrice); virtual;
     Procedure SetsalePriceEffectiveDate(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetsellOnGoogleQuantity(AIndex : Integer; const AValue : integer); virtual;
   Public
   Published
     Property availability : String Index 0 Read Favailability Write Setavailability;
-    Property kind : String Index 8 Read Fkind Write Setkind;
-    Property price : TPrice Index 16 Read Fprice Write Setprice;
-    Property quantity : integer Index 24 Read Fquantity Write Setquantity;
-    Property salePrice : TPrice Index 32 Read FsalePrice Write SetsalePrice;
-    Property salePriceEffectiveDate : String Index 40 Read FsalePriceEffectiveDate Write SetsalePriceEffectiveDate;
+    Property installment : TInstallment Index 8 Read Finstallment Write Setinstallment;
+    Property kind : String Index 16 Read Fkind Write Setkind;
+    Property loyaltyPoints : TLoyaltyPoints Index 24 Read FloyaltyPoints Write SetloyaltyPoints;
+    Property price : TPrice Index 32 Read Fprice Write Setprice;
+    Property quantity : integer Index 40 Read Fquantity Write Setquantity;
+    Property salePrice : TPrice Index 48 Read FsalePrice Write SetsalePrice;
+    Property salePriceEffectiveDate : String Index 56 Read FsalePriceEffectiveDate Write SetsalePriceEffectiveDate;
+    Property sellOnGoogleQuantity : integer Index 64 Read FsellOnGoogleQuantity Write SetsellOnGoogleQuantity;
   end;
   TInventoryClass = Class of TInventory;
   
@@ -1823,7 +1966,7 @@ type
     Fentries : TInventoryCustomBatchRequestTypeentriesArray;
   Protected
     //Property setters
-    Procedure Setentries(AIndex : Integer; AValue : TInventoryCustomBatchRequestTypeentriesArray); virtual;
+    Procedure Setentries(AIndex : Integer; const AValue : TInventoryCustomBatchRequestTypeentriesArray); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
     Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
@@ -1847,8 +1990,8 @@ type
     FstoreCode : String;
   Protected
     //Property setters
-    Procedure SetbatchId(AIndex : Integer; AValue : integer); virtual;
-    Procedure Setinventory(AIndex : Integer; AValue : TInventory); virtual;
+    Procedure SetbatchId(AIndex : Integer; const AValue : integer); virtual;
+    Procedure Setinventory(AIndex : Integer; const AValue : TInventory); virtual;
     Procedure SetmerchantId(AIndex : Integer; const AValue : String); virtual;
     Procedure SetproductId(AIndex : Integer; const AValue : String); virtual;
     Procedure SetstoreCode(AIndex : Integer; const AValue : String); virtual;
@@ -1872,7 +2015,7 @@ type
     Fkind : String;
   Protected
     //Property setters
-    Procedure Setentries(AIndex : Integer; AValue : TInventoryCustomBatchResponseTypeentriesArray); virtual;
+    Procedure Setentries(AIndex : Integer; const AValue : TInventoryCustomBatchResponseTypeentriesArray); virtual;
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
@@ -1896,8 +2039,8 @@ type
     Fkind : String;
   Protected
     //Property setters
-    Procedure SetbatchId(AIndex : Integer; AValue : integer); virtual;
-    Procedure Seterrors(AIndex : Integer; AValue : TErrors); virtual;
+    Procedure SetbatchId(AIndex : Integer; const AValue : integer); virtual;
+    Procedure Seterrors(AIndex : Integer; const AValue : TErrors); virtual;
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
   Public
   Published
@@ -1914,24 +2057,33 @@ type
   TInventorySetRequest = Class(TGoogleBaseObject)
   Private
     Favailability : String;
+    Finstallment : TInstallment;
+    FloyaltyPoints : TLoyaltyPoints;
     Fprice : TPrice;
     Fquantity : integer;
     FsalePrice : TPrice;
     FsalePriceEffectiveDate : String;
+    FsellOnGoogleQuantity : integer;
   Protected
     //Property setters
     Procedure Setavailability(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setprice(AIndex : Integer; AValue : TPrice); virtual;
-    Procedure Setquantity(AIndex : Integer; AValue : integer); virtual;
-    Procedure SetsalePrice(AIndex : Integer; AValue : TPrice); virtual;
+    Procedure Setinstallment(AIndex : Integer; const AValue : TInstallment); virtual;
+    Procedure SetloyaltyPoints(AIndex : Integer; const AValue : TLoyaltyPoints); virtual;
+    Procedure Setprice(AIndex : Integer; const AValue : TPrice); virtual;
+    Procedure Setquantity(AIndex : Integer; const AValue : integer); virtual;
+    Procedure SetsalePrice(AIndex : Integer; const AValue : TPrice); virtual;
     Procedure SetsalePriceEffectiveDate(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetsellOnGoogleQuantity(AIndex : Integer; const AValue : integer); virtual;
   Public
   Published
     Property availability : String Index 0 Read Favailability Write Setavailability;
-    Property price : TPrice Index 8 Read Fprice Write Setprice;
-    Property quantity : integer Index 16 Read Fquantity Write Setquantity;
-    Property salePrice : TPrice Index 24 Read FsalePrice Write SetsalePrice;
-    Property salePriceEffectiveDate : String Index 32 Read FsalePriceEffectiveDate Write SetsalePriceEffectiveDate;
+    Property installment : TInstallment Index 8 Read Finstallment Write Setinstallment;
+    Property loyaltyPoints : TLoyaltyPoints Index 16 Read FloyaltyPoints Write SetloyaltyPoints;
+    Property price : TPrice Index 24 Read Fprice Write Setprice;
+    Property quantity : integer Index 32 Read Fquantity Write Setquantity;
+    Property salePrice : TPrice Index 40 Read FsalePrice Write SetsalePrice;
+    Property salePriceEffectiveDate : String Index 48 Read FsalePriceEffectiveDate Write SetsalePriceEffectiveDate;
+    Property sellOnGoogleQuantity : integer Index 56 Read FsellOnGoogleQuantity Write SetsellOnGoogleQuantity;
   end;
   TInventorySetRequestClass = Class of TInventorySetRequest;
   
@@ -1964,7 +2116,7 @@ type
     //Property setters
     Procedure Setname(AIndex : Integer; const AValue : String); virtual;
     Procedure SetpointsValue(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setratio(AIndex : Integer; AValue : double); virtual;
+    Procedure Setratio(AIndex : Integer; const AValue : double); virtual;
   Public
   Published
     Property name : String Index 0 Read Fname Write Setname;
@@ -1974,6 +2126,1354 @@ type
   TLoyaltyPointsClass = Class of TLoyaltyPoints;
   
   { --------------------------------------------------------------------
+    TOrder
+    --------------------------------------------------------------------}
+  
+  TOrder = Class(TGoogleBaseObject)
+  Private
+    Facknowledged : boolean;
+    Fcustomer : TOrderCustomer;
+    FdeliveryDetails : TOrderDeliveryDetails;
+    Fid : String;
+    Fkind : String;
+    FlineItems : TOrderTypelineItemsArray;
+    FmerchantId : String;
+    FmerchantOrderId : String;
+    FnetAmount : TPrice;
+    FpaymentMethod : TOrderPaymentMethod;
+    FpaymentStatus : String;
+    FplacedDate : String;
+    Fpromotions : TOrderTypepromotionsArray;
+    Frefunds : TOrderTyperefundsArray;
+    Fshipments : TOrderTypeshipmentsArray;
+    FshippingCost : TPrice;
+    FshippingCostTax : TPrice;
+    FshippingOption : String;
+    Fstatus : String;
+  Protected
+    //Property setters
+    Procedure Setacknowledged(AIndex : Integer; const AValue : boolean); virtual;
+    Procedure Setcustomer(AIndex : Integer; const AValue : TOrderCustomer); virtual;
+    Procedure SetdeliveryDetails(AIndex : Integer; const AValue : TOrderDeliveryDetails); virtual;
+    Procedure Setid(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetlineItems(AIndex : Integer; const AValue : TOrderTypelineItemsArray); virtual;
+    Procedure SetmerchantId(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetmerchantOrderId(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetnetAmount(AIndex : Integer; const AValue : TPrice); virtual;
+    Procedure SetpaymentMethod(AIndex : Integer; const AValue : TOrderPaymentMethod); virtual;
+    Procedure SetpaymentStatus(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetplacedDate(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setpromotions(AIndex : Integer; const AValue : TOrderTypepromotionsArray); virtual;
+    Procedure Setrefunds(AIndex : Integer; const AValue : TOrderTyperefundsArray); virtual;
+    Procedure Setshipments(AIndex : Integer; const AValue : TOrderTypeshipmentsArray); virtual;
+    Procedure SetshippingCost(AIndex : Integer; const AValue : TPrice); virtual;
+    Procedure SetshippingCostTax(AIndex : Integer; const AValue : TPrice); virtual;
+    Procedure SetshippingOption(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setstatus(AIndex : Integer; const AValue : String); virtual;
+    //2.6.4. bug workaround
+    {$IFDEF VER2_6}
+    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
+    {$ENDIF VER2_6}
+  Public
+  Published
+    Property acknowledged : boolean Index 0 Read Facknowledged Write Setacknowledged;
+    Property customer : TOrderCustomer Index 8 Read Fcustomer Write Setcustomer;
+    Property deliveryDetails : TOrderDeliveryDetails Index 16 Read FdeliveryDetails Write SetdeliveryDetails;
+    Property id : String Index 24 Read Fid Write Setid;
+    Property kind : String Index 32 Read Fkind Write Setkind;
+    Property lineItems : TOrderTypelineItemsArray Index 40 Read FlineItems Write SetlineItems;
+    Property merchantId : String Index 48 Read FmerchantId Write SetmerchantId;
+    Property merchantOrderId : String Index 56 Read FmerchantOrderId Write SetmerchantOrderId;
+    Property netAmount : TPrice Index 64 Read FnetAmount Write SetnetAmount;
+    Property paymentMethod : TOrderPaymentMethod Index 72 Read FpaymentMethod Write SetpaymentMethod;
+    Property paymentStatus : String Index 80 Read FpaymentStatus Write SetpaymentStatus;
+    Property placedDate : String Index 88 Read FplacedDate Write SetplacedDate;
+    Property promotions : TOrderTypepromotionsArray Index 96 Read Fpromotions Write Setpromotions;
+    Property refunds : TOrderTyperefundsArray Index 104 Read Frefunds Write Setrefunds;
+    Property shipments : TOrderTypeshipmentsArray Index 112 Read Fshipments Write Setshipments;
+    Property shippingCost : TPrice Index 120 Read FshippingCost Write SetshippingCost;
+    Property shippingCostTax : TPrice Index 128 Read FshippingCostTax Write SetshippingCostTax;
+    Property shippingOption : String Index 136 Read FshippingOption Write SetshippingOption;
+    Property status : String Index 144 Read Fstatus Write Setstatus;
+  end;
+  TOrderClass = Class of TOrder;
+  
+  { --------------------------------------------------------------------
+    TOrderAddress
+    --------------------------------------------------------------------}
+  
+  TOrderAddress = Class(TGoogleBaseObject)
+  Private
+    Fcountry : String;
+    FfullAddress : TStringArray;
+    FisPostOfficeBox : boolean;
+    Flocality : String;
+    FpostalCode : String;
+    FrecipientName : String;
+    Fregion : String;
+    FstreetAddress : TStringArray;
+  Protected
+    //Property setters
+    Procedure Setcountry(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetfullAddress(AIndex : Integer; const AValue : TStringArray); virtual;
+    Procedure SetisPostOfficeBox(AIndex : Integer; const AValue : boolean); virtual;
+    Procedure Setlocality(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetpostalCode(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetrecipientName(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setregion(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetstreetAddress(AIndex : Integer; const AValue : TStringArray); virtual;
+    //2.6.4. bug workaround
+    {$IFDEF VER2_6}
+    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
+    {$ENDIF VER2_6}
+  Public
+  Published
+    Property country : String Index 0 Read Fcountry Write Setcountry;
+    Property fullAddress : TStringArray Index 8 Read FfullAddress Write SetfullAddress;
+    Property isPostOfficeBox : boolean Index 16 Read FisPostOfficeBox Write SetisPostOfficeBox;
+    Property locality : String Index 24 Read Flocality Write Setlocality;
+    Property postalCode : String Index 32 Read FpostalCode Write SetpostalCode;
+    Property recipientName : String Index 40 Read FrecipientName Write SetrecipientName;
+    Property region : String Index 48 Read Fregion Write Setregion;
+    Property streetAddress : TStringArray Index 56 Read FstreetAddress Write SetstreetAddress;
+  end;
+  TOrderAddressClass = Class of TOrderAddress;
+  
+  { --------------------------------------------------------------------
+    TOrderCancellation
+    --------------------------------------------------------------------}
+  
+  TOrderCancellation = Class(TGoogleBaseObject)
+  Private
+    Factor : String;
+    FcreationDate : String;
+    Fquantity : integer;
+    Freason : String;
+    FreasonText : String;
+  Protected
+    //Property setters
+    Procedure Setactor(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetcreationDate(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setquantity(AIndex : Integer; const AValue : integer); virtual;
+    Procedure Setreason(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetreasonText(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property actor : String Index 0 Read Factor Write Setactor;
+    Property creationDate : String Index 8 Read FcreationDate Write SetcreationDate;
+    Property quantity : integer Index 16 Read Fquantity Write Setquantity;
+    Property reason : String Index 24 Read Freason Write Setreason;
+    Property reasonText : String Index 32 Read FreasonText Write SetreasonText;
+  end;
+  TOrderCancellationClass = Class of TOrderCancellation;
+  
+  { --------------------------------------------------------------------
+    TOrderCustomer
+    --------------------------------------------------------------------}
+  
+  TOrderCustomer = Class(TGoogleBaseObject)
+  Private
+    Femail : String;
+    FexplicitMarketingPreference : boolean;
+    FfullName : String;
+  Protected
+    //Property setters
+    Procedure Setemail(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetexplicitMarketingPreference(AIndex : Integer; const AValue : boolean); virtual;
+    Procedure SetfullName(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property email : String Index 0 Read Femail Write Setemail;
+    Property explicitMarketingPreference : boolean Index 8 Read FexplicitMarketingPreference Write SetexplicitMarketingPreference;
+    Property fullName : String Index 16 Read FfullName Write SetfullName;
+  end;
+  TOrderCustomerClass = Class of TOrderCustomer;
+  
+  { --------------------------------------------------------------------
+    TOrderDeliveryDetails
+    --------------------------------------------------------------------}
+  
+  TOrderDeliveryDetails = Class(TGoogleBaseObject)
+  Private
+    Faddress : TOrderAddress;
+    FphoneNumber : String;
+  Protected
+    //Property setters
+    Procedure Setaddress(AIndex : Integer; const AValue : TOrderAddress); virtual;
+    Procedure SetphoneNumber(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property address : TOrderAddress Index 0 Read Faddress Write Setaddress;
+    Property phoneNumber : String Index 8 Read FphoneNumber Write SetphoneNumber;
+  end;
+  TOrderDeliveryDetailsClass = Class of TOrderDeliveryDetails;
+  
+  { --------------------------------------------------------------------
+    TOrderLineItem
+    --------------------------------------------------------------------}
+  
+  TOrderLineItem = Class(TGoogleBaseObject)
+  Private
+    Fcancellations : TOrderLineItemTypecancellationsArray;
+    Fid : String;
+    Fprice : TPrice;
+    Fproduct : TOrderLineItemProduct;
+    FquantityCanceled : integer;
+    FquantityDelivered : integer;
+    FquantityOrdered : integer;
+    FquantityPending : integer;
+    FquantityReturned : integer;
+    FquantityShipped : integer;
+    FreturnInfo : TOrderLineItemReturnInfo;
+    Freturns : TOrderLineItemTypereturnsArray;
+    FshippingDetails : TOrderLineItemShippingDetails;
+    Ftax : TPrice;
+  Protected
+    //Property setters
+    Procedure Setcancellations(AIndex : Integer; const AValue : TOrderLineItemTypecancellationsArray); virtual;
+    Procedure Setid(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setprice(AIndex : Integer; const AValue : TPrice); virtual;
+    Procedure Setproduct(AIndex : Integer; const AValue : TOrderLineItemProduct); virtual;
+    Procedure SetquantityCanceled(AIndex : Integer; const AValue : integer); virtual;
+    Procedure SetquantityDelivered(AIndex : Integer; const AValue : integer); virtual;
+    Procedure SetquantityOrdered(AIndex : Integer; const AValue : integer); virtual;
+    Procedure SetquantityPending(AIndex : Integer; const AValue : integer); virtual;
+    Procedure SetquantityReturned(AIndex : Integer; const AValue : integer); virtual;
+    Procedure SetquantityShipped(AIndex : Integer; const AValue : integer); virtual;
+    Procedure SetreturnInfo(AIndex : Integer; const AValue : TOrderLineItemReturnInfo); virtual;
+    Procedure Setreturns(AIndex : Integer; const AValue : TOrderLineItemTypereturnsArray); virtual;
+    Procedure SetshippingDetails(AIndex : Integer; const AValue : TOrderLineItemShippingDetails); virtual;
+    Procedure Settax(AIndex : Integer; const AValue : TPrice); virtual;
+    //2.6.4. bug workaround
+    {$IFDEF VER2_6}
+    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
+    {$ENDIF VER2_6}
+  Public
+  Published
+    Property cancellations : TOrderLineItemTypecancellationsArray Index 0 Read Fcancellations Write Setcancellations;
+    Property id : String Index 8 Read Fid Write Setid;
+    Property price : TPrice Index 16 Read Fprice Write Setprice;
+    Property product : TOrderLineItemProduct Index 24 Read Fproduct Write Setproduct;
+    Property quantityCanceled : integer Index 32 Read FquantityCanceled Write SetquantityCanceled;
+    Property quantityDelivered : integer Index 40 Read FquantityDelivered Write SetquantityDelivered;
+    Property quantityOrdered : integer Index 48 Read FquantityOrdered Write SetquantityOrdered;
+    Property quantityPending : integer Index 56 Read FquantityPending Write SetquantityPending;
+    Property quantityReturned : integer Index 64 Read FquantityReturned Write SetquantityReturned;
+    Property quantityShipped : integer Index 72 Read FquantityShipped Write SetquantityShipped;
+    Property returnInfo : TOrderLineItemReturnInfo Index 80 Read FreturnInfo Write SetreturnInfo;
+    Property returns : TOrderLineItemTypereturnsArray Index 88 Read Freturns Write Setreturns;
+    Property shippingDetails : TOrderLineItemShippingDetails Index 96 Read FshippingDetails Write SetshippingDetails;
+    Property tax : TPrice Index 104 Read Ftax Write Settax;
+  end;
+  TOrderLineItemClass = Class of TOrderLineItem;
+  
+  { --------------------------------------------------------------------
+    TOrderLineItemProduct
+    --------------------------------------------------------------------}
+  
+  TOrderLineItemProduct = Class(TGoogleBaseObject)
+  Private
+    Fbrand : String;
+    Fchannel : String;
+    Fcondition : String;
+    FcontentLanguage : String;
+    Fgtin : String;
+    Fid : String;
+    FimageLink : String;
+    FitemGroupId : String;
+    Fmpn : String;
+    FofferId : String;
+    Fprice : TPrice;
+    FshownImage : String;
+    FtargetCountry : String;
+    Ftitle : String;
+    FvariantAttributes : TOrderLineItemProductTypevariantAttributesArray;
+  Protected
+    //Property setters
+    Procedure Setbrand(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setchannel(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setcondition(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetcontentLanguage(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setgtin(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setid(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetimageLink(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetitemGroupId(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setmpn(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetofferId(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setprice(AIndex : Integer; const AValue : TPrice); virtual;
+    Procedure SetshownImage(AIndex : Integer; const AValue : String); virtual;
+    Procedure SettargetCountry(AIndex : Integer; const AValue : String); virtual;
+    Procedure Settitle(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetvariantAttributes(AIndex : Integer; const AValue : TOrderLineItemProductTypevariantAttributesArray); virtual;
+    //2.6.4. bug workaround
+    {$IFDEF VER2_6}
+    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
+    {$ENDIF VER2_6}
+  Public
+  Published
+    Property brand : String Index 0 Read Fbrand Write Setbrand;
+    Property channel : String Index 8 Read Fchannel Write Setchannel;
+    Property condition : String Index 16 Read Fcondition Write Setcondition;
+    Property contentLanguage : String Index 24 Read FcontentLanguage Write SetcontentLanguage;
+    Property gtin : String Index 32 Read Fgtin Write Setgtin;
+    Property id : String Index 40 Read Fid Write Setid;
+    Property imageLink : String Index 48 Read FimageLink Write SetimageLink;
+    Property itemGroupId : String Index 56 Read FitemGroupId Write SetitemGroupId;
+    Property mpn : String Index 64 Read Fmpn Write Setmpn;
+    Property offerId : String Index 72 Read FofferId Write SetofferId;
+    Property price : TPrice Index 80 Read Fprice Write Setprice;
+    Property shownImage : String Index 88 Read FshownImage Write SetshownImage;
+    Property targetCountry : String Index 96 Read FtargetCountry Write SettargetCountry;
+    Property title : String Index 104 Read Ftitle Write Settitle;
+    Property variantAttributes : TOrderLineItemProductTypevariantAttributesArray Index 112 Read FvariantAttributes Write SetvariantAttributes;
+  end;
+  TOrderLineItemProductClass = Class of TOrderLineItemProduct;
+  
+  { --------------------------------------------------------------------
+    TOrderLineItemProductVariantAttribute
+    --------------------------------------------------------------------}
+  
+  TOrderLineItemProductVariantAttribute = Class(TGoogleBaseObject)
+  Private
+    Fdimension : String;
+    Fvalue : String;
+  Protected
+    //Property setters
+    Procedure Setdimension(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setvalue(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property dimension : String Index 0 Read Fdimension Write Setdimension;
+    Property value : String Index 8 Read Fvalue Write Setvalue;
+  end;
+  TOrderLineItemProductVariantAttributeClass = Class of TOrderLineItemProductVariantAttribute;
+  
+  { --------------------------------------------------------------------
+    TOrderLineItemReturnInfo
+    --------------------------------------------------------------------}
+  
+  TOrderLineItemReturnInfo = Class(TGoogleBaseObject)
+  Private
+    FdaysToReturn : integer;
+    FisReturnable : boolean;
+    FpolicyUrl : String;
+  Protected
+    //Property setters
+    Procedure SetdaysToReturn(AIndex : Integer; const AValue : integer); virtual;
+    Procedure SetisReturnable(AIndex : Integer; const AValue : boolean); virtual;
+    Procedure SetpolicyUrl(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property daysToReturn : integer Index 0 Read FdaysToReturn Write SetdaysToReturn;
+    Property isReturnable : boolean Index 8 Read FisReturnable Write SetisReturnable;
+    Property policyUrl : String Index 16 Read FpolicyUrl Write SetpolicyUrl;
+  end;
+  TOrderLineItemReturnInfoClass = Class of TOrderLineItemReturnInfo;
+  
+  { --------------------------------------------------------------------
+    TOrderLineItemShippingDetails
+    --------------------------------------------------------------------}
+  
+  TOrderLineItemShippingDetails = Class(TGoogleBaseObject)
+  Private
+    FdeliverByDate : String;
+    Fmethod : TOrderLineItemShippingDetailsMethod;
+    FshipByDate : String;
+  Protected
+    //Property setters
+    Procedure SetdeliverByDate(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setmethod(AIndex : Integer; const AValue : TOrderLineItemShippingDetailsMethod); virtual;
+    Procedure SetshipByDate(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property deliverByDate : String Index 0 Read FdeliverByDate Write SetdeliverByDate;
+    Property method : TOrderLineItemShippingDetailsMethod Index 8 Read Fmethod Write Setmethod;
+    Property shipByDate : String Index 16 Read FshipByDate Write SetshipByDate;
+  end;
+  TOrderLineItemShippingDetailsClass = Class of TOrderLineItemShippingDetails;
+  
+  { --------------------------------------------------------------------
+    TOrderLineItemShippingDetailsMethod
+    --------------------------------------------------------------------}
+  
+  TOrderLineItemShippingDetailsMethod = Class(TGoogleBaseObject)
+  Private
+    Fcarrier : String;
+    FmaxDaysInTransit : integer;
+    FmethodName : String;
+    FminDaysInTransit : integer;
+  Protected
+    //Property setters
+    Procedure Setcarrier(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetmaxDaysInTransit(AIndex : Integer; const AValue : integer); virtual;
+    Procedure SetmethodName(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetminDaysInTransit(AIndex : Integer; const AValue : integer); virtual;
+  Public
+  Published
+    Property carrier : String Index 0 Read Fcarrier Write Setcarrier;
+    Property maxDaysInTransit : integer Index 8 Read FmaxDaysInTransit Write SetmaxDaysInTransit;
+    Property methodName : String Index 16 Read FmethodName Write SetmethodName;
+    Property minDaysInTransit : integer Index 24 Read FminDaysInTransit Write SetminDaysInTransit;
+  end;
+  TOrderLineItemShippingDetailsMethodClass = Class of TOrderLineItemShippingDetailsMethod;
+  
+  { --------------------------------------------------------------------
+    TOrderPaymentMethod
+    --------------------------------------------------------------------}
+  
+  TOrderPaymentMethod = Class(TGoogleBaseObject)
+  Private
+    FbillingAddress : TOrderAddress;
+    FexpirationMonth : integer;
+    FexpirationYear : integer;
+    FlastFourDigits : String;
+    FphoneNumber : String;
+    F_type : String;
+  Protected
+    Class Function ExportPropertyName(Const AName : String) : string; override;
+    //Property setters
+    Procedure SetbillingAddress(AIndex : Integer; const AValue : TOrderAddress); virtual;
+    Procedure SetexpirationMonth(AIndex : Integer; const AValue : integer); virtual;
+    Procedure SetexpirationYear(AIndex : Integer; const AValue : integer); virtual;
+    Procedure SetlastFourDigits(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetphoneNumber(AIndex : Integer; const AValue : String); virtual;
+    Procedure Set_type(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property billingAddress : TOrderAddress Index 0 Read FbillingAddress Write SetbillingAddress;
+    Property expirationMonth : integer Index 8 Read FexpirationMonth Write SetexpirationMonth;
+    Property expirationYear : integer Index 16 Read FexpirationYear Write SetexpirationYear;
+    Property lastFourDigits : String Index 24 Read FlastFourDigits Write SetlastFourDigits;
+    Property phoneNumber : String Index 32 Read FphoneNumber Write SetphoneNumber;
+    Property _type : String Index 40 Read F_type Write Set_type;
+  end;
+  TOrderPaymentMethodClass = Class of TOrderPaymentMethod;
+  
+  { --------------------------------------------------------------------
+    TOrderPromotion
+    --------------------------------------------------------------------}
+  
+  TOrderPromotion = Class(TGoogleBaseObject)
+  Private
+    Fbenefits : TOrderPromotionTypebenefitsArray;
+    FeffectiveDates : String;
+    FgenericRedemptionCode : String;
+    Fid : String;
+    FlongTitle : String;
+    FproductApplicability : String;
+    FredemptionChannel : String;
+  Protected
+    //Property setters
+    Procedure Setbenefits(AIndex : Integer; const AValue : TOrderPromotionTypebenefitsArray); virtual;
+    Procedure SeteffectiveDates(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetgenericRedemptionCode(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setid(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetlongTitle(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetproductApplicability(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetredemptionChannel(AIndex : Integer; const AValue : String); virtual;
+    //2.6.4. bug workaround
+    {$IFDEF VER2_6}
+    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
+    {$ENDIF VER2_6}
+  Public
+  Published
+    Property benefits : TOrderPromotionTypebenefitsArray Index 0 Read Fbenefits Write Setbenefits;
+    Property effectiveDates : String Index 8 Read FeffectiveDates Write SeteffectiveDates;
+    Property genericRedemptionCode : String Index 16 Read FgenericRedemptionCode Write SetgenericRedemptionCode;
+    Property id : String Index 24 Read Fid Write Setid;
+    Property longTitle : String Index 32 Read FlongTitle Write SetlongTitle;
+    Property productApplicability : String Index 40 Read FproductApplicability Write SetproductApplicability;
+    Property redemptionChannel : String Index 48 Read FredemptionChannel Write SetredemptionChannel;
+  end;
+  TOrderPromotionClass = Class of TOrderPromotion;
+  
+  { --------------------------------------------------------------------
+    TOrderPromotionBenefit
+    --------------------------------------------------------------------}
+  
+  TOrderPromotionBenefit = Class(TGoogleBaseObject)
+  Private
+    Fdiscount : TPrice;
+    FofferIds : TStringArray;
+    FsubType : String;
+    FtaxImpact : TPrice;
+    F_type : String;
+  Protected
+    Class Function ExportPropertyName(Const AName : String) : string; override;
+    //Property setters
+    Procedure Setdiscount(AIndex : Integer; const AValue : TPrice); virtual;
+    Procedure SetofferIds(AIndex : Integer; const AValue : TStringArray); virtual;
+    Procedure SetsubType(AIndex : Integer; const AValue : String); virtual;
+    Procedure SettaxImpact(AIndex : Integer; const AValue : TPrice); virtual;
+    Procedure Set_type(AIndex : Integer; const AValue : String); virtual;
+    //2.6.4. bug workaround
+    {$IFDEF VER2_6}
+    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
+    {$ENDIF VER2_6}
+  Public
+  Published
+    Property discount : TPrice Index 0 Read Fdiscount Write Setdiscount;
+    Property offerIds : TStringArray Index 8 Read FofferIds Write SetofferIds;
+    Property subType : String Index 16 Read FsubType Write SetsubType;
+    Property taxImpact : TPrice Index 24 Read FtaxImpact Write SettaxImpact;
+    Property _type : String Index 32 Read F_type Write Set_type;
+  end;
+  TOrderPromotionBenefitClass = Class of TOrderPromotionBenefit;
+  
+  { --------------------------------------------------------------------
+    TOrderRefund
+    --------------------------------------------------------------------}
+  
+  TOrderRefund = Class(TGoogleBaseObject)
+  Private
+    Factor : String;
+    Famount : TPrice;
+    FcreationDate : String;
+    Freason : String;
+    FreasonText : String;
+  Protected
+    //Property setters
+    Procedure Setactor(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setamount(AIndex : Integer; const AValue : TPrice); virtual;
+    Procedure SetcreationDate(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setreason(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetreasonText(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property actor : String Index 0 Read Factor Write Setactor;
+    Property amount : TPrice Index 8 Read Famount Write Setamount;
+    Property creationDate : String Index 16 Read FcreationDate Write SetcreationDate;
+    Property reason : String Index 24 Read Freason Write Setreason;
+    Property reasonText : String Index 32 Read FreasonText Write SetreasonText;
+  end;
+  TOrderRefundClass = Class of TOrderRefund;
+  
+  { --------------------------------------------------------------------
+    TOrderReturn
+    --------------------------------------------------------------------}
+  
+  TOrderReturn = Class(TGoogleBaseObject)
+  Private
+    Factor : String;
+    FcreationDate : String;
+    Fquantity : integer;
+    Freason : String;
+    FreasonText : String;
+  Protected
+    //Property setters
+    Procedure Setactor(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetcreationDate(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setquantity(AIndex : Integer; const AValue : integer); virtual;
+    Procedure Setreason(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetreasonText(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property actor : String Index 0 Read Factor Write Setactor;
+    Property creationDate : String Index 8 Read FcreationDate Write SetcreationDate;
+    Property quantity : integer Index 16 Read Fquantity Write Setquantity;
+    Property reason : String Index 24 Read Freason Write Setreason;
+    Property reasonText : String Index 32 Read FreasonText Write SetreasonText;
+  end;
+  TOrderReturnClass = Class of TOrderReturn;
+  
+  { --------------------------------------------------------------------
+    TOrderShipment
+    --------------------------------------------------------------------}
+  
+  TOrderShipment = Class(TGoogleBaseObject)
+  Private
+    Fcarrier : String;
+    FcreationDate : String;
+    FdeliveryDate : String;
+    Fid : String;
+    FlineItems : TOrderShipmentTypelineItemsArray;
+    Fstatus : String;
+    FtrackingId : String;
+  Protected
+    //Property setters
+    Procedure Setcarrier(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetcreationDate(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetdeliveryDate(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setid(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetlineItems(AIndex : Integer; const AValue : TOrderShipmentTypelineItemsArray); virtual;
+    Procedure Setstatus(AIndex : Integer; const AValue : String); virtual;
+    Procedure SettrackingId(AIndex : Integer; const AValue : String); virtual;
+    //2.6.4. bug workaround
+    {$IFDEF VER2_6}
+    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
+    {$ENDIF VER2_6}
+  Public
+  Published
+    Property carrier : String Index 0 Read Fcarrier Write Setcarrier;
+    Property creationDate : String Index 8 Read FcreationDate Write SetcreationDate;
+    Property deliveryDate : String Index 16 Read FdeliveryDate Write SetdeliveryDate;
+    Property id : String Index 24 Read Fid Write Setid;
+    Property lineItems : TOrderShipmentTypelineItemsArray Index 32 Read FlineItems Write SetlineItems;
+    Property status : String Index 40 Read Fstatus Write Setstatus;
+    Property trackingId : String Index 48 Read FtrackingId Write SettrackingId;
+  end;
+  TOrderShipmentClass = Class of TOrderShipment;
+  
+  { --------------------------------------------------------------------
+    TOrderShipmentLineItemShipment
+    --------------------------------------------------------------------}
+  
+  TOrderShipmentLineItemShipment = Class(TGoogleBaseObject)
+  Private
+    FlineItemId : String;
+    Fquantity : integer;
+  Protected
+    //Property setters
+    Procedure SetlineItemId(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setquantity(AIndex : Integer; const AValue : integer); virtual;
+  Public
+  Published
+    Property lineItemId : String Index 0 Read FlineItemId Write SetlineItemId;
+    Property quantity : integer Index 8 Read Fquantity Write Setquantity;
+  end;
+  TOrderShipmentLineItemShipmentClass = Class of TOrderShipmentLineItemShipment;
+  
+  { --------------------------------------------------------------------
+    TOrdersAcknowledgeRequest
+    --------------------------------------------------------------------}
+  
+  TOrdersAcknowledgeRequest = Class(TGoogleBaseObject)
+  Private
+    FoperationId : String;
+  Protected
+    //Property setters
+    Procedure SetoperationId(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property operationId : String Index 0 Read FoperationId Write SetoperationId;
+  end;
+  TOrdersAcknowledgeRequestClass = Class of TOrdersAcknowledgeRequest;
+  
+  { --------------------------------------------------------------------
+    TOrdersAcknowledgeResponse
+    --------------------------------------------------------------------}
+  
+  TOrdersAcknowledgeResponse = Class(TGoogleBaseObject)
+  Private
+    FexecutionStatus : String;
+    Fkind : String;
+  Protected
+    //Property setters
+    Procedure SetexecutionStatus(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property executionStatus : String Index 0 Read FexecutionStatus Write SetexecutionStatus;
+    Property kind : String Index 8 Read Fkind Write Setkind;
+  end;
+  TOrdersAcknowledgeResponseClass = Class of TOrdersAcknowledgeResponse;
+  
+  { --------------------------------------------------------------------
+    TOrdersAdvanceTestOrderResponse
+    --------------------------------------------------------------------}
+  
+  TOrdersAdvanceTestOrderResponse = Class(TGoogleBaseObject)
+  Private
+    Fkind : String;
+  Protected
+    //Property setters
+    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property kind : String Index 0 Read Fkind Write Setkind;
+  end;
+  TOrdersAdvanceTestOrderResponseClass = Class of TOrdersAdvanceTestOrderResponse;
+  
+  { --------------------------------------------------------------------
+    TOrdersCancelLineItemRequest
+    --------------------------------------------------------------------}
+  
+  TOrdersCancelLineItemRequest = Class(TGoogleBaseObject)
+  Private
+    Famount : TPrice;
+    FlineItemId : String;
+    FoperationId : String;
+    Fquantity : integer;
+    Freason : String;
+    FreasonText : String;
+  Protected
+    //Property setters
+    Procedure Setamount(AIndex : Integer; const AValue : TPrice); virtual;
+    Procedure SetlineItemId(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetoperationId(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setquantity(AIndex : Integer; const AValue : integer); virtual;
+    Procedure Setreason(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetreasonText(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property amount : TPrice Index 0 Read Famount Write Setamount;
+    Property lineItemId : String Index 8 Read FlineItemId Write SetlineItemId;
+    Property operationId : String Index 16 Read FoperationId Write SetoperationId;
+    Property quantity : integer Index 24 Read Fquantity Write Setquantity;
+    Property reason : String Index 32 Read Freason Write Setreason;
+    Property reasonText : String Index 40 Read FreasonText Write SetreasonText;
+  end;
+  TOrdersCancelLineItemRequestClass = Class of TOrdersCancelLineItemRequest;
+  
+  { --------------------------------------------------------------------
+    TOrdersCancelLineItemResponse
+    --------------------------------------------------------------------}
+  
+  TOrdersCancelLineItemResponse = Class(TGoogleBaseObject)
+  Private
+    FexecutionStatus : String;
+    Fkind : String;
+  Protected
+    //Property setters
+    Procedure SetexecutionStatus(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property executionStatus : String Index 0 Read FexecutionStatus Write SetexecutionStatus;
+    Property kind : String Index 8 Read Fkind Write Setkind;
+  end;
+  TOrdersCancelLineItemResponseClass = Class of TOrdersCancelLineItemResponse;
+  
+  { --------------------------------------------------------------------
+    TOrdersCancelRequest
+    --------------------------------------------------------------------}
+  
+  TOrdersCancelRequest = Class(TGoogleBaseObject)
+  Private
+    FoperationId : String;
+    Freason : String;
+    FreasonText : String;
+  Protected
+    //Property setters
+    Procedure SetoperationId(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setreason(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetreasonText(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property operationId : String Index 0 Read FoperationId Write SetoperationId;
+    Property reason : String Index 8 Read Freason Write Setreason;
+    Property reasonText : String Index 16 Read FreasonText Write SetreasonText;
+  end;
+  TOrdersCancelRequestClass = Class of TOrdersCancelRequest;
+  
+  { --------------------------------------------------------------------
+    TOrdersCancelResponse
+    --------------------------------------------------------------------}
+  
+  TOrdersCancelResponse = Class(TGoogleBaseObject)
+  Private
+    FexecutionStatus : String;
+    Fkind : String;
+  Protected
+    //Property setters
+    Procedure SetexecutionStatus(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property executionStatus : String Index 0 Read FexecutionStatus Write SetexecutionStatus;
+    Property kind : String Index 8 Read Fkind Write Setkind;
+  end;
+  TOrdersCancelResponseClass = Class of TOrdersCancelResponse;
+  
+  { --------------------------------------------------------------------
+    TOrdersCreateTestOrderRequest
+    --------------------------------------------------------------------}
+  
+  TOrdersCreateTestOrderRequest = Class(TGoogleBaseObject)
+  Private
+    FtemplateName : String;
+    FtestOrder : TTestOrder;
+  Protected
+    //Property setters
+    Procedure SettemplateName(AIndex : Integer; const AValue : String); virtual;
+    Procedure SettestOrder(AIndex : Integer; const AValue : TTestOrder); virtual;
+  Public
+  Published
+    Property templateName : String Index 0 Read FtemplateName Write SettemplateName;
+    Property testOrder : TTestOrder Index 8 Read FtestOrder Write SettestOrder;
+  end;
+  TOrdersCreateTestOrderRequestClass = Class of TOrdersCreateTestOrderRequest;
+  
+  { --------------------------------------------------------------------
+    TOrdersCreateTestOrderResponse
+    --------------------------------------------------------------------}
+  
+  TOrdersCreateTestOrderResponse = Class(TGoogleBaseObject)
+  Private
+    Fkind : String;
+    ForderId : String;
+  Protected
+    //Property setters
+    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetorderId(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property kind : String Index 0 Read Fkind Write Setkind;
+    Property orderId : String Index 8 Read ForderId Write SetorderId;
+  end;
+  TOrdersCreateTestOrderResponseClass = Class of TOrdersCreateTestOrderResponse;
+  
+  { --------------------------------------------------------------------
+    TOrdersCustomBatchRequest
+    --------------------------------------------------------------------}
+  
+  TOrdersCustomBatchRequest = Class(TGoogleBaseObject)
+  Private
+    Fentries : TOrdersCustomBatchRequestTypeentriesArray;
+  Protected
+    //Property setters
+    Procedure Setentries(AIndex : Integer; const AValue : TOrdersCustomBatchRequestTypeentriesArray); virtual;
+    //2.6.4. bug workaround
+    {$IFDEF VER2_6}
+    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
+    {$ENDIF VER2_6}
+  Public
+  Published
+    Property entries : TOrdersCustomBatchRequestTypeentriesArray Index 0 Read Fentries Write Setentries;
+  end;
+  TOrdersCustomBatchRequestClass = Class of TOrdersCustomBatchRequest;
+  
+  { --------------------------------------------------------------------
+    TOrdersCustomBatchRequestEntry
+    --------------------------------------------------------------------}
+  
+  TOrdersCustomBatchRequestEntry = Class(TGoogleBaseObject)
+  Private
+    FbatchId : integer;
+    Fcancel : TOrdersCustomBatchRequestEntryCancel;
+    FcancelLineItem : TOrdersCustomBatchRequestEntryCancelLineItem;
+    FmerchantId : String;
+    FmerchantOrderId : String;
+    Fmethod : String;
+    FoperationId : String;
+    ForderId : String;
+    Frefund : TOrdersCustomBatchRequestEntryRefund;
+    FreturnLineItem : TOrdersCustomBatchRequestEntryReturnLineItem;
+    FshipLineItems : TOrdersCustomBatchRequestEntryShipLineItems;
+    FupdateShipment : TOrdersCustomBatchRequestEntryUpdateShipment;
+  Protected
+    //Property setters
+    Procedure SetbatchId(AIndex : Integer; const AValue : integer); virtual;
+    Procedure Setcancel(AIndex : Integer; const AValue : TOrdersCustomBatchRequestEntryCancel); virtual;
+    Procedure SetcancelLineItem(AIndex : Integer; const AValue : TOrdersCustomBatchRequestEntryCancelLineItem); virtual;
+    Procedure SetmerchantId(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetmerchantOrderId(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setmethod(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetoperationId(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetorderId(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setrefund(AIndex : Integer; const AValue : TOrdersCustomBatchRequestEntryRefund); virtual;
+    Procedure SetreturnLineItem(AIndex : Integer; const AValue : TOrdersCustomBatchRequestEntryReturnLineItem); virtual;
+    Procedure SetshipLineItems(AIndex : Integer; const AValue : TOrdersCustomBatchRequestEntryShipLineItems); virtual;
+    Procedure SetupdateShipment(AIndex : Integer; const AValue : TOrdersCustomBatchRequestEntryUpdateShipment); virtual;
+  Public
+  Published
+    Property batchId : integer Index 0 Read FbatchId Write SetbatchId;
+    Property cancel : TOrdersCustomBatchRequestEntryCancel Index 8 Read Fcancel Write Setcancel;
+    Property cancelLineItem : TOrdersCustomBatchRequestEntryCancelLineItem Index 16 Read FcancelLineItem Write SetcancelLineItem;
+    Property merchantId : String Index 24 Read FmerchantId Write SetmerchantId;
+    Property merchantOrderId : String Index 32 Read FmerchantOrderId Write SetmerchantOrderId;
+    Property method : String Index 40 Read Fmethod Write Setmethod;
+    Property operationId : String Index 48 Read FoperationId Write SetoperationId;
+    Property orderId : String Index 56 Read ForderId Write SetorderId;
+    Property refund : TOrdersCustomBatchRequestEntryRefund Index 64 Read Frefund Write Setrefund;
+    Property returnLineItem : TOrdersCustomBatchRequestEntryReturnLineItem Index 72 Read FreturnLineItem Write SetreturnLineItem;
+    Property shipLineItems : TOrdersCustomBatchRequestEntryShipLineItems Index 80 Read FshipLineItems Write SetshipLineItems;
+    Property updateShipment : TOrdersCustomBatchRequestEntryUpdateShipment Index 88 Read FupdateShipment Write SetupdateShipment;
+  end;
+  TOrdersCustomBatchRequestEntryClass = Class of TOrdersCustomBatchRequestEntry;
+  
+  { --------------------------------------------------------------------
+    TOrdersCustomBatchRequestEntryCancel
+    --------------------------------------------------------------------}
+  
+  TOrdersCustomBatchRequestEntryCancel = Class(TGoogleBaseObject)
+  Private
+    Freason : String;
+    FreasonText : String;
+  Protected
+    //Property setters
+    Procedure Setreason(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetreasonText(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property reason : String Index 0 Read Freason Write Setreason;
+    Property reasonText : String Index 8 Read FreasonText Write SetreasonText;
+  end;
+  TOrdersCustomBatchRequestEntryCancelClass = Class of TOrdersCustomBatchRequestEntryCancel;
+  
+  { --------------------------------------------------------------------
+    TOrdersCustomBatchRequestEntryCancelLineItem
+    --------------------------------------------------------------------}
+  
+  TOrdersCustomBatchRequestEntryCancelLineItem = Class(TGoogleBaseObject)
+  Private
+    Famount : TPrice;
+    FlineItemId : String;
+    Fquantity : integer;
+    Freason : String;
+    FreasonText : String;
+  Protected
+    //Property setters
+    Procedure Setamount(AIndex : Integer; const AValue : TPrice); virtual;
+    Procedure SetlineItemId(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setquantity(AIndex : Integer; const AValue : integer); virtual;
+    Procedure Setreason(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetreasonText(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property amount : TPrice Index 0 Read Famount Write Setamount;
+    Property lineItemId : String Index 8 Read FlineItemId Write SetlineItemId;
+    Property quantity : integer Index 16 Read Fquantity Write Setquantity;
+    Property reason : String Index 24 Read Freason Write Setreason;
+    Property reasonText : String Index 32 Read FreasonText Write SetreasonText;
+  end;
+  TOrdersCustomBatchRequestEntryCancelLineItemClass = Class of TOrdersCustomBatchRequestEntryCancelLineItem;
+  
+  { --------------------------------------------------------------------
+    TOrdersCustomBatchRequestEntryRefund
+    --------------------------------------------------------------------}
+  
+  TOrdersCustomBatchRequestEntryRefund = Class(TGoogleBaseObject)
+  Private
+    Famount : TPrice;
+    Freason : String;
+    FreasonText : String;
+  Protected
+    //Property setters
+    Procedure Setamount(AIndex : Integer; const AValue : TPrice); virtual;
+    Procedure Setreason(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetreasonText(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property amount : TPrice Index 0 Read Famount Write Setamount;
+    Property reason : String Index 8 Read Freason Write Setreason;
+    Property reasonText : String Index 16 Read FreasonText Write SetreasonText;
+  end;
+  TOrdersCustomBatchRequestEntryRefundClass = Class of TOrdersCustomBatchRequestEntryRefund;
+  
+  { --------------------------------------------------------------------
+    TOrdersCustomBatchRequestEntryReturnLineItem
+    --------------------------------------------------------------------}
+  
+  TOrdersCustomBatchRequestEntryReturnLineItem = Class(TGoogleBaseObject)
+  Private
+    FlineItemId : String;
+    Fquantity : integer;
+    Freason : String;
+    FreasonText : String;
+  Protected
+    //Property setters
+    Procedure SetlineItemId(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setquantity(AIndex : Integer; const AValue : integer); virtual;
+    Procedure Setreason(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetreasonText(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property lineItemId : String Index 0 Read FlineItemId Write SetlineItemId;
+    Property quantity : integer Index 8 Read Fquantity Write Setquantity;
+    Property reason : String Index 16 Read Freason Write Setreason;
+    Property reasonText : String Index 24 Read FreasonText Write SetreasonText;
+  end;
+  TOrdersCustomBatchRequestEntryReturnLineItemClass = Class of TOrdersCustomBatchRequestEntryReturnLineItem;
+  
+  { --------------------------------------------------------------------
+    TOrdersCustomBatchRequestEntryShipLineItems
+    --------------------------------------------------------------------}
+  
+  TOrdersCustomBatchRequestEntryShipLineItems = Class(TGoogleBaseObject)
+  Private
+    Fcarrier : String;
+    FlineItems : TOrdersCustomBatchRequestEntryShipLineItemsTypelineItemsArray;
+    FshipmentId : String;
+    FtrackingId : String;
+  Protected
+    //Property setters
+    Procedure Setcarrier(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetlineItems(AIndex : Integer; const AValue : TOrdersCustomBatchRequestEntryShipLineItemsTypelineItemsArray); virtual;
+    Procedure SetshipmentId(AIndex : Integer; const AValue : String); virtual;
+    Procedure SettrackingId(AIndex : Integer; const AValue : String); virtual;
+    //2.6.4. bug workaround
+    {$IFDEF VER2_6}
+    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
+    {$ENDIF VER2_6}
+  Public
+  Published
+    Property carrier : String Index 0 Read Fcarrier Write Setcarrier;
+    Property lineItems : TOrdersCustomBatchRequestEntryShipLineItemsTypelineItemsArray Index 8 Read FlineItems Write SetlineItems;
+    Property shipmentId : String Index 16 Read FshipmentId Write SetshipmentId;
+    Property trackingId : String Index 24 Read FtrackingId Write SettrackingId;
+  end;
+  TOrdersCustomBatchRequestEntryShipLineItemsClass = Class of TOrdersCustomBatchRequestEntryShipLineItems;
+  
+  { --------------------------------------------------------------------
+    TOrdersCustomBatchRequestEntryUpdateShipment
+    --------------------------------------------------------------------}
+  
+  TOrdersCustomBatchRequestEntryUpdateShipment = Class(TGoogleBaseObject)
+  Private
+    Fcarrier : String;
+    FshipmentId : String;
+    Fstatus : String;
+    FtrackingId : String;
+  Protected
+    //Property setters
+    Procedure Setcarrier(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetshipmentId(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setstatus(AIndex : Integer; const AValue : String); virtual;
+    Procedure SettrackingId(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property carrier : String Index 0 Read Fcarrier Write Setcarrier;
+    Property shipmentId : String Index 8 Read FshipmentId Write SetshipmentId;
+    Property status : String Index 16 Read Fstatus Write Setstatus;
+    Property trackingId : String Index 24 Read FtrackingId Write SettrackingId;
+  end;
+  TOrdersCustomBatchRequestEntryUpdateShipmentClass = Class of TOrdersCustomBatchRequestEntryUpdateShipment;
+  
+  { --------------------------------------------------------------------
+    TOrdersCustomBatchResponse
+    --------------------------------------------------------------------}
+  
+  TOrdersCustomBatchResponse = Class(TGoogleBaseObject)
+  Private
+    Fentries : TOrdersCustomBatchResponseTypeentriesArray;
+    Fkind : String;
+  Protected
+    //Property setters
+    Procedure Setentries(AIndex : Integer; const AValue : TOrdersCustomBatchResponseTypeentriesArray); virtual;
+    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
+    //2.6.4. bug workaround
+    {$IFDEF VER2_6}
+    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
+    {$ENDIF VER2_6}
+  Public
+  Published
+    Property entries : TOrdersCustomBatchResponseTypeentriesArray Index 0 Read Fentries Write Setentries;
+    Property kind : String Index 8 Read Fkind Write Setkind;
+  end;
+  TOrdersCustomBatchResponseClass = Class of TOrdersCustomBatchResponse;
+  
+  { --------------------------------------------------------------------
+    TOrdersCustomBatchResponseEntry
+    --------------------------------------------------------------------}
+  
+  TOrdersCustomBatchResponseEntry = Class(TGoogleBaseObject)
+  Private
+    FbatchId : integer;
+    Ferrors : TErrors;
+    FexecutionStatus : String;
+    Fkind : String;
+    Forder : TOrder;
+  Protected
+    //Property setters
+    Procedure SetbatchId(AIndex : Integer; const AValue : integer); virtual;
+    Procedure Seterrors(AIndex : Integer; const AValue : TErrors); virtual;
+    Procedure SetexecutionStatus(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setorder(AIndex : Integer; const AValue : TOrder); virtual;
+  Public
+  Published
+    Property batchId : integer Index 0 Read FbatchId Write SetbatchId;
+    Property errors : TErrors Index 8 Read Ferrors Write Seterrors;
+    Property executionStatus : String Index 16 Read FexecutionStatus Write SetexecutionStatus;
+    Property kind : String Index 24 Read Fkind Write Setkind;
+    Property order : TOrder Index 32 Read Forder Write Setorder;
+  end;
+  TOrdersCustomBatchResponseEntryClass = Class of TOrdersCustomBatchResponseEntry;
+  
+  { --------------------------------------------------------------------
+    TOrdersGetByMerchantOrderIdResponse
+    --------------------------------------------------------------------}
+  
+  TOrdersGetByMerchantOrderIdResponse = Class(TGoogleBaseObject)
+  Private
+    Fkind : String;
+    Forder : TOrder;
+  Protected
+    //Property setters
+    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setorder(AIndex : Integer; const AValue : TOrder); virtual;
+  Public
+  Published
+    Property kind : String Index 0 Read Fkind Write Setkind;
+    Property order : TOrder Index 8 Read Forder Write Setorder;
+  end;
+  TOrdersGetByMerchantOrderIdResponseClass = Class of TOrdersGetByMerchantOrderIdResponse;
+  
+  { --------------------------------------------------------------------
+    TOrdersGetTestOrderTemplateResponse
+    --------------------------------------------------------------------}
+  
+  TOrdersGetTestOrderTemplateResponse = Class(TGoogleBaseObject)
+  Private
+    Fkind : String;
+    Ftemplate : TTestOrder;
+  Protected
+    //Property setters
+    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
+    Procedure Settemplate(AIndex : Integer; const AValue : TTestOrder); virtual;
+  Public
+  Published
+    Property kind : String Index 0 Read Fkind Write Setkind;
+    Property template : TTestOrder Index 8 Read Ftemplate Write Settemplate;
+  end;
+  TOrdersGetTestOrderTemplateResponseClass = Class of TOrdersGetTestOrderTemplateResponse;
+  
+  { --------------------------------------------------------------------
+    TOrdersListResponse
+    --------------------------------------------------------------------}
+  
+  TOrdersListResponse = Class(TGoogleBaseObject)
+  Private
+    Fkind : String;
+    FnextPageToken : String;
+    Fresources : TOrdersListResponseTyperesourcesArray;
+  Protected
+    //Property setters
+    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetnextPageToken(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setresources(AIndex : Integer; const AValue : TOrdersListResponseTyperesourcesArray); virtual;
+    //2.6.4. bug workaround
+    {$IFDEF VER2_6}
+    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
+    {$ENDIF VER2_6}
+  Public
+  Published
+    Property kind : String Index 0 Read Fkind Write Setkind;
+    Property nextPageToken : String Index 8 Read FnextPageToken Write SetnextPageToken;
+    Property resources : TOrdersListResponseTyperesourcesArray Index 16 Read Fresources Write Setresources;
+  end;
+  TOrdersListResponseClass = Class of TOrdersListResponse;
+  
+  { --------------------------------------------------------------------
+    TOrdersRefundRequest
+    --------------------------------------------------------------------}
+  
+  TOrdersRefundRequest = Class(TGoogleBaseObject)
+  Private
+    Famount : TPrice;
+    FoperationId : String;
+    Freason : String;
+    FreasonText : String;
+  Protected
+    //Property setters
+    Procedure Setamount(AIndex : Integer; const AValue : TPrice); virtual;
+    Procedure SetoperationId(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setreason(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetreasonText(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property amount : TPrice Index 0 Read Famount Write Setamount;
+    Property operationId : String Index 8 Read FoperationId Write SetoperationId;
+    Property reason : String Index 16 Read Freason Write Setreason;
+    Property reasonText : String Index 24 Read FreasonText Write SetreasonText;
+  end;
+  TOrdersRefundRequestClass = Class of TOrdersRefundRequest;
+  
+  { --------------------------------------------------------------------
+    TOrdersRefundResponse
+    --------------------------------------------------------------------}
+  
+  TOrdersRefundResponse = Class(TGoogleBaseObject)
+  Private
+    FexecutionStatus : String;
+    Fkind : String;
+  Protected
+    //Property setters
+    Procedure SetexecutionStatus(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property executionStatus : String Index 0 Read FexecutionStatus Write SetexecutionStatus;
+    Property kind : String Index 8 Read Fkind Write Setkind;
+  end;
+  TOrdersRefundResponseClass = Class of TOrdersRefundResponse;
+  
+  { --------------------------------------------------------------------
+    TOrdersReturnLineItemRequest
+    --------------------------------------------------------------------}
+  
+  TOrdersReturnLineItemRequest = Class(TGoogleBaseObject)
+  Private
+    FlineItemId : String;
+    FoperationId : String;
+    Fquantity : integer;
+    Freason : String;
+    FreasonText : String;
+  Protected
+    //Property setters
+    Procedure SetlineItemId(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetoperationId(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setquantity(AIndex : Integer; const AValue : integer); virtual;
+    Procedure Setreason(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetreasonText(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property lineItemId : String Index 0 Read FlineItemId Write SetlineItemId;
+    Property operationId : String Index 8 Read FoperationId Write SetoperationId;
+    Property quantity : integer Index 16 Read Fquantity Write Setquantity;
+    Property reason : String Index 24 Read Freason Write Setreason;
+    Property reasonText : String Index 32 Read FreasonText Write SetreasonText;
+  end;
+  TOrdersReturnLineItemRequestClass = Class of TOrdersReturnLineItemRequest;
+  
+  { --------------------------------------------------------------------
+    TOrdersReturnLineItemResponse
+    --------------------------------------------------------------------}
+  
+  TOrdersReturnLineItemResponse = Class(TGoogleBaseObject)
+  Private
+    FexecutionStatus : String;
+    Fkind : String;
+  Protected
+    //Property setters
+    Procedure SetexecutionStatus(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property executionStatus : String Index 0 Read FexecutionStatus Write SetexecutionStatus;
+    Property kind : String Index 8 Read Fkind Write Setkind;
+  end;
+  TOrdersReturnLineItemResponseClass = Class of TOrdersReturnLineItemResponse;
+  
+  { --------------------------------------------------------------------
+    TOrdersShipLineItemsRequest
+    --------------------------------------------------------------------}
+  
+  TOrdersShipLineItemsRequest = Class(TGoogleBaseObject)
+  Private
+    Fcarrier : String;
+    FlineItems : TOrdersShipLineItemsRequestTypelineItemsArray;
+    FoperationId : String;
+    FshipmentId : String;
+    FtrackingId : String;
+  Protected
+    //Property setters
+    Procedure Setcarrier(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetlineItems(AIndex : Integer; const AValue : TOrdersShipLineItemsRequestTypelineItemsArray); virtual;
+    Procedure SetoperationId(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetshipmentId(AIndex : Integer; const AValue : String); virtual;
+    Procedure SettrackingId(AIndex : Integer; const AValue : String); virtual;
+    //2.6.4. bug workaround
+    {$IFDEF VER2_6}
+    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
+    {$ENDIF VER2_6}
+  Public
+  Published
+    Property carrier : String Index 0 Read Fcarrier Write Setcarrier;
+    Property lineItems : TOrdersShipLineItemsRequestTypelineItemsArray Index 8 Read FlineItems Write SetlineItems;
+    Property operationId : String Index 16 Read FoperationId Write SetoperationId;
+    Property shipmentId : String Index 24 Read FshipmentId Write SetshipmentId;
+    Property trackingId : String Index 32 Read FtrackingId Write SettrackingId;
+  end;
+  TOrdersShipLineItemsRequestClass = Class of TOrdersShipLineItemsRequest;
+  
+  { --------------------------------------------------------------------
+    TOrdersShipLineItemsResponse
+    --------------------------------------------------------------------}
+  
+  TOrdersShipLineItemsResponse = Class(TGoogleBaseObject)
+  Private
+    FexecutionStatus : String;
+    Fkind : String;
+  Protected
+    //Property setters
+    Procedure SetexecutionStatus(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property executionStatus : String Index 0 Read FexecutionStatus Write SetexecutionStatus;
+    Property kind : String Index 8 Read Fkind Write Setkind;
+  end;
+  TOrdersShipLineItemsResponseClass = Class of TOrdersShipLineItemsResponse;
+  
+  { --------------------------------------------------------------------
+    TOrdersUpdateMerchantOrderIdRequest
+    --------------------------------------------------------------------}
+  
+  TOrdersUpdateMerchantOrderIdRequest = Class(TGoogleBaseObject)
+  Private
+    FmerchantOrderId : String;
+    FoperationId : String;
+  Protected
+    //Property setters
+    Procedure SetmerchantOrderId(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetoperationId(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property merchantOrderId : String Index 0 Read FmerchantOrderId Write SetmerchantOrderId;
+    Property operationId : String Index 8 Read FoperationId Write SetoperationId;
+  end;
+  TOrdersUpdateMerchantOrderIdRequestClass = Class of TOrdersUpdateMerchantOrderIdRequest;
+  
+  { --------------------------------------------------------------------
+    TOrdersUpdateMerchantOrderIdResponse
+    --------------------------------------------------------------------}
+  
+  TOrdersUpdateMerchantOrderIdResponse = Class(TGoogleBaseObject)
+  Private
+    FexecutionStatus : String;
+    Fkind : String;
+  Protected
+    //Property setters
+    Procedure SetexecutionStatus(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property executionStatus : String Index 0 Read FexecutionStatus Write SetexecutionStatus;
+    Property kind : String Index 8 Read Fkind Write Setkind;
+  end;
+  TOrdersUpdateMerchantOrderIdResponseClass = Class of TOrdersUpdateMerchantOrderIdResponse;
+  
+  { --------------------------------------------------------------------
+    TOrdersUpdateShipmentRequest
+    --------------------------------------------------------------------}
+  
+  TOrdersUpdateShipmentRequest = Class(TGoogleBaseObject)
+  Private
+    Fcarrier : String;
+    FoperationId : String;
+    FshipmentId : String;
+    Fstatus : String;
+    FtrackingId : String;
+  Protected
+    //Property setters
+    Procedure Setcarrier(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetoperationId(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetshipmentId(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setstatus(AIndex : Integer; const AValue : String); virtual;
+    Procedure SettrackingId(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property carrier : String Index 0 Read Fcarrier Write Setcarrier;
+    Property operationId : String Index 8 Read FoperationId Write SetoperationId;
+    Property shipmentId : String Index 16 Read FshipmentId Write SetshipmentId;
+    Property status : String Index 24 Read Fstatus Write Setstatus;
+    Property trackingId : String Index 32 Read FtrackingId Write SettrackingId;
+  end;
+  TOrdersUpdateShipmentRequestClass = Class of TOrdersUpdateShipmentRequest;
+  
+  { --------------------------------------------------------------------
+    TOrdersUpdateShipmentResponse
+    --------------------------------------------------------------------}
+  
+  TOrdersUpdateShipmentResponse = Class(TGoogleBaseObject)
+  Private
+    FexecutionStatus : String;
+    Fkind : String;
+  Protected
+    //Property setters
+    Procedure SetexecutionStatus(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property executionStatus : String Index 0 Read FexecutionStatus Write SetexecutionStatus;
+    Property kind : String Index 8 Read Fkind Write Setkind;
+  end;
+  TOrdersUpdateShipmentResponseClass = Class of TOrdersUpdateShipmentResponse;
+  
+  { --------------------------------------------------------------------
     TPrice
     --------------------------------------------------------------------}
   
@@ -2034,7 +3534,7 @@ type
     Fid : String;
     FidentifierExists : boolean;
     FimageLink : String;
-    Finstallment : TProductInstallment;
+    Finstallment : TInstallment;
     FisBundle : boolean;
     FitemGroupId : String;
     Fkind : String;
@@ -2049,8 +3549,10 @@ type
     Fpattern : String;
     Fprice : TPrice;
     FproductType : String;
+    FpromotionIds : TStringArray;
     FsalePrice : TPrice;
     FsalePriceEffectiveDate : String;
+    FsellOnGoogleQuantity : String;
     Fshipping : TProductTypeshippingArray;
     FshippingHeight : TProductShippingDimension;
     FshippingLabel : String;
@@ -2069,13 +3571,13 @@ type
     Fwarnings : TProductTypewarningsArray;
   Protected
     //Property setters
-    Procedure SetadditionalImageLinks(AIndex : Integer; AValue : TStringArray); virtual;
-    Procedure Setadult(AIndex : Integer; AValue : boolean); virtual;
+    Procedure SetadditionalImageLinks(AIndex : Integer; const AValue : TStringArray); virtual;
+    Procedure Setadult(AIndex : Integer; const AValue : boolean); virtual;
     Procedure SetadwordsGrouping(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetadwordsLabels(AIndex : Integer; AValue : TStringArray); virtual;
+    Procedure SetadwordsLabels(AIndex : Integer; const AValue : TStringArray); virtual;
     Procedure SetadwordsRedirect(AIndex : Integer; const AValue : String); virtual;
     Procedure SetageGroup(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setaspects(AIndex : Integer; AValue : TProductTypeaspectsArray); virtual;
+    Procedure Setaspects(AIndex : Integer; const AValue : TProductTypeaspectsArray); virtual;
     Procedure Setavailability(AIndex : Integer; const AValue : String); virtual;
     Procedure SetavailabilityDate(AIndex : Integer; const AValue : String); virtual;
     Procedure Setbrand(AIndex : Integer; const AValue : String); virtual;
@@ -2083,61 +3585,63 @@ type
     Procedure Setcolor(AIndex : Integer; const AValue : String); virtual;
     Procedure Setcondition(AIndex : Integer; const AValue : String); virtual;
     Procedure SetcontentLanguage(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetcustomAttributes(AIndex : Integer; AValue : TProductTypecustomAttributesArray); virtual;
-    Procedure SetcustomGroups(AIndex : Integer; AValue : TProductTypecustomGroupsArray); virtual;
+    Procedure SetcustomAttributes(AIndex : Integer; const AValue : TProductTypecustomAttributesArray); virtual;
+    Procedure SetcustomGroups(AIndex : Integer; const AValue : TProductTypecustomGroupsArray); virtual;
     Procedure SetcustomLabel0(AIndex : Integer; const AValue : String); virtual;
     Procedure SetcustomLabel1(AIndex : Integer; const AValue : String); virtual;
     Procedure SetcustomLabel2(AIndex : Integer; const AValue : String); virtual;
     Procedure SetcustomLabel3(AIndex : Integer; const AValue : String); virtual;
     Procedure SetcustomLabel4(AIndex : Integer; const AValue : String); virtual;
     Procedure Setdescription(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setdestinations(AIndex : Integer; AValue : TProductTypedestinationsArray); virtual;
+    Procedure Setdestinations(AIndex : Integer; const AValue : TProductTypedestinationsArray); virtual;
     Procedure SetdisplayAdsId(AIndex : Integer; const AValue : String); virtual;
     Procedure SetdisplayAdsLink(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetdisplayAdsSimilarIds(AIndex : Integer; AValue : TStringArray); virtual;
+    Procedure SetdisplayAdsSimilarIds(AIndex : Integer; const AValue : TStringArray); virtual;
     Procedure SetdisplayAdsTitle(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetdisplayAdsValue(AIndex : Integer; AValue : double); virtual;
+    Procedure SetdisplayAdsValue(AIndex : Integer; const AValue : double); virtual;
     Procedure SetenergyEfficiencyClass(AIndex : Integer; const AValue : String); virtual;
     Procedure SetexpirationDate(AIndex : Integer; const AValue : String); virtual;
     Procedure Setgender(AIndex : Integer; const AValue : String); virtual;
     Procedure SetgoogleProductCategory(AIndex : Integer; const AValue : String); virtual;
     Procedure Setgtin(AIndex : Integer; const AValue : String); virtual;
     Procedure Setid(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetidentifierExists(AIndex : Integer; AValue : boolean); virtual;
+    Procedure SetidentifierExists(AIndex : Integer; const AValue : boolean); virtual;
     Procedure SetimageLink(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setinstallment(AIndex : Integer; AValue : TProductInstallment); virtual;
-    Procedure SetisBundle(AIndex : Integer; AValue : boolean); virtual;
+    Procedure Setinstallment(AIndex : Integer; const AValue : TInstallment); virtual;
+    Procedure SetisBundle(AIndex : Integer; const AValue : boolean); virtual;
     Procedure SetitemGroupId(AIndex : Integer; const AValue : String); virtual;
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
     Procedure Setlink(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetloyaltyPoints(AIndex : Integer; AValue : TLoyaltyPoints); virtual;
+    Procedure SetloyaltyPoints(AIndex : Integer; const AValue : TLoyaltyPoints); virtual;
     Procedure Setmaterial(AIndex : Integer; const AValue : String); virtual;
     Procedure SetmobileLink(AIndex : Integer; const AValue : String); virtual;
     Procedure Setmpn(AIndex : Integer; const AValue : String); virtual;
     Procedure Setmultipack(AIndex : Integer; const AValue : String); virtual;
     Procedure SetofferId(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetonlineOnly(AIndex : Integer; AValue : boolean); virtual;
+    Procedure SetonlineOnly(AIndex : Integer; const AValue : boolean); virtual;
     Procedure Setpattern(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setprice(AIndex : Integer; AValue : TPrice); virtual;
+    Procedure Setprice(AIndex : Integer; const AValue : TPrice); virtual;
     Procedure SetproductType(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetsalePrice(AIndex : Integer; AValue : TPrice); virtual;
+    Procedure SetpromotionIds(AIndex : Integer; const AValue : TStringArray); virtual;
+    Procedure SetsalePrice(AIndex : Integer; const AValue : TPrice); virtual;
     Procedure SetsalePriceEffectiveDate(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setshipping(AIndex : Integer; AValue : TProductTypeshippingArray); virtual;
-    Procedure SetshippingHeight(AIndex : Integer; AValue : TProductShippingDimension); virtual;
+    Procedure SetsellOnGoogleQuantity(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setshipping(AIndex : Integer; const AValue : TProductTypeshippingArray); virtual;
+    Procedure SetshippingHeight(AIndex : Integer; const AValue : TProductShippingDimension); virtual;
     Procedure SetshippingLabel(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetshippingLength(AIndex : Integer; AValue : TProductShippingDimension); virtual;
-    Procedure SetshippingWeight(AIndex : Integer; AValue : TProductShippingWeight); virtual;
-    Procedure SetshippingWidth(AIndex : Integer; AValue : TProductShippingDimension); virtual;
+    Procedure SetshippingLength(AIndex : Integer; const AValue : TProductShippingDimension); virtual;
+    Procedure SetshippingWeight(AIndex : Integer; const AValue : TProductShippingWeight); virtual;
+    Procedure SetshippingWidth(AIndex : Integer; const AValue : TProductShippingDimension); virtual;
     Procedure SetsizeSystem(AIndex : Integer; const AValue : String); virtual;
     Procedure SetsizeType(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setsizes(AIndex : Integer; AValue : TStringArray); virtual;
+    Procedure Setsizes(AIndex : Integer; const AValue : TStringArray); virtual;
     Procedure SettargetCountry(AIndex : Integer; const AValue : String); virtual;
-    Procedure Settaxes(AIndex : Integer; AValue : TProductTypetaxesArray); virtual;
+    Procedure Settaxes(AIndex : Integer; const AValue : TProductTypetaxesArray); virtual;
     Procedure Settitle(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetunitPricingBaseMeasure(AIndex : Integer; AValue : TProductUnitPricingBaseMeasure); virtual;
-    Procedure SetunitPricingMeasure(AIndex : Integer; AValue : TProductUnitPricingMeasure); virtual;
-    Procedure SetvalidatedDestinations(AIndex : Integer; AValue : TStringArray); virtual;
-    Procedure Setwarnings(AIndex : Integer; AValue : TProductTypewarningsArray); virtual;
+    Procedure SetunitPricingBaseMeasure(AIndex : Integer; const AValue : TProductUnitPricingBaseMeasure); virtual;
+    Procedure SetunitPricingMeasure(AIndex : Integer; const AValue : TProductUnitPricingMeasure); virtual;
+    Procedure SetvalidatedDestinations(AIndex : Integer; const AValue : TStringArray); virtual;
+    Procedure Setwarnings(AIndex : Integer; const AValue : TProductTypewarningsArray); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
     Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
@@ -2180,7 +3684,7 @@ type
     Property id : String Index 264 Read Fid Write Setid;
     Property identifierExists : boolean Index 272 Read FidentifierExists Write SetidentifierExists;
     Property imageLink : String Index 280 Read FimageLink Write SetimageLink;
-    Property installment : TProductInstallment Index 288 Read Finstallment Write Setinstallment;
+    Property installment : TInstallment Index 288 Read Finstallment Write Setinstallment;
     Property isBundle : boolean Index 296 Read FisBundle Write SetisBundle;
     Property itemGroupId : String Index 304 Read FitemGroupId Write SetitemGroupId;
     Property kind : String Index 312 Read Fkind Write Setkind;
@@ -2195,24 +3699,26 @@ type
     Property pattern : String Index 384 Read Fpattern Write Setpattern;
     Property price : TPrice Index 392 Read Fprice Write Setprice;
     Property productType : String Index 400 Read FproductType Write SetproductType;
-    Property salePrice : TPrice Index 408 Read FsalePrice Write SetsalePrice;
-    Property salePriceEffectiveDate : String Index 416 Read FsalePriceEffectiveDate Write SetsalePriceEffectiveDate;
-    Property shipping : TProductTypeshippingArray Index 424 Read Fshipping Write Setshipping;
-    Property shippingHeight : TProductShippingDimension Index 432 Read FshippingHeight Write SetshippingHeight;
-    Property shippingLabel : String Index 440 Read FshippingLabel Write SetshippingLabel;
-    Property shippingLength : TProductShippingDimension Index 448 Read FshippingLength Write SetshippingLength;
-    Property shippingWeight : TProductShippingWeight Index 456 Read FshippingWeight Write SetshippingWeight;
-    Property shippingWidth : TProductShippingDimension Index 464 Read FshippingWidth Write SetshippingWidth;
-    Property sizeSystem : String Index 472 Read FsizeSystem Write SetsizeSystem;
-    Property sizeType : String Index 480 Read FsizeType Write SetsizeType;
-    Property sizes : TStringArray Index 488 Read Fsizes Write Setsizes;
-    Property targetCountry : String Index 496 Read FtargetCountry Write SettargetCountry;
-    Property taxes : TProductTypetaxesArray Index 504 Read Ftaxes Write Settaxes;
-    Property title : String Index 512 Read Ftitle Write Settitle;
-    Property unitPricingBaseMeasure : TProductUnitPricingBaseMeasure Index 520 Read FunitPricingBaseMeasure Write SetunitPricingBaseMeasure;
-    Property unitPricingMeasure : TProductUnitPricingMeasure Index 528 Read FunitPricingMeasure Write SetunitPricingMeasure;
-    Property validatedDestinations : TStringArray Index 536 Read FvalidatedDestinations Write SetvalidatedDestinations;
-    Property warnings : TProductTypewarningsArray Index 544 Read Fwarnings Write Setwarnings;
+    Property promotionIds : TStringArray Index 408 Read FpromotionIds Write SetpromotionIds;
+    Property salePrice : TPrice Index 416 Read FsalePrice Write SetsalePrice;
+    Property salePriceEffectiveDate : String Index 424 Read FsalePriceEffectiveDate Write SetsalePriceEffectiveDate;
+    Property sellOnGoogleQuantity : String Index 432 Read FsellOnGoogleQuantity Write SetsellOnGoogleQuantity;
+    Property shipping : TProductTypeshippingArray Index 440 Read Fshipping Write Setshipping;
+    Property shippingHeight : TProductShippingDimension Index 448 Read FshippingHeight Write SetshippingHeight;
+    Property shippingLabel : String Index 456 Read FshippingLabel Write SetshippingLabel;
+    Property shippingLength : TProductShippingDimension Index 464 Read FshippingLength Write SetshippingLength;
+    Property shippingWeight : TProductShippingWeight Index 472 Read FshippingWeight Write SetshippingWeight;
+    Property shippingWidth : TProductShippingDimension Index 480 Read FshippingWidth Write SetshippingWidth;
+    Property sizeSystem : String Index 488 Read FsizeSystem Write SetsizeSystem;
+    Property sizeType : String Index 496 Read FsizeType Write SetsizeType;
+    Property sizes : TStringArray Index 504 Read Fsizes Write Setsizes;
+    Property targetCountry : String Index 512 Read FtargetCountry Write SettargetCountry;
+    Property taxes : TProductTypetaxesArray Index 520 Read Ftaxes Write Settaxes;
+    Property title : String Index 528 Read Ftitle Write Settitle;
+    Property unitPricingBaseMeasure : TProductUnitPricingBaseMeasure Index 536 Read FunitPricingBaseMeasure Write SetunitPricingBaseMeasure;
+    Property unitPricingMeasure : TProductUnitPricingMeasure Index 544 Read FunitPricingMeasure Write SetunitPricingMeasure;
+    Property validatedDestinations : TStringArray Index 552 Read FvalidatedDestinations Write SetvalidatedDestinations;
+    Property warnings : TProductTypewarningsArray Index 560 Read Fwarnings Write Setwarnings;
   end;
   TProductClass = Class of TProduct;
   
@@ -2274,7 +3780,7 @@ type
     Fname : String;
   Protected
     //Property setters
-    Procedure Setattributes(AIndex : Integer; AValue : TProductCustomGroupTypeattributesArray); virtual;
+    Procedure Setattributes(AIndex : Integer; const AValue : TProductCustomGroupTypeattributesArray); virtual;
     Procedure Setname(AIndex : Integer; const AValue : String); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
@@ -2307,25 +3813,6 @@ type
   TProductDestinationClass = Class of TProductDestination;
   
   { --------------------------------------------------------------------
-    TProductInstallment
-    --------------------------------------------------------------------}
-  
-  TProductInstallment = Class(TGoogleBaseObject)
-  Private
-    Famount : TPrice;
-    Fmonths : String;
-  Protected
-    //Property setters
-    Procedure Setamount(AIndex : Integer; AValue : TPrice); virtual;
-    Procedure Setmonths(AIndex : Integer; const AValue : String); virtual;
-  Public
-  Published
-    Property amount : TPrice Index 0 Read Famount Write Setamount;
-    Property months : String Index 8 Read Fmonths Write Setmonths;
-  end;
-  TProductInstallmentClass = Class of TProductInstallment;
-  
-  { --------------------------------------------------------------------
     TProductShipping
     --------------------------------------------------------------------}
   
@@ -2344,7 +3831,7 @@ type
     Procedure SetlocationGroupName(AIndex : Integer; const AValue : String); virtual;
     Procedure SetlocationId(AIndex : Integer; const AValue : String); virtual;
     Procedure SetpostalCode(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setprice(AIndex : Integer; AValue : TPrice); virtual;
+    Procedure Setprice(AIndex : Integer; const AValue : TPrice); virtual;
     Procedure Setregion(AIndex : Integer; const AValue : String); virtual;
     Procedure Setservice(AIndex : Integer; const AValue : String); virtual;
   Public
@@ -2371,7 +3858,7 @@ type
     Class Function ExportPropertyName(Const AName : String) : string; override;
     //Property setters
     Procedure Set_unit(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setvalue(AIndex : Integer; AValue : double); virtual;
+    Procedure Setvalue(AIndex : Integer; const AValue : double); virtual;
   Public
   Published
     Property _unit : String Index 0 Read F_unit Write Set_unit;
@@ -2391,7 +3878,7 @@ type
     Class Function ExportPropertyName(Const AName : String) : string; override;
     //Property setters
     Procedure Set_unit(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setvalue(AIndex : Integer; AValue : double); virtual;
+    Procedure Setvalue(AIndex : Integer; const AValue : double); virtual;
   Public
   Published
     Property _unit : String Index 0 Read F_unit Write Set_unit;
@@ -2417,8 +3904,8 @@ type
   Protected
     //Property setters
     Procedure SetcreationDate(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetdataQualityIssues(AIndex : Integer; AValue : TProductStatusTypedataQualityIssuesArray); virtual;
-    Procedure SetdestinationStatuses(AIndex : Integer; AValue : TProductStatusTypedestinationStatusesArray); virtual;
+    Procedure SetdataQualityIssues(AIndex : Integer; const AValue : TProductStatusTypedataQualityIssuesArray); virtual;
+    Procedure SetdestinationStatuses(AIndex : Integer; const AValue : TProductStatusTypedestinationStatusesArray); virtual;
     Procedure SetgoogleExpirationDate(AIndex : Integer; const AValue : String); virtual;
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
     Procedure SetlastUpdateDate(AIndex : Integer; const AValue : String); virtual;
@@ -2519,9 +4006,9 @@ type
     Procedure Setcountry(AIndex : Integer; const AValue : String); virtual;
     Procedure SetlocationId(AIndex : Integer; const AValue : String); virtual;
     Procedure SetpostalCode(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setrate(AIndex : Integer; AValue : double); virtual;
+    Procedure Setrate(AIndex : Integer; const AValue : double); virtual;
     Procedure Setregion(AIndex : Integer; const AValue : String); virtual;
-    Procedure SettaxShip(AIndex : Integer; AValue : boolean); virtual;
+    Procedure SettaxShip(AIndex : Integer; const AValue : boolean); virtual;
   Public
   Published
     Property country : String Index 0 Read Fcountry Write Setcountry;
@@ -2565,7 +4052,7 @@ type
     Class Function ExportPropertyName(Const AName : String) : string; override;
     //Property setters
     Procedure Set_unit(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setvalue(AIndex : Integer; AValue : double); virtual;
+    Procedure Setvalue(AIndex : Integer; const AValue : double); virtual;
   Public
   Published
     Property _unit : String Index 0 Read F_unit Write Set_unit;
@@ -2582,7 +4069,7 @@ type
     Fentries : TProductsCustomBatchRequestTypeentriesArray;
   Protected
     //Property setters
-    Procedure Setentries(AIndex : Integer; AValue : TProductsCustomBatchRequestTypeentriesArray); virtual;
+    Procedure Setentries(AIndex : Integer; const AValue : TProductsCustomBatchRequestTypeentriesArray); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
     Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
@@ -2606,10 +4093,10 @@ type
     FproductId : String;
   Protected
     //Property setters
-    Procedure SetbatchId(AIndex : Integer; AValue : integer); virtual;
+    Procedure SetbatchId(AIndex : Integer; const AValue : integer); virtual;
     Procedure SetmerchantId(AIndex : Integer; const AValue : String); virtual;
     Procedure Setmethod(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setproduct(AIndex : Integer; AValue : TProduct); virtual;
+    Procedure Setproduct(AIndex : Integer; const AValue : TProduct); virtual;
     Procedure SetproductId(AIndex : Integer; const AValue : String); virtual;
   Public
   Published
@@ -2631,7 +4118,7 @@ type
     Fkind : String;
   Protected
     //Property setters
-    Procedure Setentries(AIndex : Integer; AValue : TProductsCustomBatchResponseTypeentriesArray); virtual;
+    Procedure Setentries(AIndex : Integer; const AValue : TProductsCustomBatchResponseTypeentriesArray); virtual;
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
@@ -2656,10 +4143,10 @@ type
     Fproduct : TProduct;
   Protected
     //Property setters
-    Procedure SetbatchId(AIndex : Integer; AValue : integer); virtual;
-    Procedure Seterrors(AIndex : Integer; AValue : TErrors); virtual;
+    Procedure SetbatchId(AIndex : Integer; const AValue : integer); virtual;
+    Procedure Seterrors(AIndex : Integer; const AValue : TErrors); virtual;
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setproduct(AIndex : Integer; AValue : TProduct); virtual;
+    Procedure Setproduct(AIndex : Integer; const AValue : TProduct); virtual;
   Public
   Published
     Property batchId : integer Index 0 Read FbatchId Write SetbatchId;
@@ -2682,7 +4169,7 @@ type
     //Property setters
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
     Procedure SetnextPageToken(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setresources(AIndex : Integer; AValue : TProductsListResponseTyperesourcesArray); virtual;
+    Procedure Setresources(AIndex : Integer; const AValue : TProductsListResponseTyperesourcesArray); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
     Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
@@ -2704,7 +4191,7 @@ type
     Fentries : TProductstatusesCustomBatchRequestTypeentriesArray;
   Protected
     //Property setters
-    Procedure Setentries(AIndex : Integer; AValue : TProductstatusesCustomBatchRequestTypeentriesArray); virtual;
+    Procedure Setentries(AIndex : Integer; const AValue : TProductstatusesCustomBatchRequestTypeentriesArray); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
     Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
@@ -2727,7 +4214,7 @@ type
     FproductId : String;
   Protected
     //Property setters
-    Procedure SetbatchId(AIndex : Integer; AValue : integer); virtual;
+    Procedure SetbatchId(AIndex : Integer; const AValue : integer); virtual;
     Procedure SetmerchantId(AIndex : Integer; const AValue : String); virtual;
     Procedure Setmethod(AIndex : Integer; const AValue : String); virtual;
     Procedure SetproductId(AIndex : Integer; const AValue : String); virtual;
@@ -2750,7 +4237,7 @@ type
     Fkind : String;
   Protected
     //Property setters
-    Procedure Setentries(AIndex : Integer; AValue : TProductstatusesCustomBatchResponseTypeentriesArray); virtual;
+    Procedure Setentries(AIndex : Integer; const AValue : TProductstatusesCustomBatchResponseTypeentriesArray); virtual;
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
@@ -2775,10 +4262,10 @@ type
     FproductStatus : TProductStatus;
   Protected
     //Property setters
-    Procedure SetbatchId(AIndex : Integer; AValue : integer); virtual;
-    Procedure Seterrors(AIndex : Integer; AValue : TErrors); virtual;
+    Procedure SetbatchId(AIndex : Integer; const AValue : integer); virtual;
+    Procedure Seterrors(AIndex : Integer; const AValue : TErrors); virtual;
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
-    Procedure SetproductStatus(AIndex : Integer; AValue : TProductStatus); virtual;
+    Procedure SetproductStatus(AIndex : Integer; const AValue : TProductStatus); virtual;
   Public
   Published
     Property batchId : integer Index 0 Read FbatchId Write SetbatchId;
@@ -2801,7 +4288,7 @@ type
     //Property setters
     Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
     Procedure SetnextPageToken(AIndex : Integer; const AValue : String); virtual;
-    Procedure Setresources(AIndex : Integer; AValue : TProductstatusesListResponseTyperesourcesArray); virtual;
+    Procedure Setresources(AIndex : Integer; const AValue : TProductstatusesListResponseTyperesourcesArray); virtual;
     //2.6.4. bug workaround
     {$IFDEF VER2_6}
     Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
@@ -2815,6 +4302,185 @@ type
   TProductstatusesListResponseClass = Class of TProductstatusesListResponse;
   
   { --------------------------------------------------------------------
+    TTestOrder
+    --------------------------------------------------------------------}
+  
+  TTestOrder = Class(TGoogleBaseObject)
+  Private
+    Fcustomer : TTestOrderCustomer;
+    Fkind : String;
+    FlineItems : TTestOrderTypelineItemsArray;
+    FpaymentMethod : TTestOrderPaymentMethod;
+    FpredefinedDeliveryAddress : String;
+    Fpromotions : TTestOrderTypepromotionsArray;
+    FshippingCost : TPrice;
+    FshippingCostTax : TPrice;
+    FshippingOption : String;
+  Protected
+    //Property setters
+    Procedure Setcustomer(AIndex : Integer; const AValue : TTestOrderCustomer); virtual;
+    Procedure Setkind(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetlineItems(AIndex : Integer; const AValue : TTestOrderTypelineItemsArray); virtual;
+    Procedure SetpaymentMethod(AIndex : Integer; const AValue : TTestOrderPaymentMethod); virtual;
+    Procedure SetpredefinedDeliveryAddress(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setpromotions(AIndex : Integer; const AValue : TTestOrderTypepromotionsArray); virtual;
+    Procedure SetshippingCost(AIndex : Integer; const AValue : TPrice); virtual;
+    Procedure SetshippingCostTax(AIndex : Integer; const AValue : TPrice); virtual;
+    Procedure SetshippingOption(AIndex : Integer; const AValue : String); virtual;
+    //2.6.4. bug workaround
+    {$IFDEF VER2_6}
+    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
+    {$ENDIF VER2_6}
+  Public
+  Published
+    Property customer : TTestOrderCustomer Index 0 Read Fcustomer Write Setcustomer;
+    Property kind : String Index 8 Read Fkind Write Setkind;
+    Property lineItems : TTestOrderTypelineItemsArray Index 16 Read FlineItems Write SetlineItems;
+    Property paymentMethod : TTestOrderPaymentMethod Index 24 Read FpaymentMethod Write SetpaymentMethod;
+    Property predefinedDeliveryAddress : String Index 32 Read FpredefinedDeliveryAddress Write SetpredefinedDeliveryAddress;
+    Property promotions : TTestOrderTypepromotionsArray Index 40 Read Fpromotions Write Setpromotions;
+    Property shippingCost : TPrice Index 48 Read FshippingCost Write SetshippingCost;
+    Property shippingCostTax : TPrice Index 56 Read FshippingCostTax Write SetshippingCostTax;
+    Property shippingOption : String Index 64 Read FshippingOption Write SetshippingOption;
+  end;
+  TTestOrderClass = Class of TTestOrder;
+  
+  { --------------------------------------------------------------------
+    TTestOrderCustomer
+    --------------------------------------------------------------------}
+  
+  TTestOrderCustomer = Class(TGoogleBaseObject)
+  Private
+    Femail : String;
+    FexplicitMarketingPreference : boolean;
+    FfullName : String;
+  Protected
+    //Property setters
+    Procedure Setemail(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetexplicitMarketingPreference(AIndex : Integer; const AValue : boolean); virtual;
+    Procedure SetfullName(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property email : String Index 0 Read Femail Write Setemail;
+    Property explicitMarketingPreference : boolean Index 8 Read FexplicitMarketingPreference Write SetexplicitMarketingPreference;
+    Property fullName : String Index 16 Read FfullName Write SetfullName;
+  end;
+  TTestOrderCustomerClass = Class of TTestOrderCustomer;
+  
+  { --------------------------------------------------------------------
+    TTestOrderLineItem
+    --------------------------------------------------------------------}
+  
+  TTestOrderLineItem = Class(TGoogleBaseObject)
+  Private
+    Fproduct : TTestOrderLineItemProduct;
+    FquantityOrdered : integer;
+    FreturnInfo : TOrderLineItemReturnInfo;
+    FshippingDetails : TOrderLineItemShippingDetails;
+    FunitTax : TPrice;
+  Protected
+    //Property setters
+    Procedure Setproduct(AIndex : Integer; const AValue : TTestOrderLineItemProduct); virtual;
+    Procedure SetquantityOrdered(AIndex : Integer; const AValue : integer); virtual;
+    Procedure SetreturnInfo(AIndex : Integer; const AValue : TOrderLineItemReturnInfo); virtual;
+    Procedure SetshippingDetails(AIndex : Integer; const AValue : TOrderLineItemShippingDetails); virtual;
+    Procedure SetunitTax(AIndex : Integer; const AValue : TPrice); virtual;
+  Public
+  Published
+    Property product : TTestOrderLineItemProduct Index 0 Read Fproduct Write Setproduct;
+    Property quantityOrdered : integer Index 8 Read FquantityOrdered Write SetquantityOrdered;
+    Property returnInfo : TOrderLineItemReturnInfo Index 16 Read FreturnInfo Write SetreturnInfo;
+    Property shippingDetails : TOrderLineItemShippingDetails Index 24 Read FshippingDetails Write SetshippingDetails;
+    Property unitTax : TPrice Index 32 Read FunitTax Write SetunitTax;
+  end;
+  TTestOrderLineItemClass = Class of TTestOrderLineItem;
+  
+  { --------------------------------------------------------------------
+    TTestOrderLineItemProduct
+    --------------------------------------------------------------------}
+  
+  TTestOrderLineItemProduct = Class(TGoogleBaseObject)
+  Private
+    Fbrand : String;
+    Fchannel : String;
+    Fcondition : String;
+    FcontentLanguage : String;
+    Fgtin : String;
+    FimageLink : String;
+    FitemGroupId : String;
+    Fmpn : String;
+    FofferId : String;
+    Fprice : TPrice;
+    FtargetCountry : String;
+    Ftitle : String;
+    FvariantAttributes : TTestOrderLineItemProductTypevariantAttributesArray;
+  Protected
+    //Property setters
+    Procedure Setbrand(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setchannel(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setcondition(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetcontentLanguage(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setgtin(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetimageLink(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetitemGroupId(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setmpn(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetofferId(AIndex : Integer; const AValue : String); virtual;
+    Procedure Setprice(AIndex : Integer; const AValue : TPrice); virtual;
+    Procedure SettargetCountry(AIndex : Integer; const AValue : String); virtual;
+    Procedure Settitle(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetvariantAttributes(AIndex : Integer; const AValue : TTestOrderLineItemProductTypevariantAttributesArray); virtual;
+    //2.6.4. bug workaround
+    {$IFDEF VER2_6}
+    Procedure SetArrayLength(Const AName : String; ALength : Longint); override;
+    {$ENDIF VER2_6}
+  Public
+  Published
+    Property brand : String Index 0 Read Fbrand Write Setbrand;
+    Property channel : String Index 8 Read Fchannel Write Setchannel;
+    Property condition : String Index 16 Read Fcondition Write Setcondition;
+    Property contentLanguage : String Index 24 Read FcontentLanguage Write SetcontentLanguage;
+    Property gtin : String Index 32 Read Fgtin Write Setgtin;
+    Property imageLink : String Index 40 Read FimageLink Write SetimageLink;
+    Property itemGroupId : String Index 48 Read FitemGroupId Write SetitemGroupId;
+    Property mpn : String Index 56 Read Fmpn Write Setmpn;
+    Property offerId : String Index 64 Read FofferId Write SetofferId;
+    Property price : TPrice Index 72 Read Fprice Write Setprice;
+    Property targetCountry : String Index 80 Read FtargetCountry Write SettargetCountry;
+    Property title : String Index 88 Read Ftitle Write Settitle;
+    Property variantAttributes : TTestOrderLineItemProductTypevariantAttributesArray Index 96 Read FvariantAttributes Write SetvariantAttributes;
+  end;
+  TTestOrderLineItemProductClass = Class of TTestOrderLineItemProduct;
+  
+  { --------------------------------------------------------------------
+    TTestOrderPaymentMethod
+    --------------------------------------------------------------------}
+  
+  TTestOrderPaymentMethod = Class(TGoogleBaseObject)
+  Private
+    FexpirationMonth : integer;
+    FexpirationYear : integer;
+    FlastFourDigits : String;
+    FpredefinedBillingAddress : String;
+    F_type : String;
+  Protected
+    Class Function ExportPropertyName(Const AName : String) : string; override;
+    //Property setters
+    Procedure SetexpirationMonth(AIndex : Integer; const AValue : integer); virtual;
+    Procedure SetexpirationYear(AIndex : Integer; const AValue : integer); virtual;
+    Procedure SetlastFourDigits(AIndex : Integer; const AValue : String); virtual;
+    Procedure SetpredefinedBillingAddress(AIndex : Integer; const AValue : String); virtual;
+    Procedure Set_type(AIndex : Integer; const AValue : String); virtual;
+  Public
+  Published
+    Property expirationMonth : integer Index 0 Read FexpirationMonth Write SetexpirationMonth;
+    Property expirationYear : integer Index 8 Read FexpirationYear Write SetexpirationYear;
+    Property lastFourDigits : String Index 16 Read FlastFourDigits Write SetlastFourDigits;
+    Property predefinedBillingAddress : String Index 24 Read FpredefinedBillingAddress Write SetpredefinedBillingAddress;
+    Property _type : String Index 32 Read F_type Write Set_type;
+  end;
+  TTestOrderPaymentMethodClass = Class of TTestOrderPaymentMethod;
+  
+  { --------------------------------------------------------------------
     TWeight
     --------------------------------------------------------------------}
   
@@ -2839,6 +4505,27 @@ type
     --------------------------------------------------------------------}
   
   
+  //Optional query Options for TAccountsResource, method Custombatch
+  
+  TAccountsCustombatchOptions = Record
+    dryRun : boolean;
+  end;
+  
+  
+  //Optional query Options for TAccountsResource, method Delete
+  
+  TAccountsDeleteOptions = Record
+    dryRun : boolean;
+  end;
+  
+  
+  //Optional query Options for TAccountsResource, method Insert
+  
+  TAccountsInsertOptions = Record
+    dryRun : boolean;
+  end;
+  
+  
   //Optional query Options for TAccountsResource, method List
   
   TAccountsListOptions = Record
@@ -2846,19 +4533,38 @@ type
     pageToken : String;
   end;
   
+  
+  //Optional query Options for TAccountsResource, method Patch
+  
+  TAccountsPatchOptions = Record
+    dryRun : boolean;
+  end;
+  
+  
+  //Optional query Options for TAccountsResource, method Update
+  
+  TAccountsUpdateOptions = Record
+    dryRun : boolean;
+  end;
+  
   TAccountsResource = Class(TGoogleResource)
   Public
     Class Function ResourceName : String; override;
     Class Function DefaultAPI : TGoogleAPIClass; override;
     Function Authinfo : TAccountsAuthInfoResponse;
-    Function Custombatch(aAccountsCustomBatchRequest : TAccountsCustomBatchRequest) : TAccountsCustomBatchResponse;
-    Procedure Delete(accountId: string; merchantId: string);
+    Function Custombatch(aAccountsCustomBatchRequest : TAccountsCustomBatchRequest; AQuery : string  = '') : TAccountsCustomBatchResponse;
+    Function Custombatch(aAccountsCustomBatchRequest : TAccountsCustomBatchRequest; AQuery : TAccountscustombatchOptions) : TAccountsCustomBatchResponse;
+    Procedure Delete(accountId: string; merchantId: string; AQuery : string  = '');
+    Procedure Delete(accountId: string; merchantId: string; AQuery : TAccountsdeleteOptions);
     Function Get(accountId: string; merchantId: string) : TAccount;
-    Function Insert(merchantId: string; aAccount : TAccount) : TAccount;
+    Function Insert(merchantId: string; aAccount : TAccount; AQuery : string  = '') : TAccount;
+    Function Insert(merchantId: string; aAccount : TAccount; AQuery : TAccountsinsertOptions) : TAccount;
     Function List(merchantId: string; AQuery : string  = '') : TAccountsListResponse;
     Function List(merchantId: string; AQuery : TAccountslistOptions) : TAccountsListResponse;
-    Function Patch(accountId: string; merchantId: string; aAccount : TAccount) : TAccount;
-    Function Update(accountId: string; merchantId: string; aAccount : TAccount) : TAccount;
+    Function Patch(accountId: string; merchantId: string; aAccount : TAccount; AQuery : string  = '') : TAccount;
+    Function Patch(accountId: string; merchantId: string; aAccount : TAccount; AQuery : TAccountspatchOptions) : TAccount;
+    Function Update(accountId: string; merchantId: string; aAccount : TAccount; AQuery : string  = '') : TAccount;
+    Function Update(accountId: string; merchantId: string; aAccount : TAccount; AQuery : TAccountsupdateOptions) : TAccount;
   end;
   
   
@@ -2988,6 +4694,27 @@ type
     --------------------------------------------------------------------}
   
   
+  //Optional query Options for TDatafeedsResource, method Custombatch
+  
+  TDatafeedsCustombatchOptions = Record
+    dryRun : boolean;
+  end;
+  
+  
+  //Optional query Options for TDatafeedsResource, method Delete
+  
+  TDatafeedsDeleteOptions = Record
+    dryRun : boolean;
+  end;
+  
+  
+  //Optional query Options for TDatafeedsResource, method Insert
+  
+  TDatafeedsInsertOptions = Record
+    dryRun : boolean;
+  end;
+  
+  
   //Optional query Options for TDatafeedsResource, method List
   
   TDatafeedsListOptions = Record
@@ -2995,18 +4722,37 @@ type
     pageToken : String;
   end;
   
+  
+  //Optional query Options for TDatafeedsResource, method Patch
+  
+  TDatafeedsPatchOptions = Record
+    dryRun : boolean;
+  end;
+  
+  
+  //Optional query Options for TDatafeedsResource, method Update
+  
+  TDatafeedsUpdateOptions = Record
+    dryRun : boolean;
+  end;
+  
   TDatafeedsResource = Class(TGoogleResource)
   Public
     Class Function ResourceName : String; override;
     Class Function DefaultAPI : TGoogleAPIClass; override;
-    Function Custombatch(aDatafeedsCustomBatchRequest : TDatafeedsCustomBatchRequest) : TDatafeedsCustomBatchResponse;
-    Procedure Delete(datafeedId: string; merchantId: string);
+    Function Custombatch(aDatafeedsCustomBatchRequest : TDatafeedsCustomBatchRequest; AQuery : string  = '') : TDatafeedsCustomBatchResponse;
+    Function Custombatch(aDatafeedsCustomBatchRequest : TDatafeedsCustomBatchRequest; AQuery : TDatafeedscustombatchOptions) : TDatafeedsCustomBatchResponse;
+    Procedure Delete(datafeedId: string; merchantId: string; AQuery : string  = '');
+    Procedure Delete(datafeedId: string; merchantId: string; AQuery : TDatafeedsdeleteOptions);
     Function Get(datafeedId: string; merchantId: string) : TDatafeed;
-    Function Insert(merchantId: string; aDatafeed : TDatafeed) : TDatafeed;
+    Function Insert(merchantId: string; aDatafeed : TDatafeed; AQuery : string  = '') : TDatafeed;
+    Function Insert(merchantId: string; aDatafeed : TDatafeed; AQuery : TDatafeedsinsertOptions) : TDatafeed;
     Function List(merchantId: string; AQuery : string  = '') : TDatafeedsListResponse;
     Function List(merchantId: string; AQuery : TDatafeedslistOptions) : TDatafeedsListResponse;
-    Function Patch(datafeedId: string; merchantId: string; aDatafeed : TDatafeed) : TDatafeed;
-    Function Update(datafeedId: string; merchantId: string; aDatafeed : TDatafeed) : TDatafeed;
+    Function Patch(datafeedId: string; merchantId: string; aDatafeed : TDatafeed; AQuery : string  = '') : TDatafeed;
+    Function Patch(datafeedId: string; merchantId: string; aDatafeed : TDatafeed; AQuery : TDatafeedspatchOptions) : TDatafeed;
+    Function Update(datafeedId: string; merchantId: string; aDatafeed : TDatafeed; AQuery : string  = '') : TDatafeed;
+    Function Update(datafeedId: string; merchantId: string; aDatafeed : TDatafeed; AQuery : TDatafeedsupdateOptions) : TDatafeed;
   end;
   
   
@@ -3037,12 +4783,68 @@ type
     TInventoryResource
     --------------------------------------------------------------------}
   
+  
+  //Optional query Options for TInventoryResource, method Custombatch
+  
+  TInventoryCustombatchOptions = Record
+    dryRun : boolean;
+  end;
+  
+  
+  //Optional query Options for TInventoryResource, method Set
+  
+  TInventorySetOptions = Record
+    dryRun : boolean;
+  end;
+  
   TInventoryResource = Class(TGoogleResource)
   Public
     Class Function ResourceName : String; override;
     Class Function DefaultAPI : TGoogleAPIClass; override;
-    Function Custombatch(aInventoryCustomBatchRequest : TInventoryCustomBatchRequest) : TInventoryCustomBatchResponse;
-    Function _set(merchantId: string; productId: string; storeCode: string; aInventorySetRequest : TInventorySetRequest) : TInventorySetResponse;
+    Function Custombatch(aInventoryCustomBatchRequest : TInventoryCustomBatchRequest; AQuery : string  = '') : TInventoryCustomBatchResponse;
+    Function Custombatch(aInventoryCustomBatchRequest : TInventoryCustomBatchRequest; AQuery : TInventorycustombatchOptions) : TInventoryCustomBatchResponse;
+    Function _set(merchantId: string; productId: string; storeCode: string; aInventorySetRequest : TInventorySetRequest; AQuery : string  = '') : TInventorySetResponse;
+    Function _set(merchantId: string; productId: string; storeCode: string; aInventorySetRequest : TInventorySetRequest; AQuery : TInventorysetOptions) : TInventorySetResponse;
+  end;
+  
+  
+  { --------------------------------------------------------------------
+    TOrdersResource
+    --------------------------------------------------------------------}
+  
+  
+  //Optional query Options for TOrdersResource, method List
+  
+  TOrdersListOptions = Record
+    acknowledged : boolean;
+    maxResults : integer;
+    orderBy : String;
+    pageToken : String;
+    placedDateEnd : String;
+    placedDateStart : String;
+    statuses : String;
+  end;
+  
+  TOrdersResource = Class(TGoogleResource)
+  Public
+    Class Function ResourceName : String; override;
+    Class Function DefaultAPI : TGoogleAPIClass; override;
+    Function Acknowledge(merchantId: string; orderId: string; aOrdersAcknowledgeRequest : TOrdersAcknowledgeRequest) : TOrdersAcknowledgeResponse;
+    Function Advancetestorder(merchantId: string; orderId: string) : TOrdersAdvanceTestOrderResponse;
+    Function Cancel(merchantId: string; orderId: string; aOrdersCancelRequest : TOrdersCancelRequest) : TOrdersCancelResponse;
+    Function Cancellineitem(merchantId: string; orderId: string; aOrdersCancelLineItemRequest : TOrdersCancelLineItemRequest) : TOrdersCancelLineItemResponse;
+    Function Createtestorder(merchantId: string; aOrdersCreateTestOrderRequest : TOrdersCreateTestOrderRequest) : TOrdersCreateTestOrderResponse;
+    Function Custombatch(aOrdersCustomBatchRequest : TOrdersCustomBatchRequest) : TOrdersCustomBatchResponse;
+    Function Get(merchantId: string; orderId: string) : TOrder;
+    Function Getbymerchantorderid(merchantId: string; merchantOrderId: string) : TOrdersGetByMerchantOrderIdResponse;
+    Function Gettestordertemplate(merchantId: string; templateName: string) : TOrdersGetTestOrderTemplateResponse;
+    Function List(merchantId: string; AQuery : string  = '') : TOrdersListResponse;
+    Function List(merchantId: string; AQuery : TOrderslistOptions) : TOrdersListResponse;
+    Function Refund(merchantId: string; orderId: string; aOrdersRefundRequest : TOrdersRefundRequest) : TOrdersRefundResponse;
+    Function Returnlineitem(merchantId: string; orderId: string; aOrdersReturnLineItemRequest : TOrdersReturnLineItemRequest) : TOrdersReturnLineItemResponse;
+    Function Shiplineitems(merchantId: string; orderId: string; aOrdersShipLineItemsRequest : TOrdersShipLineItemsRequest) : TOrdersShipLineItemsResponse;
+    Function Updatemerchantorderid(merchantId: string; orderId: string; aOrdersUpdateMerchantOrderIdRequest : TOrdersUpdateMerchantOrderIdRequest) : TOrdersUpdateMerchantOrderIdResponse;
+    Function Updateshipment(merchantId: string; orderId: string; aOrdersUpdateShipmentRequest : TOrdersUpdateShipmentRequest) : TOrdersUpdateShipmentResponse;
   end;
   
   
@@ -3075,6 +4877,7 @@ type
   //Optional query Options for TProductsResource, method List
   
   TProductsListOptions = Record
+    includeInvalidInsertedItems : boolean;
     maxResults : integer;
     pageToken : String;
   end;
@@ -3103,6 +4906,7 @@ type
   //Optional query Options for TProductstatusesResource, method List
   
   TProductstatusesListOptions = Record
+    includeInvalidInsertedItems : boolean;
     maxResults : integer;
     pageToken : String;
   end;
@@ -3131,6 +4935,7 @@ type
     FDatafeedsInstance : TDatafeedsResource;
     FDatafeedstatusesInstance : TDatafeedstatusesResource;
     FInventoryInstance : TInventoryResource;
+    FOrdersInstance : TOrdersResource;
     FProductsInstance : TProductsResource;
     FProductstatusesInstance : TProductstatusesResource;
     Function GetAccountsInstance : TAccountsResource;virtual;
@@ -3140,6 +4945,7 @@ type
     Function GetDatafeedsInstance : TDatafeedsResource;virtual;
     Function GetDatafeedstatusesInstance : TDatafeedstatusesResource;virtual;
     Function GetInventoryInstance : TInventoryResource;virtual;
+    Function GetOrdersInstance : TOrdersResource;virtual;
     Function GetProductsInstance : TProductsResource;virtual;
     Function GetProductstatusesInstance : TProductstatusesResource;virtual;
   Public
@@ -3179,6 +4985,8 @@ type
     Function CreateDatafeedstatusesResource : TDatafeedstatusesResource;virtual;overload;
     Function CreateInventoryResource(AOwner : TComponent) : TInventoryResource;virtual;overload;
     Function CreateInventoryResource : TInventoryResource;virtual;overload;
+    Function CreateOrdersResource(AOwner : TComponent) : TOrdersResource;virtual;overload;
+    Function CreateOrdersResource : TOrdersResource;virtual;overload;
     Function CreateProductsResource(AOwner : TComponent) : TProductsResource;virtual;overload;
     Function CreateProductsResource : TProductsResource;virtual;overload;
     Function CreateProductstatusesResource(AOwner : TComponent) : TProductstatusesResource;virtual;overload;
@@ -3191,6 +4999,7 @@ type
     Property DatafeedsResource : TDatafeedsResource Read GetDatafeedsInstance;
     Property DatafeedstatusesResource : TDatafeedstatusesResource Read GetDatafeedstatusesInstance;
     Property InventoryResource : TInventoryResource Read GetInventoryInstance;
+    Property OrdersResource : TOrdersResource Read GetOrdersInstance;
     Property ProductsResource : TProductsResource Read GetProductsInstance;
     Property ProductstatusesResource : TProductstatusesResource Read GetProductstatusesInstance;
   end;
@@ -3203,7 +5012,7 @@ implementation
   --------------------------------------------------------------------}
 
 
-Procedure TAccount.SetadultContent(AIndex : Integer; AValue : boolean); 
+Procedure TAccount.SetadultContent(AIndex : Integer; const AValue : boolean); 
 
 begin
   If (FadultContent=AValue) then exit;
@@ -3213,7 +5022,7 @@ end;
 
 
 
-Procedure TAccount.SetadwordsLinks(AIndex : Integer; AValue : TAccountTypeadwordsLinksArray); 
+Procedure TAccount.SetadwordsLinks(AIndex : Integer; const AValue : TAccountTypeadwordsLinksArray); 
 
 begin
   If (FadwordsLinks=AValue) then exit;
@@ -3273,7 +5082,7 @@ end;
 
 
 
-Procedure TAccount.Setusers(AIndex : Integer; AValue : TAccountTypeusersArray); 
+Procedure TAccount.Setusers(AIndex : Integer; const AValue : TAccountTypeusersArray); 
 
 begin
   If (Fusers=AValue) then exit;
@@ -3378,7 +5187,7 @@ end;
 
 
 
-Procedure TAccountShipping.SetcarrierRates(AIndex : Integer; AValue : TAccountShippingTypecarrierRatesArray); 
+Procedure TAccountShipping.SetcarrierRates(AIndex : Integer; const AValue : TAccountShippingTypecarrierRatesArray); 
 
 begin
   If (FcarrierRates=AValue) then exit;
@@ -3398,7 +5207,7 @@ end;
 
 
 
-Procedure TAccountShipping.SetlocationGroups(AIndex : Integer; AValue : TAccountShippingTypelocationGroupsArray); 
+Procedure TAccountShipping.SetlocationGroups(AIndex : Integer; const AValue : TAccountShippingTypelocationGroupsArray); 
 
 begin
   If (FlocationGroups=AValue) then exit;
@@ -3408,7 +5217,7 @@ end;
 
 
 
-Procedure TAccountShipping.SetrateTables(AIndex : Integer; AValue : TAccountShippingTyperateTablesArray); 
+Procedure TAccountShipping.SetrateTables(AIndex : Integer; const AValue : TAccountShippingTyperateTablesArray); 
 
 begin
   If (FrateTables=AValue) then exit;
@@ -3418,7 +5227,7 @@ end;
 
 
 
-Procedure TAccountShipping.Setservices(AIndex : Integer; AValue : TAccountShippingTypeservicesArray); 
+Procedure TAccountShipping.Setservices(AIndex : Integer; const AValue : TAccountShippingTypeservicesArray); 
 
 begin
   If (Fservices=AValue) then exit;
@@ -3471,7 +5280,7 @@ end;
 
 
 
-Procedure TAccountShippingCarrierRate.SetmodifierFlatRate(AIndex : Integer; AValue : TPrice); 
+Procedure TAccountShippingCarrierRate.SetmodifierFlatRate(AIndex : Integer; const AValue : TPrice); 
 
 begin
   If (FmodifierFlatRate=AValue) then exit;
@@ -3558,7 +5367,7 @@ end;
 
 
 
-Procedure TAccountShippingCondition.SetdeliveryPostalCodeRange(AIndex : Integer; AValue : TAccountShippingPostalCodeRange); 
+Procedure TAccountShippingCondition.SetdeliveryPostalCodeRange(AIndex : Integer; const AValue : TAccountShippingPostalCodeRange); 
 
 begin
   If (FdeliveryPostalCodeRange=AValue) then exit;
@@ -3568,7 +5377,7 @@ end;
 
 
 
-Procedure TAccountShippingCondition.SetpriceMax(AIndex : Integer; AValue : TPrice); 
+Procedure TAccountShippingCondition.SetpriceMax(AIndex : Integer; const AValue : TPrice); 
 
 begin
   If (FpriceMax=AValue) then exit;
@@ -3588,7 +5397,7 @@ end;
 
 
 
-Procedure TAccountShippingCondition.SetweightMax(AIndex : Integer; AValue : TWeight); 
+Procedure TAccountShippingCondition.SetweightMax(AIndex : Integer; const AValue : TWeight); 
 
 begin
   If (FweightMax=AValue) then exit;
@@ -3615,7 +5424,7 @@ end;
 
 
 
-Procedure TAccountShippingLocationGroup.SetlocationIds(AIndex : Integer; AValue : TStringArray); 
+Procedure TAccountShippingLocationGroup.SetlocationIds(AIndex : Integer; const AValue : TStringArray); 
 
 begin
   If (FlocationIds=AValue) then exit;
@@ -3635,7 +5444,7 @@ end;
 
 
 
-Procedure TAccountShippingLocationGroup.SetpostalCodeRanges(AIndex : Integer; AValue : TAccountShippingLocationGroupTypepostalCodeRangesArray); 
+Procedure TAccountShippingLocationGroup.SetpostalCodeRanges(AIndex : Integer; const AValue : TAccountShippingLocationGroupTypepostalCodeRangesArray); 
 
 begin
   If (FpostalCodeRanges=AValue) then exit;
@@ -3645,7 +5454,7 @@ end;
 
 
 
-Procedure TAccountShippingLocationGroup.SetpostalCodes(AIndex : Integer; AValue : TStringArray); 
+Procedure TAccountShippingLocationGroup.SetpostalCodes(AIndex : Integer; const AValue : TStringArray); 
 
 begin
   If (FpostalCodes=AValue) then exit;
@@ -3715,7 +5524,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TAccountShippingRateTable.Setcontent(AIndex : Integer; AValue : TAccountShippingRateTableTypecontentArray); 
+Procedure TAccountShippingRateTable.Setcontent(AIndex : Integer; const AValue : TAccountShippingRateTableTypecontentArray); 
 
 begin
   If (Fcontent=AValue) then exit;
@@ -3765,7 +5574,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TAccountShippingRateTableCell.Setcondition(AIndex : Integer; AValue : TAccountShippingCondition); 
+Procedure TAccountShippingRateTableCell.Setcondition(AIndex : Integer; const AValue : TAccountShippingCondition); 
 
 begin
   If (Fcondition=AValue) then exit;
@@ -3775,7 +5584,7 @@ end;
 
 
 
-Procedure TAccountShippingRateTableCell.Setrate(AIndex : Integer; AValue : TPrice); 
+Procedure TAccountShippingRateTableCell.Setrate(AIndex : Integer; const AValue : TPrice); 
 
 begin
   If (Frate=AValue) then exit;
@@ -3792,7 +5601,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TAccountShippingShippingService.Setactive(AIndex : Integer; AValue : boolean); 
+Procedure TAccountShippingShippingService.Setactive(AIndex : Integer; const AValue : boolean); 
 
 begin
   If (Factive=AValue) then exit;
@@ -3802,7 +5611,7 @@ end;
 
 
 
-Procedure TAccountShippingShippingService.SetcalculationMethod(AIndex : Integer; AValue : TAccountShippingShippingServiceCalculationMethod); 
+Procedure TAccountShippingShippingService.SetcalculationMethod(AIndex : Integer; const AValue : TAccountShippingShippingServiceCalculationMethod); 
 
 begin
   If (FcalculationMethod=AValue) then exit;
@@ -3812,7 +5621,7 @@ end;
 
 
 
-Procedure TAccountShippingShippingService.SetcostRuleTree(AIndex : Integer; AValue : TAccountShippingShippingServiceCostRule); 
+Procedure TAccountShippingShippingService.SetcostRuleTree(AIndex : Integer; const AValue : TAccountShippingShippingServiceCostRule); 
 
 begin
   If (FcostRuleTree=AValue) then exit;
@@ -3859,7 +5668,7 @@ end;
 
 
 
-Procedure TAccountShippingShippingServiceCalculationMethod.Setexcluded(AIndex : Integer; AValue : boolean); 
+Procedure TAccountShippingShippingServiceCalculationMethod.Setexcluded(AIndex : Integer; const AValue : boolean); 
 
 begin
   If (Fexcluded=AValue) then exit;
@@ -3869,7 +5678,7 @@ end;
 
 
 
-Procedure TAccountShippingShippingServiceCalculationMethod.SetflatRate(AIndex : Integer; AValue : TPrice); 
+Procedure TAccountShippingShippingServiceCalculationMethod.SetflatRate(AIndex : Integer; const AValue : TPrice); 
 
 begin
   If (FflatRate=AValue) then exit;
@@ -3906,7 +5715,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TAccountShippingShippingServiceCostRule.SetcalculationMethod(AIndex : Integer; AValue : TAccountShippingShippingServiceCalculationMethod); 
+Procedure TAccountShippingShippingServiceCostRule.SetcalculationMethod(AIndex : Integer; const AValue : TAccountShippingShippingServiceCalculationMethod); 
 
 begin
   If (FcalculationMethod=AValue) then exit;
@@ -3916,7 +5725,7 @@ end;
 
 
 
-Procedure TAccountShippingShippingServiceCostRule.Setchildren(AIndex : Integer; AValue : TAccountShippingShippingServiceCostRuleTypechildrenArray); 
+Procedure TAccountShippingShippingServiceCostRule.Setchildren(AIndex : Integer; const AValue : TAccountShippingShippingServiceCostRuleTypechildrenArray); 
 
 begin
   If (Fchildren=AValue) then exit;
@@ -3926,7 +5735,7 @@ end;
 
 
 
-Procedure TAccountShippingShippingServiceCostRule.Setcondition(AIndex : Integer; AValue : TAccountShippingCondition); 
+Procedure TAccountShippingShippingServiceCostRule.Setcondition(AIndex : Integer; const AValue : TAccountShippingCondition); 
 
 begin
   If (Fcondition=AValue) then exit;
@@ -3966,7 +5775,7 @@ end;
 
 
 
-Procedure TAccountStatus.SetdataQualityIssues(AIndex : Integer; AValue : TAccountStatusTypedataQualityIssuesArray); 
+Procedure TAccountStatus.SetdataQualityIssues(AIndex : Integer; const AValue : TAccountStatusTypedataQualityIssuesArray); 
 
 begin
   If (FdataQualityIssues=AValue) then exit;
@@ -4026,7 +5835,7 @@ end;
 
 
 
-Procedure TAccountStatusDataQualityIssue.SetexampleItems(AIndex : Integer; AValue : TAccountStatusDataQualityIssueTypeexampleItemsArray); 
+Procedure TAccountStatusDataQualityIssue.SetexampleItems(AIndex : Integer; const AValue : TAccountStatusDataQualityIssueTypeexampleItemsArray); 
 
 begin
   If (FexampleItems=AValue) then exit;
@@ -4056,7 +5865,7 @@ end;
 
 
 
-Procedure TAccountStatusDataQualityIssue.SetnumItems(AIndex : Integer; AValue : integer); 
+Procedure TAccountStatusDataQualityIssue.SetnumItems(AIndex : Integer; const AValue : integer); 
 
 begin
   If (FnumItems=AValue) then exit;
@@ -4183,7 +5992,7 @@ end;
 
 
 
-Procedure TAccountTax.Setrules(AIndex : Integer; AValue : TAccountTaxTyperulesArray); 
+Procedure TAccountTax.Setrules(AIndex : Integer; const AValue : TAccountTaxTyperulesArray); 
 
 begin
   If (Frules=AValue) then exit;
@@ -4243,7 +6052,7 @@ end;
 
 
 
-Procedure TAccountTaxTaxRule.SetshippingTaxed(AIndex : Integer; AValue : boolean); 
+Procedure TAccountTaxTaxRule.SetshippingTaxed(AIndex : Integer; const AValue : boolean); 
 
 begin
   If (FshippingTaxed=AValue) then exit;
@@ -4253,7 +6062,7 @@ end;
 
 
 
-Procedure TAccountTaxTaxRule.SetuseGlobalRate(AIndex : Integer; AValue : boolean); 
+Procedure TAccountTaxTaxRule.SetuseGlobalRate(AIndex : Integer; const AValue : boolean); 
 
 begin
   If (FuseGlobalRate=AValue) then exit;
@@ -4270,7 +6079,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TAccountUser.Setadmin(AIndex : Integer; AValue : boolean); 
+Procedure TAccountUser.Setadmin(AIndex : Integer; const AValue : boolean); 
 
 begin
   If (Fadmin=AValue) then exit;
@@ -4297,7 +6106,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TAccountsAuthInfoResponse.SetaccountIdentifiers(AIndex : Integer; AValue : TAccountsAuthInfoResponseTypeaccountIdentifiersArray); 
+Procedure TAccountsAuthInfoResponse.SetaccountIdentifiers(AIndex : Integer; const AValue : TAccountsAuthInfoResponseTypeaccountIdentifiersArray); 
 
 begin
   If (FaccountIdentifiers=AValue) then exit;
@@ -4337,7 +6146,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TAccountsCustomBatchRequest.Setentries(AIndex : Integer; AValue : TAccountsCustomBatchRequestTypeentriesArray); 
+Procedure TAccountsCustomBatchRequest.Setentries(AIndex : Integer; const AValue : TAccountsCustomBatchRequestTypeentriesArray); 
 
 begin
   If (Fentries=AValue) then exit;
@@ -4367,7 +6176,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TAccountsCustomBatchRequestEntry.Setaccount(AIndex : Integer; AValue : TAccount); 
+Procedure TAccountsCustomBatchRequestEntry.Setaccount(AIndex : Integer; const AValue : TAccount); 
 
 begin
   If (Faccount=AValue) then exit;
@@ -4387,7 +6196,7 @@ end;
 
 
 
-Procedure TAccountsCustomBatchRequestEntry.SetbatchId(AIndex : Integer; AValue : integer); 
+Procedure TAccountsCustomBatchRequestEntry.SetbatchId(AIndex : Integer; const AValue : integer); 
 
 begin
   If (FbatchId=AValue) then exit;
@@ -4424,7 +6233,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TAccountsCustomBatchResponse.Setentries(AIndex : Integer; AValue : TAccountsCustomBatchResponseTypeentriesArray); 
+Procedure TAccountsCustomBatchResponse.Setentries(AIndex : Integer; const AValue : TAccountsCustomBatchResponseTypeentriesArray); 
 
 begin
   If (Fentries=AValue) then exit;
@@ -4464,7 +6273,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TAccountsCustomBatchResponseEntry.Setaccount(AIndex : Integer; AValue : TAccount); 
+Procedure TAccountsCustomBatchResponseEntry.Setaccount(AIndex : Integer; const AValue : TAccount); 
 
 begin
   If (Faccount=AValue) then exit;
@@ -4474,7 +6283,7 @@ end;
 
 
 
-Procedure TAccountsCustomBatchResponseEntry.SetbatchId(AIndex : Integer; AValue : integer); 
+Procedure TAccountsCustomBatchResponseEntry.SetbatchId(AIndex : Integer; const AValue : integer); 
 
 begin
   If (FbatchId=AValue) then exit;
@@ -4484,7 +6293,7 @@ end;
 
 
 
-Procedure TAccountsCustomBatchResponseEntry.Seterrors(AIndex : Integer; AValue : TErrors); 
+Procedure TAccountsCustomBatchResponseEntry.Seterrors(AIndex : Integer; const AValue : TErrors); 
 
 begin
   If (Ferrors=AValue) then exit;
@@ -4531,7 +6340,7 @@ end;
 
 
 
-Procedure TAccountsListResponse.Setresources(AIndex : Integer; AValue : TAccountsListResponseTyperesourcesArray); 
+Procedure TAccountsListResponse.Setresources(AIndex : Integer; const AValue : TAccountsListResponseTyperesourcesArray); 
 
 begin
   If (Fresources=AValue) then exit;
@@ -4561,7 +6370,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TAccountshippingCustomBatchRequest.Setentries(AIndex : Integer; AValue : TAccountshippingCustomBatchRequestTypeentriesArray); 
+Procedure TAccountshippingCustomBatchRequest.Setentries(AIndex : Integer; const AValue : TAccountshippingCustomBatchRequestTypeentriesArray); 
 
 begin
   If (Fentries=AValue) then exit;
@@ -4601,7 +6410,7 @@ end;
 
 
 
-Procedure TAccountshippingCustomBatchRequestEntry.SetaccountShipping(AIndex : Integer; AValue : TAccountShipping); 
+Procedure TAccountshippingCustomBatchRequestEntry.SetaccountShipping(AIndex : Integer; const AValue : TAccountShipping); 
 
 begin
   If (FaccountShipping=AValue) then exit;
@@ -4611,7 +6420,7 @@ end;
 
 
 
-Procedure TAccountshippingCustomBatchRequestEntry.SetbatchId(AIndex : Integer; AValue : integer); 
+Procedure TAccountshippingCustomBatchRequestEntry.SetbatchId(AIndex : Integer; const AValue : integer); 
 
 begin
   If (FbatchId=AValue) then exit;
@@ -4648,7 +6457,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TAccountshippingCustomBatchResponse.Setentries(AIndex : Integer; AValue : TAccountshippingCustomBatchResponseTypeentriesArray); 
+Procedure TAccountshippingCustomBatchResponse.Setentries(AIndex : Integer; const AValue : TAccountshippingCustomBatchResponseTypeentriesArray); 
 
 begin
   If (Fentries=AValue) then exit;
@@ -4688,7 +6497,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TAccountshippingCustomBatchResponseEntry.SetaccountShipping(AIndex : Integer; AValue : TAccountShipping); 
+Procedure TAccountshippingCustomBatchResponseEntry.SetaccountShipping(AIndex : Integer; const AValue : TAccountShipping); 
 
 begin
   If (FaccountShipping=AValue) then exit;
@@ -4698,7 +6507,7 @@ end;
 
 
 
-Procedure TAccountshippingCustomBatchResponseEntry.SetbatchId(AIndex : Integer; AValue : integer); 
+Procedure TAccountshippingCustomBatchResponseEntry.SetbatchId(AIndex : Integer; const AValue : integer); 
 
 begin
   If (FbatchId=AValue) then exit;
@@ -4708,7 +6517,7 @@ end;
 
 
 
-Procedure TAccountshippingCustomBatchResponseEntry.Seterrors(AIndex : Integer; AValue : TErrors); 
+Procedure TAccountshippingCustomBatchResponseEntry.Seterrors(AIndex : Integer; const AValue : TErrors); 
 
 begin
   If (Ferrors=AValue) then exit;
@@ -4755,7 +6564,7 @@ end;
 
 
 
-Procedure TAccountshippingListResponse.Setresources(AIndex : Integer; AValue : TAccountshippingListResponseTyperesourcesArray); 
+Procedure TAccountshippingListResponse.Setresources(AIndex : Integer; const AValue : TAccountshippingListResponseTyperesourcesArray); 
 
 begin
   If (Fresources=AValue) then exit;
@@ -4785,7 +6594,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TAccountstatusesCustomBatchRequest.Setentries(AIndex : Integer; AValue : TAccountstatusesCustomBatchRequestTypeentriesArray); 
+Procedure TAccountstatusesCustomBatchRequest.Setentries(AIndex : Integer; const AValue : TAccountstatusesCustomBatchRequestTypeentriesArray); 
 
 begin
   If (Fentries=AValue) then exit;
@@ -4825,7 +6634,7 @@ end;
 
 
 
-Procedure TAccountstatusesCustomBatchRequestEntry.SetbatchId(AIndex : Integer; AValue : integer); 
+Procedure TAccountstatusesCustomBatchRequestEntry.SetbatchId(AIndex : Integer; const AValue : integer); 
 
 begin
   If (FbatchId=AValue) then exit;
@@ -4862,7 +6671,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TAccountstatusesCustomBatchResponse.Setentries(AIndex : Integer; AValue : TAccountstatusesCustomBatchResponseTypeentriesArray); 
+Procedure TAccountstatusesCustomBatchResponse.Setentries(AIndex : Integer; const AValue : TAccountstatusesCustomBatchResponseTypeentriesArray); 
 
 begin
   If (Fentries=AValue) then exit;
@@ -4902,7 +6711,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TAccountstatusesCustomBatchResponseEntry.SetaccountStatus(AIndex : Integer; AValue : TAccountStatus); 
+Procedure TAccountstatusesCustomBatchResponseEntry.SetaccountStatus(AIndex : Integer; const AValue : TAccountStatus); 
 
 begin
   If (FaccountStatus=AValue) then exit;
@@ -4912,7 +6721,7 @@ end;
 
 
 
-Procedure TAccountstatusesCustomBatchResponseEntry.SetbatchId(AIndex : Integer; AValue : integer); 
+Procedure TAccountstatusesCustomBatchResponseEntry.SetbatchId(AIndex : Integer; const AValue : integer); 
 
 begin
   If (FbatchId=AValue) then exit;
@@ -4922,7 +6731,7 @@ end;
 
 
 
-Procedure TAccountstatusesCustomBatchResponseEntry.Seterrors(AIndex : Integer; AValue : TErrors); 
+Procedure TAccountstatusesCustomBatchResponseEntry.Seterrors(AIndex : Integer; const AValue : TErrors); 
 
 begin
   If (Ferrors=AValue) then exit;
@@ -4959,7 +6768,7 @@ end;
 
 
 
-Procedure TAccountstatusesListResponse.Setresources(AIndex : Integer; AValue : TAccountstatusesListResponseTyperesourcesArray); 
+Procedure TAccountstatusesListResponse.Setresources(AIndex : Integer; const AValue : TAccountstatusesListResponseTyperesourcesArray); 
 
 begin
   If (Fresources=AValue) then exit;
@@ -4989,7 +6798,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TAccounttaxCustomBatchRequest.Setentries(AIndex : Integer; AValue : TAccounttaxCustomBatchRequestTypeentriesArray); 
+Procedure TAccounttaxCustomBatchRequest.Setentries(AIndex : Integer; const AValue : TAccounttaxCustomBatchRequestTypeentriesArray); 
 
 begin
   If (Fentries=AValue) then exit;
@@ -5029,7 +6838,7 @@ end;
 
 
 
-Procedure TAccounttaxCustomBatchRequestEntry.SetaccountTax(AIndex : Integer; AValue : TAccountTax); 
+Procedure TAccounttaxCustomBatchRequestEntry.SetaccountTax(AIndex : Integer; const AValue : TAccountTax); 
 
 begin
   If (FaccountTax=AValue) then exit;
@@ -5039,7 +6848,7 @@ end;
 
 
 
-Procedure TAccounttaxCustomBatchRequestEntry.SetbatchId(AIndex : Integer; AValue : integer); 
+Procedure TAccounttaxCustomBatchRequestEntry.SetbatchId(AIndex : Integer; const AValue : integer); 
 
 begin
   If (FbatchId=AValue) then exit;
@@ -5076,7 +6885,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TAccounttaxCustomBatchResponse.Setentries(AIndex : Integer; AValue : TAccounttaxCustomBatchResponseTypeentriesArray); 
+Procedure TAccounttaxCustomBatchResponse.Setentries(AIndex : Integer; const AValue : TAccounttaxCustomBatchResponseTypeentriesArray); 
 
 begin
   If (Fentries=AValue) then exit;
@@ -5116,7 +6925,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TAccounttaxCustomBatchResponseEntry.SetaccountTax(AIndex : Integer; AValue : TAccountTax); 
+Procedure TAccounttaxCustomBatchResponseEntry.SetaccountTax(AIndex : Integer; const AValue : TAccountTax); 
 
 begin
   If (FaccountTax=AValue) then exit;
@@ -5126,7 +6935,7 @@ end;
 
 
 
-Procedure TAccounttaxCustomBatchResponseEntry.SetbatchId(AIndex : Integer; AValue : integer); 
+Procedure TAccounttaxCustomBatchResponseEntry.SetbatchId(AIndex : Integer; const AValue : integer); 
 
 begin
   If (FbatchId=AValue) then exit;
@@ -5136,7 +6945,7 @@ end;
 
 
 
-Procedure TAccounttaxCustomBatchResponseEntry.Seterrors(AIndex : Integer; AValue : TErrors); 
+Procedure TAccounttaxCustomBatchResponseEntry.Seterrors(AIndex : Integer; const AValue : TErrors); 
 
 begin
   If (Ferrors=AValue) then exit;
@@ -5183,7 +6992,7 @@ end;
 
 
 
-Procedure TAccounttaxListResponse.Setresources(AIndex : Integer; AValue : TAccounttaxListResponseTyperesourcesArray); 
+Procedure TAccounttaxListResponse.Setresources(AIndex : Integer; const AValue : TAccounttaxListResponseTyperesourcesArray); 
 
 begin
   If (Fresources=AValue) then exit;
@@ -5243,7 +7052,7 @@ end;
 
 
 
-Procedure TDatafeed.SetfetchSchedule(AIndex : Integer; AValue : TDatafeedFetchSchedule); 
+Procedure TDatafeed.SetfetchSchedule(AIndex : Integer; const AValue : TDatafeedFetchSchedule); 
 
 begin
   If (FfetchSchedule=AValue) then exit;
@@ -5263,7 +7072,7 @@ end;
 
 
 
-Procedure TDatafeed.Setformat(AIndex : Integer; AValue : TDatafeedFormat); 
+Procedure TDatafeed.Setformat(AIndex : Integer; const AValue : TDatafeedFormat); 
 
 begin
   If (Fformat=AValue) then exit;
@@ -5283,7 +7092,7 @@ end;
 
 
 
-Procedure TDatafeed.SetintendedDestinations(AIndex : Integer; AValue : TStringArray); 
+Procedure TDatafeed.SetintendedDestinations(AIndex : Integer; const AValue : TStringArray); 
 
 begin
   If (FintendedDestinations=AValue) then exit;
@@ -5343,7 +7152,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TDatafeedFetchSchedule.SetdayOfMonth(AIndex : Integer; AValue : integer); 
+Procedure TDatafeedFetchSchedule.SetdayOfMonth(AIndex : Integer; const AValue : integer); 
 
 begin
   If (FdayOfMonth=AValue) then exit;
@@ -5363,7 +7172,7 @@ end;
 
 
 
-Procedure TDatafeedFetchSchedule.Sethour(AIndex : Integer; AValue : integer); 
+Procedure TDatafeedFetchSchedule.Sethour(AIndex : Integer; const AValue : integer); 
 
 begin
   If (Fhour=AValue) then exit;
@@ -5373,6 +7182,16 @@ end;
 
 
 
+Procedure TDatafeedFetchSchedule.SetminuteOfHour(AIndex : Integer; const AValue : integer); 
+
+begin
+  If (FminuteOfHour=AValue) then exit;
+  FminuteOfHour:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
 Procedure TDatafeedFetchSchedule.Setpassword(AIndex : Integer; const AValue : String); 
 
 begin
@@ -5467,7 +7286,7 @@ end;
 
 
 
-Procedure TDatafeedStatus.Seterrors(AIndex : Integer; AValue : TDatafeedStatusTypeerrorsArray); 
+Procedure TDatafeedStatus.Seterrors(AIndex : Integer; const AValue : TDatafeedStatusTypeerrorsArray); 
 
 begin
   If (Ferrors=AValue) then exit;
@@ -5527,7 +7346,7 @@ end;
 
 
 
-Procedure TDatafeedStatus.Setwarnings(AIndex : Integer; AValue : TDatafeedStatusTypewarningsArray); 
+Procedure TDatafeedStatus.Setwarnings(AIndex : Integer; const AValue : TDatafeedStatusTypewarningsArray); 
 
 begin
   If (Fwarnings=AValue) then exit;
@@ -5578,7 +7397,7 @@ end;
 
 
 
-Procedure TDatafeedStatusError.Setexamples(AIndex : Integer; AValue : TDatafeedStatusErrorTypeexamplesArray); 
+Procedure TDatafeedStatusError.Setexamples(AIndex : Integer; const AValue : TDatafeedStatusErrorTypeexamplesArray); 
 
 begin
   If (Fexamples=AValue) then exit;
@@ -5655,7 +7474,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TDatafeedsCustomBatchRequest.Setentries(AIndex : Integer; AValue : TDatafeedsCustomBatchRequestTypeentriesArray); 
+Procedure TDatafeedsCustomBatchRequest.Setentries(AIndex : Integer; const AValue : TDatafeedsCustomBatchRequestTypeentriesArray); 
 
 begin
   If (Fentries=AValue) then exit;
@@ -5685,7 +7504,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TDatafeedsCustomBatchRequestEntry.SetbatchId(AIndex : Integer; AValue : integer); 
+Procedure TDatafeedsCustomBatchRequestEntry.SetbatchId(AIndex : Integer; const AValue : integer); 
 
 begin
   If (FbatchId=AValue) then exit;
@@ -5695,7 +7514,7 @@ end;
 
 
 
-Procedure TDatafeedsCustomBatchRequestEntry.Setdatafeed(AIndex : Integer; AValue : TDatafeed); 
+Procedure TDatafeedsCustomBatchRequestEntry.Setdatafeed(AIndex : Integer; const AValue : TDatafeed); 
 
 begin
   If (Fdatafeed=AValue) then exit;
@@ -5742,7 +7561,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TDatafeedsCustomBatchResponse.Setentries(AIndex : Integer; AValue : TDatafeedsCustomBatchResponseTypeentriesArray); 
+Procedure TDatafeedsCustomBatchResponse.Setentries(AIndex : Integer; const AValue : TDatafeedsCustomBatchResponseTypeentriesArray); 
 
 begin
   If (Fentries=AValue) then exit;
@@ -5782,7 +7601,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TDatafeedsCustomBatchResponseEntry.SetbatchId(AIndex : Integer; AValue : integer); 
+Procedure TDatafeedsCustomBatchResponseEntry.SetbatchId(AIndex : Integer; const AValue : integer); 
 
 begin
   If (FbatchId=AValue) then exit;
@@ -5792,7 +7611,7 @@ end;
 
 
 
-Procedure TDatafeedsCustomBatchResponseEntry.Setdatafeed(AIndex : Integer; AValue : TDatafeed); 
+Procedure TDatafeedsCustomBatchResponseEntry.Setdatafeed(AIndex : Integer; const AValue : TDatafeed); 
 
 begin
   If (Fdatafeed=AValue) then exit;
@@ -5802,7 +7621,7 @@ end;
 
 
 
-Procedure TDatafeedsCustomBatchResponseEntry.Seterrors(AIndex : Integer; AValue : TErrors); 
+Procedure TDatafeedsCustomBatchResponseEntry.Seterrors(AIndex : Integer; const AValue : TErrors); 
 
 begin
   If (Ferrors=AValue) then exit;
@@ -5839,7 +7658,7 @@ end;
 
 
 
-Procedure TDatafeedsListResponse.Setresources(AIndex : Integer; AValue : TDatafeedsListResponseTyperesourcesArray); 
+Procedure TDatafeedsListResponse.Setresources(AIndex : Integer; const AValue : TDatafeedsListResponseTyperesourcesArray); 
 
 begin
   If (Fresources=AValue) then exit;
@@ -5869,7 +7688,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TDatafeedstatusesCustomBatchRequest.Setentries(AIndex : Integer; AValue : TDatafeedstatusesCustomBatchRequestTypeentriesArray); 
+Procedure TDatafeedstatusesCustomBatchRequest.Setentries(AIndex : Integer; const AValue : TDatafeedstatusesCustomBatchRequestTypeentriesArray); 
 
 begin
   If (Fentries=AValue) then exit;
@@ -5899,7 +7718,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TDatafeedstatusesCustomBatchRequestEntry.SetbatchId(AIndex : Integer; AValue : integer); 
+Procedure TDatafeedstatusesCustomBatchRequestEntry.SetbatchId(AIndex : Integer; const AValue : integer); 
 
 begin
   If (FbatchId=AValue) then exit;
@@ -5946,7 +7765,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TDatafeedstatusesCustomBatchResponse.Setentries(AIndex : Integer; AValue : TDatafeedstatusesCustomBatchResponseTypeentriesArray); 
+Procedure TDatafeedstatusesCustomBatchResponse.Setentries(AIndex : Integer; const AValue : TDatafeedstatusesCustomBatchResponseTypeentriesArray); 
 
 begin
   If (Fentries=AValue) then exit;
@@ -5986,7 +7805,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TDatafeedstatusesCustomBatchResponseEntry.SetbatchId(AIndex : Integer; AValue : integer); 
+Procedure TDatafeedstatusesCustomBatchResponseEntry.SetbatchId(AIndex : Integer; const AValue : integer); 
 
 begin
   If (FbatchId=AValue) then exit;
@@ -5996,7 +7815,7 @@ end;
 
 
 
-Procedure TDatafeedstatusesCustomBatchResponseEntry.SetdatafeedStatus(AIndex : Integer; AValue : TDatafeedStatus); 
+Procedure TDatafeedstatusesCustomBatchResponseEntry.SetdatafeedStatus(AIndex : Integer; const AValue : TDatafeedStatus); 
 
 begin
   If (FdatafeedStatus=AValue) then exit;
@@ -6006,7 +7825,7 @@ end;
 
 
 
-Procedure TDatafeedstatusesCustomBatchResponseEntry.Seterrors(AIndex : Integer; AValue : TErrors); 
+Procedure TDatafeedstatusesCustomBatchResponseEntry.Seterrors(AIndex : Integer; const AValue : TErrors); 
 
 begin
   If (Ferrors=AValue) then exit;
@@ -6043,7 +7862,7 @@ end;
 
 
 
-Procedure TDatafeedstatusesListResponse.Setresources(AIndex : Integer; AValue : TDatafeedstatusesListResponseTyperesourcesArray); 
+Procedure TDatafeedstatusesListResponse.Setresources(AIndex : Integer; const AValue : TDatafeedstatusesListResponseTyperesourcesArray); 
 
 begin
   If (Fresources=AValue) then exit;
@@ -6110,7 +7929,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TErrors.Setcode(AIndex : Integer; AValue : integer); 
+Procedure TErrors.Setcode(AIndex : Integer; const AValue : integer); 
 
 begin
   If (Fcode=AValue) then exit;
@@ -6120,7 +7939,7 @@ end;
 
 
 
-Procedure TErrors.Seterrors(AIndex : Integer; AValue : TErrorsTypeerrorsArray); 
+Procedure TErrors.Seterrors(AIndex : Integer; const AValue : TErrorsTypeerrorsArray); 
 
 begin
   If (Ferrors=AValue) then exit;
@@ -6156,6 +7975,33 @@ end;
 
 
 { --------------------------------------------------------------------
+  TInstallment
+  --------------------------------------------------------------------}
+
+
+Procedure TInstallment.Setamount(AIndex : Integer; const AValue : TPrice); 
+
+begin
+  If (Famount=AValue) then exit;
+  Famount:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TInstallment.Setmonths(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fmonths=AValue) then exit;
+  Fmonths:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
   TInventory
   --------------------------------------------------------------------}
 
@@ -6170,6 +8016,16 @@ end;
 
 
 
+Procedure TInventory.Setinstallment(AIndex : Integer; const AValue : TInstallment); 
+
+begin
+  If (Finstallment=AValue) then exit;
+  Finstallment:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
 Procedure TInventory.Setkind(AIndex : Integer; const AValue : String); 
 
 begin
@@ -6180,7 +8036,17 @@ end;
 
 
 
-Procedure TInventory.Setprice(AIndex : Integer; AValue : TPrice); 
+Procedure TInventory.SetloyaltyPoints(AIndex : Integer; const AValue : TLoyaltyPoints); 
+
+begin
+  If (FloyaltyPoints=AValue) then exit;
+  FloyaltyPoints:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TInventory.Setprice(AIndex : Integer; const AValue : TPrice); 
 
 begin
   If (Fprice=AValue) then exit;
@@ -6190,7 +8056,7 @@ end;
 
 
 
-Procedure TInventory.Setquantity(AIndex : Integer; AValue : integer); 
+Procedure TInventory.Setquantity(AIndex : Integer; const AValue : integer); 
 
 begin
   If (Fquantity=AValue) then exit;
@@ -6200,7 +8066,7 @@ end;
 
 
 
-Procedure TInventory.SetsalePrice(AIndex : Integer; AValue : TPrice); 
+Procedure TInventory.SetsalePrice(AIndex : Integer; const AValue : TPrice); 
 
 begin
   If (FsalePrice=AValue) then exit;
@@ -6220,6 +8086,16 @@ end;
 
 
 
+Procedure TInventory.SetsellOnGoogleQuantity(AIndex : Integer; const AValue : integer); 
+
+begin
+  If (FsellOnGoogleQuantity=AValue) then exit;
+  FsellOnGoogleQuantity:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
 
 
 { --------------------------------------------------------------------
@@ -6227,7 +8103,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TInventoryCustomBatchRequest.Setentries(AIndex : Integer; AValue : TInventoryCustomBatchRequestTypeentriesArray); 
+Procedure TInventoryCustomBatchRequest.Setentries(AIndex : Integer; const AValue : TInventoryCustomBatchRequestTypeentriesArray); 
 
 begin
   If (Fentries=AValue) then exit;
@@ -6257,7 +8133,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TInventoryCustomBatchRequestEntry.SetbatchId(AIndex : Integer; AValue : integer); 
+Procedure TInventoryCustomBatchRequestEntry.SetbatchId(AIndex : Integer; const AValue : integer); 
 
 begin
   If (FbatchId=AValue) then exit;
@@ -6267,7 +8143,7 @@ end;
 
 
 
-Procedure TInventoryCustomBatchRequestEntry.Setinventory(AIndex : Integer; AValue : TInventory); 
+Procedure TInventoryCustomBatchRequestEntry.Setinventory(AIndex : Integer; const AValue : TInventory); 
 
 begin
   If (Finventory=AValue) then exit;
@@ -6314,7 +8190,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TInventoryCustomBatchResponse.Setentries(AIndex : Integer; AValue : TInventoryCustomBatchResponseTypeentriesArray); 
+Procedure TInventoryCustomBatchResponse.Setentries(AIndex : Integer; const AValue : TInventoryCustomBatchResponseTypeentriesArray); 
 
 begin
   If (Fentries=AValue) then exit;
@@ -6354,7 +8230,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TInventoryCustomBatchResponseEntry.SetbatchId(AIndex : Integer; AValue : integer); 
+Procedure TInventoryCustomBatchResponseEntry.SetbatchId(AIndex : Integer; const AValue : integer); 
 
 begin
   If (FbatchId=AValue) then exit;
@@ -6364,7 +8240,7 @@ end;
 
 
 
-Procedure TInventoryCustomBatchResponseEntry.Seterrors(AIndex : Integer; AValue : TErrors); 
+Procedure TInventoryCustomBatchResponseEntry.Seterrors(AIndex : Integer; const AValue : TErrors); 
 
 begin
   If (Ferrors=AValue) then exit;
@@ -6401,7 +8277,27 @@ end;
 
 
 
-Procedure TInventorySetRequest.Setprice(AIndex : Integer; AValue : TPrice); 
+Procedure TInventorySetRequest.Setinstallment(AIndex : Integer; const AValue : TInstallment); 
+
+begin
+  If (Finstallment=AValue) then exit;
+  Finstallment:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TInventorySetRequest.SetloyaltyPoints(AIndex : Integer; const AValue : TLoyaltyPoints); 
+
+begin
+  If (FloyaltyPoints=AValue) then exit;
+  FloyaltyPoints:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TInventorySetRequest.Setprice(AIndex : Integer; const AValue : TPrice); 
 
 begin
   If (Fprice=AValue) then exit;
@@ -6411,7 +8307,7 @@ end;
 
 
 
-Procedure TInventorySetRequest.Setquantity(AIndex : Integer; AValue : integer); 
+Procedure TInventorySetRequest.Setquantity(AIndex : Integer; const AValue : integer); 
 
 begin
   If (Fquantity=AValue) then exit;
@@ -6421,7 +8317,7 @@ end;
 
 
 
-Procedure TInventorySetRequest.SetsalePrice(AIndex : Integer; AValue : TPrice); 
+Procedure TInventorySetRequest.SetsalePrice(AIndex : Integer; const AValue : TPrice); 
 
 begin
   If (FsalePrice=AValue) then exit;
@@ -6441,6 +8337,16 @@ end;
 
 
 
+Procedure TInventorySetRequest.SetsellOnGoogleQuantity(AIndex : Integer; const AValue : integer); 
+
+begin
+  If (FsellOnGoogleQuantity=AValue) then exit;
+  FsellOnGoogleQuantity:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
 
 
 { --------------------------------------------------------------------
@@ -6485,7 +8391,7 @@ end;
 
 
 
-Procedure TLoyaltyPoints.Setratio(AIndex : Integer; AValue : double); 
+Procedure TLoyaltyPoints.Setratio(AIndex : Integer; const AValue : double); 
 
 begin
   If (Fratio=AValue) then exit;
@@ -6498,6 +8404,2699 @@ end;
 
 
 { --------------------------------------------------------------------
+  TOrder
+  --------------------------------------------------------------------}
+
+
+Procedure TOrder.Setacknowledged(AIndex : Integer; const AValue : boolean); 
+
+begin
+  If (Facknowledged=AValue) then exit;
+  Facknowledged:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrder.Setcustomer(AIndex : Integer; const AValue : TOrderCustomer); 
+
+begin
+  If (Fcustomer=AValue) then exit;
+  Fcustomer:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrder.SetdeliveryDetails(AIndex : Integer; const AValue : TOrderDeliveryDetails); 
+
+begin
+  If (FdeliveryDetails=AValue) then exit;
+  FdeliveryDetails:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrder.Setid(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fid=AValue) then exit;
+  Fid:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrder.Setkind(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fkind=AValue) then exit;
+  Fkind:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrder.SetlineItems(AIndex : Integer; const AValue : TOrderTypelineItemsArray); 
+
+begin
+  If (FlineItems=AValue) then exit;
+  FlineItems:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrder.SetmerchantId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FmerchantId=AValue) then exit;
+  FmerchantId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrder.SetmerchantOrderId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FmerchantOrderId=AValue) then exit;
+  FmerchantOrderId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrder.SetnetAmount(AIndex : Integer; const AValue : TPrice); 
+
+begin
+  If (FnetAmount=AValue) then exit;
+  FnetAmount:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrder.SetpaymentMethod(AIndex : Integer; const AValue : TOrderPaymentMethod); 
+
+begin
+  If (FpaymentMethod=AValue) then exit;
+  FpaymentMethod:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrder.SetpaymentStatus(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FpaymentStatus=AValue) then exit;
+  FpaymentStatus:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrder.SetplacedDate(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FplacedDate=AValue) then exit;
+  FplacedDate:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrder.Setpromotions(AIndex : Integer; const AValue : TOrderTypepromotionsArray); 
+
+begin
+  If (Fpromotions=AValue) then exit;
+  Fpromotions:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrder.Setrefunds(AIndex : Integer; const AValue : TOrderTyperefundsArray); 
+
+begin
+  If (Frefunds=AValue) then exit;
+  Frefunds:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrder.Setshipments(AIndex : Integer; const AValue : TOrderTypeshipmentsArray); 
+
+begin
+  If (Fshipments=AValue) then exit;
+  Fshipments:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrder.SetshippingCost(AIndex : Integer; const AValue : TPrice); 
+
+begin
+  If (FshippingCost=AValue) then exit;
+  FshippingCost:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrder.SetshippingCostTax(AIndex : Integer; const AValue : TPrice); 
+
+begin
+  If (FshippingCostTax=AValue) then exit;
+  FshippingCostTax:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrder.SetshippingOption(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FshippingOption=AValue) then exit;
+  FshippingOption:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrder.Setstatus(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fstatus=AValue) then exit;
+  Fstatus:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+//2.6.4. bug workaround
+{$IFDEF VER2_6}
+Procedure TOrder.SetArrayLength(Const AName : String; ALength : Longint); 
+
+begin
+  Case AName of
+  'lineitems' : SetLength(FlineItems,ALength);
+  'promotions' : SetLength(Fpromotions,ALength);
+  'refunds' : SetLength(Frefunds,ALength);
+  'shipments' : SetLength(Fshipments,ALength);
+  else
+    Inherited SetArrayLength(AName,ALength);
+  end;
+end;
+{$ENDIF VER2_6}
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrderAddress
+  --------------------------------------------------------------------}
+
+
+Procedure TOrderAddress.Setcountry(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fcountry=AValue) then exit;
+  Fcountry:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderAddress.SetfullAddress(AIndex : Integer; const AValue : TStringArray); 
+
+begin
+  If (FfullAddress=AValue) then exit;
+  FfullAddress:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderAddress.SetisPostOfficeBox(AIndex : Integer; const AValue : boolean); 
+
+begin
+  If (FisPostOfficeBox=AValue) then exit;
+  FisPostOfficeBox:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderAddress.Setlocality(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Flocality=AValue) then exit;
+  Flocality:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderAddress.SetpostalCode(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FpostalCode=AValue) then exit;
+  FpostalCode:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderAddress.SetrecipientName(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FrecipientName=AValue) then exit;
+  FrecipientName:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderAddress.Setregion(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fregion=AValue) then exit;
+  Fregion:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderAddress.SetstreetAddress(AIndex : Integer; const AValue : TStringArray); 
+
+begin
+  If (FstreetAddress=AValue) then exit;
+  FstreetAddress:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+//2.6.4. bug workaround
+{$IFDEF VER2_6}
+Procedure TOrderAddress.SetArrayLength(Const AName : String; ALength : Longint); 
+
+begin
+  Case AName of
+  'fulladdress' : SetLength(FfullAddress,ALength);
+  'streetaddress' : SetLength(FstreetAddress,ALength);
+  else
+    Inherited SetArrayLength(AName,ALength);
+  end;
+end;
+{$ENDIF VER2_6}
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrderCancellation
+  --------------------------------------------------------------------}
+
+
+Procedure TOrderCancellation.Setactor(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Factor=AValue) then exit;
+  Factor:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderCancellation.SetcreationDate(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FcreationDate=AValue) then exit;
+  FcreationDate:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderCancellation.Setquantity(AIndex : Integer; const AValue : integer); 
+
+begin
+  If (Fquantity=AValue) then exit;
+  Fquantity:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderCancellation.Setreason(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Freason=AValue) then exit;
+  Freason:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderCancellation.SetreasonText(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FreasonText=AValue) then exit;
+  FreasonText:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrderCustomer
+  --------------------------------------------------------------------}
+
+
+Procedure TOrderCustomer.Setemail(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Femail=AValue) then exit;
+  Femail:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderCustomer.SetexplicitMarketingPreference(AIndex : Integer; const AValue : boolean); 
+
+begin
+  If (FexplicitMarketingPreference=AValue) then exit;
+  FexplicitMarketingPreference:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderCustomer.SetfullName(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FfullName=AValue) then exit;
+  FfullName:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrderDeliveryDetails
+  --------------------------------------------------------------------}
+
+
+Procedure TOrderDeliveryDetails.Setaddress(AIndex : Integer; const AValue : TOrderAddress); 
+
+begin
+  If (Faddress=AValue) then exit;
+  Faddress:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderDeliveryDetails.SetphoneNumber(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FphoneNumber=AValue) then exit;
+  FphoneNumber:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrderLineItem
+  --------------------------------------------------------------------}
+
+
+Procedure TOrderLineItem.Setcancellations(AIndex : Integer; const AValue : TOrderLineItemTypecancellationsArray); 
+
+begin
+  If (Fcancellations=AValue) then exit;
+  Fcancellations:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItem.Setid(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fid=AValue) then exit;
+  Fid:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItem.Setprice(AIndex : Integer; const AValue : TPrice); 
+
+begin
+  If (Fprice=AValue) then exit;
+  Fprice:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItem.Setproduct(AIndex : Integer; const AValue : TOrderLineItemProduct); 
+
+begin
+  If (Fproduct=AValue) then exit;
+  Fproduct:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItem.SetquantityCanceled(AIndex : Integer; const AValue : integer); 
+
+begin
+  If (FquantityCanceled=AValue) then exit;
+  FquantityCanceled:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItem.SetquantityDelivered(AIndex : Integer; const AValue : integer); 
+
+begin
+  If (FquantityDelivered=AValue) then exit;
+  FquantityDelivered:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItem.SetquantityOrdered(AIndex : Integer; const AValue : integer); 
+
+begin
+  If (FquantityOrdered=AValue) then exit;
+  FquantityOrdered:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItem.SetquantityPending(AIndex : Integer; const AValue : integer); 
+
+begin
+  If (FquantityPending=AValue) then exit;
+  FquantityPending:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItem.SetquantityReturned(AIndex : Integer; const AValue : integer); 
+
+begin
+  If (FquantityReturned=AValue) then exit;
+  FquantityReturned:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItem.SetquantityShipped(AIndex : Integer; const AValue : integer); 
+
+begin
+  If (FquantityShipped=AValue) then exit;
+  FquantityShipped:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItem.SetreturnInfo(AIndex : Integer; const AValue : TOrderLineItemReturnInfo); 
+
+begin
+  If (FreturnInfo=AValue) then exit;
+  FreturnInfo:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItem.Setreturns(AIndex : Integer; const AValue : TOrderLineItemTypereturnsArray); 
+
+begin
+  If (Freturns=AValue) then exit;
+  Freturns:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItem.SetshippingDetails(AIndex : Integer; const AValue : TOrderLineItemShippingDetails); 
+
+begin
+  If (FshippingDetails=AValue) then exit;
+  FshippingDetails:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItem.Settax(AIndex : Integer; const AValue : TPrice); 
+
+begin
+  If (Ftax=AValue) then exit;
+  Ftax:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+//2.6.4. bug workaround
+{$IFDEF VER2_6}
+Procedure TOrderLineItem.SetArrayLength(Const AName : String; ALength : Longint); 
+
+begin
+  Case AName of
+  'cancellations' : SetLength(Fcancellations,ALength);
+  'returns' : SetLength(Freturns,ALength);
+  else
+    Inherited SetArrayLength(AName,ALength);
+  end;
+end;
+{$ENDIF VER2_6}
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrderLineItemProduct
+  --------------------------------------------------------------------}
+
+
+Procedure TOrderLineItemProduct.Setbrand(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fbrand=AValue) then exit;
+  Fbrand:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItemProduct.Setchannel(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fchannel=AValue) then exit;
+  Fchannel:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItemProduct.Setcondition(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fcondition=AValue) then exit;
+  Fcondition:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItemProduct.SetcontentLanguage(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FcontentLanguage=AValue) then exit;
+  FcontentLanguage:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItemProduct.Setgtin(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fgtin=AValue) then exit;
+  Fgtin:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItemProduct.Setid(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fid=AValue) then exit;
+  Fid:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItemProduct.SetimageLink(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FimageLink=AValue) then exit;
+  FimageLink:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItemProduct.SetitemGroupId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FitemGroupId=AValue) then exit;
+  FitemGroupId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItemProduct.Setmpn(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fmpn=AValue) then exit;
+  Fmpn:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItemProduct.SetofferId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FofferId=AValue) then exit;
+  FofferId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItemProduct.Setprice(AIndex : Integer; const AValue : TPrice); 
+
+begin
+  If (Fprice=AValue) then exit;
+  Fprice:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItemProduct.SetshownImage(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FshownImage=AValue) then exit;
+  FshownImage:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItemProduct.SettargetCountry(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FtargetCountry=AValue) then exit;
+  FtargetCountry:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItemProduct.Settitle(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Ftitle=AValue) then exit;
+  Ftitle:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItemProduct.SetvariantAttributes(AIndex : Integer; const AValue : TOrderLineItemProductTypevariantAttributesArray); 
+
+begin
+  If (FvariantAttributes=AValue) then exit;
+  FvariantAttributes:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+//2.6.4. bug workaround
+{$IFDEF VER2_6}
+Procedure TOrderLineItemProduct.SetArrayLength(Const AName : String; ALength : Longint); 
+
+begin
+  Case AName of
+  'variantattributes' : SetLength(FvariantAttributes,ALength);
+  else
+    Inherited SetArrayLength(AName,ALength);
+  end;
+end;
+{$ENDIF VER2_6}
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrderLineItemProductVariantAttribute
+  --------------------------------------------------------------------}
+
+
+Procedure TOrderLineItemProductVariantAttribute.Setdimension(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fdimension=AValue) then exit;
+  Fdimension:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItemProductVariantAttribute.Setvalue(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fvalue=AValue) then exit;
+  Fvalue:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrderLineItemReturnInfo
+  --------------------------------------------------------------------}
+
+
+Procedure TOrderLineItemReturnInfo.SetdaysToReturn(AIndex : Integer; const AValue : integer); 
+
+begin
+  If (FdaysToReturn=AValue) then exit;
+  FdaysToReturn:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItemReturnInfo.SetisReturnable(AIndex : Integer; const AValue : boolean); 
+
+begin
+  If (FisReturnable=AValue) then exit;
+  FisReturnable:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItemReturnInfo.SetpolicyUrl(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FpolicyUrl=AValue) then exit;
+  FpolicyUrl:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrderLineItemShippingDetails
+  --------------------------------------------------------------------}
+
+
+Procedure TOrderLineItemShippingDetails.SetdeliverByDate(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FdeliverByDate=AValue) then exit;
+  FdeliverByDate:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItemShippingDetails.Setmethod(AIndex : Integer; const AValue : TOrderLineItemShippingDetailsMethod); 
+
+begin
+  If (Fmethod=AValue) then exit;
+  Fmethod:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItemShippingDetails.SetshipByDate(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FshipByDate=AValue) then exit;
+  FshipByDate:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrderLineItemShippingDetailsMethod
+  --------------------------------------------------------------------}
+
+
+Procedure TOrderLineItemShippingDetailsMethod.Setcarrier(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fcarrier=AValue) then exit;
+  Fcarrier:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItemShippingDetailsMethod.SetmaxDaysInTransit(AIndex : Integer; const AValue : integer); 
+
+begin
+  If (FmaxDaysInTransit=AValue) then exit;
+  FmaxDaysInTransit:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItemShippingDetailsMethod.SetmethodName(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FmethodName=AValue) then exit;
+  FmethodName:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderLineItemShippingDetailsMethod.SetminDaysInTransit(AIndex : Integer; const AValue : integer); 
+
+begin
+  If (FminDaysInTransit=AValue) then exit;
+  FminDaysInTransit:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrderPaymentMethod
+  --------------------------------------------------------------------}
+
+
+Procedure TOrderPaymentMethod.SetbillingAddress(AIndex : Integer; const AValue : TOrderAddress); 
+
+begin
+  If (FbillingAddress=AValue) then exit;
+  FbillingAddress:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderPaymentMethod.SetexpirationMonth(AIndex : Integer; const AValue : integer); 
+
+begin
+  If (FexpirationMonth=AValue) then exit;
+  FexpirationMonth:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderPaymentMethod.SetexpirationYear(AIndex : Integer; const AValue : integer); 
+
+begin
+  If (FexpirationYear=AValue) then exit;
+  FexpirationYear:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderPaymentMethod.SetlastFourDigits(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FlastFourDigits=AValue) then exit;
+  FlastFourDigits:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderPaymentMethod.SetphoneNumber(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FphoneNumber=AValue) then exit;
+  FphoneNumber:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderPaymentMethod.Set_type(AIndex : Integer; const AValue : String); 
+
+begin
+  If (F_type=AValue) then exit;
+  F_type:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Class Function TOrderPaymentMethod.ExportPropertyName(Const AName : String) :String;
+
+begin
+  Case AName of
+  '_type' : Result:='type';
+  else
+    Result:=Inherited ExportPropertyName(AName);
+  end;
+end;
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrderPromotion
+  --------------------------------------------------------------------}
+
+
+Procedure TOrderPromotion.Setbenefits(AIndex : Integer; const AValue : TOrderPromotionTypebenefitsArray); 
+
+begin
+  If (Fbenefits=AValue) then exit;
+  Fbenefits:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderPromotion.SeteffectiveDates(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FeffectiveDates=AValue) then exit;
+  FeffectiveDates:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderPromotion.SetgenericRedemptionCode(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FgenericRedemptionCode=AValue) then exit;
+  FgenericRedemptionCode:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderPromotion.Setid(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fid=AValue) then exit;
+  Fid:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderPromotion.SetlongTitle(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FlongTitle=AValue) then exit;
+  FlongTitle:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderPromotion.SetproductApplicability(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FproductApplicability=AValue) then exit;
+  FproductApplicability:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderPromotion.SetredemptionChannel(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FredemptionChannel=AValue) then exit;
+  FredemptionChannel:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+//2.6.4. bug workaround
+{$IFDEF VER2_6}
+Procedure TOrderPromotion.SetArrayLength(Const AName : String; ALength : Longint); 
+
+begin
+  Case AName of
+  'benefits' : SetLength(Fbenefits,ALength);
+  else
+    Inherited SetArrayLength(AName,ALength);
+  end;
+end;
+{$ENDIF VER2_6}
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrderPromotionBenefit
+  --------------------------------------------------------------------}
+
+
+Procedure TOrderPromotionBenefit.Setdiscount(AIndex : Integer; const AValue : TPrice); 
+
+begin
+  If (Fdiscount=AValue) then exit;
+  Fdiscount:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderPromotionBenefit.SetofferIds(AIndex : Integer; const AValue : TStringArray); 
+
+begin
+  If (FofferIds=AValue) then exit;
+  FofferIds:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderPromotionBenefit.SetsubType(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FsubType=AValue) then exit;
+  FsubType:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderPromotionBenefit.SettaxImpact(AIndex : Integer; const AValue : TPrice); 
+
+begin
+  If (FtaxImpact=AValue) then exit;
+  FtaxImpact:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderPromotionBenefit.Set_type(AIndex : Integer; const AValue : String); 
+
+begin
+  If (F_type=AValue) then exit;
+  F_type:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Class Function TOrderPromotionBenefit.ExportPropertyName(Const AName : String) :String;
+
+begin
+  Case AName of
+  '_type' : Result:='type';
+  else
+    Result:=Inherited ExportPropertyName(AName);
+  end;
+end;
+
+//2.6.4. bug workaround
+{$IFDEF VER2_6}
+Procedure TOrderPromotionBenefit.SetArrayLength(Const AName : String; ALength : Longint); 
+
+begin
+  Case AName of
+  'offerids' : SetLength(FofferIds,ALength);
+  else
+    Inherited SetArrayLength(AName,ALength);
+  end;
+end;
+{$ENDIF VER2_6}
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrderRefund
+  --------------------------------------------------------------------}
+
+
+Procedure TOrderRefund.Setactor(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Factor=AValue) then exit;
+  Factor:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderRefund.Setamount(AIndex : Integer; const AValue : TPrice); 
+
+begin
+  If (Famount=AValue) then exit;
+  Famount:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderRefund.SetcreationDate(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FcreationDate=AValue) then exit;
+  FcreationDate:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderRefund.Setreason(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Freason=AValue) then exit;
+  Freason:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderRefund.SetreasonText(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FreasonText=AValue) then exit;
+  FreasonText:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrderReturn
+  --------------------------------------------------------------------}
+
+
+Procedure TOrderReturn.Setactor(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Factor=AValue) then exit;
+  Factor:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderReturn.SetcreationDate(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FcreationDate=AValue) then exit;
+  FcreationDate:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderReturn.Setquantity(AIndex : Integer; const AValue : integer); 
+
+begin
+  If (Fquantity=AValue) then exit;
+  Fquantity:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderReturn.Setreason(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Freason=AValue) then exit;
+  Freason:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderReturn.SetreasonText(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FreasonText=AValue) then exit;
+  FreasonText:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrderShipment
+  --------------------------------------------------------------------}
+
+
+Procedure TOrderShipment.Setcarrier(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fcarrier=AValue) then exit;
+  Fcarrier:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderShipment.SetcreationDate(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FcreationDate=AValue) then exit;
+  FcreationDate:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderShipment.SetdeliveryDate(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FdeliveryDate=AValue) then exit;
+  FdeliveryDate:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderShipment.Setid(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fid=AValue) then exit;
+  Fid:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderShipment.SetlineItems(AIndex : Integer; const AValue : TOrderShipmentTypelineItemsArray); 
+
+begin
+  If (FlineItems=AValue) then exit;
+  FlineItems:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderShipment.Setstatus(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fstatus=AValue) then exit;
+  Fstatus:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderShipment.SettrackingId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FtrackingId=AValue) then exit;
+  FtrackingId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+//2.6.4. bug workaround
+{$IFDEF VER2_6}
+Procedure TOrderShipment.SetArrayLength(Const AName : String; ALength : Longint); 
+
+begin
+  Case AName of
+  'lineitems' : SetLength(FlineItems,ALength);
+  else
+    Inherited SetArrayLength(AName,ALength);
+  end;
+end;
+{$ENDIF VER2_6}
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrderShipmentLineItemShipment
+  --------------------------------------------------------------------}
+
+
+Procedure TOrderShipmentLineItemShipment.SetlineItemId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FlineItemId=AValue) then exit;
+  FlineItemId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrderShipmentLineItemShipment.Setquantity(AIndex : Integer; const AValue : integer); 
+
+begin
+  If (Fquantity=AValue) then exit;
+  Fquantity:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersAcknowledgeRequest
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersAcknowledgeRequest.SetoperationId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FoperationId=AValue) then exit;
+  FoperationId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersAcknowledgeResponse
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersAcknowledgeResponse.SetexecutionStatus(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FexecutionStatus=AValue) then exit;
+  FexecutionStatus:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersAcknowledgeResponse.Setkind(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fkind=AValue) then exit;
+  Fkind:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersAdvanceTestOrderResponse
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersAdvanceTestOrderResponse.Setkind(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fkind=AValue) then exit;
+  Fkind:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersCancelLineItemRequest
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersCancelLineItemRequest.Setamount(AIndex : Integer; const AValue : TPrice); 
+
+begin
+  If (Famount=AValue) then exit;
+  Famount:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCancelLineItemRequest.SetlineItemId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FlineItemId=AValue) then exit;
+  FlineItemId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCancelLineItemRequest.SetoperationId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FoperationId=AValue) then exit;
+  FoperationId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCancelLineItemRequest.Setquantity(AIndex : Integer; const AValue : integer); 
+
+begin
+  If (Fquantity=AValue) then exit;
+  Fquantity:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCancelLineItemRequest.Setreason(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Freason=AValue) then exit;
+  Freason:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCancelLineItemRequest.SetreasonText(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FreasonText=AValue) then exit;
+  FreasonText:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersCancelLineItemResponse
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersCancelLineItemResponse.SetexecutionStatus(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FexecutionStatus=AValue) then exit;
+  FexecutionStatus:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCancelLineItemResponse.Setkind(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fkind=AValue) then exit;
+  Fkind:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersCancelRequest
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersCancelRequest.SetoperationId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FoperationId=AValue) then exit;
+  FoperationId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCancelRequest.Setreason(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Freason=AValue) then exit;
+  Freason:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCancelRequest.SetreasonText(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FreasonText=AValue) then exit;
+  FreasonText:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersCancelResponse
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersCancelResponse.SetexecutionStatus(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FexecutionStatus=AValue) then exit;
+  FexecutionStatus:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCancelResponse.Setkind(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fkind=AValue) then exit;
+  Fkind:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersCreateTestOrderRequest
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersCreateTestOrderRequest.SettemplateName(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FtemplateName=AValue) then exit;
+  FtemplateName:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCreateTestOrderRequest.SettestOrder(AIndex : Integer; const AValue : TTestOrder); 
+
+begin
+  If (FtestOrder=AValue) then exit;
+  FtestOrder:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersCreateTestOrderResponse
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersCreateTestOrderResponse.Setkind(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fkind=AValue) then exit;
+  Fkind:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCreateTestOrderResponse.SetorderId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (ForderId=AValue) then exit;
+  ForderId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersCustomBatchRequest
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersCustomBatchRequest.Setentries(AIndex : Integer; const AValue : TOrdersCustomBatchRequestTypeentriesArray); 
+
+begin
+  If (Fentries=AValue) then exit;
+  Fentries:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+//2.6.4. bug workaround
+{$IFDEF VER2_6}
+Procedure TOrdersCustomBatchRequest.SetArrayLength(Const AName : String; ALength : Longint); 
+
+begin
+  Case AName of
+  'entries' : SetLength(Fentries,ALength);
+  else
+    Inherited SetArrayLength(AName,ALength);
+  end;
+end;
+{$ENDIF VER2_6}
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersCustomBatchRequestEntry
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersCustomBatchRequestEntry.SetbatchId(AIndex : Integer; const AValue : integer); 
+
+begin
+  If (FbatchId=AValue) then exit;
+  FbatchId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntry.Setcancel(AIndex : Integer; const AValue : TOrdersCustomBatchRequestEntryCancel); 
+
+begin
+  If (Fcancel=AValue) then exit;
+  Fcancel:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntry.SetcancelLineItem(AIndex : Integer; const AValue : TOrdersCustomBatchRequestEntryCancelLineItem); 
+
+begin
+  If (FcancelLineItem=AValue) then exit;
+  FcancelLineItem:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntry.SetmerchantId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FmerchantId=AValue) then exit;
+  FmerchantId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntry.SetmerchantOrderId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FmerchantOrderId=AValue) then exit;
+  FmerchantOrderId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntry.Setmethod(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fmethod=AValue) then exit;
+  Fmethod:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntry.SetoperationId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FoperationId=AValue) then exit;
+  FoperationId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntry.SetorderId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (ForderId=AValue) then exit;
+  ForderId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntry.Setrefund(AIndex : Integer; const AValue : TOrdersCustomBatchRequestEntryRefund); 
+
+begin
+  If (Frefund=AValue) then exit;
+  Frefund:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntry.SetreturnLineItem(AIndex : Integer; const AValue : TOrdersCustomBatchRequestEntryReturnLineItem); 
+
+begin
+  If (FreturnLineItem=AValue) then exit;
+  FreturnLineItem:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntry.SetshipLineItems(AIndex : Integer; const AValue : TOrdersCustomBatchRequestEntryShipLineItems); 
+
+begin
+  If (FshipLineItems=AValue) then exit;
+  FshipLineItems:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntry.SetupdateShipment(AIndex : Integer; const AValue : TOrdersCustomBatchRequestEntryUpdateShipment); 
+
+begin
+  If (FupdateShipment=AValue) then exit;
+  FupdateShipment:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersCustomBatchRequestEntryCancel
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersCustomBatchRequestEntryCancel.Setreason(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Freason=AValue) then exit;
+  Freason:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntryCancel.SetreasonText(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FreasonText=AValue) then exit;
+  FreasonText:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersCustomBatchRequestEntryCancelLineItem
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersCustomBatchRequestEntryCancelLineItem.Setamount(AIndex : Integer; const AValue : TPrice); 
+
+begin
+  If (Famount=AValue) then exit;
+  Famount:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntryCancelLineItem.SetlineItemId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FlineItemId=AValue) then exit;
+  FlineItemId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntryCancelLineItem.Setquantity(AIndex : Integer; const AValue : integer); 
+
+begin
+  If (Fquantity=AValue) then exit;
+  Fquantity:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntryCancelLineItem.Setreason(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Freason=AValue) then exit;
+  Freason:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntryCancelLineItem.SetreasonText(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FreasonText=AValue) then exit;
+  FreasonText:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersCustomBatchRequestEntryRefund
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersCustomBatchRequestEntryRefund.Setamount(AIndex : Integer; const AValue : TPrice); 
+
+begin
+  If (Famount=AValue) then exit;
+  Famount:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntryRefund.Setreason(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Freason=AValue) then exit;
+  Freason:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntryRefund.SetreasonText(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FreasonText=AValue) then exit;
+  FreasonText:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersCustomBatchRequestEntryReturnLineItem
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersCustomBatchRequestEntryReturnLineItem.SetlineItemId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FlineItemId=AValue) then exit;
+  FlineItemId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntryReturnLineItem.Setquantity(AIndex : Integer; const AValue : integer); 
+
+begin
+  If (Fquantity=AValue) then exit;
+  Fquantity:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntryReturnLineItem.Setreason(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Freason=AValue) then exit;
+  Freason:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntryReturnLineItem.SetreasonText(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FreasonText=AValue) then exit;
+  FreasonText:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersCustomBatchRequestEntryShipLineItems
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersCustomBatchRequestEntryShipLineItems.Setcarrier(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fcarrier=AValue) then exit;
+  Fcarrier:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntryShipLineItems.SetlineItems(AIndex : Integer; const AValue : TOrdersCustomBatchRequestEntryShipLineItemsTypelineItemsArray); 
+
+begin
+  If (FlineItems=AValue) then exit;
+  FlineItems:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntryShipLineItems.SetshipmentId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FshipmentId=AValue) then exit;
+  FshipmentId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntryShipLineItems.SettrackingId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FtrackingId=AValue) then exit;
+  FtrackingId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+//2.6.4. bug workaround
+{$IFDEF VER2_6}
+Procedure TOrdersCustomBatchRequestEntryShipLineItems.SetArrayLength(Const AName : String; ALength : Longint); 
+
+begin
+  Case AName of
+  'lineitems' : SetLength(FlineItems,ALength);
+  else
+    Inherited SetArrayLength(AName,ALength);
+  end;
+end;
+{$ENDIF VER2_6}
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersCustomBatchRequestEntryUpdateShipment
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersCustomBatchRequestEntryUpdateShipment.Setcarrier(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fcarrier=AValue) then exit;
+  Fcarrier:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntryUpdateShipment.SetshipmentId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FshipmentId=AValue) then exit;
+  FshipmentId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntryUpdateShipment.Setstatus(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fstatus=AValue) then exit;
+  Fstatus:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchRequestEntryUpdateShipment.SettrackingId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FtrackingId=AValue) then exit;
+  FtrackingId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersCustomBatchResponse
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersCustomBatchResponse.Setentries(AIndex : Integer; const AValue : TOrdersCustomBatchResponseTypeentriesArray); 
+
+begin
+  If (Fentries=AValue) then exit;
+  Fentries:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchResponse.Setkind(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fkind=AValue) then exit;
+  Fkind:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+//2.6.4. bug workaround
+{$IFDEF VER2_6}
+Procedure TOrdersCustomBatchResponse.SetArrayLength(Const AName : String; ALength : Longint); 
+
+begin
+  Case AName of
+  'entries' : SetLength(Fentries,ALength);
+  else
+    Inherited SetArrayLength(AName,ALength);
+  end;
+end;
+{$ENDIF VER2_6}
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersCustomBatchResponseEntry
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersCustomBatchResponseEntry.SetbatchId(AIndex : Integer; const AValue : integer); 
+
+begin
+  If (FbatchId=AValue) then exit;
+  FbatchId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchResponseEntry.Seterrors(AIndex : Integer; const AValue : TErrors); 
+
+begin
+  If (Ferrors=AValue) then exit;
+  Ferrors:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchResponseEntry.SetexecutionStatus(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FexecutionStatus=AValue) then exit;
+  FexecutionStatus:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchResponseEntry.Setkind(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fkind=AValue) then exit;
+  Fkind:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersCustomBatchResponseEntry.Setorder(AIndex : Integer; const AValue : TOrder); 
+
+begin
+  If (Forder=AValue) then exit;
+  Forder:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersGetByMerchantOrderIdResponse
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersGetByMerchantOrderIdResponse.Setkind(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fkind=AValue) then exit;
+  Fkind:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersGetByMerchantOrderIdResponse.Setorder(AIndex : Integer; const AValue : TOrder); 
+
+begin
+  If (Forder=AValue) then exit;
+  Forder:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersGetTestOrderTemplateResponse
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersGetTestOrderTemplateResponse.Setkind(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fkind=AValue) then exit;
+  Fkind:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersGetTestOrderTemplateResponse.Settemplate(AIndex : Integer; const AValue : TTestOrder); 
+
+begin
+  If (Ftemplate=AValue) then exit;
+  Ftemplate:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersListResponse
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersListResponse.Setkind(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fkind=AValue) then exit;
+  Fkind:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersListResponse.SetnextPageToken(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FnextPageToken=AValue) then exit;
+  FnextPageToken:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersListResponse.Setresources(AIndex : Integer; const AValue : TOrdersListResponseTyperesourcesArray); 
+
+begin
+  If (Fresources=AValue) then exit;
+  Fresources:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+//2.6.4. bug workaround
+{$IFDEF VER2_6}
+Procedure TOrdersListResponse.SetArrayLength(Const AName : String; ALength : Longint); 
+
+begin
+  Case AName of
+  'resources' : SetLength(Fresources,ALength);
+  else
+    Inherited SetArrayLength(AName,ALength);
+  end;
+end;
+{$ENDIF VER2_6}
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersRefundRequest
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersRefundRequest.Setamount(AIndex : Integer; const AValue : TPrice); 
+
+begin
+  If (Famount=AValue) then exit;
+  Famount:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersRefundRequest.SetoperationId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FoperationId=AValue) then exit;
+  FoperationId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersRefundRequest.Setreason(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Freason=AValue) then exit;
+  Freason:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersRefundRequest.SetreasonText(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FreasonText=AValue) then exit;
+  FreasonText:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersRefundResponse
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersRefundResponse.SetexecutionStatus(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FexecutionStatus=AValue) then exit;
+  FexecutionStatus:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersRefundResponse.Setkind(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fkind=AValue) then exit;
+  Fkind:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersReturnLineItemRequest
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersReturnLineItemRequest.SetlineItemId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FlineItemId=AValue) then exit;
+  FlineItemId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersReturnLineItemRequest.SetoperationId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FoperationId=AValue) then exit;
+  FoperationId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersReturnLineItemRequest.Setquantity(AIndex : Integer; const AValue : integer); 
+
+begin
+  If (Fquantity=AValue) then exit;
+  Fquantity:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersReturnLineItemRequest.Setreason(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Freason=AValue) then exit;
+  Freason:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersReturnLineItemRequest.SetreasonText(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FreasonText=AValue) then exit;
+  FreasonText:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersReturnLineItemResponse
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersReturnLineItemResponse.SetexecutionStatus(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FexecutionStatus=AValue) then exit;
+  FexecutionStatus:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersReturnLineItemResponse.Setkind(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fkind=AValue) then exit;
+  Fkind:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersShipLineItemsRequest
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersShipLineItemsRequest.Setcarrier(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fcarrier=AValue) then exit;
+  Fcarrier:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersShipLineItemsRequest.SetlineItems(AIndex : Integer; const AValue : TOrdersShipLineItemsRequestTypelineItemsArray); 
+
+begin
+  If (FlineItems=AValue) then exit;
+  FlineItems:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersShipLineItemsRequest.SetoperationId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FoperationId=AValue) then exit;
+  FoperationId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersShipLineItemsRequest.SetshipmentId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FshipmentId=AValue) then exit;
+  FshipmentId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersShipLineItemsRequest.SettrackingId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FtrackingId=AValue) then exit;
+  FtrackingId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+//2.6.4. bug workaround
+{$IFDEF VER2_6}
+Procedure TOrdersShipLineItemsRequest.SetArrayLength(Const AName : String; ALength : Longint); 
+
+begin
+  Case AName of
+  'lineitems' : SetLength(FlineItems,ALength);
+  else
+    Inherited SetArrayLength(AName,ALength);
+  end;
+end;
+{$ENDIF VER2_6}
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersShipLineItemsResponse
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersShipLineItemsResponse.SetexecutionStatus(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FexecutionStatus=AValue) then exit;
+  FexecutionStatus:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersShipLineItemsResponse.Setkind(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fkind=AValue) then exit;
+  Fkind:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersUpdateMerchantOrderIdRequest
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersUpdateMerchantOrderIdRequest.SetmerchantOrderId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FmerchantOrderId=AValue) then exit;
+  FmerchantOrderId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersUpdateMerchantOrderIdRequest.SetoperationId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FoperationId=AValue) then exit;
+  FoperationId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersUpdateMerchantOrderIdResponse
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersUpdateMerchantOrderIdResponse.SetexecutionStatus(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FexecutionStatus=AValue) then exit;
+  FexecutionStatus:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersUpdateMerchantOrderIdResponse.Setkind(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fkind=AValue) then exit;
+  Fkind:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersUpdateShipmentRequest
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersUpdateShipmentRequest.Setcarrier(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fcarrier=AValue) then exit;
+  Fcarrier:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersUpdateShipmentRequest.SetoperationId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FoperationId=AValue) then exit;
+  FoperationId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersUpdateShipmentRequest.SetshipmentId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FshipmentId=AValue) then exit;
+  FshipmentId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersUpdateShipmentRequest.Setstatus(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fstatus=AValue) then exit;
+  Fstatus:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersUpdateShipmentRequest.SettrackingId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FtrackingId=AValue) then exit;
+  FtrackingId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersUpdateShipmentResponse
+  --------------------------------------------------------------------}
+
+
+Procedure TOrdersUpdateShipmentResponse.SetexecutionStatus(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FexecutionStatus=AValue) then exit;
+  FexecutionStatus:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TOrdersUpdateShipmentResponse.Setkind(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fkind=AValue) then exit;
+  Fkind:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
   TPrice
   --------------------------------------------------------------------}
 
@@ -6529,7 +11128,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TProduct.SetadditionalImageLinks(AIndex : Integer; AValue : TStringArray); 
+Procedure TProduct.SetadditionalImageLinks(AIndex : Integer; const AValue : TStringArray); 
 
 begin
   If (FadditionalImageLinks=AValue) then exit;
@@ -6539,7 +11138,7 @@ end;
 
 
 
-Procedure TProduct.Setadult(AIndex : Integer; AValue : boolean); 
+Procedure TProduct.Setadult(AIndex : Integer; const AValue : boolean); 
 
 begin
   If (Fadult=AValue) then exit;
@@ -6559,7 +11158,7 @@ end;
 
 
 
-Procedure TProduct.SetadwordsLabels(AIndex : Integer; AValue : TStringArray); 
+Procedure TProduct.SetadwordsLabels(AIndex : Integer; const AValue : TStringArray); 
 
 begin
   If (FadwordsLabels=AValue) then exit;
@@ -6589,7 +11188,7 @@ end;
 
 
 
-Procedure TProduct.Setaspects(AIndex : Integer; AValue : TProductTypeaspectsArray); 
+Procedure TProduct.Setaspects(AIndex : Integer; const AValue : TProductTypeaspectsArray); 
 
 begin
   If (Faspects=AValue) then exit;
@@ -6669,7 +11268,7 @@ end;
 
 
 
-Procedure TProduct.SetcustomAttributes(AIndex : Integer; AValue : TProductTypecustomAttributesArray); 
+Procedure TProduct.SetcustomAttributes(AIndex : Integer; const AValue : TProductTypecustomAttributesArray); 
 
 begin
   If (FcustomAttributes=AValue) then exit;
@@ -6679,7 +11278,7 @@ end;
 
 
 
-Procedure TProduct.SetcustomGroups(AIndex : Integer; AValue : TProductTypecustomGroupsArray); 
+Procedure TProduct.SetcustomGroups(AIndex : Integer; const AValue : TProductTypecustomGroupsArray); 
 
 begin
   If (FcustomGroups=AValue) then exit;
@@ -6749,7 +11348,7 @@ end;
 
 
 
-Procedure TProduct.Setdestinations(AIndex : Integer; AValue : TProductTypedestinationsArray); 
+Procedure TProduct.Setdestinations(AIndex : Integer; const AValue : TProductTypedestinationsArray); 
 
 begin
   If (Fdestinations=AValue) then exit;
@@ -6779,7 +11378,7 @@ end;
 
 
 
-Procedure TProduct.SetdisplayAdsSimilarIds(AIndex : Integer; AValue : TStringArray); 
+Procedure TProduct.SetdisplayAdsSimilarIds(AIndex : Integer; const AValue : TStringArray); 
 
 begin
   If (FdisplayAdsSimilarIds=AValue) then exit;
@@ -6799,7 +11398,7 @@ end;
 
 
 
-Procedure TProduct.SetdisplayAdsValue(AIndex : Integer; AValue : double); 
+Procedure TProduct.SetdisplayAdsValue(AIndex : Integer; const AValue : double); 
 
 begin
   If (FdisplayAdsValue=AValue) then exit;
@@ -6869,7 +11468,7 @@ end;
 
 
 
-Procedure TProduct.SetidentifierExists(AIndex : Integer; AValue : boolean); 
+Procedure TProduct.SetidentifierExists(AIndex : Integer; const AValue : boolean); 
 
 begin
   If (FidentifierExists=AValue) then exit;
@@ -6889,7 +11488,7 @@ end;
 
 
 
-Procedure TProduct.Setinstallment(AIndex : Integer; AValue : TProductInstallment); 
+Procedure TProduct.Setinstallment(AIndex : Integer; const AValue : TInstallment); 
 
 begin
   If (Finstallment=AValue) then exit;
@@ -6899,7 +11498,7 @@ end;
 
 
 
-Procedure TProduct.SetisBundle(AIndex : Integer; AValue : boolean); 
+Procedure TProduct.SetisBundle(AIndex : Integer; const AValue : boolean); 
 
 begin
   If (FisBundle=AValue) then exit;
@@ -6939,7 +11538,7 @@ end;
 
 
 
-Procedure TProduct.SetloyaltyPoints(AIndex : Integer; AValue : TLoyaltyPoints); 
+Procedure TProduct.SetloyaltyPoints(AIndex : Integer; const AValue : TLoyaltyPoints); 
 
 begin
   If (FloyaltyPoints=AValue) then exit;
@@ -6999,7 +11598,7 @@ end;
 
 
 
-Procedure TProduct.SetonlineOnly(AIndex : Integer; AValue : boolean); 
+Procedure TProduct.SetonlineOnly(AIndex : Integer; const AValue : boolean); 
 
 begin
   If (FonlineOnly=AValue) then exit;
@@ -7019,7 +11618,7 @@ end;
 
 
 
-Procedure TProduct.Setprice(AIndex : Integer; AValue : TPrice); 
+Procedure TProduct.Setprice(AIndex : Integer; const AValue : TPrice); 
 
 begin
   If (Fprice=AValue) then exit;
@@ -7039,7 +11638,17 @@ end;
 
 
 
-Procedure TProduct.SetsalePrice(AIndex : Integer; AValue : TPrice); 
+Procedure TProduct.SetpromotionIds(AIndex : Integer; const AValue : TStringArray); 
+
+begin
+  If (FpromotionIds=AValue) then exit;
+  FpromotionIds:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TProduct.SetsalePrice(AIndex : Integer; const AValue : TPrice); 
 
 begin
   If (FsalePrice=AValue) then exit;
@@ -7059,7 +11668,17 @@ end;
 
 
 
-Procedure TProduct.Setshipping(AIndex : Integer; AValue : TProductTypeshippingArray); 
+Procedure TProduct.SetsellOnGoogleQuantity(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FsellOnGoogleQuantity=AValue) then exit;
+  FsellOnGoogleQuantity:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TProduct.Setshipping(AIndex : Integer; const AValue : TProductTypeshippingArray); 
 
 begin
   If (Fshipping=AValue) then exit;
@@ -7069,7 +11688,7 @@ end;
 
 
 
-Procedure TProduct.SetshippingHeight(AIndex : Integer; AValue : TProductShippingDimension); 
+Procedure TProduct.SetshippingHeight(AIndex : Integer; const AValue : TProductShippingDimension); 
 
 begin
   If (FshippingHeight=AValue) then exit;
@@ -7089,7 +11708,7 @@ end;
 
 
 
-Procedure TProduct.SetshippingLength(AIndex : Integer; AValue : TProductShippingDimension); 
+Procedure TProduct.SetshippingLength(AIndex : Integer; const AValue : TProductShippingDimension); 
 
 begin
   If (FshippingLength=AValue) then exit;
@@ -7099,7 +11718,7 @@ end;
 
 
 
-Procedure TProduct.SetshippingWeight(AIndex : Integer; AValue : TProductShippingWeight); 
+Procedure TProduct.SetshippingWeight(AIndex : Integer; const AValue : TProductShippingWeight); 
 
 begin
   If (FshippingWeight=AValue) then exit;
@@ -7109,7 +11728,7 @@ end;
 
 
 
-Procedure TProduct.SetshippingWidth(AIndex : Integer; AValue : TProductShippingDimension); 
+Procedure TProduct.SetshippingWidth(AIndex : Integer; const AValue : TProductShippingDimension); 
 
 begin
   If (FshippingWidth=AValue) then exit;
@@ -7139,7 +11758,7 @@ end;
 
 
 
-Procedure TProduct.Setsizes(AIndex : Integer; AValue : TStringArray); 
+Procedure TProduct.Setsizes(AIndex : Integer; const AValue : TStringArray); 
 
 begin
   If (Fsizes=AValue) then exit;
@@ -7159,7 +11778,7 @@ end;
 
 
 
-Procedure TProduct.Settaxes(AIndex : Integer; AValue : TProductTypetaxesArray); 
+Procedure TProduct.Settaxes(AIndex : Integer; const AValue : TProductTypetaxesArray); 
 
 begin
   If (Ftaxes=AValue) then exit;
@@ -7179,7 +11798,7 @@ end;
 
 
 
-Procedure TProduct.SetunitPricingBaseMeasure(AIndex : Integer; AValue : TProductUnitPricingBaseMeasure); 
+Procedure TProduct.SetunitPricingBaseMeasure(AIndex : Integer; const AValue : TProductUnitPricingBaseMeasure); 
 
 begin
   If (FunitPricingBaseMeasure=AValue) then exit;
@@ -7189,7 +11808,7 @@ end;
 
 
 
-Procedure TProduct.SetunitPricingMeasure(AIndex : Integer; AValue : TProductUnitPricingMeasure); 
+Procedure TProduct.SetunitPricingMeasure(AIndex : Integer; const AValue : TProductUnitPricingMeasure); 
 
 begin
   If (FunitPricingMeasure=AValue) then exit;
@@ -7199,7 +11818,7 @@ end;
 
 
 
-Procedure TProduct.SetvalidatedDestinations(AIndex : Integer; AValue : TStringArray); 
+Procedure TProduct.SetvalidatedDestinations(AIndex : Integer; const AValue : TStringArray); 
 
 begin
   If (FvalidatedDestinations=AValue) then exit;
@@ -7209,7 +11828,7 @@ end;
 
 
 
-Procedure TProduct.Setwarnings(AIndex : Integer; AValue : TProductTypewarningsArray); 
+Procedure TProduct.Setwarnings(AIndex : Integer; const AValue : TProductTypewarningsArray); 
 
 begin
   If (Fwarnings=AValue) then exit;
@@ -7231,6 +11850,7 @@ begin
   'customgroups' : SetLength(FcustomGroups,ALength);
   'destinations' : SetLength(Fdestinations,ALength);
   'displayadssimilarids' : SetLength(FdisplayAdsSimilarIds,ALength);
+  'promotionids' : SetLength(FpromotionIds,ALength);
   'shipping' : SetLength(Fshipping,ALength);
   'sizes' : SetLength(Fsizes,ALength);
   'taxes' : SetLength(Ftaxes,ALength);
@@ -7346,7 +11966,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TProductCustomGroup.Setattributes(AIndex : Integer; AValue : TProductCustomGroupTypeattributesArray); 
+Procedure TProductCustomGroup.Setattributes(AIndex : Integer; const AValue : TProductCustomGroupTypeattributesArray); 
 
 begin
   If (Fattributes=AValue) then exit;
@@ -7409,33 +12029,6 @@ end;
 
 
 { --------------------------------------------------------------------
-  TProductInstallment
-  --------------------------------------------------------------------}
-
-
-Procedure TProductInstallment.Setamount(AIndex : Integer; AValue : TPrice); 
-
-begin
-  If (Famount=AValue) then exit;
-  Famount:=AValue;
-  MarkPropertyChanged(AIndex);
-end;
-
-
-
-Procedure TProductInstallment.Setmonths(AIndex : Integer; const AValue : String); 
-
-begin
-  If (Fmonths=AValue) then exit;
-  Fmonths:=AValue;
-  MarkPropertyChanged(AIndex);
-end;
-
-
-
-
-
-{ --------------------------------------------------------------------
   TProductShipping
   --------------------------------------------------------------------}
 
@@ -7480,7 +12073,7 @@ end;
 
 
 
-Procedure TProductShipping.Setprice(AIndex : Integer; AValue : TPrice); 
+Procedure TProductShipping.Setprice(AIndex : Integer; const AValue : TPrice); 
 
 begin
   If (Fprice=AValue) then exit;
@@ -7527,7 +12120,7 @@ end;
 
 
 
-Procedure TProductShippingDimension.Setvalue(AIndex : Integer; AValue : double); 
+Procedure TProductShippingDimension.Setvalue(AIndex : Integer; const AValue : double); 
 
 begin
   If (Fvalue=AValue) then exit;
@@ -7565,7 +12158,7 @@ end;
 
 
 
-Procedure TProductShippingWeight.Setvalue(AIndex : Integer; AValue : double); 
+Procedure TProductShippingWeight.Setvalue(AIndex : Integer; const AValue : double); 
 
 begin
   If (Fvalue=AValue) then exit;
@@ -7603,7 +12196,7 @@ end;
 
 
 
-Procedure TProductStatus.SetdataQualityIssues(AIndex : Integer; AValue : TProductStatusTypedataQualityIssuesArray); 
+Procedure TProductStatus.SetdataQualityIssues(AIndex : Integer; const AValue : TProductStatusTypedataQualityIssuesArray); 
 
 begin
   If (FdataQualityIssues=AValue) then exit;
@@ -7613,7 +12206,7 @@ end;
 
 
 
-Procedure TProductStatus.SetdestinationStatuses(AIndex : Integer; AValue : TProductStatusTypedestinationStatusesArray); 
+Procedure TProductStatus.SetdestinationStatuses(AIndex : Integer; const AValue : TProductStatusTypedestinationStatusesArray); 
 
 begin
   If (FdestinationStatuses=AValue) then exit;
@@ -7858,7 +12451,7 @@ end;
 
 
 
-Procedure TProductTax.Setrate(AIndex : Integer; AValue : double); 
+Procedure TProductTax.Setrate(AIndex : Integer; const AValue : double); 
 
 begin
   If (Frate=AValue) then exit;
@@ -7878,7 +12471,7 @@ end;
 
 
 
-Procedure TProductTax.SettaxShip(AIndex : Integer; AValue : boolean); 
+Procedure TProductTax.SettaxShip(AIndex : Integer; const AValue : boolean); 
 
 begin
   If (FtaxShip=AValue) then exit;
@@ -7943,7 +12536,7 @@ end;
 
 
 
-Procedure TProductUnitPricingMeasure.Setvalue(AIndex : Integer; AValue : double); 
+Procedure TProductUnitPricingMeasure.Setvalue(AIndex : Integer; const AValue : double); 
 
 begin
   If (Fvalue=AValue) then exit;
@@ -7971,7 +12564,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TProductsCustomBatchRequest.Setentries(AIndex : Integer; AValue : TProductsCustomBatchRequestTypeentriesArray); 
+Procedure TProductsCustomBatchRequest.Setentries(AIndex : Integer; const AValue : TProductsCustomBatchRequestTypeentriesArray); 
 
 begin
   If (Fentries=AValue) then exit;
@@ -8001,7 +12594,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TProductsCustomBatchRequestEntry.SetbatchId(AIndex : Integer; AValue : integer); 
+Procedure TProductsCustomBatchRequestEntry.SetbatchId(AIndex : Integer; const AValue : integer); 
 
 begin
   If (FbatchId=AValue) then exit;
@@ -8031,7 +12624,7 @@ end;
 
 
 
-Procedure TProductsCustomBatchRequestEntry.Setproduct(AIndex : Integer; AValue : TProduct); 
+Procedure TProductsCustomBatchRequestEntry.Setproduct(AIndex : Integer; const AValue : TProduct); 
 
 begin
   If (Fproduct=AValue) then exit;
@@ -8058,7 +12651,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TProductsCustomBatchResponse.Setentries(AIndex : Integer; AValue : TProductsCustomBatchResponseTypeentriesArray); 
+Procedure TProductsCustomBatchResponse.Setentries(AIndex : Integer; const AValue : TProductsCustomBatchResponseTypeentriesArray); 
 
 begin
   If (Fentries=AValue) then exit;
@@ -8098,7 +12691,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TProductsCustomBatchResponseEntry.SetbatchId(AIndex : Integer; AValue : integer); 
+Procedure TProductsCustomBatchResponseEntry.SetbatchId(AIndex : Integer; const AValue : integer); 
 
 begin
   If (FbatchId=AValue) then exit;
@@ -8108,7 +12701,7 @@ end;
 
 
 
-Procedure TProductsCustomBatchResponseEntry.Seterrors(AIndex : Integer; AValue : TErrors); 
+Procedure TProductsCustomBatchResponseEntry.Seterrors(AIndex : Integer; const AValue : TErrors); 
 
 begin
   If (Ferrors=AValue) then exit;
@@ -8128,7 +12721,7 @@ end;
 
 
 
-Procedure TProductsCustomBatchResponseEntry.Setproduct(AIndex : Integer; AValue : TProduct); 
+Procedure TProductsCustomBatchResponseEntry.Setproduct(AIndex : Integer; const AValue : TProduct); 
 
 begin
   If (Fproduct=AValue) then exit;
@@ -8165,7 +12758,7 @@ end;
 
 
 
-Procedure TProductsListResponse.Setresources(AIndex : Integer; AValue : TProductsListResponseTyperesourcesArray); 
+Procedure TProductsListResponse.Setresources(AIndex : Integer; const AValue : TProductsListResponseTyperesourcesArray); 
 
 begin
   If (Fresources=AValue) then exit;
@@ -8195,7 +12788,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TProductstatusesCustomBatchRequest.Setentries(AIndex : Integer; AValue : TProductstatusesCustomBatchRequestTypeentriesArray); 
+Procedure TProductstatusesCustomBatchRequest.Setentries(AIndex : Integer; const AValue : TProductstatusesCustomBatchRequestTypeentriesArray); 
 
 begin
   If (Fentries=AValue) then exit;
@@ -8225,7 +12818,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TProductstatusesCustomBatchRequestEntry.SetbatchId(AIndex : Integer; AValue : integer); 
+Procedure TProductstatusesCustomBatchRequestEntry.SetbatchId(AIndex : Integer; const AValue : integer); 
 
 begin
   If (FbatchId=AValue) then exit;
@@ -8272,7 +12865,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TProductstatusesCustomBatchResponse.Setentries(AIndex : Integer; AValue : TProductstatusesCustomBatchResponseTypeentriesArray); 
+Procedure TProductstatusesCustomBatchResponse.Setentries(AIndex : Integer; const AValue : TProductstatusesCustomBatchResponseTypeentriesArray); 
 
 begin
   If (Fentries=AValue) then exit;
@@ -8312,7 +12905,7 @@ end;
   --------------------------------------------------------------------}
 
 
-Procedure TProductstatusesCustomBatchResponseEntry.SetbatchId(AIndex : Integer; AValue : integer); 
+Procedure TProductstatusesCustomBatchResponseEntry.SetbatchId(AIndex : Integer; const AValue : integer); 
 
 begin
   If (FbatchId=AValue) then exit;
@@ -8322,7 +12915,7 @@ end;
 
 
 
-Procedure TProductstatusesCustomBatchResponseEntry.Seterrors(AIndex : Integer; AValue : TErrors); 
+Procedure TProductstatusesCustomBatchResponseEntry.Seterrors(AIndex : Integer; const AValue : TErrors); 
 
 begin
   If (Ferrors=AValue) then exit;
@@ -8342,7 +12935,7 @@ end;
 
 
 
-Procedure TProductstatusesCustomBatchResponseEntry.SetproductStatus(AIndex : Integer; AValue : TProductStatus); 
+Procedure TProductstatusesCustomBatchResponseEntry.SetproductStatus(AIndex : Integer; const AValue : TProductStatus); 
 
 begin
   If (FproductStatus=AValue) then exit;
@@ -8379,7 +12972,7 @@ end;
 
 
 
-Procedure TProductstatusesListResponse.Setresources(AIndex : Integer; AValue : TProductstatusesListResponseTyperesourcesArray); 
+Procedure TProductstatusesListResponse.Setresources(AIndex : Integer; const AValue : TProductstatusesListResponseTyperesourcesArray); 
 
 begin
   If (Fresources=AValue) then exit;
@@ -8405,6 +12998,429 @@ end;
 
 
 { --------------------------------------------------------------------
+  TTestOrder
+  --------------------------------------------------------------------}
+
+
+Procedure TTestOrder.Setcustomer(AIndex : Integer; const AValue : TTestOrderCustomer); 
+
+begin
+  If (Fcustomer=AValue) then exit;
+  Fcustomer:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrder.Setkind(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fkind=AValue) then exit;
+  Fkind:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrder.SetlineItems(AIndex : Integer; const AValue : TTestOrderTypelineItemsArray); 
+
+begin
+  If (FlineItems=AValue) then exit;
+  FlineItems:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrder.SetpaymentMethod(AIndex : Integer; const AValue : TTestOrderPaymentMethod); 
+
+begin
+  If (FpaymentMethod=AValue) then exit;
+  FpaymentMethod:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrder.SetpredefinedDeliveryAddress(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FpredefinedDeliveryAddress=AValue) then exit;
+  FpredefinedDeliveryAddress:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrder.Setpromotions(AIndex : Integer; const AValue : TTestOrderTypepromotionsArray); 
+
+begin
+  If (Fpromotions=AValue) then exit;
+  Fpromotions:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrder.SetshippingCost(AIndex : Integer; const AValue : TPrice); 
+
+begin
+  If (FshippingCost=AValue) then exit;
+  FshippingCost:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrder.SetshippingCostTax(AIndex : Integer; const AValue : TPrice); 
+
+begin
+  If (FshippingCostTax=AValue) then exit;
+  FshippingCostTax:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrder.SetshippingOption(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FshippingOption=AValue) then exit;
+  FshippingOption:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+//2.6.4. bug workaround
+{$IFDEF VER2_6}
+Procedure TTestOrder.SetArrayLength(Const AName : String; ALength : Longint); 
+
+begin
+  Case AName of
+  'lineitems' : SetLength(FlineItems,ALength);
+  'promotions' : SetLength(Fpromotions,ALength);
+  else
+    Inherited SetArrayLength(AName,ALength);
+  end;
+end;
+{$ENDIF VER2_6}
+
+
+
+
+{ --------------------------------------------------------------------
+  TTestOrderCustomer
+  --------------------------------------------------------------------}
+
+
+Procedure TTestOrderCustomer.Setemail(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Femail=AValue) then exit;
+  Femail:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrderCustomer.SetexplicitMarketingPreference(AIndex : Integer; const AValue : boolean); 
+
+begin
+  If (FexplicitMarketingPreference=AValue) then exit;
+  FexplicitMarketingPreference:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrderCustomer.SetfullName(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FfullName=AValue) then exit;
+  FfullName:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TTestOrderLineItem
+  --------------------------------------------------------------------}
+
+
+Procedure TTestOrderLineItem.Setproduct(AIndex : Integer; const AValue : TTestOrderLineItemProduct); 
+
+begin
+  If (Fproduct=AValue) then exit;
+  Fproduct:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrderLineItem.SetquantityOrdered(AIndex : Integer; const AValue : integer); 
+
+begin
+  If (FquantityOrdered=AValue) then exit;
+  FquantityOrdered:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrderLineItem.SetreturnInfo(AIndex : Integer; const AValue : TOrderLineItemReturnInfo); 
+
+begin
+  If (FreturnInfo=AValue) then exit;
+  FreturnInfo:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrderLineItem.SetshippingDetails(AIndex : Integer; const AValue : TOrderLineItemShippingDetails); 
+
+begin
+  If (FshippingDetails=AValue) then exit;
+  FshippingDetails:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrderLineItem.SetunitTax(AIndex : Integer; const AValue : TPrice); 
+
+begin
+  If (FunitTax=AValue) then exit;
+  FunitTax:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+
+
+{ --------------------------------------------------------------------
+  TTestOrderLineItemProduct
+  --------------------------------------------------------------------}
+
+
+Procedure TTestOrderLineItemProduct.Setbrand(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fbrand=AValue) then exit;
+  Fbrand:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrderLineItemProduct.Setchannel(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fchannel=AValue) then exit;
+  Fchannel:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrderLineItemProduct.Setcondition(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fcondition=AValue) then exit;
+  Fcondition:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrderLineItemProduct.SetcontentLanguage(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FcontentLanguage=AValue) then exit;
+  FcontentLanguage:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrderLineItemProduct.Setgtin(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fgtin=AValue) then exit;
+  Fgtin:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrderLineItemProduct.SetimageLink(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FimageLink=AValue) then exit;
+  FimageLink:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrderLineItemProduct.SetitemGroupId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FitemGroupId=AValue) then exit;
+  FitemGroupId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrderLineItemProduct.Setmpn(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Fmpn=AValue) then exit;
+  Fmpn:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrderLineItemProduct.SetofferId(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FofferId=AValue) then exit;
+  FofferId:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrderLineItemProduct.Setprice(AIndex : Integer; const AValue : TPrice); 
+
+begin
+  If (Fprice=AValue) then exit;
+  Fprice:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrderLineItemProduct.SettargetCountry(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FtargetCountry=AValue) then exit;
+  FtargetCountry:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrderLineItemProduct.Settitle(AIndex : Integer; const AValue : String); 
+
+begin
+  If (Ftitle=AValue) then exit;
+  Ftitle:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrderLineItemProduct.SetvariantAttributes(AIndex : Integer; const AValue : TTestOrderLineItemProductTypevariantAttributesArray); 
+
+begin
+  If (FvariantAttributes=AValue) then exit;
+  FvariantAttributes:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+//2.6.4. bug workaround
+{$IFDEF VER2_6}
+Procedure TTestOrderLineItemProduct.SetArrayLength(Const AName : String; ALength : Longint); 
+
+begin
+  Case AName of
+  'variantattributes' : SetLength(FvariantAttributes,ALength);
+  else
+    Inherited SetArrayLength(AName,ALength);
+  end;
+end;
+{$ENDIF VER2_6}
+
+
+
+
+{ --------------------------------------------------------------------
+  TTestOrderPaymentMethod
+  --------------------------------------------------------------------}
+
+
+Procedure TTestOrderPaymentMethod.SetexpirationMonth(AIndex : Integer; const AValue : integer); 
+
+begin
+  If (FexpirationMonth=AValue) then exit;
+  FexpirationMonth:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrderPaymentMethod.SetexpirationYear(AIndex : Integer; const AValue : integer); 
+
+begin
+  If (FexpirationYear=AValue) then exit;
+  FexpirationYear:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrderPaymentMethod.SetlastFourDigits(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FlastFourDigits=AValue) then exit;
+  FlastFourDigits:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrderPaymentMethod.SetpredefinedBillingAddress(AIndex : Integer; const AValue : String); 
+
+begin
+  If (FpredefinedBillingAddress=AValue) then exit;
+  FpredefinedBillingAddress:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Procedure TTestOrderPaymentMethod.Set_type(AIndex : Integer; const AValue : String); 
+
+begin
+  If (F_type=AValue) then exit;
+  F_type:=AValue;
+  MarkPropertyChanged(AIndex);
+end;
+
+
+
+Class Function TTestOrderPaymentMethod.ExportPropertyName(Const AName : String) :String;
+
+begin
+  Case AName of
+  '_type' : Result:='type';
+  else
+    Result:=Inherited ExportPropertyName(AName);
+  end;
+end;
+
+
+
+
+{ --------------------------------------------------------------------
   TWeight
   --------------------------------------------------------------------}
 
@@ -8470,7 +13486,7 @@ begin
   Result:=ServiceCall(_HTTPMethod,_Path,'',Nil,TAccountsAuthInfoResponse) as TAccountsAuthInfoResponse;
 end;
 
-Function TAccountsResource.Custombatch(aAccountsCustomBatchRequest : TAccountsCustomBatchRequest) : TAccountsCustomBatchResponse;
+Function TAccountsResource.Custombatch(aAccountsCustomBatchRequest : TAccountsCustomBatchRequest; AQuery : string = '') : TAccountsCustomBatchResponse;
 
 Const
   _HTTPMethod = 'POST';
@@ -8478,10 +13494,22 @@ Const
   _Methodid   = 'content.accounts.custombatch';
 
 begin
-  Result:=ServiceCall(_HTTPMethod,_Path,'',aAccountsCustomBatchRequest,TAccountsCustomBatchResponse) as TAccountsCustomBatchResponse;
+  Result:=ServiceCall(_HTTPMethod,_Path,AQuery,aAccountsCustomBatchRequest,TAccountsCustomBatchResponse) as TAccountsCustomBatchResponse;
 end;
 
-Procedure TAccountsResource.Delete(accountId: string; merchantId: string);
+
+Function TAccountsResource.Custombatch(aAccountsCustomBatchRequest : TAccountsCustomBatchRequest; AQuery : TAccountscustombatchOptions) : TAccountsCustomBatchResponse;
+
+Var
+  _Q : String;
+
+begin
+  _Q:='';
+  AddToQuery(_Q,'dryRun',AQuery.dryRun);
+  Result:=Custombatch(aAccountsCustomBatchRequest,_Q);
+end;
+
+Procedure TAccountsResource.Delete(accountId: string; merchantId: string; AQuery : string = '');
 
 Const
   _HTTPMethod = 'DELETE';
@@ -8493,7 +13521,19 @@ Var
 
 begin
   _P:=SubstitutePath(_Path,['accountId',accountId,'merchantId',merchantId]);
-  ServiceCall(_HTTPMethod,_P,'',Nil,Nil);
+  ServiceCall(_HTTPMethod,_P,AQuery,Nil,Nil);
+end;
+
+
+Procedure TAccountsResource.Delete(accountId: string; merchantId: string; AQuery : TAccountsdeleteOptions);
+
+Var
+  _Q : String;
+
+begin
+  _Q:='';
+  AddToQuery(_Q,'dryRun',AQuery.dryRun);
+  Delete(accountId,merchantId,_Q);
 end;
 
 Function TAccountsResource.Get(accountId: string; merchantId: string) : TAccount;
@@ -8511,7 +13551,7 @@ begin
   Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TAccount) as TAccount;
 end;
 
-Function TAccountsResource.Insert(merchantId: string; aAccount : TAccount) : TAccount;
+Function TAccountsResource.Insert(merchantId: string; aAccount : TAccount; AQuery : string = '') : TAccount;
 
 Const
   _HTTPMethod = 'POST';
@@ -8523,7 +13563,19 @@ Var
 
 begin
   _P:=SubstitutePath(_Path,['merchantId',merchantId]);
-  Result:=ServiceCall(_HTTPMethod,_P,'',aAccount,TAccount) as TAccount;
+  Result:=ServiceCall(_HTTPMethod,_P,AQuery,aAccount,TAccount) as TAccount;
+end;
+
+
+Function TAccountsResource.Insert(merchantId: string; aAccount : TAccount; AQuery : TAccountsinsertOptions) : TAccount;
+
+Var
+  _Q : String;
+
+begin
+  _Q:='';
+  AddToQuery(_Q,'dryRun',AQuery.dryRun);
+  Result:=Insert(merchantId,aAccount,_Q);
 end;
 
 Function TAccountsResource.List(merchantId: string; AQuery : string = '') : TAccountsListResponse;
@@ -8554,7 +13606,7 @@ begin
   Result:=List(merchantId,_Q);
 end;
 
-Function TAccountsResource.Patch(accountId: string; merchantId: string; aAccount : TAccount) : TAccount;
+Function TAccountsResource.Patch(accountId: string; merchantId: string; aAccount : TAccount; AQuery : string = '') : TAccount;
 
 Const
   _HTTPMethod = 'PATCH';
@@ -8566,10 +13618,22 @@ Var
 
 begin
   _P:=SubstitutePath(_Path,['accountId',accountId,'merchantId',merchantId]);
-  Result:=ServiceCall(_HTTPMethod,_P,'',aAccount,TAccount) as TAccount;
+  Result:=ServiceCall(_HTTPMethod,_P,AQuery,aAccount,TAccount) as TAccount;
 end;
 
-Function TAccountsResource.Update(accountId: string; merchantId: string; aAccount : TAccount) : TAccount;
+
+Function TAccountsResource.Patch(accountId: string; merchantId: string; aAccount : TAccount; AQuery : TAccountspatchOptions) : TAccount;
+
+Var
+  _Q : String;
+
+begin
+  _Q:='';
+  AddToQuery(_Q,'dryRun',AQuery.dryRun);
+  Result:=Patch(accountId,merchantId,aAccount,_Q);
+end;
+
+Function TAccountsResource.Update(accountId: string; merchantId: string; aAccount : TAccount; AQuery : string = '') : TAccount;
 
 Const
   _HTTPMethod = 'PUT';
@@ -8581,7 +13645,19 @@ Var
 
 begin
   _P:=SubstitutePath(_Path,['accountId',accountId,'merchantId',merchantId]);
-  Result:=ServiceCall(_HTTPMethod,_P,'',aAccount,TAccount) as TAccount;
+  Result:=ServiceCall(_HTTPMethod,_P,AQuery,aAccount,TAccount) as TAccount;
+end;
+
+
+Function TAccountsResource.Update(accountId: string; merchantId: string; aAccount : TAccount; AQuery : TAccountsupdateOptions) : TAccount;
+
+Var
+  _Q : String;
+
+begin
+  _Q:='';
+  AddToQuery(_Q,'dryRun',AQuery.dryRun);
+  Result:=Update(accountId,merchantId,aAccount,_Q);
 end;
 
 
@@ -8954,7 +14030,7 @@ begin
   Result:=TcontentAPI;
 end;
 
-Function TDatafeedsResource.Custombatch(aDatafeedsCustomBatchRequest : TDatafeedsCustomBatchRequest) : TDatafeedsCustomBatchResponse;
+Function TDatafeedsResource.Custombatch(aDatafeedsCustomBatchRequest : TDatafeedsCustomBatchRequest; AQuery : string = '') : TDatafeedsCustomBatchResponse;
 
 Const
   _HTTPMethod = 'POST';
@@ -8962,10 +14038,22 @@ Const
   _Methodid   = 'content.datafeeds.custombatch';
 
 begin
-  Result:=ServiceCall(_HTTPMethod,_Path,'',aDatafeedsCustomBatchRequest,TDatafeedsCustomBatchResponse) as TDatafeedsCustomBatchResponse;
+  Result:=ServiceCall(_HTTPMethod,_Path,AQuery,aDatafeedsCustomBatchRequest,TDatafeedsCustomBatchResponse) as TDatafeedsCustomBatchResponse;
+end;
+
+
+Function TDatafeedsResource.Custombatch(aDatafeedsCustomBatchRequest : TDatafeedsCustomBatchRequest; AQuery : TDatafeedscustombatchOptions) : TDatafeedsCustomBatchResponse;
+
+Var
+  _Q : String;
+
+begin
+  _Q:='';
+  AddToQuery(_Q,'dryRun',AQuery.dryRun);
+  Result:=Custombatch(aDatafeedsCustomBatchRequest,_Q);
 end;
 
-Procedure TDatafeedsResource.Delete(datafeedId: string; merchantId: string);
+Procedure TDatafeedsResource.Delete(datafeedId: string; merchantId: string; AQuery : string = '');
 
 Const
   _HTTPMethod = 'DELETE';
@@ -8977,7 +14065,19 @@ Var
 
 begin
   _P:=SubstitutePath(_Path,['datafeedId',datafeedId,'merchantId',merchantId]);
-  ServiceCall(_HTTPMethod,_P,'',Nil,Nil);
+  ServiceCall(_HTTPMethod,_P,AQuery,Nil,Nil);
+end;
+
+
+Procedure TDatafeedsResource.Delete(datafeedId: string; merchantId: string; AQuery : TDatafeedsdeleteOptions);
+
+Var
+  _Q : String;
+
+begin
+  _Q:='';
+  AddToQuery(_Q,'dryRun',AQuery.dryRun);
+  Delete(datafeedId,merchantId,_Q);
 end;
 
 Function TDatafeedsResource.Get(datafeedId: string; merchantId: string) : TDatafeed;
@@ -8995,7 +14095,7 @@ begin
   Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TDatafeed) as TDatafeed;
 end;
 
-Function TDatafeedsResource.Insert(merchantId: string; aDatafeed : TDatafeed) : TDatafeed;
+Function TDatafeedsResource.Insert(merchantId: string; aDatafeed : TDatafeed; AQuery : string = '') : TDatafeed;
 
 Const
   _HTTPMethod = 'POST';
@@ -9007,7 +14107,19 @@ Var
 
 begin
   _P:=SubstitutePath(_Path,['merchantId',merchantId]);
-  Result:=ServiceCall(_HTTPMethod,_P,'',aDatafeed,TDatafeed) as TDatafeed;
+  Result:=ServiceCall(_HTTPMethod,_P,AQuery,aDatafeed,TDatafeed) as TDatafeed;
+end;
+
+
+Function TDatafeedsResource.Insert(merchantId: string; aDatafeed : TDatafeed; AQuery : TDatafeedsinsertOptions) : TDatafeed;
+
+Var
+  _Q : String;
+
+begin
+  _Q:='';
+  AddToQuery(_Q,'dryRun',AQuery.dryRun);
+  Result:=Insert(merchantId,aDatafeed,_Q);
 end;
 
 Function TDatafeedsResource.List(merchantId: string; AQuery : string = '') : TDatafeedsListResponse;
@@ -9038,7 +14150,7 @@ begin
   Result:=List(merchantId,_Q);
 end;
 
-Function TDatafeedsResource.Patch(datafeedId: string; merchantId: string; aDatafeed : TDatafeed) : TDatafeed;
+Function TDatafeedsResource.Patch(datafeedId: string; merchantId: string; aDatafeed : TDatafeed; AQuery : string = '') : TDatafeed;
 
 Const
   _HTTPMethod = 'PATCH';
@@ -9050,10 +14162,22 @@ Var
 
 begin
   _P:=SubstitutePath(_Path,['datafeedId',datafeedId,'merchantId',merchantId]);
-  Result:=ServiceCall(_HTTPMethod,_P,'',aDatafeed,TDatafeed) as TDatafeed;
+  Result:=ServiceCall(_HTTPMethod,_P,AQuery,aDatafeed,TDatafeed) as TDatafeed;
 end;
 
-Function TDatafeedsResource.Update(datafeedId: string; merchantId: string; aDatafeed : TDatafeed) : TDatafeed;
+
+Function TDatafeedsResource.Patch(datafeedId: string; merchantId: string; aDatafeed : TDatafeed; AQuery : TDatafeedspatchOptions) : TDatafeed;
+
+Var
+  _Q : String;
+
+begin
+  _Q:='';
+  AddToQuery(_Q,'dryRun',AQuery.dryRun);
+  Result:=Patch(datafeedId,merchantId,aDatafeed,_Q);
+end;
+
+Function TDatafeedsResource.Update(datafeedId: string; merchantId: string; aDatafeed : TDatafeed; AQuery : string = '') : TDatafeed;
 
 Const
   _HTTPMethod = 'PUT';
@@ -9065,7 +14189,19 @@ Var
 
 begin
   _P:=SubstitutePath(_Path,['datafeedId',datafeedId,'merchantId',merchantId]);
-  Result:=ServiceCall(_HTTPMethod,_P,'',aDatafeed,TDatafeed) as TDatafeed;
+  Result:=ServiceCall(_HTTPMethod,_P,AQuery,aDatafeed,TDatafeed) as TDatafeed;
+end;
+
+
+Function TDatafeedsResource.Update(datafeedId: string; merchantId: string; aDatafeed : TDatafeed; AQuery : TDatafeedsupdateOptions) : TDatafeed;
+
+Var
+  _Q : String;
+
+begin
+  _Q:='';
+  AddToQuery(_Q,'dryRun',AQuery.dryRun);
+  Result:=Update(datafeedId,merchantId,aDatafeed,_Q);
 end;
 
 
@@ -9160,7 +14296,7 @@ begin
   Result:=TcontentAPI;
 end;
 
-Function TInventoryResource.Custombatch(aInventoryCustomBatchRequest : TInventoryCustomBatchRequest) : TInventoryCustomBatchResponse;
+Function TInventoryResource.Custombatch(aInventoryCustomBatchRequest : TInventoryCustomBatchRequest; AQuery : string = '') : TInventoryCustomBatchResponse;
 
 Const
   _HTTPMethod = 'POST';
@@ -9168,10 +14304,22 @@ Const
   _Methodid   = 'content.inventory.custombatch';
 
 begin
-  Result:=ServiceCall(_HTTPMethod,_Path,'',aInventoryCustomBatchRequest,TInventoryCustomBatchResponse) as TInventoryCustomBatchResponse;
+  Result:=ServiceCall(_HTTPMethod,_Path,AQuery,aInventoryCustomBatchRequest,TInventoryCustomBatchResponse) as TInventoryCustomBatchResponse;
 end;
 
-Function TInventoryResource._set(merchantId: string; productId: string; storeCode: string; aInventorySetRequest : TInventorySetRequest) : TInventorySetResponse;
+
+Function TInventoryResource.Custombatch(aInventoryCustomBatchRequest : TInventoryCustomBatchRequest; AQuery : TInventorycustombatchOptions) : TInventoryCustomBatchResponse;
+
+Var
+  _Q : String;
+
+begin
+  _Q:='';
+  AddToQuery(_Q,'dryRun',AQuery.dryRun);
+  Result:=Custombatch(aInventoryCustomBatchRequest,_Q);
+end;
+
+Function TInventoryResource._set(merchantId: string; productId: string; storeCode: string; aInventorySetRequest : TInventorySetRequest; AQuery : string = '') : TInventorySetResponse;
 
 Const
   _HTTPMethod = 'POST';
@@ -9183,7 +14331,277 @@ Var
 
 begin
   _P:=SubstitutePath(_Path,['merchantId',merchantId,'productId',productId,'storeCode',storeCode]);
-  Result:=ServiceCall(_HTTPMethod,_P,'',aInventorySetRequest,TInventorySetResponse) as TInventorySetResponse;
+  Result:=ServiceCall(_HTTPMethod,_P,AQuery,aInventorySetRequest,TInventorySetResponse) as TInventorySetResponse;
+end;
+
+
+Function TInventoryResource._set(merchantId: string; productId: string; storeCode: string; aInventorySetRequest : TInventorySetRequest; AQuery : TInventorysetOptions) : TInventorySetResponse;
+
+Var
+  _Q : String;
+
+begin
+  _Q:='';
+  AddToQuery(_Q,'dryRun',AQuery.dryRun);
+  Result:=_set(merchantId,productId,storeCode,aInventorySetRequest,_Q);
+end;
+
+
+
+{ --------------------------------------------------------------------
+  TOrdersResource
+  --------------------------------------------------------------------}
+
+
+Class Function TOrdersResource.ResourceName : String;
+
+begin
+  Result:='orders';
+end;
+
+Class Function TOrdersResource.DefaultAPI : TGoogleAPIClass;
+
+begin
+  Result:=TcontentAPI;
+end;
+
+Function TOrdersResource.Acknowledge(merchantId: string; orderId: string; aOrdersAcknowledgeRequest : TOrdersAcknowledgeRequest) : TOrdersAcknowledgeResponse;
+
+Const
+  _HTTPMethod = 'POST';
+  _Path       = '{merchantId}/orders/{orderId}/acknowledge';
+  _Methodid   = 'content.orders.acknowledge';
+
+Var
+  _P : String;
+
+begin
+  _P:=SubstitutePath(_Path,['merchantId',merchantId,'orderId',orderId]);
+  Result:=ServiceCall(_HTTPMethod,_P,'',aOrdersAcknowledgeRequest,TOrdersAcknowledgeResponse) as TOrdersAcknowledgeResponse;
+end;
+
+Function TOrdersResource.Advancetestorder(merchantId: string; orderId: string) : TOrdersAdvanceTestOrderResponse;
+
+Const
+  _HTTPMethod = 'POST';
+  _Path       = '{merchantId}/testorders/{orderId}/advance';
+  _Methodid   = 'content.orders.advancetestorder';
+
+Var
+  _P : String;
+
+begin
+  _P:=SubstitutePath(_Path,['merchantId',merchantId,'orderId',orderId]);
+  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TOrdersAdvanceTestOrderResponse) as TOrdersAdvanceTestOrderResponse;
+end;
+
+Function TOrdersResource.Cancel(merchantId: string; orderId: string; aOrdersCancelRequest : TOrdersCancelRequest) : TOrdersCancelResponse;
+
+Const
+  _HTTPMethod = 'POST';
+  _Path       = '{merchantId}/orders/{orderId}/cancel';
+  _Methodid   = 'content.orders.cancel';
+
+Var
+  _P : String;
+
+begin
+  _P:=SubstitutePath(_Path,['merchantId',merchantId,'orderId',orderId]);
+  Result:=ServiceCall(_HTTPMethod,_P,'',aOrdersCancelRequest,TOrdersCancelResponse) as TOrdersCancelResponse;
+end;
+
+Function TOrdersResource.Cancellineitem(merchantId: string; orderId: string; aOrdersCancelLineItemRequest : TOrdersCancelLineItemRequest) : TOrdersCancelLineItemResponse;
+
+Const
+  _HTTPMethod = 'POST';
+  _Path       = '{merchantId}/orders/{orderId}/cancelLineItem';
+  _Methodid   = 'content.orders.cancellineitem';
+
+Var
+  _P : String;
+
+begin
+  _P:=SubstitutePath(_Path,['merchantId',merchantId,'orderId',orderId]);
+  Result:=ServiceCall(_HTTPMethod,_P,'',aOrdersCancelLineItemRequest,TOrdersCancelLineItemResponse) as TOrdersCancelLineItemResponse;
+end;
+
+Function TOrdersResource.Createtestorder(merchantId: string; aOrdersCreateTestOrderRequest : TOrdersCreateTestOrderRequest) : TOrdersCreateTestOrderResponse;
+
+Const
+  _HTTPMethod = 'POST';
+  _Path       = '{merchantId}/testorders';
+  _Methodid   = 'content.orders.createtestorder';
+
+Var
+  _P : String;
+
+begin
+  _P:=SubstitutePath(_Path,['merchantId',merchantId]);
+  Result:=ServiceCall(_HTTPMethod,_P,'',aOrdersCreateTestOrderRequest,TOrdersCreateTestOrderResponse) as TOrdersCreateTestOrderResponse;
+end;
+
+Function TOrdersResource.Custombatch(aOrdersCustomBatchRequest : TOrdersCustomBatchRequest) : TOrdersCustomBatchResponse;
+
+Const
+  _HTTPMethod = 'POST';
+  _Path       = 'orders/batch';
+  _Methodid   = 'content.orders.custombatch';
+
+begin
+  Result:=ServiceCall(_HTTPMethod,_Path,'',aOrdersCustomBatchRequest,TOrdersCustomBatchResponse) as TOrdersCustomBatchResponse;
+end;
+
+Function TOrdersResource.Get(merchantId: string; orderId: string) : TOrder;
+
+Const
+  _HTTPMethod = 'GET';
+  _Path       = '{merchantId}/orders/{orderId}';
+  _Methodid   = 'content.orders.get';
+
+Var
+  _P : String;
+
+begin
+  _P:=SubstitutePath(_Path,['merchantId',merchantId,'orderId',orderId]);
+  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TOrder) as TOrder;
+end;
+
+Function TOrdersResource.Getbymerchantorderid(merchantId: string; merchantOrderId: string) : TOrdersGetByMerchantOrderIdResponse;
+
+Const
+  _HTTPMethod = 'GET';
+  _Path       = '{merchantId}/ordersbymerchantid/{merchantOrderId}';
+  _Methodid   = 'content.orders.getbymerchantorderid';
+
+Var
+  _P : String;
+
+begin
+  _P:=SubstitutePath(_Path,['merchantId',merchantId,'merchantOrderId',merchantOrderId]);
+  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TOrdersGetByMerchantOrderIdResponse) as TOrdersGetByMerchantOrderIdResponse;
+end;
+
+Function TOrdersResource.Gettestordertemplate(merchantId: string; templateName: string) : TOrdersGetTestOrderTemplateResponse;
+
+Const
+  _HTTPMethod = 'GET';
+  _Path       = '{merchantId}/testordertemplates/{templateName}';
+  _Methodid   = 'content.orders.gettestordertemplate';
+
+Var
+  _P : String;
+
+begin
+  _P:=SubstitutePath(_Path,['merchantId',merchantId,'templateName',templateName]);
+  Result:=ServiceCall(_HTTPMethod,_P,'',Nil,TOrdersGetTestOrderTemplateResponse) as TOrdersGetTestOrderTemplateResponse;
+end;
+
+Function TOrdersResource.List(merchantId: string; AQuery : string = '') : TOrdersListResponse;
+
+Const
+  _HTTPMethod = 'GET';
+  _Path       = '{merchantId}/orders';
+  _Methodid   = 'content.orders.list';
+
+Var
+  _P : String;
+
+begin
+  _P:=SubstitutePath(_Path,['merchantId',merchantId]);
+  Result:=ServiceCall(_HTTPMethod,_P,AQuery,Nil,TOrdersListResponse) as TOrdersListResponse;
+end;
+
+
+Function TOrdersResource.List(merchantId: string; AQuery : TOrderslistOptions) : TOrdersListResponse;
+
+Var
+  _Q : String;
+
+begin
+  _Q:='';
+  AddToQuery(_Q,'acknowledged',AQuery.acknowledged);
+  AddToQuery(_Q,'maxResults',AQuery.maxResults);
+  AddToQuery(_Q,'orderBy',AQuery.orderBy);
+  AddToQuery(_Q,'pageToken',AQuery.pageToken);
+  AddToQuery(_Q,'placedDateEnd',AQuery.placedDateEnd);
+  AddToQuery(_Q,'placedDateStart',AQuery.placedDateStart);
+  AddToQuery(_Q,'statuses',AQuery.statuses);
+  Result:=List(merchantId,_Q);
+end;
+
+Function TOrdersResource.Refund(merchantId: string; orderId: string; aOrdersRefundRequest : TOrdersRefundRequest) : TOrdersRefundResponse;
+
+Const
+  _HTTPMethod = 'POST';
+  _Path       = '{merchantId}/orders/{orderId}/refund';
+  _Methodid   = 'content.orders.refund';
+
+Var
+  _P : String;
+
+begin
+  _P:=SubstitutePath(_Path,['merchantId',merchantId,'orderId',orderId]);
+  Result:=ServiceCall(_HTTPMethod,_P,'',aOrdersRefundRequest,TOrdersRefundResponse) as TOrdersRefundResponse;
+end;
+
+Function TOrdersResource.Returnlineitem(merchantId: string; orderId: string; aOrdersReturnLineItemRequest : TOrdersReturnLineItemRequest) : TOrdersReturnLineItemResponse;
+
+Const
+  _HTTPMethod = 'POST';
+  _Path       = '{merchantId}/orders/{orderId}/returnLineItem';
+  _Methodid   = 'content.orders.returnlineitem';
+
+Var
+  _P : String;
+
+begin
+  _P:=SubstitutePath(_Path,['merchantId',merchantId,'orderId',orderId]);
+  Result:=ServiceCall(_HTTPMethod,_P,'',aOrdersReturnLineItemRequest,TOrdersReturnLineItemResponse) as TOrdersReturnLineItemResponse;
+end;
+
+Function TOrdersResource.Shiplineitems(merchantId: string; orderId: string; aOrdersShipLineItemsRequest : TOrdersShipLineItemsRequest) : TOrdersShipLineItemsResponse;
+
+Const
+  _HTTPMethod = 'POST';
+  _Path       = '{merchantId}/orders/{orderId}/shipLineItems';
+  _Methodid   = 'content.orders.shiplineitems';
+
+Var
+  _P : String;
+
+begin
+  _P:=SubstitutePath(_Path,['merchantId',merchantId,'orderId',orderId]);
+  Result:=ServiceCall(_HTTPMethod,_P,'',aOrdersShipLineItemsRequest,TOrdersShipLineItemsResponse) as TOrdersShipLineItemsResponse;
+end;
+
+Function TOrdersResource.Updatemerchantorderid(merchantId: string; orderId: string; aOrdersUpdateMerchantOrderIdRequest : TOrdersUpdateMerchantOrderIdRequest) : TOrdersUpdateMerchantOrderIdResponse;
+
+Const
+  _HTTPMethod = 'POST';
+  _Path       = '{merchantId}/orders/{orderId}/updateMerchantOrderId';
+  _Methodid   = 'content.orders.updatemerchantorderid';
+
+Var
+  _P : String;
+
+begin
+  _P:=SubstitutePath(_Path,['merchantId',merchantId,'orderId',orderId]);
+  Result:=ServiceCall(_HTTPMethod,_P,'',aOrdersUpdateMerchantOrderIdRequest,TOrdersUpdateMerchantOrderIdResponse) as TOrdersUpdateMerchantOrderIdResponse;
+end;
+
+Function TOrdersResource.Updateshipment(merchantId: string; orderId: string; aOrdersUpdateShipmentRequest : TOrdersUpdateShipmentRequest) : TOrdersUpdateShipmentResponse;
+
+Const
+  _HTTPMethod = 'POST';
+  _Path       = '{merchantId}/orders/{orderId}/updateShipment';
+  _Methodid   = 'content.orders.updateshipment';
+
+Var
+  _P : String;
+
+begin
+  _P:=SubstitutePath(_Path,['merchantId',merchantId,'orderId',orderId]);
+  Result:=ServiceCall(_HTTPMethod,_P,'',aOrdersUpdateShipmentRequest,TOrdersUpdateShipmentResponse) as TOrdersUpdateShipmentResponse;
 end;
 
 
@@ -9320,6 +14738,7 @@ Var
 
 begin
   _Q:='';
+  AddToQuery(_Q,'includeInvalidInsertedItems',AQuery.includeInvalidInsertedItems);
   AddToQuery(_Q,'maxResults',AQuery.maxResults);
   AddToQuery(_Q,'pageToken',AQuery.pageToken);
   Result:=List(merchantId,_Q);
@@ -9393,6 +14812,7 @@ Var
 
 begin
   _Q:='';
+  AddToQuery(_Q,'includeInvalidInsertedItems',AQuery.includeInvalidInsertedItems);
   AddToQuery(_Q,'maxResults',AQuery.maxResults);
   AddToQuery(_Q,'pageToken',AQuery.pageToken);
   Result:=List(merchantId,_Q);
@@ -9419,7 +14839,7 @@ end;
 Class Function TContentAPI.APIRevision : String;
 
 begin
-  Result:='20150424';
+  Result:='20160419';
 end;
 
 Class Function TContentAPI.APIID : String;
@@ -9437,7 +14857,7 @@ end;
 Class Function TContentAPI.APIDescription : String;
 
 begin
-  Result:='Manage product items, inventory, and Merchant Center accounts for Google Shopping.';
+  Result:='Manages product items, inventory, and Merchant Center accounts for Google Shopping.';
 end;
 
 Class Function TContentAPI.APIOwnerDomain : String;
@@ -9467,13 +14887,13 @@ end;
 Class Function TContentAPI.APIdocumentationLink : String;
 
 begin
-  Result:='https://developers.google.com/shopping-content/v2/';
+  Result:='https://developers.google.com/shopping-content';
 end;
 
 Class Function TContentAPI.APIrootUrl : string;
 
 begin
-  Result:='https://www.googleapis.com:443/';
+  Result:='https://www.googleapis.com/';
 end;
 
 Class Function TContentAPI.APIbasePath : string;
@@ -9485,7 +14905,7 @@ end;
 Class Function TContentAPI.APIbaseURL : String;
 
 begin
-  Result:='https://www.googleapis.com:443/content/v2/';
+  Result:='https://www.googleapis.com/content/v2/';
 end;
 
 Class Function TContentAPI.APIProtocol : string;
@@ -9582,6 +15002,7 @@ begin
   TDatafeedstatusesListResponse.RegisterObject;
   TError.RegisterObject;
   TErrors.RegisterObject;
+  TInstallment.RegisterObject;
   TInventory.RegisterObject;
   TInventoryCustomBatchRequest.RegisterObject;
   TInventoryCustomBatchRequestEntry.RegisterObject;
@@ -9590,13 +15011,62 @@ begin
   TInventorySetRequest.RegisterObject;
   TInventorySetResponse.RegisterObject;
   TLoyaltyPoints.RegisterObject;
+  TOrder.RegisterObject;
+  TOrderAddress.RegisterObject;
+  TOrderCancellation.RegisterObject;
+  TOrderCustomer.RegisterObject;
+  TOrderDeliveryDetails.RegisterObject;
+  TOrderLineItem.RegisterObject;
+  TOrderLineItemProduct.RegisterObject;
+  TOrderLineItemProductVariantAttribute.RegisterObject;
+  TOrderLineItemReturnInfo.RegisterObject;
+  TOrderLineItemShippingDetails.RegisterObject;
+  TOrderLineItemShippingDetailsMethod.RegisterObject;
+  TOrderPaymentMethod.RegisterObject;
+  TOrderPromotion.RegisterObject;
+  TOrderPromotionBenefit.RegisterObject;
+  TOrderRefund.RegisterObject;
+  TOrderReturn.RegisterObject;
+  TOrderShipment.RegisterObject;
+  TOrderShipmentLineItemShipment.RegisterObject;
+  TOrdersAcknowledgeRequest.RegisterObject;
+  TOrdersAcknowledgeResponse.RegisterObject;
+  TOrdersAdvanceTestOrderResponse.RegisterObject;
+  TOrdersCancelLineItemRequest.RegisterObject;
+  TOrdersCancelLineItemResponse.RegisterObject;
+  TOrdersCancelRequest.RegisterObject;
+  TOrdersCancelResponse.RegisterObject;
+  TOrdersCreateTestOrderRequest.RegisterObject;
+  TOrdersCreateTestOrderResponse.RegisterObject;
+  TOrdersCustomBatchRequest.RegisterObject;
+  TOrdersCustomBatchRequestEntry.RegisterObject;
+  TOrdersCustomBatchRequestEntryCancel.RegisterObject;
+  TOrdersCustomBatchRequestEntryCancelLineItem.RegisterObject;
+  TOrdersCustomBatchRequestEntryRefund.RegisterObject;
+  TOrdersCustomBatchRequestEntryReturnLineItem.RegisterObject;
+  TOrdersCustomBatchRequestEntryShipLineItems.RegisterObject;
+  TOrdersCustomBatchRequestEntryUpdateShipment.RegisterObject;
+  TOrdersCustomBatchResponse.RegisterObject;
+  TOrdersCustomBatchResponseEntry.RegisterObject;
+  TOrdersGetByMerchantOrderIdResponse.RegisterObject;
+  TOrdersGetTestOrderTemplateResponse.RegisterObject;
+  TOrdersListResponse.RegisterObject;
+  TOrdersRefundRequest.RegisterObject;
+  TOrdersRefundResponse.RegisterObject;
+  TOrdersReturnLineItemRequest.RegisterObject;
+  TOrdersReturnLineItemResponse.RegisterObject;
+  TOrdersShipLineItemsRequest.RegisterObject;
+  TOrdersShipLineItemsResponse.RegisterObject;
+  TOrdersUpdateMerchantOrderIdRequest.RegisterObject;
+  TOrdersUpdateMerchantOrderIdResponse.RegisterObject;
+  TOrdersUpdateShipmentRequest.RegisterObject;
+  TOrdersUpdateShipmentResponse.RegisterObject;
   TPrice.RegisterObject;
   TProduct.RegisterObject;
   TProductAspect.RegisterObject;
   TProductCustomAttribute.RegisterObject;
   TProductCustomGroup.RegisterObject;
   TProductDestination.RegisterObject;
-  TProductInstallment.RegisterObject;
   TProductShipping.RegisterObject;
   TProductShippingDimension.RegisterObject;
   TProductShippingWeight.RegisterObject;
@@ -9616,6 +15086,11 @@ begin
   TProductstatusesCustomBatchResponse.RegisterObject;
   TProductstatusesCustomBatchResponseEntry.RegisterObject;
   TProductstatusesListResponse.RegisterObject;
+  TTestOrder.RegisterObject;
+  TTestOrderCustomer.RegisterObject;
+  TTestOrderLineItem.RegisterObject;
+  TTestOrderLineItemProduct.RegisterObject;
+  TTestOrderPaymentMethod.RegisterObject;
   TWeight.RegisterObject;
 end;
 
@@ -9788,6 +15263,30 @@ end;
 
 
 
+Function TContentAPI.GetOrdersInstance : TOrdersResource;
+
+begin
+  if (FOrdersInstance=Nil) then
+    FOrdersInstance:=CreateOrdersResource;
+  Result:=FOrdersInstance;
+end;
+
+Function TContentAPI.CreateOrdersResource : TOrdersResource;
+
+begin
+  Result:=CreateOrdersResource(Self);
+end;
+
+
+Function TContentAPI.CreateOrdersResource(AOwner : TComponent) : TOrdersResource;
+
+begin
+  Result:=TOrdersResource.Create(AOwner);
+  Result.API:=Self.API;
+end;
+
+
+
 Function TContentAPI.GetProductsInstance : TProductsResource;
 
 begin
author	steve <steve@3ad0048d-3df7-0310-abae-a5850022a9f2>	2016-05-30 16:57:13 +0000
committer	steve <steve@3ad0048d-3df7-0310-abae-a5850022a9f2>	2016-05-30 16:57:13 +0000
commit	6b082ee8b43e52fe18c5799f8f4c82a8c7519f5b (patch)
tree	f906b179f5b20f4be91a286f8f5a01fc4fac51e2 /packages/googleapi/src/googlecontent.pp
parent	554d71b9e544a9776797dcca9983060fd998fd0b (diff)
parent	ba5f910eaac131cb7d3553c9bef173a81c422a1c (diff)
download	fpc-6b082ee8b43e52fe18c5799f8f4c82a8c7519f5b.tar.gz