Index: vhUnitTest/AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter/Test.cls.xml
===================================================================
diff -u -r49487 -r49522
--- vhUnitTest/AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 49487)
+++ vhUnitTest/AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 49522)
@@ -97,6 +97,9 @@
 	
 	Do $$$AssertEquals(Converter.DoorgestuurdNaarEWMS,$$$False)
 	Do $$$AssertEquals(Converter.NieuwProductGegeven,$$$False)
+	Do $$$AssertEquals(Converter.IndexenAangepast,$$$True)
+	Do $$$AssertFalse(Converter.ProductIsGelocked)
+	Do $$$AssertTrue(Converter.ProductIsGelockedGeweest)
 	
 	Do ProductMock.Verifieer()
 	Do ProductAPIMock.Verifieer()
@@ -134,6 +137,38 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test Exceptie indien product niet gelocked kan worden">
+<Implementation><![CDATA[
+	#dim ProductMock as vhTest.Mock.PM.DOM.Product = ##class(vhTest.Mock.DOM.PM.Product).%New()
+	Do ProductMock.IndienMethodCall("IsGenerischProduct").DanReturn($$$False)
+	Do ProductMock.IndienMethodCall("GeefID").DanReturn("ProductID")
+
+	#dim ProductAPIMock as DOM.PM.ProductAPI = ##class(vhTest.Mock.DOM.PM.ProductAPI).MockInstance()
+	Do ProductAPIMock.IndienMethodCall("BestaatIdentNr","IdentNummer").DanReturn($$$True)
+	Do ProductAPIMock.IndienMethodCall("GeefProductVolgensIdentNr","IdentNummer").DanReturn(ProductMock)
+
+	#dim ProductRolAPIMock as DOM.PM.ProductRolAPI = ##class(vhTest.Mock.DOM.PM.ProductRolAPI).MockInstance()
+	Set LangtekstBewaarderMock = ##class(vhTest.Mock.DOM.PM.LangtekstBewaarder).%New()
+	Set KlasRepositoryMock = ##class(vhTest.Mock.Prod.Klas.KlasRepository).%New()
+	Set PakketServiceMock = ##class(vhTest.Mock.DOM.PM.impl.DataM.PakketService).%New()
+	Set Converter = ##class(vhUnitTest.AXimpl.Dynamics.ProductItemUpsertIn.Converter.ProductItemConverter.ProductItemConverterFake).%New(ProductAPIMock,ProductRolAPIMock,LangtekstBewaarderMock,KlasRepositoryMock,,,PakketServiceMock)
+	Set Converter.ReturnLockException = $$$True
+	
+	#dim Envelope as AXif.Dynamics.ProductItemIn.Envelope = ..GeefEnvelope("ProductItemInUpdateKorttekst.xml")
+
+	#dim Substrings as %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("Product met ID 'ProductID' is reeds gelocked")
+	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New(##class(TECH.Exceptions.LockedException).%ClassName(1),Substrings))
+
+	Do Converter.ConvertProductItem(Envelope.Body.MessageParts.MessagePart.Item.GetAt(1),"vhbe")
+	
+	Do $$$AssertEquals(Converter.DoorgestuurdNaarEWMS,$$$False)
+	Do $$$AssertEquals(Converter.NieuwProductGegeven,$$$False)
+	Do $$$AssertEquals(Converter.IndexenAangepast,$$$False)
+	Do $$$AssertFalse(Converter.ProductIsGelocked)
+	Do $$$AssertFalse(Converter.ProductIsGelockedGeweest)
+]]></Implementation>
+</Method>
+
 <Method name="Test geen verwerking indien inconsistentie in product naam over de verschillende talen">
 <Implementation><![CDATA[
 	#dim ProductAPIMock as DOM.PM.ProductAPI = ##class(vhTest.Mock.DOM.PM.ProductAPI).MockInstance()
@@ -213,6 +248,9 @@
 
 	Do $$$AssertEquals(Converter.DoorgestuurdNaarEWMS,$$$True)
 	Do $$$AssertEquals(Converter.NieuwProductGegeven,$$$True)
+	Do $$$AssertEquals(Converter.IndexenAangepast,$$$True)
+	Do $$$AssertFalse(Converter.ProductIsGelocked)
+	Do $$$AssertTrue(Converter.ProductIsGelockedGeweest)
 	
 	Do ProductMock.Verifieer()
 	Do ProductAPIMock.Verifieer()
Index: AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter.cls.xml
===================================================================
diff -u -r49487 -r49522
--- AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter.cls.xml	(.../ProductItemConverter.cls.xml)	(revision 49487)
+++ AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter.cls.xml	(.../ProductItemConverter.cls.xml)	(revision 49522)
@@ -43,8 +43,13 @@
 <Private>1</Private>
 </Property>
 
+<Property name="ProductZoekIndexBuilder">
+<Type>APPS.PM.ProductZoekIndexBuilder</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>ProductAPI:DOM.PM.ProductAPI,ProductRolAPI:DOM.PM.ProductRolAPI,LangtekstBewaarder:DOM.PM.LangtekstBewaarder,KlasRepository:Prod.Klas.KlasRepository,Logger:vhLib.Logger,MailAPI:TECH.Mail.MailAPI,PakketService:DOM.PM.impl.DataM.PakketService</FormalSpec>
+<FormalSpec>ProductAPI:DOM.PM.ProductAPI,ProductRolAPI:DOM.PM.ProductRolAPI,LangtekstBewaarder:DOM.PM.LangtekstBewaarder,KlasRepository:Prod.Klas.KlasRepository,Logger:vhLib.Logger,MailAPI:TECH.Mail.MailAPI,PakketService:DOM.PM.impl.DataM.PakketService,ProductZoekIndexBuilder:APPS.PM.ProductZoekIndexBuilder</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -57,6 +62,7 @@
 	Set ..Logger = $$$Inject(Logger,##class(vhLib.Logger).%New())
 	Set ..MailAPI = $$$Inject(MailAPI,##class(TECH.Context).Instance().GeefMailAPI())
 	Set ..PakketService = $$$Inject(PakketService,##class(DOM.PM.impl.DataM.PakketService).%New())
+	Set ..ProductZoekIndexBuilder = $$$Inject(ProductZoekIndexBuilder, ##class(BL.Prod.SearchBuildIndex).%New())
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -130,57 +136,60 @@
 <FormalSpec>ProductItem:AXif.Dynamics.ProductItemIn.MessageParts.AxdEntityItem,Product:DOM.PM.Product,LegalEntity:%String</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	Do Product.ZetLeverancierId(..BepaalLeverancierId(ProductItem,LegalEntity)) ;PrimaryVendorId
-	
-	Do Product.ZetAxGesynchroniseerd($$$True)
-	
-	;Do Product.ZetCifPPL(..BepaalCifPPL(ProductItem)) ;ActiveCostPrice
-	; wat van AX komt is reeds de cifppl. In cache is dit echter een berekend veld. We moeten dus alles goed zetten zodat het correct berekend wordt.
-	; DataMProduct.Save roept een RECALC^PRODUKT2 op die dit doet.	
-	; geen prijs gerelateerde velden aanpassen indien product kindbouwstenen (niet zeker voor hoeveel stuks de prijs is)	
-	#dim BouwsteenIterator =  Product.GeefKindBouwstenenIterator()
-	If $$$Not(BouwsteenIterator.HasNext()) {
-		Do Product.ZetPPL(..BepaalCifPPL(ProductItem)) 
-		Do Product.ZetGrootteOrdeAankoop(##class(DOM.PM.enu.GrootteOrde).Honderd())
-		Do Product.ZetKorting(0)
-		Do Product.ZetCifPercentage(0) ;CostInsuranceFreight
-	}
-	
-	Do Product.ZetFSCHout(..BepaalFSCHout(ProductItem)) ;CertClaimLevel	
-	Do Product.ZetTelbaar(..BepaalTelbaar(ProductItem)) ;CountableOrDivisible
-	Do Product.ZetBarcodeWaarde(..BepaalBarcodeWaarde(ProductItem)) ;GTIN
-	Do Product.ZetWerkvloerEenheid(..BepaalWerkvloerEenheid(ProductItem)) ;InventUnitId
-	Do Product.ZetLevertermijn(..BepaalLevertermijn(ProductItem,LegalEntity)) ;LeadTimePurch
-	Do Product.ZetMinimumBestelhoeveelheid(..BepaalMinimumBestelhoeveelheid(ProductItem)) ;LowestQtyPurch
-	Do Product.ZetGewichtPerDuizendStuksInKG(..BepaalGewichtPerDuizendStuksInKG(ProductItem)) ;NetWeight
-	Do Product.ZetAantalInGrootVerpakking(..BepaalAantalInGrootVerpakking(ProductItem)) ;QtyGVP 
-	Do Product.ZetAantalInKleinVerpakking(..BepaalAantalInKleinVerpakking(ProductItem)) ;QtyKVP 
-	Do Product.ZetAantalInNormaalVerpakking(..BepaalAantalInNormaalVerpakking(ProductItem)) ;QtyNVP
-	Do Product.ZetPalletAantal(..BepaalPalletAantal(ProductItem)) ;QtyPLT 
-	Do Product.ZetStockNietStock(..BepaalStockNietStock(ProductItem)) ; ReqCovType
-	
-	Do Product.ZetMerk(" ") ; nergens gebruikt maar nodig voor ^KPL
-	
-	if ..MagLinktypeAangepastWordenBijUpdate(ProductItem,Product) {
-		Do Product.ZetLinkType(..BepaalLinkType(ProductItem,LegalEntity)) ; Ook ReqCovType  Alleen bij creatie zetten, daarna afblijven.
-	}
-		
-	Do Product.ZetActiefStatus(..BepaalCommercieelAktief(ProductItem)) ; StoppedSales
-	Do Product.ZetKorttekst(..BepaalKorttekst(ProductItem))	
-	Do ..ConvertGroepen(Product, ProductItem)	;ok
-	; nodig want anders kan de ProductId niet opgevraagd worden, nodig om admin product aan te maken indien die niet zou bestaan.
-	; via event wordt ook admin prod aangemaakt
-	Do Product.Save() 
-	
-	Do ..ConvertTranslation(Product, ##class(TECH.ListIterator).%New(ProductItem.Translation)) ; ok
+	try {
+		Do:$$$HasLength(Product.GeefID()) ..LockProduct(Product.GeefID()) ;nieuw product heeft nog geen ID
 
-	#dim Filter as TECH.Filter = ##class(AXimpl.Dynamics.ProductItemUpsertIn.Converter.ExtFilter).Maak("Vend","VendGroup")
-	Do ..ConvertExtModuleTypeVend(Product, ##class(TECH.DynamicIterator).%New(##class(TECH.ListIterator).%New(ProductItem.Ext),"",Filter))
+		Do Product.ZetLeverancierId(..BepaalLeverancierId(ProductItem,LegalEntity)) ;PrimaryVendorId
+		Do Product.ZetAxGesynchroniseerd($$$True)		
+		;Do Product.ZetCifPPL(..BepaalCifPPL(ProductItem)) ;ActiveCostPrice
+		; wat van AX komt is reeds de cifppl. In cache is dit echter een berekend veld. We moeten dus alles goed zetten zodat het correct berekend wordt.
+		; DataMProduct.Save roept een RECALC^PRODUKT2 op die dit doet.	
+		; geen prijs gerelateerde velden aanpassen indien product kindbouwstenen (niet zeker voor hoeveel stuks de prijs is)	
+		#dim BouwsteenIterator =  Product.GeefKindBouwstenenIterator()
+		If $$$Not(BouwsteenIterator.HasNext()) {
+			Do Product.ZetPPL(..BepaalCifPPL(ProductItem)) 
+			Do Product.ZetGrootteOrdeAankoop(##class(DOM.PM.enu.GrootteOrde).Honderd())
+			Do Product.ZetKorting(0)
+			Do Product.ZetCifPercentage(0) ;CostInsuranceFreight
+		}
+		Do Product.ZetFSCHout(..BepaalFSCHout(ProductItem)) ;CertClaimLevel	
+		Do Product.ZetTelbaar(..BepaalTelbaar(ProductItem)) ;CountableOrDivisible
+		Do Product.ZetBarcodeWaarde(..BepaalBarcodeWaarde(ProductItem)) ;GTIN
+		Do Product.ZetWerkvloerEenheid(..BepaalWerkvloerEenheid(ProductItem)) ;InventUnitId
+		Do Product.ZetLevertermijn(..BepaalLevertermijn(ProductItem,LegalEntity)) ;LeadTimePurch
+		Do Product.ZetMinimumBestelhoeveelheid(..BepaalMinimumBestelhoeveelheid(ProductItem)) ;LowestQtyPurch
+		Do Product.ZetGewichtPerDuizendStuksInKG(..BepaalGewichtPerDuizendStuksInKG(ProductItem)) ;NetWeight
+		Do Product.ZetAantalInGrootVerpakking(..BepaalAantalInGrootVerpakking(ProductItem)) ;QtyGVP 
+		Do Product.ZetAantalInKleinVerpakking(..BepaalAantalInKleinVerpakking(ProductItem)) ;QtyKVP 
+		Do Product.ZetAantalInNormaalVerpakking(..BepaalAantalInNormaalVerpakking(ProductItem)) ;QtyNVP
+		Do Product.ZetPalletAantal(..BepaalPalletAantal(ProductItem)) ;QtyPLT 
+		Do Product.ZetStockNietStock(..BepaalStockNietStock(ProductItem)) ; ReqCovType
+		Do Product.ZetMerk(" ") ; nergens gebruikt maar nodig voor ^KPL
+		Do Product.ZetActiefStatus(..BepaalCommercieelAktief(ProductItem)) ; StoppedSales
+		if ..MagLinktypeAangepastWordenBijUpdate(ProductItem,Product) {
+			Do Product.ZetLinkType(..BepaalLinkType(ProductItem,LegalEntity)) ; Ook ReqCovType  Alleen bij creatie zetten, daarna afblijven.
+		}	
+		Do Product.ZetKorttekst(..BepaalKorttekst(ProductItem))	
+		Do ..ConvertGroepen(Product, ProductItem)	;ok
+		; nodig want anders kan de ProductId niet opgevraagd worden, nodig om admin product aan te maken indien die niet zou bestaan.
+		; via event wordt ook admin prod aangemaakt
+		Do Product.Save() 
+			
+		Do ..ConvertTranslation(Product, ##class(TECH.ListIterator).%New(ProductItem.Translation)) ; ok
 
-	Set Filter = ##class(AXimpl.Dynamics.ProductItemUpsertIn.Converter.ExtFilter).Maak("Cust")
-	Do ..ConvertExtModuleTypeCust(Product, ##class(TECH.DynamicIterator).%New(##class(TECH.ListIterator).%New(ProductItem.Ext),"",Filter))
+		#dim Filter as TECH.Filter = ##class(AXimpl.Dynamics.ProductItemUpsertIn.Converter.ExtFilter).Maak("Vend","VendGroup")
+		Do ..ConvertExtModuleTypeVend(Product, ##class(TECH.DynamicIterator).%New(##class(TECH.ListIterator).%New(ProductItem.Ext),"",Filter))
 
-	Do Product.Save()
+		Set Filter = ##class(AXimpl.Dynamics.ProductItemUpsertIn.Converter.ExtFilter).Maak("Cust")
+		Do ..ConvertExtModuleTypeCust(Product, ##class(TECH.DynamicIterator).%New(##class(TECH.ListIterator).%New(ProductItem.Ext),"",Filter))
+		Do ..UpdateIndexen(Product.GeefID())
+		Do Product.Save()
+		Do ..UnLockProduct(Product.GeefID())
+	} catch {
+		#dim Exception as TECH.Exception = ##class(TECH.ExceptionHandler).Catch()
+		Do ..UnLockProduct(Product.GeefID())		
+		Do ##class(TECH.ExceptionHandler).Rethrow(Exception)		
+	}
 ]]></Implementation>
 </Method>
 
@@ -673,6 +682,18 @@
 ]]></Implementation>
 </Method>
 
+<Method name="UpdateIndexen">
+<FormalSpec>ProductID:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Do ..Logger.Info("AX ProductSynchronizatie","Updating indexes for product '"_ProductID_ "'")
+	Do ..ProductZoekIndexBuilder.Init(ProductID)
+	Do ..ProductZoekIndexBuilder.DeleteIndex()
+	do ..ProductZoekIndexBuilder.BuildIndex(1)
+	Do ..Logger.Info("AX ProductSynchronizatie","Indexes updated for product '"_ProductID_ "'")
+]]></Implementation>
+</Method>
+
 <Method name="ValideerKorttekstInTranslations">
 <FormalSpec>ProductItem:AXif.Dynamics.ProductItemIn.MessageParts.AxdEntityItem</FormalSpec>
 <Private>1</Private>
@@ -689,6 +710,29 @@
 	Quit Result
 ]]></Implementation>
 </Method>
+
+<Method name="LockProduct">
+<FormalSpec>ProductID:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Do ..Logger.Info("AX ProductSynchronizatie","Locking product '"_ProductID_ "'")
+	Lock +^KPR(ProductID):1
+	If $$$Not($Test) {
+		#dim LockInfo as %String = $$GebruikerInfoJob^vhLock($$LOCKJOB^vhLock($Name(^KPR(ProductID))))
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.LockedException).%New("Product met ID '"_ProductID_"' is reeds gelocked " _ LockInfo))
+	}
+	Do ..Logger.Info("AX ProductSynchronizatie","Locked product '"_ProductID_ "'")
+]]></Implementation>
+</Method>
+
+<Method name="UnLockProduct">
+<FormalSpec>ProductID:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Lock -^KPR(ProductID)
+	Do ..Logger.Info("AX ProductSynchronizatie","Unlocked product '"_ProductID_ "'")
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhUnitTest/AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter/ProductItemConverterFake.cls.xml
===================================================================
diff -u -r47500 -r49522
--- vhUnitTest/AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter/ProductItemConverterFake.cls.xml	(.../ProductItemConverterFake.cls.xml)	(revision 47500)
+++ vhUnitTest/AXimpl/Dynamics/ProductItemUpsertIn/Converter/ProductItemConverter/ProductItemConverterFake.cls.xml	(.../ProductItemConverterFake.cls.xml)	(revision 49522)
@@ -15,6 +15,22 @@
 <Type>%Boolean</Type>
 </Property>
 
+<Property name="IndexenAangepast">
+<Type>%Boolean</Type>
+</Property>
+
+<Property name="ProductIsGelocked">
+<Type>%Boolean</Type>
+</Property>
+
+<Property name="ProductIsGelockedGeweest">
+<Type>%Boolean</Type>
+</Property>
+
+<Property name="ReturnLockException">
+<Type>%Boolean</Type>
+</Property>
+
 <Method name="GeefNieuwProduct">
 <ReturnType>DOM.PM.Product</ReturnType>
 <Implementation><![CDATA[
@@ -38,9 +54,36 @@
 <Implementation><![CDATA[
 	Set ..NieuwProductGegeven = $$$False
 	Set ..DoorgestuurdNaarEWMS = $$$False
+	Set ..IndexenAangepast = $$$False
+	Set ..ReturnLockException = $$$False
 	Quit ##super(ProductAPI,ProductRolAPI,LangtekstBewaarder,KlasRepository,Logger,MailAPI,PakketService)
 ]]></Implementation>
 </Method>
+
+<Method name="LockProduct">
+<FormalSpec>ProductID:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Do:..ReturnLockException ##class(Tools.Wlip).%New(207).String("returning exception")
+	Do:..ReturnLockException ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.LockedException).%New("Product met ID '"_ProductID_"' is reeds gelocked"))
+	Set ..ProductIsGelocked = $$$True
+	Set ..ProductIsGelockedGeweest = $$$True
+]]></Implementation>
+</Method>
+
+<Method name="UpdateIndexen">
+<FormalSpec>ProductId:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[	Set ..IndexenAangepast = $$$True
+]]></Implementation>
+</Method>
+
+<Method name="UnLockProduct">
+<FormalSpec>ProductID:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[	Set ..ProductIsGelocked = $$$False
+]]></Implementation>
+</Method>
 </Class>