Index: AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter.cls.xml =================================================================== diff -u -r48325 -r48469 --- AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter.cls.xml (.../InventoryInConverter.cls.xml) (revision 48325) +++ AXimpl/Dynamics/InventoryIn/Converter/InventoryInConverter.cls.xml (.../InventoryInConverter.cls.xml) (revision 48469) @@ -66,13 +66,18 @@ 1 + +BL.Legacy.FLOWTOE +1 + + %String 1 -ToeleveringAPI:DOM.AKP.ToeleveringAPI,ProductLookup:AXimpl.Admin.Common.ProductBepaler,ReceptieService:APPS.AKP.Receptie.impl.ReceptieService,InventoryOutConverter:AXimpl.Dynamics.InventoryOut.Converter.InventoryOutConverter,ProductRepository:Prod.ProductRepository,AankoopAPI:DOM.AKP.AankoopAPI,ProductTypeAPI:DOM.PM.ProductTypeAPI,ConversieBezwarenBepaler:AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler +ToeleveringAPI:DOM.AKP.ToeleveringAPI,ProductLookup:AXimpl.Admin.Common.ProductBepaler,ReceptieService:APPS.AKP.Receptie.impl.ReceptieService,InventoryOutConverter:AXimpl.Dynamics.InventoryOut.Converter.InventoryOutConverter,ProductRepository:Prod.ProductRepository,AankoopAPI:DOM.AKP.AankoopAPI,ProductTypeAPI:DOM.PM.ProductTypeAPI,ConversieBezwarenBepaler:AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler,FLOWTOE:BL.Legacy.FLOWTOE 1 1 %Status @@ -87,6 +92,7 @@ Set ..AankoopAPI = $$$Inject(AankoopAPI,##class(DOM.DomeinContext).Instance().GeefAankoopAPI()) Set ..ProductTypeAPI = $$$Inject(ProductTypeAPI,##class(DOM.DomeinContext).Instance().GeefProductTypeAPI()) Set ..ConversieBezwarenBepaler = $$$Inject(ConversieBezwarenBepaler,##class(AXimpl.Dynamics.InventoryIn.Converter.ConversieBezwarenBepaler).%New()) + Set ..FLOWTOE = $$$Inject(FLOWTOE,##class(BL.Legacy.FLOWTOE).%New()) Quit $$$OK ]]> @@ -140,8 +146,10 @@ While JournalLineIterator.HasNext() { #dim JournalEntryLine as AXif.Dynamics.InventoryIn.MessageParts.AxdEntityJournalTrans = JournalLineIterator.Next() #dim Toelevering As DOM.AKP.Toelevering = ..BepaalToelevering(JournalEntry,JournalEntryLine) - Do ..VoegToeToeleveringProductLijn(Toelevering ,JournalEntryLine) + #dim VolgNummer as %Integer = ..VoegToeToeleveringProductLijn(Toelevering ,JournalEntryLine) Do ..ToeleveringAPI.Bewaar(Toelevering) + + Do ..FLOWTOE.SWNode(Toelevering.GeefLeverancierID(),Toelevering.GeefID(),VolgNummer) } } ]]> @@ -214,6 +222,7 @@ Toelevering:DOM.AKP.Toelevering,JournalEntryLine:AXif.Dynamics.InventoryIn.MessageParts.AxdEntityJournalTrans 1 +%Integer