Index: WS/EC/ExterneVerkoop/dto/VerzendingMogelijkheid.cls.xml =================================================================== diff -u -r33877 -r37021 --- WS/EC/ExterneVerkoop/dto/VerzendingMogelijkheid.cls.xml (.../VerzendingMogelijkheid.cls.xml) (revision 33877) +++ WS/EC/ExterneVerkoop/dto/VerzendingMogelijkheid.cls.xml (.../VerzendingMogelijkheid.cls.xml) (revision 37021) @@ -35,7 +35,7 @@ TECH.String - + TECH.Decimal Index: vhUnitTest/WS/EC/Unishop/InternationaleZending/impl/ZendingDetails/Test.cls.xml =================================================================== diff -u -r37015 -r37021 --- vhUnitTest/WS/EC/Unishop/InternationaleZending/impl/ZendingDetails/Test.cls.xml (.../Test.cls.xml) (revision 37015) +++ vhUnitTest/WS/EC/Unishop/InternationaleZending/impl/ZendingDetails/Test.cls.xml (.../Test.cls.xml) (revision 37021) @@ -101,7 +101,7 @@ #dim ZendingDetails As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = HaalZendingDetails.GeefZendingDetails(BerekenInput) If $$$AssertEquals(ZendingDetails.Count(),1) { - Do $$$AssertEquals(ZendingDetails.GetAt(1).KostPrijs,44.5) + Do $$$AssertEquals(ZendingDetails.GetAt(1).VerkoopPrijs,44.5) } ]]> Index: vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.ExterneVerkoopService.txt =================================================================== diff -u -r36967 -r37021 --- vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.ExterneVerkoopService.txt (.../WS.EC.ExterneVerkoopService.txt) (revision 36967) +++ vhTestFiles/IntegratieTests/Webservices.WSDLControle/Test/WS.EC.ExterneVerkoopService.txt (.../WS.EC.ExterneVerkoopService.txt) (revision 37021) @@ -1292,7 +1292,7 @@ - + Index: WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml =================================================================== diff -u -r37020 -r37021 --- WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml (.../ZendingDetails.cls.xml) (revision 37020) +++ WS/EC/Unishop/InternationaleZending/impl/ZendingDetails.cls.xml (.../ZendingDetails.cls.xml) (revision 37021) @@ -127,7 +127,7 @@ Set ZendingDetail.Duurtijd = OfferteItem.Duurtijd Set ZendingDetail.Omschrijving = OfferteItem.Omschrijving Set ZendingDetail.ExtraInfo = ..Vertaler.GeefVertaling(OfferteItem.Omschrijving) - Set ZendingDetail.KostPrijs = OfferteItem.Kostprijs + Set ZendingDetail.VerkoopPrijs = OfferteItem.Kostprijs Set ZendingDetail.Optie = ..ConverteerNaarCarbonNeutralOptie(OfferteItem.CarbonNeutralPrijs) Set ZendingDetail.TransportFirma = TransportFirma Quit ZendingDetail @@ -197,8 +197,8 @@ Set VerzendingItem = ##class(WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid.VerzendingItem).%New() Set VerzendingItem.Code = ZendingDetail.Code Set VerzendingItem.Duurtijd = ZendingDetail.Duurtijd - Set VerzendingItem.AankoopPrijs = ZendingDetail.KostPrijs - Set VerzendingItem.VerkoopPrijs = ZendingDetail.KostPrijs + Set VerzendingItem.AankoopPrijs = ZendingDetail.VerkoopPrijs + Set VerzendingItem.VerkoopPrijs = ZendingDetail.VerkoopPrijs Set VerzendingItem.LeverDag = ZendingDetail.LeverDag Set VerzendingItem.LeverDatum = ZendingDetail.LeverDatum Set VerzendingItem.LeverTijd = ZendingDetail.LeverTijd