Index: vhUnitTest/APPS/algemeen/VhintraShell/impl/SessieNaarDtoConverter/Test.cls.xml
===================================================================
diff -u -r68480 -r69538
--- vhUnitTest/APPS/algemeen/VhintraShell/impl/SessieNaarDtoConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 68480)
+++ vhUnitTest/APPS/algemeen/VhintraShell/impl/SessieNaarDtoConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 69538)
@@ -64,7 +64,7 @@
 	Do $$$AssertEquals(..DtoVhintraSessie.GebruikerData.KlantData.Land,"BE","Land van de klant is BE")
 	
 	Do $$$AssertEquals(..DtoVhintraSessie.VhintraEigenschappen.KleurCode,"0xFFFFF","KleurCode in de VhintraEigenschappen")
-	Do $$$AssertEquals(..DtoVhintraSessie.OntzegdePermissies.Count(),1,"Aantal ontzegende permissies is 1")
+	Do $$$AssertEquals(..DtoVhintraSessie.OntzegdePermissies.Count(),0,"Aantal ontzegende permissies is 0")
 ]]></Implementation>
 </Method>
 
Index: DOM/PM/impl/INKLangtekstCreator.cls.xml
===================================================================
diff -u -r68601 -r69538
--- DOM/PM/impl/INKLangtekstCreator.cls.xml	(.../INKLangtekstCreator.cls.xml)	(revision 68601)
+++ DOM/PM/impl/INKLangtekstCreator.cls.xml	(.../INKLangtekstCreator.cls.xml)	(revision 69538)
@@ -23,6 +23,7 @@
 <Implementation><![CDATA[
 	Do ..VoegToeLangtekstParagraafVerzagenVan()
 	Do ..VoegToeLangtekstParagraafOpLengte()
+	Do ..VoegToeLangtekstParagraafLangtekstBewerktHalffabrikaat()
 ]]></Implementation>
 </Method>
 
@@ -74,6 +75,24 @@
 	Do ..VoegToeLangtekstParagraaf(Paragraaf)
 ]]></Implementation>
 </Method>
