Index: AX/Uitgaand/PM/BehoeftePlanning/impl/BehoeftePlanningIterator.cls.xml
===================================================================
diff -u -r43163 -r45576
--- AX/Uitgaand/PM/BehoeftePlanning/impl/BehoeftePlanningIterator.cls.xml	(.../BehoeftePlanningIterator.cls.xml)	(revision 43163)
+++ AX/Uitgaand/PM/BehoeftePlanning/impl/BehoeftePlanningIterator.cls.xml	(.../BehoeftePlanningIterator.cls.xml)	(revision 45576)
@@ -56,13 +56,13 @@
 	
 	If ..Vestiging = ##class(AXimpl.InterneFirmaInitialen).VanHoeckeNv() {
 		Set SqlStatement = "SELECT ID FROM Prod.Product WHERE isnull(Gentype,'')='' AND KortTekst NOT LIKE 'GEN%' AND KortTekst NOT LIKE 'IO%' AND StockNietStock = '1'"
-		_" AND (LinkType NOT LIKE 'S' OR LinkType IS null) AND LeverancierNummer NOT LIKE '6332' AND (NonAktief IS null OR NonAktief = '2')"
+		_" AND (isnull(LinkType,'') <> 'S' OR (isnull(LinkType,'')='') AND LeverancierNummer NOT LIKE '6332' AND (isnull(NonAktief,0)=0 OR NonAktief = '2')"
 		// Indien nodig is hieronder een filter voorzien om het resultaat te beperken tot overzichtelijk, voor debugging:
 		/*_" AND ID IN (34716,100434,200582,254237,353739,371127,379316,446650,534374,568105,568123,670483,683737,683793,701496,701513,754875)"*/
 	} Else {
 		If ..Vestiging = ##class(AXimpl.InterneFirmaInitialen).HaluxNv() {
-			Set SqlStatement = "SELECT ID FROM Prod.Product WHERE isnull(Gentype,'')='' AND KortTekst NOT LIKE 'GEN%' AND KortTekst NOT LIKE 'IO%' AND StockNietStock = '1'"
-			_" AND LeverancierNummer NOT LIKE '6051' AND (NonAktief IS null OR NonAktief = '2')"
+			Set SqlStatement = "SELECT ID FROM Prod.Product WHERE  isnull(Gentype,'')='' AND KortTekst NOT LIKE 'GEN%' AND KortTekst NOT LIKE 'IO%' and StockNietStock = 1"
+			_" AND left(LinkType,2)='HH' AND (isnull(NonAktief,0)=0 OR NonAktief = '2')"
 			// Indien nodig is hieronder een filter voorzien om het resultaat te beperken tot overzichtelijk, voor debugging:
 			/*_" AND ID IN (34716,100434,200582,254237,353739,371127,379316,446650,534374,568105,568123,670483,683737,683793,701496,701513,754875)"*/
 		}Else {
Index: AX/Uitgaand/PM/BehoeftePlanning/impl/BehoeftePlanningIteratorFilter.cls.xml
===================================================================
diff -u -r45100 -r45576
--- AX/Uitgaand/PM/BehoeftePlanning/impl/BehoeftePlanningIteratorFilter.cls.xml	(.../BehoeftePlanningIteratorFilter.cls.xml)	(revision 45100)
+++ AX/Uitgaand/PM/BehoeftePlanning/impl/BehoeftePlanningIteratorFilter.cls.xml	(.../BehoeftePlanningIteratorFilter.cls.xml)	(revision 45576)
@@ -58,14 +58,14 @@
 			Set IsValid = $$$False
 	}} ElseIf ..Vestiging = ##class(AXimpl.InterneFirmaInitialen).HaluxNv() {
 		If (PrimaryVendorId = "05497"){
-				Set IsValid = $$$False
+			Set IsValid = $$$False
 	}} Else {
 		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.IllegalArgumentException).%New("Geef als parameter ofwel VHBE, ofwel HLX mee! Huidige parameter = '"_..Vestiging))
 	}
 	
 	If ##class(TECH.StringUtils).Equals(ReqGroupId,"Handmatig","MTO"){
 		Set IsValid = $$$False
