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() {