Index: vhUnitTest/DOM/AKP/impl/ToeleveringService/GeefLijnReferentie/Test.cls.xml =================================================================== diff -u -r68264 -r68796 --- vhUnitTest/DOM/AKP/impl/ToeleveringService/GeefLijnReferentie/Test.cls.xml (.../Test.cls.xml) (revision 68264) +++ vhUnitTest/DOM/AKP/impl/ToeleveringService/GeefLijnReferentie/Test.cls.xml (.../Test.cls.xml) (revision 68796) @@ -55,6 +55,22 @@ ]]> + + + + 1 + +vhLib.Logger +1 + + -ToeleveringApi:DOM.AKP.ToeleveringAPI,ProductTypeApi:DOM.PM.ProductTypeAPI,OrderApi:DOM.VKP.OrderAPI,TransportWaarborgTypeBepaler:DOM.VKP.impl.TransportWaarborgTypeBepaler,VerkoopApi:DOM.VKP.VerkoopAPI +ToeleveringApi:DOM.AKP.ToeleveringAPI,ProductTypeApi:DOM.PM.ProductTypeAPI,OrderApi:DOM.VKP.OrderAPI,TransportWaarborgTypeBepaler:DOM.VKP.impl.TransportWaarborgTypeBepaler,VerkoopApi:DOM.VKP.VerkoopAPI,Logger:vhLib.Logger="" 1 1 %Status @@ -45,6 +50,8 @@ Set ..OrderApi = $$$Inject(OrderApi,##class(DOM.DomeinContext).Instance().GeefOrderAPI()) Set ..TransportWaarborgTypeBepaler = $$$Inject(TransportWaarborgTypeBepaler, ##class(DOM.VKP.impl.TransportWaarborgTypeBepaler).%New()) Set ..VerkoopApi = $$$Inject(VerkoopApi,##class(DOM.DomeinContext).Instance().GeefVerkoopAPI()) + Set ..Logger = $$$Inject(Logger, ##class(vhLib.Logger).%New()) + Quit $$$OK ]]> @@ -139,7 +146,7 @@ } Catch { #dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch() - Do ##class(vhLib.Logger).%New().Warning("ToeleveringService","De referentie voor product '"_ProductId_"' op toelevering '"_ToeleveringID_"' kon niet bepaald worden") + Do ..Logger.Warning("ToeleveringService","De referentie voor product '"_ProductId_"' op toelevering '"_ToeleveringID_"' kon niet bepaald worden") Set ProductInOrder = $$$False } Quit $$$If(ProductInOrder,OrderLijn.GeefProjectReferentie(),"")