Index: vhUnitTest/AX/Uitgaand/PM/GenVrijgegProduct/impl/GenVrijgegProductDixfConverter/Test.cls.xml
===================================================================
diff -u -r47212 -r47315
--- vhUnitTest/AX/Uitgaand/PM/GenVrijgegProduct/impl/GenVrijgegProductDixfConverter/Test.cls.xml (.../Test.cls.xml) (revision 47212)
+++ vhUnitTest/AX/Uitgaand/PM/GenVrijgegProduct/impl/GenVrijgegProductDixfConverter/Test.cls.xml (.../Test.cls.xml) (revision 47315)
@@ -13,8 +13,8 @@
1
-
-AX.Uitgaand.PM.Product.impl.GenerischOrgaluxProductFilter
+
+AX.Uitgaand.PM.impl.IsBasisProductFilter
1
@@ -31,7 +31,7 @@
@@ -231,9 +231,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.GenVrijgegProduct.impl.GenVrijgegProductDixfConverter = ..GeefConverter()
@@ -252,9 +252,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.GenVrijgegProduct.impl.GenVrijgegProductDixfConverter = ..GeefConverter()
@@ -277,7 +277,7 @@
1
AX.Uitgaand.PM.GenVrijgegProduct.impl.GenVrijgegProductDixfConverter
-
Index: AX/Uitgaand/PM/GenVrijgegProduct/impl/GenVrijgegProductDixfConverter.cls.xml
===================================================================
diff -u -r47244 -r47315
--- AX/Uitgaand/PM/GenVrijgegProduct/impl/GenVrijgegProductDixfConverter.cls.xml (.../GenVrijgegProductDixfConverter.cls.xml) (revision 47244)
+++ AX/Uitgaand/PM/GenVrijgegProduct/impl/GenVrijgegProductDixfConverter.cls.xml (.../GenVrijgegProductDixfConverter.cls.xml) (revision 47315)
@@ -13,20 +13,20 @@
1
-
-AX.Uitgaand.PM.Product.impl.GenerischOrgaluxProductFilter
+
+AX.Uitgaand.PM.impl.IsBasisProductFilter
1
-AXimplFormatter:AXimpl.Formatter,GenerischOrgaluxProductFilter:AX.Uitgaand.PM.Product.impl.GenerischOrgaluxProductFilter
+AXimplFormatter:AXimpl.Formatter,IsBasisProductFilter:AX.Uitgaand.PM.impl.IsBasisProductFilter
1
1
%Status
1
@@ -59,7 +59,7 @@
Set ..AxProduct.DefaultOrderType = $$$If(Vestiging = ##class(AXimpl.InterneFirmaInitialen).VanHoeckeNv(),"Aankoop","Productie")
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 ..AxProduct.IntrastatExclude = "" // ON HOLD
Set ..AxProduct.IntraUnit = $$$If(##class(TECH.StringUtils).Equals(..AxProduct.Intracode,"84659500","85043180","90172039"),"1","")