Index: AX/Uitgaand/PM/Product/impl/ProductDixfConverter.cls.xml
===================================================================
diff -u -r47243 -r47312
--- AX/Uitgaand/PM/Product/impl/ProductDixfConverter.cls.xml (.../ProductDixfConverter.cls.xml) (revision 47243)
+++ AX/Uitgaand/PM/Product/impl/ProductDixfConverter.cls.xml (.../ProductDixfConverter.cls.xml) (revision 47312)
@@ -3,19 +3,19 @@
TECH.RegisteredObject
-
-AX.Uitgaand.PM.Product.impl.GenerischOrgaluxProductFilter
+
+AX.Uitgaand.PM.impl.IsBasisProductFilter
1
-GenerischOrgaluxProductFilter:AX.Uitgaand.PM.Product.impl.GenerischOrgaluxProductFilter
+IsBasisProductFilter:AX.Uitgaand.PM.impl.IsBasisProductFilter
1
1
%Status
1
@@ -29,18 +29,18 @@
Set AxProduct.ADUCalcTechnologyBOMBOL = ..BepaalADUCalcTechnologyBOMBOL(Product)
Set AxProduct.ADUCertClaimLevel = ..BepaalADUCertClaimLevel(Product)
Set AxProduct.DisplayProductNumber = Product.Basis.IdentNummer
- Set AxProduct.EcoResProductDimensionGroupName = $$$If(..GenerischOrgaluxProductFilter.IsGenerischOrgaluxProduct(Product),"Con","")
+ Set AxProduct.EcoResProductDimensionGroupName = $$$If(..IsBasisProductFilter.IsValid(Product),"Con","")
Set AxProduct.EcoResProductTranslationDescription = $Translate(Product.Tekst.GetOmschrijving("N"," "),";",",")
Set AxProduct.EcoResProductTranslationLanguageId = "nl-be"
Set AxProduct.EcoResProductTranslationName = Product.Basis.KortTekst
Set AxProduct.EcoResStorageDimensionGroupName = "WMS"
Set AxProduct.EcoResTrackingDimensionGroupName = "Batch"
Set AxProduct.IsReuseConfigurationEnabled = "Nee"
Set AxProduct.IsVariantGenerationEnabled = "Nee"
- Set AxProduct.ProductSubType = $$$If(..GenerischOrgaluxProductFilter.IsGenerischOrgaluxProduct(Product),"ProductMaster","Product")
+ Set AxProduct.ProductSubType = $$$If(..IsBasisProductFilter.IsValid(Product),"ProductMaster","Product")
Set AxProduct.ProductType = "Artikel"
Set AxProduct.SearchName = ##class(TECH.StringUtils).StringStrippenVanLeestekensSpatiesTabs(Product.Basis.KortTekst)
- Set AxProduct.VariantConfigurationTechnology = $$$If(..GenerischOrgaluxProductFilter.IsGenerischOrgaluxProduct(Product),"Vooraf gedefinieerde variant","")
+ Set AxProduct.VariantConfigurationTechnology = $$$If(..IsBasisProductFilter.IsValid(Product),"Vooraf gedefinieerde variant","")
Quit AxProduct
]]>
@@ -52,7 +52,7 @@
+
+
+TECH.RegisteredObject,TECH.Mockable
+
+
+AX.Uitgaand.PM.Product.impl.GenerischOrgaluxProductFilter
+1
+
+
+
+GenerischOrgaluxProductFilter:AX.Uitgaand.PM.Product.impl.GenerischOrgaluxProductFilter
+1
+1
+%Status
+1
+
+
+
+
+Product:AX.Uitgaand.PM.Product.impl.Product
+%Boolean
+
+
+
+
+
+
Index: vhUnitTest/AX/Uitgaand/PM/impl/IsBasisProductFilter/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/AX/Uitgaand/PM/impl/IsBasisProductFilter/Test.cls.xml (revision 0)
+++ vhUnitTest/AX/Uitgaand/PM/impl/IsBasisProductFilter/Test.cls.xml (revision 47312)
@@ -0,0 +1,67 @@
+
+
+
+vhUnitTest.TestCase
+
+
+%String
+1000
+
+
+
+AX.Uitgaand.PM.impl.IsBasisProductFilter
+1
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+1
+AX.Uitgaand.PM.Product.impl.Product
+
+
+
+
+1
+AX.Uitgaand.PM.impl.IsBasisProductFilter
+
+
+
+
+
+
Index: vhTest/Fake/AX/Uitgaand/PM/impl/IsBasisProductFilter.cls.xml
===================================================================
diff -u
--- vhTest/Fake/AX/Uitgaand/PM/impl/IsBasisProductFilter.cls.xml (revision 0)
+++ vhTest/Fake/AX/Uitgaand/PM/impl/IsBasisProductFilter.cls.xml (revision 47312)
@@ -0,0 +1,19 @@
+
+
+
+
+Deze klasse werd automatisch gegenereerd en onderhouden, nieuwe methodes worden automatisch bijgevoegd, bestaande blijven zoals ze zijn.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
+1
+AX.Uitgaand.PM.impl.IsBasisProductFilter
+
+
+Product:AX.Uitgaand.PM.Product.impl.Product
+%Boolean
+
+
+
+
+
+
Index: vhUnitTest/AX/Uitgaand/PM/Product/impl/ProductDixfConverter/Test.cls.xml
===================================================================
diff -u -r46428 -r47312
--- vhUnitTest/AX/Uitgaand/PM/Product/impl/ProductDixfConverter/Test.cls.xml (.../Test.cls.xml) (revision 46428)
+++ vhUnitTest/AX/Uitgaand/PM/Product/impl/ProductDixfConverter/Test.cls.xml (.../Test.cls.xml) (revision 47312)
@@ -8,8 +8,8 @@
1000
-
-AX.Uitgaand.PM.Product.impl.GenerischOrgaluxProductFilter
+
+AX.Uitgaand.PM.impl.IsBasisProductFilter
1
@@ -32,10 +32,10 @@
1
AX.Uitgaand.PM.Product.impl.ProductDixfConverter
-
Index: vhTest/Mock/AX/Uitgaand/PM/impl/IsBasisProductFilter.cls.xml
===================================================================
diff -u
--- vhTest/Mock/AX/Uitgaand/PM/impl/IsBasisProductFilter.cls.xml (revision 0)
+++ vhTest/Mock/AX/Uitgaand/PM/impl/IsBasisProductFilter.cls.xml (revision 47312)
@@ -0,0 +1,20 @@
+
+
+
+
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
+1
+AX.Uitgaand.PM.impl.IsBasisProductFilter,Tools.Mock.MockClassBase
+right
+
+
+Product:AX.Uitgaand.PM.Product.impl.Product
+%Boolean
+
+
+
+
+
+