Index: APPS/TRANSP/UPS/impl/Rate/ResponseConverteerder.cls.xml
===================================================================
diff -u -r32683 -r32701
--- APPS/TRANSP/UPS/impl/Rate/ResponseConverteerder.cls.xml	(.../ResponseConverteerder.cls.xml)	(revision 32683)
+++ APPS/TRANSP/UPS/impl/Rate/ResponseConverteerder.cls.xml	(.../ResponseConverteerder.cls.xml)	(revision 32701)
@@ -22,7 +22,7 @@
 		Set OfferteItem.Kostprijs = RatedShipment.TotalCharges.MonetaryValue
 		Set OfferteItem.Optie = ""
 		
-		Do OfferteData.Items.SetAt(OfferteItem,Item)
+		Do OfferteData.Items.Insert(OfferteItem)
 	}
 
 	quit OfferteData