Index: vhUnitTest/APPS/VKP/Offerte/impl/BesteldeOfferteMelder/HttpVerzender/dto/OfferteGenerator/Test.cls.xml =================================================================== diff -u -r61043 -r61070 --- vhUnitTest/APPS/VKP/Offerte/impl/BesteldeOfferteMelder/HttpVerzender/dto/OfferteGenerator/Test.cls.xml (.../Test.cls.xml) (revision 61043) +++ vhUnitTest/APPS/VKP/Offerte/impl/BesteldeOfferteMelder/HttpVerzender/dto/OfferteGenerator/Test.cls.xml (.../Test.cls.xml) (revision 61070) @@ -153,7 +153,6 @@ Set MaatwerkLijn1 = ##class(DOM.EC.Winkelkar.MaatwerkLijn).%New(,IngegevenKenmerkenAPIStub) Do MaatwerkLijn1.ZetHerbestellingBijProbleem($$$True) Do MaatwerkLijnen.Insert(MaatwerkLijn1) - //#dim MaatwerkLijn As DOM.EC.Winkelkar.MaatwerkLijn = ##class(vhUnitTest.DOM.EC.Winkelkar.WinkelkarUtils).MaakNieuwMetEigenschappen(1, IngegevenKenmerkenAPIStub, $$$DummyInteger,$$$DummyInteger) Do MaatwerkLijnen.Insert(##class(DOM.EC.Winkelkar.MaatwerkLijn).%New(,IngegevenKenmerkenAPIStub)) #dim KlantData As DOM.common.dto.KlantData = ##class(DOM.common.dto.KlantData).%New() Index: APPS/VKP/Offerte/impl/BesteldeOfferteMelder.cls.xml =================================================================== diff -u -r59929 -r61070 --- APPS/VKP/Offerte/impl/BesteldeOfferteMelder.cls.xml (.../BesteldeOfferteMelder.cls.xml) (revision 59929) +++ APPS/VKP/Offerte/impl/BesteldeOfferteMelder.cls.xml (.../BesteldeOfferteMelder.cls.xml) (revision 61070) @@ -85,6 +85,7 @@ If $$$Not(..Offerte.GeefAutomatischeVerwerking()) { #dim WinkelkarId as %String = ..Offerte.GeefWinkelkarID() #dim Winkelkar as DOM.EC.Winkelkar.Winkelkar = ..WinkelkarRepository.GeefViaID(WinkelkarId) + Do ##class(Tools.Wlip).%New(43).String("WinkelkarId "_WinkelkarId_" - "_Winkelkar.HeeftHerbestellingBijProbleem()) Do ..MailVerzenderVanHoecke.Verzend(..Offerte,Winkelkar.HeeftHerbestellingBijProbleem()) } ]]>