Index: vhUnitTest/APPS/TRANSP/UPS/TimeInTransit/OfferteBerekenaar/Test.cls.xml =================================================================== diff -u -r32673 -r32680 --- vhUnitTest/APPS/TRANSP/UPS/TimeInTransit/OfferteBerekenaar/Test.cls.xml (.../Test.cls.xml) (revision 32673) +++ vhUnitTest/APPS/TRANSP/UPS/TimeInTransit/OfferteBerekenaar/Test.cls.xml (.../Test.cls.xml) (revision 32680) @@ -15,10 +15,10 @@ #dim TestTransportOfferte As APPS.TRANSP.OfferteService.dto.OfferteData = ..GeefTransportOfferte() - Do $$$AssertEquals(TransportOfferte.OfferteItemList.Count(), TestTransportOfferte.OfferteItemList.Count()) + Do $$$AssertEquals(TransportOfferte.Items.Count(), TestTransportOfferte.Items.Count()) - For Item=1:1:TransportOfferte.OfferteItemList.Count() { - Do $$$AssertObject(TransportOfferte.OfferteItemList.GetAt(Item), TestTransportOfferte.OfferteItemList.GetAt(Item)) + For Item=1:1:TransportOfferte.Items.Count() { + Do $$$AssertObject(TransportOfferte.Items.GetAt(Item), TestTransportOfferte.Items.GetAt(Item)) } ]]> @@ -30,10 +30,10 @@ #dim TransportOfferte As APPS.TRANSP.OfferteService.dto.OfferteData = ResponseConverteerder.Converteer(Response) #dim TestTransportOfferte As APPS.TRANSP.OfferteService.dto.OfferteData = ..GeefTransportOfferte() - Do $$$AssertEquals(TransportOfferte.OfferteItemList.Count(), TestTransportOfferte.OfferteItemList.Count()) + Do $$$AssertEquals(TransportOfferte.Items.Count(), TestTransportOfferte.Items.Count()) - For Item=1:1:TransportOfferte.OfferteItemList.Count() { - Do $$$AssertObject(TransportOfferte.OfferteItemList.GetAt(Item), TestTransportOfferte.OfferteItemList.GetAt(Item)) + For Item=1:1:TransportOfferte.Items.Count() { + Do $$$AssertObject(TransportOfferte.Items.GetAt(Item), TestTransportOfferte.Items.GetAt(Item)) } ]]> @@ -75,6 +75,7 @@ Do $$$AssertObject(Request.Request.TransactionReference , TestRequest.Request.TransactionReference) Do $$$AssertObject(Request.ShipTo.Address , TestRequest.ShipTo.Address) Do $$$AssertObject(Request.ShipmentWeight.UnitOfMeasurement , TestRequest.ShipmentWeight.UnitOfMeasurement) + Do $$$AssertEquals(Request.ShipmentWeight.Weight ,302500) Do $$$AssertObject(Request.Request.TransactionReference , TestRequest.Request.TransactionReference) Do $$$AssertObject(Request.InvoiceLineTotal , TestRequest.InvoiceLineTotal) @@ -290,7 +291,7 @@ Set OfferteItem.Kostprijs = 0 Set OfferteItem.OphaalDatum = ##class(TECH.DateTime).TextToDate("10/03/2016") Set OfferteItem.Optie = "" - Do OfferteData.OfferteItemList.SetAt(OfferteItem,Item) + Do OfferteData.Items.SetAt(OfferteItem,Item) } Quit OfferteData