-	} ElseIf (ProductBehoefte.Basis.Uitverkoop '= ""){
+	} ElseIf ("***"'[ProductBehoefte.Basis.Uitverkoop){
 		Set IsValid = $$$False
 	}
 	
Index: AX/Uitgaand/PM/BehoeftePlanning/impl/JaarAfnameIterator.cls.xml
===================================================================
diff -u
--- AX/Uitgaand/PM/BehoeftePlanning/impl/JaarAfnameIterator.cls.xml	(revision 0)
+++ AX/Uitgaand/PM/BehoeftePlanning/impl/JaarAfnameIterator.cls.xml	(revision 45576)
@@ -0,0 +1,93 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="AX.Uitgaand.PM.BehoeftePlanning.impl.JaarAfnameIterator">
+<Super>TECH.RegisteredObject,TECH.Iterator</Super>
+
+<Property name="Vestiging">
+<Type>AXimpl.InterneFirmaInitialen</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="Converter">
+<Type>AX.Uitgaand.PM.BehoeftePlanning.impl.BehoeftePlanningDixfConverter</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="",Vestiging:AXimpl.InterneFirmaInitialen</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..Vestiging = Vestiging
+	Set ..QueryAPI = $$$Implementation(QueryAPI,##class(TECH.Context).Instance().GeefQueryAPI())
+	Do ..VoerUitQuery()
+	
+	Set Filter = ##class(AX.Uitgaand.PM.BehoeftePlanning.impl.BehoeftePlanningIteratorFilter).%New(Vestiging)
+	Set ResultSetIterator = ##class(TECH.ResultSetIterator).%New(..ResultSet)
+	Set ..DynIterator = ##class(TECH.DynamicIterator).%New(ResultSetIterator,,Filter)
+	
+	Set ..Converter = ##class(AX.Uitgaand.PM.BehoeftePlanning.impl.BehoeftePlanningDixfConverter).%New()
+
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="VoerUitQuery">
+<Private>1</Private>
+<Implementation><![CDATA[
+	#Dim SqlStatement as %String
+	
+	If ..Vestiging = ##class(AXimpl.InterneFirmaInitialen).VanHoeckeNv() {
+		Set SqlStatement = "SELECT ID FROM Prod.Product WHERE isnull(Gentype,'')='' AND KortTekst NOT LIKE 'GEN%' AND KortTekst NOT LIKE 'IO%' AND StockNietStock = '1'"
+		_" AND (isnull(LinkType,'') <> 'S' OR (isnull(LinkType,'')='') AND LeverancierNummer NOT LIKE '6332' AND (isnull(NonAktief,0)=0 OR NonAktief = '2')"
+		// Indien nodig is hieronder een filter voorzien om het resultaat te beperken tot overzichtelijk, voor debugging:
+		/*_" AND ID IN (34716,100434,200582,254237,353739,371127,379316,446650,534374,568105,568123,670483,683737,683793,701496,701513,754875)"*/
+	} Else {
+		If ..Vestiging = ##class(AXimpl.InterneFirmaInitialen).HaluxNv() {
+			Set SqlStatement = "SELECT ID FROM Prod.Product WHERE  isnull(Gentype,'')='' AND KortTekst NOT LIKE 'GEN%' AND KortTekst NOT LIKE 'IO%' and StockNietStock = 1"
+			_" AND left(LinkType,2)='HH' AND (isnull(NonAktief,0)=0 OR NonAktief = '2')"
+			// Indien nodig is hieronder een filter voorzien om het resultaat te beperken tot overzichtelijk, voor debugging:
+			/*_" AND ID IN (34716,100434,200582,254237,353739,371127,379316,446650,534374,568105,568123,670483,683737,683793,701496,701513,754875)"*/
+		}Else {
+			Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.IllegalArgumentException).%New("Geef als parameter ofwel VHBE, ofwel HLX mee! Huidige parameter = '"_..Vestiging_"' <"))
+		}
+	}
+	
+	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.VrijgegProduct.VrijgegProduct</ReturnType>
+<Implementation><![CDATA[
+	Set Product = ##class(AX.Uitgaand.PM.Product.impl.Product).%New(..DynIterator.Next().GetData(1))
+	Quit Product
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>