+
+<Method name="VoegToeLangtekstParagraafLangtekstBewerktHalffabrikaat">
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim Paragraaf As TECH.String
+	#dim Product As DOM.PM.AdministratiefProduct
+	#dim ProductID, LangTekstBewerktHalffabrikaat As TECH.String
+	
+	#dim ConcreetHalffabItem As DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem = ..HalffabItemsBoom.GeefHalffabItem(##class(DOM.PM.Maatwerk.Calc.HF.enu.INKRol).BewerktHalffabrikaat())
+	
+	Set ProductID = ConcreetHalffabItem.GeefHalffab().GeefProductID()	
+	Set Product = ##class(DOM.DomeinContext).Instance().GeefProductRolAPI().GeefAdministratiefProduct(ProductID)
+	Set LangTekstBewerktHalffabrikaat = Product.GeefLangtekst(..Taal)
+	
+	Do ..VoegToeLangtekstParagraaf(..Vertaler.GeefVertaling("TeVerzagenProduct")_":")
+	Do ..VoegToeLangtekstParagraaf(LangTekstBewerktHalffabrikaat)
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhDeploy/Deploy20221012xVertalingVoorINK.cls.xml
===================================================================
diff -u
--- vhDeploy/Deploy20221012xVertalingVoorINK.cls.xml	(revision 0)
+++ vhDeploy/Deploy20221012xVertalingVoorINK.cls.xml	(revision 69538)
@@ -0,0 +1,23 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Deploy20221012xVertalingVoorINK">
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Vertalingen voor langtekst RVG</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Do ##class(Res.Vertaling).CreateOrUpdate("TT","TeVerzagenProduct",,"N","Te verzagen product")
+	Do ##class(Res.Vertaling).CreateOrUpdate("TT","TeVerzagenProduct",,"F","Produit à scier")
+	Do ##class(Res.Vertaling).CreateOrUpdate("TT","TeVerzagenProduct",,"E","Product to be sawn")
+	Do ##class(Res.Vertaling).CreateOrUpdate("TT","TeVerzagenProduct",,"D","zu sägendes Product")
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/DescriptionBepaler.cls.xml
===================================================================
diff -u -r60148 -r69538
--- WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/DescriptionBepaler.cls.xml	(.../DescriptionBepaler.cls.xml)	(revision 60148)
+++ WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/DescriptionBepaler.cls.xml	(.../DescriptionBepaler.cls.xml)	(revision 69538)
@@ -59,7 +59,9 @@
 		;en dan moeten we de kleur van TAX plaat materiaal nog toevoegen
 		Set Kleur = ..PlaatMateriaalKleurVertaler.GeefVertaling(##class(TECH.StringUtils).Trim($Piece(Kleuren,"/",2)),Taal)			
 	} else {
-		Set Kleur = Product.GeefKleurOmschrijving(Taal)
+		If $$$Not(..ProductTypeApi.IsInkortingProduct(Product.GeefID())) {
+			Set Kleur = Product.GeefKleurOmschrijving(Taal)
+		}
 	}
 	If $$$Not(Kleur = "") {
 		Set Description = Description _ $$$CRLF _ KleurLabel _ ":" _ Kleur
Index: vhUnitTest/DOM/PM/impl/INKLangtekstCreator/Test.cls.xml
===================================================================
diff -u -r68602 -r69538
--- vhUnitTest/DOM/PM/impl/INKLangtekstCreator/Test.cls.xml	(.../Test.cls.xml)	(revision 68602)
+++ vhUnitTest/DOM/PM/impl/INKLangtekstCreator/Test.cls.xml	(.../Test.cls.xml)	(revision 69538)
@@ -28,7 +28,10 @@
 	#dim Langtekst As DOM.PM.ProductLangtekst = ..GeefLangtekst()
 	#dim ControleLangtekst As TECH.String = ##class(TECH.StringUtils).Concatenate(  "Verzagen van" _ $$$CRLF, 
 																					"ZR7.1080U  RELING  20ELN2" _ $$$CRLF,
-																					"op lengte 380 en 240 en 160mm")
+																					"op lengte 380 en 240 en 160mm" _ $$$CRLF,
+																					"Te verzagen product:" _ $$$CRLF,
+																					"Reling voor LEGRABOX binnenlade, inkortbaar" _ $$$CRLF,
+																					"Kleur: inox look geanodiseerd")
 	
 	Do $$$AssertEquals(Langtekst.GeefString(), ControleLangtekst)
 ]]></Implementation>
@@ -41,7 +44,10 @@
 	#dim Langtekst As DOM.PM.ProductLangtekst = ..GeefLangtekst()
 	#dim ControleLangtekst As TECH.String = ##class(TECH.StringUtils).Concatenate(  "Verzagen van" _ $$$CRLF, 
 																					"ZR7.1080U  RELING  20ELN2" _ $$$CRLF,
-																					"op lengte 3x 240mm")
+																					"op lengte 3x 240mm"_ $$$CRLF,
+																					"Te verzagen product:" _ $$$CRLF,
+																					"Reling voor LEGRABOX binnenlade, inkortbaar" _ $$$CRLF,
+																					"Kleur: inox look geanodiseerd")
 	
 	Do $$$AssertEquals(Langtekst.GeefString(), ControleLangtekst)
 ]]></Implementation>
Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Inkorting.Aansturing/Test002/StartBatch/Productie_001_prn.txt
===================================================================
diff -u -r69073 -r69538
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Inkorting.Aansturing/Test002/StartBatch/Productie_001_prn.txt	(.../Productie_001_prn.txt)	(revision 69073)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Inkorting.Aansturing/Test002/StartBatch/Productie_001_prn.txt	(.../Productie_001_prn.txt)	(revision 69538)
@@ -12,6 +12,9 @@
        Verzagen van                                                                      
        ZR7.1080U  RELING  20ELN2                                                         
        op lengte 3x 240mm                                                                
