Index: vhUnitTest/AX/Uitgaand/PM/VrijgegProduct/impl/VrijgegProductDixfConverter/Test.cls.xml
===================================================================
diff -u -r47239 -r47314
--- vhUnitTest/AX/Uitgaand/PM/VrijgegProduct/impl/VrijgegProductDixfConverter/Test.cls.xml (.../Test.cls.xml) (revision 47239)
+++ vhUnitTest/AX/Uitgaand/PM/VrijgegProduct/impl/VrijgegProductDixfConverter/Test.cls.xml (.../Test.cls.xml) (revision 47314)
@@ -23,8 +23,8 @@
1
-
-AX.Uitgaand.PM.Product.impl.GenerischOrgaluxProductFilter
+
+AX.Uitgaand.PM.impl.IsBasisProductFilter
1
@@ -48,7 +48,7 @@
Set ..DataDefinitieService = ##class(vhTest.Fake.BL.Prod.Kenmerk.DataDefinitieService).%New()
Set ..VoorraadInstellingCalculator = ##class(vhTest.Fake.AX.Uitgaand.PM.VrijgegProduct.impl.VoorraadInstellingCalculator).%New()
Set ..AXimplFormatter = ##class(vhTest.Dummy.AXimpl.Formatter).%New()
- Set ..GenerischOrgaluxProductFilter = ##class(vhTest.Fake.AX.Uitgaand.PM.Product.impl.GenerischOrgaluxProductFilter).%New()
+ Set ..IsBasisProductFilter = ##class(vhTest.Fake.AX.Uitgaand.PM.impl.IsBasisProductFilter).%New()
Set ..BestelImpulsRepositoryMock = ##class(vhTest.Mock.DOM.AKP.BestelImpuls.impl.BestelImpulsRepository).%New()
Do ..BestelImpulsRepositoryMock.IndienMethodCall("BestaatViaProduct",..#ProductId).DanReturn($$$True)
]]>
@@ -1603,9 +1603,9 @@
#dim AxProduct As AX.Uitgaand.PM.Product.impl.Product = ..GeefTeConverterenProduct()
- #dim GenerischOrgaluxProductFilter As AX.Uitgaand.PM.Product.impl.GenerischOrgaluxProductFilter = ##class(vhTest.Mock.AX.Uitgaand.PM.Product.impl.GenerischOrgaluxProductFilter).%New()
- Do GenerischOrgaluxProductFilter.IndienMethodCall("IsGenerischOrgaluxProduct",AxProduct).DanReturn($$$True)
- Set ..GenerischOrgaluxProductFilter = GenerischOrgaluxProductFilter
+ #dim IsBasisProductFilter As AX.Uitgaand.PM.impl.IsBasisProductFilter = ##class(vhTest.Mock.AX.Uitgaand.PM.impl.IsBasisProductFilter).%New()
+ Do IsBasisProductFilter.IndienMethodCall("IsValid",AxProduct).DanReturn($$$True)
+ Set ..IsBasisProductFilter = IsBasisProductFilter
#dim Converter As AX.Uitgaand.PM.VrijgegProduct.impl.VrijgegProductDixfConverter = ..GeefConverter()
@@ -1624,9 +1624,9 @@
#dim AxProduct As AX.Uitgaand.PM.Product.impl.Product = ..GeefTeConverterenProduct()
- #dim GenerischOrgaluxProductFilter As AX.Uitgaand.PM.Product.impl.GenerischOrgaluxProductFilter = ##class(vhTest.Mock.AX.Uitgaand.PM.Product.impl.GenerischOrgaluxProductFilter).%New()
- Do GenerischOrgaluxProductFilter.IndienMethodCall("IsGenerischOrgaluxProduct",AxProduct).DanReturn($$$False)
- Set ..GenerischOrgaluxProductFilter = GenerischOrgaluxProductFilter
+ #dim IsBasisProductFilter As AX.Uitgaand.PM.impl.IsBasisProductFilter = ##class(vhTest.Mock.AX.Uitgaand.PM.impl.IsBasisProductFilter).%New()
+ Do IsBasisProductFilter.IndienMethodCall("IsValid",AxProduct).DanReturn($$$False)
+ Set ..IsBasisProductFilter = IsBasisProductFilter
#dim Converter As AX.Uitgaand.PM.VrijgegProduct.impl.VrijgegProductDixfConverter = ..GeefConverter()
@@ -1649,7 +1649,7 @@
1
AX.Uitgaand.PM.VrijgegProduct.impl.VrijgegProductDixfConverter
-
Index: AX/Uitgaand/PM/VrijgegProduct/impl/VrijgegProductDixfConverter.cls.xml
===================================================================
diff -u -r47239 -r47314
--- AX/Uitgaand/PM/VrijgegProduct/impl/VrijgegProductDixfConverter.cls.xml (.../VrijgegProductDixfConverter.cls.xml) (revision 47239)
+++ AX/Uitgaand/PM/VrijgegProduct/impl/VrijgegProductDixfConverter.cls.xml (.../VrijgegProductDixfConverter.cls.xml) (revision 47314)
@@ -68,8 +68,8 @@
1
-
-AX.Uitgaand.PM.Product.impl.GenerischOrgaluxProductFilter
+
+AX.Uitgaand.PM.impl.IsBasisProductFilter
1
@@ -89,7 +89,7 @@
-DataDefinitieService:BL.Prod.Kenmerk.DataDefinitieService,VoorraadInstellingCalculator:AX.Uitgaand.PM.VrijgegProduct.impl.VoorraadInstellingCalculator,AXimplFormatter:AXimpl.Formatter,GenerischOrgaluxProductFilter:AX.Uitgaand.PM.Product.impl.GenerischOrgaluxProductFilter
+DataDefinitieService:BL.Prod.Kenmerk.DataDefinitieService,VoorraadInstellingCalculator:AX.Uitgaand.PM.VrijgegProduct.impl.VoorraadInstellingCalculator,AXimplFormatter:AXimpl.Formatter,IsBasisProductFilter:AX.Uitgaand.PM.impl.IsBasisProductFilter
1
1
%Status
@@ -98,7 +98,7 @@
Set ..DataDefinitieService = $$$Inject(DataDefinitieService,##class(BL.Prod.Kenmerk.DataDefinitieService).%New())
Set ..VoorraadInstellingCalculator = $$$Inject(VoorraadInstellingCalculator,##class(AX.Uitgaand.PM.VrijgegProduct.impl.VoorraadInstellingCalculator).%New())
Set ..AXimplFormatter = $$$Inject(AXimplFormatter,##class(AXimpl.Formatter).%New())
- Set ..GenerischOrgaluxProductFilter = $$$Inject(GenerischOrgaluxProductFilter,##class(AX.Uitgaand.PM.Product.impl.GenerischOrgaluxProductFilter).%New())
+ Set ..IsBasisProductFilter = $$$Inject(IsBasisProductFilter,##class(AX.Uitgaand.PM.impl.IsBasisProductFilter).%New())
Set ..Utils = ##class(AXimpl.Utils).%New()
Quit $$$OK
]]>
@@ -138,7 +138,7 @@
Set ..AxProduct.DefaultOrderType = ..DefaultOrderType
Set ..AxProduct.DisplayProductNumber = Product.Basis.IdentNummer
Set ..AxProduct.EcoResStorageDimensionGroupName = "WMS"
- Set ..AxProduct.EcoResTrackingDimensionGroupName = $$$If(..GenerischOrgaluxProductFilter.IsGenerischOrgaluxProduct(Product),"None","Batch")
+ Set ..AxProduct.EcoResTrackingDimensionGroupName = $$$If(..IsBasisProductFilter.IsValid(Product),"None","Batch")
Set ..AxProduct.Intracode = ..BepaalIntracode(Product)
Set ..Intracode = ..AxProduct.Intracode
Set ..AxProduct.InventItemInventMandatoryInventLocation = "Nee"