Index: vhUnitTest/APPS/VKP/Offerte/impl/HandelOfferteNaarVanHoeckeOfferteConverteerder/Converteer/Test.cls.xml =================================================================== diff -u -r37453 -r38029 --- vhUnitTest/APPS/VKP/Offerte/impl/HandelOfferteNaarVanHoeckeOfferteConverteerder/Converteer/Test.cls.xml (.../Test.cls.xml) (revision 37453) +++ vhUnitTest/APPS/VKP/Offerte/impl/HandelOfferteNaarVanHoeckeOfferteConverteerder/Converteer/Test.cls.xml (.../Test.cls.xml) (revision 38029) @@ -34,9 +34,15 @@ #dim Converteerder As APPS.VKP.Offerte.impl.HandelOfferteNaarVanHoeckeOfferteConverteerder Set Converteerder = ##class(APPS.VKP.Offerte.impl.HandelOfferteNaarVanHoeckeOfferteConverteerder).%New(OfferteKopieerderFake, OfferteServiceFake, ExterneVerkoopServiceSpy, ..GeefCommonAPIStub(), ..GeefWinkelKarServiceMock()) - Do Converteerder.Converteer(OfferteFake) + #dim GeconverteerdeOfferte As APPS.VKP.Offerte = Converteerder.Converteer(OfferteFake) Do $$$AssertEquals(ExterneVerkoopServiceSpy.GeefStelInStandaardLeveradresTeller(),0) + + Do $$$AssertEquals(GeconverteerdeOfferte.GeefLeverAdres().GeefAanspreking(), OfferteFake.GeefLeverAdres().GeefAanspreking()) + Do $$$AssertEquals(GeconverteerdeOfferte.GeefLeverAdres().GeefGemeente(), OfferteFake.GeefLeverAdres().GeefGemeente()) + Do $$$AssertEquals(GeconverteerdeOfferte.GeefLeverAdres().GeefPostcode(), OfferteFake.GeefLeverAdres().GeefPostcode()) + Do $$$AssertEquals(GeconverteerdeOfferte.GeefLeverAdres().GeefStraat(), OfferteFake.GeefLeverAdres().GeefStraat()) + Do $$$AssertEquals(GeconverteerdeOfferte.GeefLeverAdres().GeefTaal(), OfferteFake.GeefLeverAdres().GeefTaal()) ]]> @@ -56,9 +62,16 @@ #dim Converteerder As APPS.VKP.Offerte.impl.HandelOfferteNaarVanHoeckeOfferteConverteerder Set Converteerder = ##class(APPS.VKP.Offerte.impl.HandelOfferteNaarVanHoeckeOfferteConverteerder).%New(OfferteKopieerderFake, OfferteServiceFake, ExterneVerkoopServiceSpy, ..GeefCommonAPIStub(), ..GeefWinkelKarServiceMock()) - Do Converteerder.Converteer(OfferteFake) + #dim GeconverteerdeOfferte As APPS.VKP.Offerte = Converteerder.Converteer(OfferteFake) Do $$$AssertEquals(ExterneVerkoopServiceSpy.GeefStelInStandaardLeveradresTeller(),1) + + Do $$$AssertNotEquals(GeconverteerdeOfferte.GeefLeverAdres().GeefAanspreking(), OfferteFake.GeefLeverAdres().GeefAanspreking()) + Do $$$AssertNotEquals(GeconverteerdeOfferte.GeefLeverAdres().GeefGemeente(), OfferteFake.GeefLeverAdres().GeefGemeente()) + Do $$$AssertNotEquals(GeconverteerdeOfferte.GeefLeverAdres().GeefPostcode(), OfferteFake.GeefLeverAdres().GeefPostcode()) + Do $$$AssertNotEquals(GeconverteerdeOfferte.GeefLeverAdres().GeefStraat(), OfferteFake.GeefLeverAdres().GeefStraat()) + Do $$$AssertNotEquals(GeconverteerdeOfferte.GeefLeverAdres().GeefTaal(), OfferteFake.GeefLeverAdres().GeefTaal()) + Do $$$AssertNotEquals(GeconverteerdeOfferte.GeefLeverAdres().GeefTelefoon(), OfferteFake.GeefLeverAdres().GeefTelefoon()) ]]> @@ -139,6 +152,12 @@ Index: vhTest/Spy/APPS/EC/Verkoop/ExterneVerkoopService.cls.xml =================================================================== diff -u -r37306 -r38029 --- vhTest/Spy/APPS/EC/Verkoop/ExterneVerkoopService.cls.xml (.../ExterneVerkoopService.cls.xml) (revision 37306) +++ vhTest/Spy/APPS/EC/Verkoop/ExterneVerkoopService.cls.xml (.../ExterneVerkoopService.cls.xml) (revision 38029) @@ -13,7 +13,9 @@ Offerte:APPS.VKP.Offerte -