Index: vhUnitTest/AXimpl/Dynamics/InventoryOut/SyncAll/Maatwerk.cls.xml =================================================================== diff -u -r49321 -r58221 --- vhUnitTest/AXimpl/Dynamics/InventoryOut/SyncAll/Maatwerk.cls.xml (.../Maatwerk.cls.xml) (revision 49321) +++ vhUnitTest/AXimpl/Dynamics/InventoryOut/SyncAll/Maatwerk.cls.xml (.../Maatwerk.cls.xml) (revision 58221) @@ -8,6 +8,14 @@ 1 + + + + aTestName:%String + + + + + + + + 1 TECH.Iterator @@ -155,18 +196,9 @@ 1 AXimpl.Dynamics.InventoryOut.MaatwerkStockVerschilAfhandelaar ").DanDoeNiks() - Do MailMock.IndienMethodCall("VoegToeOntvanger", "Stockbeheer@VanHoecke.Be").DanDoeNiks() - Do MailMock.IndienMethodCall("ZetOnderwerp", "Overzicht verschillen stock tussen AX en Caché").DanDoeNiks() - Do MailMock.IndienMethodCall("ZetInhoud", $$$ElkeWaarde).DanDoeNiks() + #dim MailApiStub As TECH.Mail.MailAPI = ..GeefMailApiStub() - Set MailApi = ##class(vhTest.Mock.TECH.Mail.MailAPI).%New() - Do MailApi.IndienMethodCall("MaakNieuwMail").DanReturn(MailMock) - Do MailApi.IndienMethodCall("VerstuurMail",MailMock).DanDoeNiks() - - Set MaatwerkStockVerschilAfhandelaarStub = ##class(vhTest.Mock.AXimpl.Dynamics.InventoryOut.MaatwerkStockVerschilAfhandelaar).%New(,,,,MailApi) - + Set MaatwerkStockVerschilAfhandelaarStub = ##class(vhTest.Mock.AXimpl.Dynamics.InventoryOut.MaatwerkStockVerschilAfhandelaar).%New(,,,,MailApiStub) Do MaatwerkStockVerschilAfhandelaarStub.IndienMethodCall("CheckStockTussenOrderLijnenEnStockAdmin",1000,"0.123.456.7","15.00").DanDoeNiks() Do MaatwerkStockVerschilAfhandelaarStub.IndienMethodCall("CheckStockTussenOrderLijnenEnStockAdmin",1001,"1.234.567.8","25.00").DanDoeNiks() Do MaatwerkStockVerschilAfhandelaarStub.IndienMethodCall("CheckStockTussenOrderLijnenEnStockAdmin",1002,"2.345.678.9","35.00").DanDoeNiks() @@ -178,6 +210,34 @@ ]]> + +1 +TECH.Mail.MailAPI + + + + +1 +TECH.Mail.Mail +").DanDoeNiks() + Do MailStub.IndienMethodCall("VoegToeOntvanger", "Stockbeheer@VanHoecke.Be").DanDoeNiks() + Do MailStub.IndienMethodCall("ZetOnderwerp", "Overzicht verschillen stock tussen AX en Caché").DanDoeNiks() + Do MailStub.IndienMethodCall("ZetInhoud", $$$ElkeWaarde).DanDoeNiks() + + Quit MailStub +]]> + + 1 AXimpl.Dynamics.InventoryOut.MaatwerkIterator @@ -265,6 +325,24 @@ Quit MaatwerkIteratorStub ]]> + + +1 + + + + +1 + + Index: AXimpl/Dynamics/InventoryOut/SyncAll.cls.xml =================================================================== diff -u -r49364 -r58221 --- AXimpl/Dynamics/InventoryOut/SyncAll.cls.xml (.../SyncAll.cls.xml) (revision 49364) +++ AXimpl/Dynamics/InventoryOut/SyncAll.cls.xml (.../SyncAll.cls.xml) (revision 58221) @@ -38,8 +38,13 @@ 1 + +DOM.PM.ProductTypeAPI +1 + + -Generator:AXimpl.Generator,ProductIterator:AXimpl.Admin.DOM.PM.ProductIterator,BundelGrootte:%Integer=90,MaatwerkIterator:AXimpl.Dynamics.InventoryOut.MaatwerkIterator,PRNrAxConfigIdRepository:AXimpl.Dynamics.InventoryOut.PRNrAxConfigIdVoorraadHistoriekRepository,MaatwerkStockVerschilAfhandelaar:AXimpl.Dynamics.InventoryOut.MaatwerkStockVerschilAfhandelaar,DataBouwer:AXimpl.Dynamics.InventoryOut.MaatwerkIterator.DataBouwer +Generator:AXimpl.Generator,ProductIterator:AXimpl.Admin.DOM.PM.ProductIterator,BundelGrootte:%Integer=90,MaatwerkIterator:AXimpl.Dynamics.InventoryOut.MaatwerkIterator,PRNrAxConfigIdRepository:AXimpl.Dynamics.InventoryOut.PRNrAxConfigIdVoorraadHistoriekRepository,MaatwerkStockVerschilAfhandelaar:AXimpl.Dynamics.InventoryOut.MaatwerkStockVerschilAfhandelaar,DataBouwer:AXimpl.Dynamics.InventoryOut.MaatwerkIterator.DataBouwer,ProductTypeApi:DOM.PM.ProductTypeAPI 1 1 %Status @@ -51,6 +56,7 @@ Set ..MaatwerkIterator = $$$Inject(MaatwerkIterator, ##class(AXimpl.Dynamics.InventoryOut.MaatwerkIterator).%New()) Set ..PRNrAxConfigIdRepository = $$$Inject(PRNrAxConfigIdRepository, ##class(AXimpl.Dynamics.InventoryOut.PRNrAxConfigIdVoorraadHistoriekRepository).%New()) Set ..MaatwerkStockVerschilAfhandelaar = $$$Inject(MaatwerkStockVerschilAfhandelaar, ##class(AXimpl.Dynamics.InventoryOut.MaatwerkStockVerschilAfhandelaar).%New()) + Set ..ProductTypeApi = $$$Inject(ProductTypeApi, ##class(DOM.PM.impl.ProductTypeAPIimpl).%New()) Set ..BundelGrootte = BundelGrootte Quit $$$OK @@ -132,7 +138,9 @@ Set $List(SubjectLijst,BundelTeller) = ProductNr #dim AxMaatwerkGenerischItemId As %String = PRNrAxConfigIdVoorraadHistoriek.AxMaatwerkGenerischItemId #dim QtyVHPerProductNr As %String = ..PRNrAxConfigIdRepository.GeefQtyVHPerProductNr(ProductNr) - Do ..MaatwerkStockVerschilAfhandelaar.CheckStockTussenOrderLijnenEnStockAdmin(ProductNr, AxMaatwerkGenerischItemId, QtyVHPerProductNr) + If ($$$Not(..ProductTypeApi.IsSpaceTowerProduct(ProductNr))) { + Do ..MaatwerkStockVerschilAfhandelaar.CheckStockTussenOrderLijnenEnStockAdmin(ProductNr, AxMaatwerkGenerischItemId, QtyVHPerProductNr) + } #dim AantalAxConfigIdsPerProductNr As %Integer = ..PRNrAxConfigIdRepository.GeefAantalAxConfigIdsPerProductNr(ProductNr) #dim AxConfigIdIterator As TECH.Iterator = ..PRNrAxConfigIdRepository.GeefAxConfigIdsPerProductNr(ProductNr) While AxConfigIdIterator.HasNext() {