Index: EXT/Unishop/PurchaseOrder001/BestandVerwerker.cls.xml =================================================================== diff -u -r52705 -r53993 --- EXT/Unishop/PurchaseOrder001/BestandVerwerker.cls.xml (.../BestandVerwerker.cls.xml) (revision 52705) +++ EXT/Unishop/PurchaseOrder001/BestandVerwerker.cls.xml (.../BestandVerwerker.cls.xml) (revision 53993) @@ -120,6 +120,7 @@ Do ##class(TECH.Context.RuntimeContext).Instance().ZetPersonalityID(##class(DOM.common.enu.Personality).VanHoecke()) Do ##class(TECH.Context.RuntimeContext).Instance().ZetGebruikerID($$$SystemUser) Do Mail.VoegToeOntvanger(Klant.GeefInterneVerantwoordelijke().GeefEmailAdres()) + Do Mail.VoegToeOntvanger("ICT_Meldingen@vanhoecke.be") #dim Inhoud As %String = "Er werd een EDI bestelling van '"_Klant.GeefNaam()_"' ontvangen" #dim Onderwerp As %String = "EDI bestelling van '"_Klant.GeefNaam()_"' ontvangen" If $$$HasLength(ProbleemTekst){ Index: vhUnitTest/EXT/Unishop/PurchaseOrder001/BestandVerwerker/VerwerkBestand/Test.cls.xml =================================================================== diff -u -r52707 -r53993 --- vhUnitTest/EXT/Unishop/PurchaseOrder001/BestandVerwerker/VerwerkBestand/Test.cls.xml (.../Test.cls.xml) (revision 52707) +++ vhUnitTest/EXT/Unishop/PurchaseOrder001/BestandVerwerker/VerwerkBestand/Test.cls.xml (.../Test.cls.xml) (revision 53993) @@ -203,6 +203,7 @@ Set ..MailMock = ##class(vhTest.Mock.TECH.Mail.Mail).%New() Do ..MailMock.VerwachtMethodCall("ZetVerzender", $$$SystemMail("EDI Bestelling")) Do ..MailMock.VerwachtMethodCall("VoegToeOntvanger", ..DummyGebruiker.GeefEmailAdres()) + Do ..MailMock.VerwachtMethodCall("VoegToeOntvanger", "ICT_Meldingen@vanhoecke.be") Set ..MailApiMock = ##class(vhTest.Mock.TECH.Mail.MailAPI).%New() Do ..MailApiMock.VerwachtMethodCall("VerstuurMail", ..MailMock) Do ..MailApiMock.VerwachtMethodCall("MaakNieuwMail").DanReturn(..MailMock)