Index: AXdixf/ProductMaster/ProductMaster.cls.xml
===================================================================
diff -u
--- AXdixf/ProductMaster/ProductMaster.cls.xml	(revision 0)
+++ AXdixf/ProductMaster/ProductMaster.cls.xml	(revision 46096)
@@ -0,0 +1,88 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="AXdixf.ProductMaster.ProductMaster">
+<Super>TECH.DataTransferObject</Super>
+
+<Parameter name="XMLTYPE">
+<Default>AXdixf.ProductMaster.ProductMaster</Default>
+</Parameter>
+
+<Property name="ADUCertClaimLevel">
+<Type>%String</Type>
+</Property>
+
+<Property name="ADUCalcTechnologyBOMBOL">
+<Type>%String</Type>
+</Property>
+
+<Property name="DefinitionGroup">
+<Type>%String</Type>
+</Property>
+
+<Property name="DisplayProductNumber">
+<Type>%String</Type>
+</Property>
+
+<Property name="EcoResProductDimensionGroupName">
+<Type>%String</Type>
+</Property>
+
+<Property name="EcoResProductTranslationDescription">
+<Type>%String</Type>
+</Property>
+
+<Property name="EcoResProductTranslationLanguageId">
+<Type>%String</Type>
+</Property>
+
+<Property name="EcoResProductTranslationName">
+<Type>%String</Type>
+</Property>
+
+<Property name="EcoResStorageDimensionGroupName">
+<Type>%String</Type>
+</Property>
+
+<Property name="EcoResTrackingDimensionGroupName">
+<Type>%String</Type>
+</Property>
+
+<Property name="ExecutionId">
+<Type>%String</Type>
+</Property>
+
+<Property name="IsReuseConfigurationEnabled">
+<Type>%String</Type>
+</Property>
+
+<Property name="IsSelected">
+<Type>%String</Type>
+</Property>
+
+<Property name="IsVariantGenerationEnabled">
+<Type>%String</Type>
+</Property>
+
+<Property name="ProductSubType">
+<Type>%String</Type>
+</Property>
+
+<Property name="ProductType">
+<Type>%String</Type>
+</Property>
+
+<Property name="SearchName">
+<Type>%String</Type>
+</Property>
+
+<Property name="TransferStatus">
+<Type>%String</Type>
+</Property>
+
+<Property name="VariantConfigurationTechnology">
+<Type>%String</Type>
+</Property>
+</Class>
+
+
+</Export>
Index: AX/Uitgaand/PM/ProductMaster/impl/ProductMasterDixfConverter.cls.xml
===================================================================
diff -u
--- AX/Uitgaand/PM/ProductMaster/impl/ProductMasterDixfConverter.cls.xml	(revision 0)
+++ AX/Uitgaand/PM/ProductMaster/impl/ProductMasterDixfConverter.cls.xml	(revision 46096)
@@ -0,0 +1,43 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="AX.Uitgaand.PM.ProductMaster.impl.ProductMasterDixfConverter">
+<Super>TECH.RegisteredObject</Super>
+
+<Property name="AxProductMaster">
+<Type>AXdixf.ProductMaster.ProductMaster</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="Convert">
+<FormalSpec>Product:AX.Uitgaand.PM.Product.impl.Product</FormalSpec>
+<ReturnType>AXdixf.KostEnLijstPrijs.KostEnLijstPrijs</ReturnType>
+<Implementation><![CDATA[
+	Set ..AxProductMaster = ##class(AXdixf.ProductMaster.ProductMaster).%New()
+	
+	Set ..AxProductMaster.ADUCertClaimLevel = Product.Basis.FSCHout
+	Set ..AxProductMaster.ADUCalcTechnologyBOMBOL = $$$If(((Product.Basis.LinkType="S")&&(Product.Basis.LeverancierNummer="6051")),"3","0")
+	Set ..AxProductMaster.DefinitionGroup = "0601Products"
+	Set ..AxProductMaster.DisplayProductNumber = Product.Basis.IdentNummer
+	Set ..AxProductMaster.EcoResProductDimensionGroupName = "Con"
+	Set ..AxProductMaster.EcoResProductTranslationDescription = $Translate(Product.Tekst.GetOmschrijving("N"," "),";",",")
+	Set ..AxProductMaster.EcoResProductTranslationLanguageId = "nl-be"
+	Set ..AxProductMaster.EcoResProductTranslationName = Product.Basis.KortTekst
+	Set ..AxProductMaster.EcoResStorageDimensionGroupName = "Batch"
+	Set ..AxProductMaster.EcoResTrackingDimensionGroupName = "WMS"
+	Set ..AxProductMaster.ExecutionId = "0601Products-4"
+	Set ..AxProductMaster.IsReuseConfigurationEnabled = "Nee"
+	Set ..AxProductMaster.IsSelected = "Nee"
+	Set ..AxProductMaster.IsVariantGenerationEnabled = "Nee"
+	Set ..AxProductMaster.ProductSubType = "Product master"
+	Set ..AxProductMaster.ProductType = "Artikel"
+	Set ..AxProductMaster.SearchName = ##class(TECH.StringUtils).StringStrippenVanLeestekensSpatiesTabs(Product.Basis.KortTekst)
+	Set ..AxProductMaster.TransferStatus = "Voltooid"
+	Set ..AxProductMaster.VariantConfigurationTechnology = "Vooraf gedefinieerde variant"
+	
+	Quit ..AxProductMaster
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: AX/Uitgaand/PM/ProductMaster/impl/ProductMasterDixfGenerator.cls.xml
===================================================================
diff -u
--- AX/Uitgaand/PM/ProductMaster/impl/ProductMasterDixfGenerator.cls.xml	(revision 0)
+++ AX/Uitgaand/PM/ProductMaster/impl/ProductMasterDixfGenerator.cls.xml	(revision 46096)
@@ -0,0 +1,62 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="AX.Uitgaand.PM.ProductMaster.impl.ProductMasterDixfGenerator">
+<Super>TECH.RegisteredObject</Super>
+
+<Property name="BestandGenerator">
+<Type>APPS.common.Rapport.impl.BestandGenerator</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="GenerateAll">
+<Implementation><![CDATA[
+	Try {
+		Do StartTimer^vhLib
+		#dim ProductMasterIterator As TECH.Iterator = ##class(AX.Uitgaand.PM.ProductMaster.impl.ProductMasterIterator).%New()
+		do ..Generate(ProductMasterIterator)
+		Write !,"Csv voor migratie 0601b ProductMaster is klaar. Aantal minuten: " 
+		write $$TimeFromStart^vhLib()/60
+	} Catch {
+		Write ##class(TECH.ExceptionHandler).Catch().ToString()
+	}
+]]></Implementation>
+</Method>
+
+<Method name="Generate">
+<FormalSpec>ProductMasterIterator:TECH.Iterator</FormalSpec>
+<Implementation><![CDATA[
+	#dim AXProductMasterData As APPS.common.Rapport.dto.BestandRapportDataObjectIteratorBased	
+	Set AXProductMasterData = ##class(APPS.common.Rapport.dto.BestandRapportDataObjectIteratorBased).%New()
+	Do AXProductMasterData.VoegToeVeld("AXdixf.ProductMaster.ProductMaster", "ADUCertClaimLevel")
+	Do AXProductMasterData.VoegToeVeld("AXdixf.ProductMaster.ProductMaster", "ADUCalcTechnologyBOMBOL")
+	Do AXProductMasterData.VoegToeVeld("AXdixf.ProductMaster.ProductMaster", "DefinitionGroup")
+	Do AXProductMasterData.VoegToeVeld("AXdixf.ProductMaster.ProductMaster", "DisplayProductNumber")
+	Do AXProductMasterData.VoegToeVeld("AXdixf.ProductMaster.ProductMaster", "EcoResProductDimensionGroupName","EcoResProductDimensionGroup_Name")
+	Do AXProductMasterData.VoegToeVeld("AXdixf.ProductMaster.ProductMaster", "EcoResProductTranslationDescription","EcoResProductTranslation_Description")
+	Do AXProductMasterData.VoegToeVeld("AXdixf.ProductMaster.ProductMaster", "EcoResProductTranslationLanguageId","EcoResProductTranslation_LanguageId")
+	Do AXProductMasterData.VoegToeVeld("AXdixf.ProductMaster.ProductMaster", "EcoResProductTranslationName","EcoResProductTranslation_Name")
+	Do AXProductMasterData.VoegToeVeld("AXdixf.ProductMaster.ProductMaster", "EcoResStorageDimensionGroupName","EcoResStorageDimensionGroup_Name")
+	Do AXProductMasterData.VoegToeVeld("AXdixf.ProductMaster.ProductMaster", "EcoResTrackingDimensionGroupName","EcoResTrackingDimensionGroup_Name")
+	Do AXProductMasterData.VoegToeVeld("AXdixf.ProductMaster.ProductMaster", "ExecutionId")
+	Do AXProductMasterData.VoegToeVeld("AXdixf.ProductMaster.ProductMaster", "IsReuseConfigurationEnabled")
+	Do AXProductMasterData.VoegToeVeld("AXdixf.ProductMaster.ProductMaster", "IsSelected")
+	Do AXProductMasterData.VoegToeVeld("AXdixf.ProductMaster.ProductMaster", "IsVariantGenerationEnabled")
+	Do AXProductMasterData.VoegToeVeld("AXdixf.ProductMaster.ProductMaster", "ProductSubType")
+	Do AXProductMasterData.VoegToeVeld("AXdixf.ProductMaster.ProductMaster", "ProductType")
+	Do AXProductMasterData.VoegToeVeld("AXdixf.ProductMaster.ProductMaster", "SearchName")
+	Do AXProductMasterData.VoegToeVeld("AXdixf.ProductMaster.ProductMaster", "TransferStatus")
+	Do AXProductMasterData.VoegToeVeld("AXdixf.ProductMaster.ProductMaster", "VariantConfigurationTechnology")
+
+	Set AXProductMasterData.ScheidingsTeken = ";"	
+	Set AXProductMasterData.Iterator = ProductMasterIterator
+	Set AXProductMasterData.BestandVolledigeNaam = ##class(TECH.Files).AppendFile(##class(TECH.Config.ConfigMgr).Instance().GeefString("AX_DIXF"),"0601bProductMaster.csv")
+	
+	#dim BestandGenerator As APPS.common.Rapport.impl.BestandGenerator
+	Set BestandGenerator = ##class(APPS.common.Rapport.impl.BestandGenerator).%New()
+	Do BestandGenerator.MaakBestand(AXProductMasterData)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: AX/Uitgaand/PM/ProductMaster/impl/ProductMasterIteratorFilter.cls.xml
===================================================================
diff -u
--- AX/Uitgaand/PM/ProductMaster/impl/ProductMasterIteratorFilter.cls.xml	(revision 0)
+++ AX/Uitgaand/PM/ProductMaster/impl/ProductMasterIteratorFilter.cls.xml	(revision 46096)
@@ -0,0 +1,34 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="AX.Uitgaand.PM.ProductMaster.impl.ProductMasterIteratorFilter">
+<Super>TECH.RegisteredObject,TECH.Filter</Super>
+
+<Property name="SoprIteratorFilter">
+<Type>AX.Uitgaand.PM.impl.SoprIteratorFilter</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..SoprIteratorFilter = ##class(AX.Uitgaand.PM.impl.SoprIteratorFilter).%New()
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="IsValid">
+<FormalSpec>Item:TECH.ResultSet</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	Set Product = ##class(AX.Uitgaand.PM.Product.impl.Product).%New(Item.GetData(1))
+	
+	Quit ..SoprIteratorFilter.IsValid(Product)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: AX/Uitgaand/PM/ProductMaster/impl/ProductMasterIterator.cls.xml
===================================================================
diff -u
--- AX/Uitgaand/PM/ProductMaster/impl/ProductMasterIterator.cls.xml	(revision 0)
+++ AX/Uitgaand/PM/ProductMaster/impl/ProductMasterIterator.cls.xml	(revision 46096)
@@ -0,0 +1,76 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="AX.Uitgaand.PM.ProductMaster.impl.ProductMasterIterator">
+<Super>TECH.RegisteredObject,TECH.Iterator</Super>
+
+<Property name="Converter">
+<Type>AX.Uitgaand.PM.ProductMaster.impl.ProductMasterDixfConverter</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="DynIterator">
+<Type>TECH.Iterator</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="QueryAPI">
+<Type>TECH.Query.QueryAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="ResultSet">
+<Type>TECH.ResultSet</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>QueryAPI:TECH.Query.QueryAPI=""</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..QueryAPI = $$$Implementation(QueryAPI,##class(TECH.Context).Instance().GeefQueryAPI())
+	Do ..VoerUitQuery()
+	Set Filter = ##class(AX.Uitgaand.PM.ProductMaster.impl.ProductMasterIteratorFilter).%New()
+	Set ResultSetIterator = ##class(TECH.ResultSetIterator).%New(..ResultSet)
+	Set ..DynIterator = ##class(TECH.DynamicIterator).%New(ResultSetIterator,,Filter)
+	Set ..Converter = ##class(AX.Uitgaand.PM.ProductMaster.impl.ProductMasterDixfConverter).%New()
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="VoerUitQuery">
+<Private>1</Private>
+<Implementation><![CDATA[
+	#Dim SqlStatement as %String
+	Set SqlStatement = "SELECT ID FROM Prod.Product WHERE isnull(Gentype,'')='' and KortTekst not like 'GEN%' AND KortTekst NOT LIKE 'IO%' AND (NonAktief IS null OR NonAktief = '2')"
+	/*
+	// Filter voor beperkt resultaat:
+	_" and ID in (1175,1988,2865,161441,161442,254245,254258,268026,353741,353743,353744,383880,665626,668615,682391,"
+	_"709825,830257,830507,878186,878220,906194,924268,1038806,1039173,1039208,1067709,1067714,1124771,1155640,1168369,1168689,"
+	_"1168696,1169509,1194443,1247980,1259381,1359867,1425095,1425096,1432225,1572233)"
+	*/
+	Set ..ResultSet = ..QueryAPI.GetResultSet(##class(TECH.DynamicQuery).%New(SqlStatement))
+]]></Implementation>
+</Method>
+
+<Method name="HasNext">
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ..DynIterator.HasNext()
+]]></Implementation>
+</Method>
+
+<Method name="Next">
+<ReturnType>AXdixf.ProductMaster.ProductMaster</ReturnType>
+<Implementation><![CDATA[
+	Set ProductMaster = ##class(AX.Uitgaand.PM.Product.impl.Product).%New(..DynIterator.Next().GetData(1))
+	#dim ConvertedProductMaster As AXdixf.ProductMaster.ProductMaster = ..Converter.Convert(ProductMaster)	
+	
+	Quit ConvertedProductMaster
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>