Index: AX/Uitgaand/PM/LijstPrijs/impl/LijstPrijsIterator.cls.xml
===================================================================
diff -u -r46267 -r46449
--- AX/Uitgaand/PM/LijstPrijs/impl/LijstPrijsIterator.cls.xml	(.../LijstPrijsIterator.cls.xml)	(revision 46267)
+++ AX/Uitgaand/PM/LijstPrijs/impl/LijstPrijsIterator.cls.xml	(.../LijstPrijsIterator.cls.xml)	(revision 46449)
@@ -8,6 +8,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="Vestiging">
+<Type>AXimpl.InterneFirmaInitialen</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="Converter">
 <Type>AX.Uitgaand.PM.LijstPrijs.impl.LijstPrijsDixfConverter</Type>
 <Private>1</Private>
@@ -29,17 +34,17 @@
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>QueryAPI:TECH.Query.QueryAPI="",MigratieProductVolgensAxEntiteitRepository:AX.Uitgaand.PM.impl.MigratieProductVolgensAxEntiteitRepository</FormalSpec>
+<FormalSpec>QueryAPI:TECH.Query.QueryAPI="",MigratieProductVolgensAxEntiteitRepository:AX.Uitgaand.PM.impl.MigratieProductVolgensAxEntiteitRepository,Vestiging:AXimpl.InterneFirmaInitialen</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..MigratieProductVolgensAxEntiteitRepository = $$$Inject(MigratieProductVolgensAxEntiteitRepository,##class(AX.Uitgaand.PM.impl.MigratieProductVolgensAxEntiteitRepository).%New())
-	Do ..MigratieProductVolgensAxEntiteitRepository.VerwijderVolgensAxEntiteit("LijstPrijs", "VHBE")
+	Do ..MigratieProductVolgensAxEntiteitRepository.VerwijderVolgensAxEntiteit("LijstPrijs", Vestiging)
 	Set ..QueryAPI = $$$Implementation(QueryAPI,##class(TECH.Context).Instance().GeefQueryAPI())
 	Do ..VoerUitQuery()
-	Set Filter = ##class(AX.Uitgaand.PM.LijstPrijs.impl.LijstPrijsIteratorFilter).%New()
+	Set Filter = ##class(AX.Uitgaand.PM.LijstPrijs.impl.LijstPrijsIteratorFilter).%New(Vestiging)
 	Set ResultSetIterator = ##class(TECH.ResultSetIterator).%New(..ResultSet)
 	Set ..DynIterator = ##class(TECH.DynamicIterator).%New(ResultSetIterator,,Filter)
 	Set ..Converter = ##class(AX.Uitgaand.PM.LijstPrijs.impl.LijstPrijsDixfConverter).%New()
@@ -76,7 +81,7 @@
 	
 	#dim ProductNr As %String = LijstPrijsProduct.Basis.ProductNr
 	#dim AxEntiteit As %String = "LijstPrijs"
-	#dim Vestiging As %String = "VHBE"
+	#dim Vestiging As %String = ..Vestiging
 	If $$$Not(..MigratieProductVolgensAxEntiteitRepository.BestaatVolgensProductFilter(ProductNr, AxEntiteit, Vestiging)) {
 		Set MigratieProductVolgensAxEntiteit = ##class(AX.Uitgaand.PM.impl.MigratieProductVolgensAxEntiteit).%New()
 		Set MigratieProductVolgensAxEntiteit.AxEntiteit = AxEntiteit