+       Te verzagen product:                                                              
+       Reling voor LEGRABOX binnenlade, inkortbaar                                       
+       Kleur: inox look geanodiseerd                                                     
                                                                                  
                                                                                  
 
\ No newline at end of file
Index: vhUnitTest/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/DescriptionBepaler/Test.cls.xml
===================================================================
diff -u -r60148 -r69538
--- vhUnitTest/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/DescriptionBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 60148)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/DescriptionBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 69538)
@@ -36,6 +36,7 @@
 	
 	#dim ProductTypeApiMock As vhTest.Mock.DOM.PM.ProductTypeAPI = ##class(vhTest.Mock.DOM.PM.ProductTypeAPI).%New()
 	Do ProductTypeApiMock.VerwachtMethodCall("IsTaxLosseComponentenProduct", RandomProductId).DanReturn($$$True)
+	Do ProductTypeApiMock.VerwachtMethodCall("IsInkortingProduct",RandomProductId).DanReturn($$$False)
 	
 	#dim DescriptionBepaler As WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.DescriptionBepaler = ##class(WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.DescriptionBepaler).%New(ProductTypeApiMock)
 	#dim Description As %String = DescriptionBepaler.GeefDescription(ProductMock, RandomTaal)
@@ -60,6 +61,7 @@
 	#dim DescriptionBepalerMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.DescriptionBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.DescriptionBepaler).%New()
 
 	Do ProductTypeAPIStub.IndienMethodCall("IsTaxLosseComponentenProduct",RandomProductId).DanReturn($$$False)
+	Do ProductTypeAPIStub.IndienMethodCall("IsInkortingProduct",RandomProductId).DanReturn($$$False)
 	Do ProductMock.VerwachtMethodCall("GeefID").DanReturn(RandomProductId)
 	Do ProductMock.VerwachtMethodCall("GeefLangtekst",RandomTaal,$$$False).DanReturn("")
 	Do ProductMock.VerwachtMethodCall("GeefKleurVanKorttekst").DanReturn("")	
@@ -90,6 +92,7 @@
 	#dim DescriptionBepalerMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.DescriptionBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.DescriptionBepaler).%New()
 
 	Do ProductTypeAPIStub.IndienMethodCall("IsTaxLosseComponentenProduct",RandomProductId).DanReturn($$$True)
+	Do ProductTypeAPIStub.IndienMethodCall("IsInkortingProduct", RandomProductId).DanReturn($$$False)
 	Do ProductMock.VerwachtMethodCall("GeefID").DanReturn(RandomProductId)
 	Do ProductMock.VerwachtMethodCall("GeefIdentNr").DanReturn(RandomIdentNummer)	
 	Do ProductMock.VerwachtMethodCall("GeefLangtekst",RandomTaal,$$$False).DanReturn("Langtekst Losse component")	
@@ -123,6 +126,7 @@
 	
 	#dim ProductTypeApiStub As vhTest.Mock.DOM.PM.ProductTypeAPI = ##class(vhTest.Mock.DOM.PM.ProductTypeAPI).%New()
 	Do ProductTypeApiStub.IndienMethodCall("IsTaxLosseComponentenProduct", RandomProductId).DanReturn($$$False)
+	Do ProductTypeApiStub.IndienMethodCall("IsInkortingProduct", RandomProductId).DanReturn($$$False)
 	
 	#dim VertalerMock As vhTest.Mock.DOM.common.Transl.Vertaler = ##class(vhTest.Mock.DOM.common.Transl.Vertaler).%New()
 	Do VertalerMock.VerwachtMethodCall("GeefVertaling", "Kleur", RandomTaal, $$$False).DanReturn(KleurLabel)