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(),"")