Index: AXimpl/Dynamics/InventoryOut/EventHandler/ReceptieAfmelden.cls.xml =================================================================== diff -u -r58877 -r72394 --- AXimpl/Dynamics/InventoryOut/EventHandler/ReceptieAfmelden.cls.xml (.../ReceptieAfmelden.cls.xml) (revision 58877) +++ AXimpl/Dynamics/InventoryOut/EventHandler/ReceptieAfmelden.cls.xml (.../ReceptieAfmelden.cls.xml) (revision 72394) @@ -64,7 +64,13 @@ } try { - Do ZEND^EWPR(ProductToelevLijnEvent.Data.GeefProductID(),1) + #dim BackgroundProcessStarter As TECH.impl.BackgroundProcessStarter = ##class(TECH.Context).Instance().GeefBackgroundJobAPI().GeefBackgroundProcessStarter() + Set DataBuilder = ##class(TECH.BackgroundProcess.impl.DataBuilder).%New() + Do DataBuilder.SetClassName(##class(BL.Legacy.EWPR).%ClassName(1)) + Do DataBuilder.SetMethodName("Zend") + Do DataBuilder.VoegToeDataType(ProductToelevLijnEvent.Data.GeefProductID()) + + Do BackgroundProcessStarter.StartProcess(DataBuilder.GetData()) } catch { #dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch() Do ##class(vhLib.Logger).%New().Warning("ReceptieAfmelden","Het bestand kon niet gegenereerd worden voor ProductId '"_ProductToelevLijnEvent.Data.GeefProductID()_"'") Index: BL/Legacy/EWPR.cls.xml =================================================================== diff -u --- BL/Legacy/EWPR.cls.xml (revision 0) +++ BL/Legacy/EWPR.cls.xml (revision 72394) @@ -0,0 +1,17 @@ + + + +TECH.RegisteredObject + + +1 +ProductId:%String,Forced:%Boolean=1 + + + + + +