Index: APPS/TRANSP/UPS/impl/TimeInTransit/BerekenInputConverteerder.cls.xml
===================================================================
diff -u -r32640 -r32667
--- APPS/TRANSP/UPS/impl/TimeInTransit/BerekenInputConverteerder.cls.xml	(.../BerekenInputConverteerder.cls.xml)	(revision 32640)
+++ APPS/TRANSP/UPS/impl/TimeInTransit/BerekenInputConverteerder.cls.xml	(.../BerekenInputConverteerder.cls.xml)	(revision 32667)
@@ -3,7 +3,7 @@
 <Class name="APPS.TRANSP.UPS.impl.TimeInTransit.BerekenInputConverteerder">
 <Super>APPS.TRANSP.UPS.BerekenInputConverteerder</Super>
 
-<Property name="Body">
+<Property name="TimeInTransitRequest">
 <Type>APPS.TRANSP.UPS.impl.SoapClients.TimeInTransit.tnt.TimeInTransitRequest</Type>
 <Private>1</Private>
 </Property>
@@ -17,7 +17,7 @@
 <FormalSpec>BerekenInput:APPS.TRANSP.OfferteService.dto.BerekenInput</FormalSpec>
 <ReturnType>APPS.TRANSP.UPS.impl.SoapClients.TimeInTransit.tnt.TimeInTransitRequest</ReturnType>
 <Implementation><![CDATA[
-	Set ..Body = ##class(APPS.TRANSP.UPS.impl.SoapClients.TimeInTransit.tnt.TimeInTransitRequest).%New()
+	Set ..TimeInTransitRequest = ##class(APPS.TRANSP.UPS.impl.SoapClients.TimeInTransit.tnt.TimeInTransitRequest).%New()
 	Set ..BerekenInput = BerekenInput
 	
 	Do ..ZetReferentie()
@@ -30,9 +30,9 @@
 	
 	Do ..ZetVerzendDetails()
 		
-	Set ..Body.MaximumListSize = "50"
+	Set ..TimeInTransitRequest.MaximumListSize = "50"
 
-	quit ..Body
+	quit ..TimeInTransitRequest
 ]]></Implementation>
 </Method>
 
@@ -48,13 +48,13 @@
 		Set TotaalGewicht = TotaalGewicht + (..BerekenGewicht(TeverzendItem.Afmeting, TeverzendItem.Gewicht) * TeverzendItem.Aantal)
 	}
 	
-	Set ..Body.ShipmentWeight.UnitOfMeasurement.Code = "KGS"
-	Set ..Body.ShipmentWeight.Weight = TotaalGewicht
+	Set ..TimeInTransitRequest.ShipmentWeight.UnitOfMeasurement.Code = "KGS"
+	Set ..TimeInTransitRequest.ShipmentWeight.Weight = TotaalGewicht
 
-	Set ..Body.TotalPackagesInShipment = ..BerekenInput.TeverzendItems.Count()
+	Set ..TimeInTransitRequest.TotalPackagesInShipment = ..BerekenInput.TeverzendItems.Count()
 
-	Set ..Body.InvoiceLineTotal.CurrencyCode = "EUR"
-	Set ..Body.InvoiceLineTotal.MonetaryValue = TotaalPrijs
+	Set ..TimeInTransitRequest.InvoiceLineTotal.CurrencyCode = "EUR"
+	Set ..TimeInTransitRequest.InvoiceLineTotal.MonetaryValue = TotaalPrijs
 ]]></Implementation>
 </Method>
 
@@ -69,28 +69,28 @@
 <Method name="ZetReferentie">
 <Private>1</Private>
 <Implementation><![CDATA[
-	Set ..Body.Request.TransactionReference.CustomerContext = ..BerekenInput.Referentie
-	Set ..Body.Request.TransactionReference.TransactionIdentifier = ..BerekenInput.Referentie
+	Set ..TimeInTransitRequest.Request.TransactionReference.CustomerContext = ..BerekenInput.Referentie
+	Set ..TimeInTransitRequest.Request.TransactionReference.TransactionIdentifier = ..BerekenInput.Referentie
 ]]></Implementation>
 </Method>
 
 <Method name="ZetLeverAdres">
 <Private>1</Private>
 <Implementation><![CDATA[
-	Set ..Body.ShipTo.Address.StateProvinceCode = ..BerekenInput.LeverAdres.ProvincieCode
-	Set ..Body.ShipTo.Address.City = ..BerekenInput.LeverAdres.Woonplaats
-	Set ..Body.ShipTo.Address.CountryCode = ..BerekenInput.LeverAdres.LandCode
-	Set ..Body.ShipTo.Address.PostalCode = ..BerekenInput.LeverAdres.Postcode
+	Set ..TimeInTransitRequest.ShipTo.Address.StateProvinceCode = ..BerekenInput.LeverAdres.ProvincieCode
+	Set ..TimeInTransitRequest.ShipTo.Address.City = ..BerekenInput.LeverAdres.Woonplaats
+	Set ..TimeInTransitRequest.ShipTo.Address.CountryCode = ..BerekenInput.LeverAdres.LandCode
+	Set ..TimeInTransitRequest.ShipTo.Address.PostalCode = ..BerekenInput.LeverAdres.Postcode
 ]]></Implementation>
 </Method>
 
 <Method name="ZetVerzendAdres">
 <Private>1</Private>
 <Implementation><![CDATA[
-	Set ..Body.ShipFrom.Address.StateProvinceCode = ""
-	Set ..Body.ShipFrom.Address.City = "Sint-Niklaas" 
-	Set ..Body.ShipFrom.Address.CountryCode = "BE" 
-	Set ..Body.ShipFrom.Address.PostalCode = "9100"
+	Set ..TimeInTransitRequest.ShipFrom.Address.StateProvinceCode = ""
+	Set ..TimeInTransitRequest.ShipFrom.Address.City = "Sint-Niklaas" 
+	Set ..TimeInTransitRequest.ShipFrom.Address.CountryCode = "BE" 
+	Set ..TimeInTransitRequest.ShipFrom.Address.PostalCode = "9100"
 ]]></Implementation>
 </Method>
 
@@ -106,8 +106,8 @@
 			}
 	}
 	
-	Set ..Body.Pickup.Date = AfhaalDatum 
-	Set ..Body.Pickup.Time = ""
+	Set ..TimeInTransitRequest.Pickup.Date = AfhaalDatum 
+	Set ..TimeInTransitRequest.Pickup.Time = ""
 ]]></Implementation>
 </Method>
 </Class>