Index: BL/Prod/ImageLinkEdit.cls.xml
===================================================================
diff -u -r29059 -r74862
--- BL/Prod/ImageLinkEdit.cls.xml	(.../ImageLinkEdit.cls.xml)	(revision 29059)
+++ BL/Prod/ImageLinkEdit.cls.xml	(.../ImageLinkEdit.cls.xml)	(revision 74862)
@@ -20,10 +20,21 @@
 <Default>PR</Default>
 </Parameter>
 
-<Parameter name="ImageShare">
-<Default>\\notes01\Images</Default>
-</Parameter>
+<UDLText name="T">
+<Content><![CDATA[
+// Parameter ImageShare = "\\notes01\Images";
 
+]]></Content>
+</UDLText>
+
+<Method name="GeefImageDir">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ##class(TECH.Config.ConfigMgr).Instance().GeefString("ImagesDirectory","\\Notes01\Images")
+]]></Implementation>
+</Method>
+
 <Method name="Scan">
 <Description>
 d ##class(BL.Prod.ImageLinkEdit).Scan()</Description>
@@ -72,7 +83,7 @@
 	. Set lbPaths=$LG(lbSearchDef,2)
 	. For pPath=1:1:$LL(lbPaths)  Do  Quit:Found
 	. . For pExt=1:1:$LL(lbExt)  Do  Quit:Found
-	. . . Set FilePath=..#ImageShare_"\"_$LG(lbPaths,pPath)_"\"_FileName_"."_$LG(lbExt,pExt)
+	. . . Set FilePath=..GeefImageDir()_"\"_$LG(lbPaths,pPath)_"\"_FileName_"."_$LG(lbExt,pExt)
 	. . . Set Found=##class(%File).Exists(FilePath)
 	. . . ;w FilePath,":",##class(%File).Exists(FilePath),!
 	. . . Set:Found lbRes=$G(lbRes)_$LB($LB($LG(lbSearchDef,1),$LG(lbPaths,pPath),FileName,$LG(lbExt,pExt)))
Index: vhUnitTest/APPS/PM/Maatwerk/impl/AfbeeldingService/GeefAfbeeldingVoorIngegevenKenmerken/TestLBXSifonLade.cls.xml
===================================================================
diff -u -r32370 -r74862
--- vhUnitTest/APPS/PM/Maatwerk/impl/AfbeeldingService/GeefAfbeeldingVoorIngegevenKenmerken/TestLBXSifonLade.cls.xml	(.../TestLBXSifonLade.cls.xml)	(revision 32370)
+++ vhUnitTest/APPS/PM/Maatwerk/impl/AfbeeldingService/GeefAfbeeldingVoorIngegevenKenmerken/TestLBXSifonLade.cls.xml	(.../TestLBXSifonLade.cls.xml)	(revision 74862)
@@ -3,31 +3,43 @@
 <Class name="vhUnitTest.APPS.PM.Maatwerk.impl.AfbeeldingService.GeefAfbeeldingVoorIngegevenKenmerken.TestLBXSifonLade">
 <Super>vhUnitTest.APPS.PM.Maatwerk.impl.AfbeeldingService.GeefAfbeeldingVoorIngegevenKenmerken.Base</Super>
 
+<Property name="ImageRootDir">
+<Type>%String</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="OnBeforeAllTests">
+<Implementation><![CDATA[
+	Set ..ImageRootDir = ##class(TECH.Config.ConfigMgr).Instance().GeefString("ImagesDirectory","\\Notes01\Images")
+	Do ##super()
+]]></Implementation>
+</Method>
+
 <Method name="TestSifonEnkelCHoogte">
 <Implementation><![CDATA[
 	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ..GeefSifonKenmerken(##class(DOM.PM.enu.LBXLadeHoogte).C(), ##class(DOM.PM.enu.AantalUitsparingen).Enkel())
-	Do ..AssertImageURL(IngegevenKenmerken,"\\Notes01\Images\GENERIEK\LEGRA_BOX\C_Sifon_Legra.SVG")
+	Do ..AssertImageURL(IngegevenKenmerken,..ImageRootDir_"\GENERIEK\LEGRA_BOX\C_Sifon_Legra.SVG")
 ]]></Implementation>
 </Method>
 
 <Method name="TestSifonEnkelKHoogte">
 <Implementation><![CDATA[
 	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ..GeefSifonKenmerken(##class(DOM.PM.enu.LBXLadeHoogte).K(), ##class(DOM.PM.enu.AantalUitsparingen).Enkel())
-	Do ..AssertImageURL(IngegevenKenmerken,"\\Notes01\Images\GENERIEK\LEGRA_BOX\K_Sifon_Legra.SVG")
+	Do ..AssertImageURL(IngegevenKenmerken,..ImageRootDir_"\GENERIEK\LEGRA_BOX\K_Sifon_Legra.SVG")
 ]]></Implementation>
 </Method>
 
 <Method name="TestSifonDubbelFHoogte">
 <Implementation><![CDATA[
 	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ..GeefSifonKenmerken(##class(DOM.PM.enu.LBXLadeHoogte).F(), ##class(DOM.PM.enu.AantalUitsparingen).Dubbel())
-	Do ..AssertImageURL(IngegevenKenmerken,"\\Notes01\Images\GENERIEK\LEGRA_BOX\F_Sifon_x2_Legra.SVG")
+	Do ..AssertImageURL(IngegevenKenmerken,..ImageRootDir_"\GENERIEK\LEGRA_BOX\F_Sifon_x2_Legra.SVG")
 ]]></Implementation>
 </Method>
 
 <Method name="TestSifonDubbelMHoogte">
 <Implementation><![CDATA[
 	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ..GeefSifonKenmerken(##class(DOM.PM.enu.LBXLadeHoogte).M(), ##class(DOM.PM.enu.AantalUitsparingen).Dubbel())
-	Do ..AssertImageURL(IngegevenKenmerken,"\\Notes01\Images\GENERIEK\LEGRA_BOX\M_Sifon_x2_Legra.SVG")
+	Do ..AssertImageURL(IngegevenKenmerken,..ImageRootDir_"\GENERIEK\LEGRA_BOX\M_Sifon_x2_Legra.SVG")
 ]]></Implementation>
 </Method>
 
@@ -37,7 +49,7 @@
 	Set IngegevenKenmerken.IsBinnenlade = $$$True
 	Set IngegevenKenmerken.VoorWandType = ##class(DOM.PM.enu.LBXVoorWandType).Vulling()
 	Set IngegevenKenmerken.VoorWandVerhogingHoogte = ##class(DOM.PM.enu.LBXVoorWandVerhogingHoogte).Hoog()
-	Do ..AssertImageURL(IngegevenKenmerken,"\\Notes01\Images\GENERIEK\LEGRA_BOX\C_Z_Sifon_Vulling_Hoog_Legra.SVG")
+	Do ..AssertImageURL(IngegevenKenmerken,..ImageRootDir_"\GENERIEK\LEGRA_BOX\C_Z_Sifon_Vulling_Hoog_Legra.SVG")
 ]]></Implementation>
 </Method>
 
@@ -46,7 +58,7 @@
 	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ..GeefSifonKenmerken(##class(DOM.PM.enu.LBXLadeHoogte).M(), ##class(DOM.PM.enu.AantalUitsparingen).Enkel())
 	Set IngegevenKenmerken.IsBinnenlade = $$$True
 	Set IngegevenKenmerken.VoorWandType = ##class(DOM.PM.enu.LBXVoorWandType).Voorstuk()
-	Do ..AssertImageURL(IngegevenKenmerken,"\\Notes01\Images\GENERIEK\LEGRA_BOX\M_Z_Sifon_Voorstuk_Legra.SVG")
+	Do ..AssertImageURL(IngegevenKenmerken,..ImageRootDir_"\GENERIEK\LEGRA_BOX\M_Z_Sifon_Voorstuk_Legra.SVG")
 ]]></Implementation>
 </Method>
 
@@ -56,7 +68,7 @@
 	Set IngegevenKenmerken.IsBinnenlade = $$$True
 	Set IngegevenKenmerken.VoorWandType = ##class(DOM.PM.enu.LBXVoorWandType).Vulling()
 	Set IngegevenKenmerken.VoorWandVerhogingMateriaal = ##class(DOM.PM.enu.LBXVoorWandVerhogingMateriaal).GlasDiamant()
-	Do ..AssertImageURL(IngegevenKenmerken,"\\Notes01\Images\GENERIEK\LEGRA_BOX\M_Z_Sifon_Vulling_Legra.SVG")
+	Do ..AssertImageURL(IngegevenKenmerken,..ImageRootDir_"\GENERIEK\LEGRA_BOX\M_Z_Sifon_Vulling_Legra.SVG")
 ]]></Implementation>
 </Method>
 
@@ -66,7 +78,7 @@
 	Set IngegevenKenmerken.IsBinnenlade = $$$True
 	Set IngegevenKenmerken.VoorWandType = ##class(DOM.PM.enu.LBXVoorWandType).Vulling()
 	Set IngegevenKenmerken.VoorWandVerhogingMateriaal = ##class(DOM.PM.enu.LBXVoorWandVerhogingMateriaal).GlasDiamant()
-	Do ..AssertImageURL(IngegevenKenmerken,"\\Notes01\Images\GENERIEK\LEGRA_BOX\M_Z_Sifon_x2_Vulling_Legra.SVG")
+	Do ..AssertImageURL(IngegevenKenmerken,..ImageRootDir_"\GENERIEK\LEGRA_BOX\M_Z_Sifon_x2_Vulling_Legra.SVG")
 ]]></Implementation>
 </Method>
 
Index: CHUI/Prod/ProductLabel.cls.xml
===================================================================
diff -u -r73649 -r74862
--- CHUI/Prod/ProductLabel.cls.xml	(.../ProductLabel.cls.xml)	(revision 73649)
+++ CHUI/Prod/ProductLabel.cls.xml	(.../ProductLabel.cls.xml)	(revision 74862)
@@ -50,6 +50,13 @@
 <Default>Magazijn Halux 6x10</Default>
 </Parameter>
 
+<Method name="GeefImageDir">
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ##class(TECH.Config.ConfigMgr).Instance().GeefString("ImagesDirectory","\\Notes01\Images")
+]]></Implementation>
+</Method>
+
 <Method name="DoOne">
 <Description>
 d ##class(CHUI.Prod.ProductLabel).DoOne(450661)
@@ -370,7 +377,7 @@
 	Set ..pxLabel.Omschrijving1=..HistpakPalletInfo(1)
 	Set ..pxLabel.ProductNaam2=..HistpakPalletInfo(2)
 	Set ..pxLabel.Omschrijving2=..HistpakPalletInfo(3)
-	Set ..pxLabel.ImgURL="\\notes01\images\logo\Logo VHZwart.svg"
+	Set ..pxLabel.ImgURL=..GeefImageDir()_"\logo\Logo VHZwart.svg"
 	Set ..pxLabel.VerpakAantal="Retour ecopacks to Blum"
 	Set ..pxLabel.StockCode="VAN HOECKE NV"
 	Set ..pxLabel.FabrWeek="Sint-Niklaas - België"
Index: BL/Blum/Cataloog/Import.cls.xml
===================================================================
diff -u -r29059 -r74862
--- BL/Blum/Cataloog/Import.cls.xml	(.../Import.cls.xml)	(revision 29059)
+++ BL/Blum/Cataloog/Import.cls.xml	(.../Import.cls.xml)	(revision 74862)
@@ -20,10 +20,13 @@
 <Default>blum\P</Default>
 </Parameter>
 
-<Parameter name="RootPath">
-<Default>\\notes01\images</Default>
-</Parameter>
+<UDLText name="T">
+<Content><![CDATA[
+// Parameter RootPath = "\\notes01\images";
 
+]]></Content>
+</UDLText>
+
 <Property name="arAspectRatio">
 <Type>%List</Type>
 <MultiDimensional>1</MultiDimensional>
@@ -432,7 +435,9 @@
 
 <Method name="ExistImage">
 <FormalSpec>FileName</FormalSpec>
-<Implementation><![CDATA[	Quit ##class(%File).Exists($$FULLPAD^vhDEV($$FULLPAD^vhDEV(..#RootPath,..#CheckPath),FileName))
+<Implementation><![CDATA[
+	#dim RootPath as %String = ##class(TECH.Config.ConfigMgr).Instance().GeefString("ImagesDirectory","\\Notes01\Images")
+	Quit ##class(%File).Exists($$FULLPAD^vhDEV($$FULLPAD^vhDEV(RootPath,..#CheckPath),FileName))
 ]]></Implementation>
 </Method>
 
@@ -471,7 +476,8 @@
 <Method name="AddLink">
 <FormalSpec>oImg,VisueelType,Pad,BestandsNaam,Sequence,Extensie</FormalSpec>
 <Implementation><![CDATA[
-	Set Status=oImg.AddLinkIfExists(.oLink,..#RootPath, VisueelType, Pad, BestandsNaam, Sequence, Extensie)
+	#dim RootPath as %String = ##class(TECH.Config.ConfigMgr).Instance().GeefString("ImagesDirectory","\\Notes01\Images")
+	Set Status=oImg.AddLinkIfExists(.oLink,RootPath, VisueelType, Pad, BestandsNaam, Sequence, Extensie)
 	If $$$ISERR(Status) Do
 	. Write "Error AddLink, file not found "_VisueelType_" "_Pad_" "_BestandsNaam_" "_Extensie,!
 ]]></Implementation>
Index: vhUnitTest/BL/Prod/TestImageLink.cls.xml
===================================================================
diff -u -r74756 -r74862
--- vhUnitTest/BL/Prod/TestImageLink.cls.xml	(.../TestImageLink.cls.xml)	(revision 74756)
+++ vhUnitTest/BL/Prod/TestImageLink.cls.xml	(.../TestImageLink.cls.xml)	(revision 74862)
@@ -10,10 +10,16 @@
 <Private>1</Private>
 </Property>
 
+<Property name="ImageRootDir">
+<Type>%String</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="OnBeforeOneTest">
 <FormalSpec>aTestName:%String</FormalSpec>
 <Implementation><![CDATA[
 	Set ..ImageLink = ##class(BL.Prod.ImageLink).%New()
+	Set ..ImageRootDir = ##class(TECH.Config.ConfigMgr).Instance().GeefString("ImagesDirectory","\\Notes01\Images")
 	Do ##super(aTestName)
 ]]></Implementation>
 </Method>
@@ -41,43 +47,45 @@
 <Method name="TestGeefAbsoluutAfbeeldingPadOpNotesImagesAlsUNCxxZonderSequentie">
 <Implementation><![CDATA[
 	#Dim ActueelPad As %String = ..ImageLink.GeefAbsoluutAfbeeldingPadOpNotesImagesAlsUNC( "relatieffolderpad", "bestandsnaam", "extensie" )
-	Do $$$AssertEquals( "\\Notes01\Images\relatieffolderpad\bestandsnaam.extensie", ActueelPad )
+	Do $$$AssertEquals( ..ImageRootDir_"\relatieffolderpad\bestandsnaam.extensie", ActueelPad )
 ]]></Implementation>
 </Method>
 
 <Method name="TestGeefAbsoluutAfbeeldingPadOpNotesImagesAlsUNCxxMetSequentie">
 <Implementation><![CDATA[
 	#Dim ActueelPad As %String = ..ImageLink.GeefAbsoluutAfbeeldingPadOpNotesImagesAlsUNC( "relatieffolderpad", "bestandsnaam", "extensie", 5 )
-	Do $$$AssertEquals( "\\Notes01\Images\relatieffolderpad\bestandsnaam.005.extensie", ActueelPad )
+	Do $$$AssertEquals( ..ImageRootDir_ "\relatieffolderpad\bestandsnaam.005.extensie", ActueelPad )
 ]]></Implementation>
 </Method>
 
 <Method name="TestCreateURLLABELROOTZonderSequentie">
 <Implementation><![CDATA[
 	#Dim ActueelPad As %String = ..ImageLink.CreateURL( ##class(APPS.common.enu.Toepassing).BartenderVoorkeurVector(), "relatieffolderpad", "bestandsnaam", "extensie" )
-	Do $$$AssertEquals( "\\Notes01\Images\relatieffolderpad\bestandsnaam.extensie", ActueelPad )
+	Do $$$AssertEquals( ..ImageRootDir _ "\relatieffolderpad\bestandsnaam.extensie", ActueelPad )
 ]]></Implementation>
 </Method>
 
 <Method name="TestCreateURLLABELROOTMetSequentie">
 <Implementation><![CDATA[
 	#Dim ActueelPad As %String = ..ImageLink.CreateURL( ##class(APPS.common.enu.Toepassing).BartenderVoorkeurVector(), "relatieffolderpad", "bestandsnaam", "extensie", 5 )
-	Do $$$AssertEquals( "\\Notes01\Images\relatieffolderpad\bestandsnaam.005.extensie", ActueelPad )
+	Do $$$AssertEquals( ..ImageRootDir _ "\relatieffolderpad\bestandsnaam.005.extensie", ActueelPad )
 ]]></Implementation>
 </Method>
 
 <Method name="TestGetProductImageURLProduct">
 <Implementation><![CDATA[
 	#dim ProductID As %String = 11698		
 	Set ImageLink = ##class(BL.Prod.ImageLink).%New()
+
+	Set ImageRoot = ##class(TECH.Config.ConfigMgr).Instance().GeefString("ImagesDirectory","\\Notes01\Images") _ "\"
 	
 	#dim BestandNaam As %String = "41589344_BT_P_1_PB_BAU_SALL_AOF_V1"
 	#dim JPGGroot As %String = "BLUM\W\"_BestandNaam_".JPG"
-	#dim UncJPGGroot As %String = "\\Notes01\Images\"_JPGGroot
-	#dim UncEPS As %String = "\\Notes01\Images\BLUM\P\"_BestandNaam_".EPS"
-	#dim UncJPGKlein As %String = "\\Notes01\Images\BLUM\T\"_BestandNaam_".JPG"
+	#dim UncJPGGroot As %String = ImageRoot _ JPGGroot
+	#dim UncEPS As %String = ImageRoot _ "BLUM\P\"_BestandNaam_".EPS"
+	#dim UncJPGKlein As %String = ImageRoot _ "BLUM\T\"_BestandNaam_".JPG"
 	#dim ResJPG As %String = "http://res.vanhoecke.be/Images/BLUM/W/"_BestandNaam_".JPG"
-	#dim FileJPG As %String = "file://Notes01/Images/BLUM/W/"_BestandNaam_".JPG"
+	#dim FileJPG As %String = "file:" _ $TR(ImageRoot,"\","/")_ "BLUM/W/"_BestandNaam_".JPG"
 	#dim Leeg As %String = ""
 	
 	Do $$$AssertEquals(..ImageLink.GetProductImageURL(ProductID,##class(APPS.common.enu.Toepassing).Flex()),ResJPG,"Flex")
@@ -106,10 +114,10 @@
 	
 	#dim BestandNaam As %String = "VB5010S2"
 	#dim JPGGroot As %String = "Orgalux\ViaSleutelG\"_BestandNaam_".JPG"
-	#dim UncJPGGroot As %String = "\\Notes01\Images\"_JPGGroot
-	#dim UncJPGKlein As %String = "\\Notes01\Images\Orgalux\ViaSleutelK\"_BestandNaam_".JPG"
+	#dim UncJPGGroot As %String = ..ImageRootDir _ "\"_JPGGroot
+	#dim UncJPGKlein As %String = ..ImageRootDir _ "\Orgalux\ViaSleutelK\"_BestandNaam_".JPG"
 	#dim ResJPG As %String = "http://res.vanhoecke.be/Images/Orgalux/ViaSleutelG/"_BestandNaam_".JPG"
-	#dim FileJPG As %String = "file://Notes01/Images/Orgalux/ViaSleutelG/"_BestandNaam_".JPG"
+	#dim FileJPG As %String = "file:" _ $TR(..ImageRootDir,"\","/") _"/Orgalux/ViaSleutelG/"_BestandNaam_".JPG"
 	
 	Do $$$AssertEquals(..ImageLink.GetProductImageURL(ProductID,##class(APPS.common.enu.Toepassing).Flex()),ResJPG,"Flex")		
 	Do $$$AssertEquals(..ImageLink.GetProductImageURL(ProductID,##class(APPS.common.enu.Toepassing).VhintraShell()),ResJPG,"VhintraShell")
@@ -149,6 +157,14 @@
 	Do $$$AssertEquals(..ImageLink.CreateURL(##class(APPS.common.enu.Toepassing).WWW(),Pad,BestandNaam,Extensie,,"WebOL"),"http://res.vanhoecke.be/Images/ORGALUX/Orgalux/ViaSleutelG/UNITTESTBESTAND.JPG")
 	Do $$$AssertEquals(..ImageLink.CreateURL(##class(APPS.common.enu.Toepassing).WWW(),Pad,BestandNaam,Extensie,,"WebVH"),"http://res.vanhoecke.be/media/Orgalux/ViaSleutelG/UNITTESTBESTAND.JPG")
 	Do $$$AssertEquals(..ImageLink.CreateURL(##class(APPS.common.enu.Toepassing).WWW(),Pad,BestandNaam,Extensie,,"vHintra"),"http://"_##class(TECH.Context.RuntimeContext).Instance().GeefServerNaam()_"/csp/vhintra/Orgalux/ViaSleutelG/UNITTESTBESTAND.JPG")
+
+	#dim UncJPGGroot2 As %String = "\\Vanhoecke.be\T2_apps\PRD\Images\"_JPGGroot
+	#dim UncJPGKlein2 As %String = "\\Vanhoecke.be\T2_apps\PRD\Images\Orgalux\ViaSleutelK\"_BestandNaam_".JPG"
+	#dim FileJPG2 As %String = "file://Vanhoecke.be/T2_apps/PRD/Images/Orgalux/ViaSleutelG/"_BestandNaam_".JPG"
+
+	Do $$$AssertEquals(..ImageLink.CreateURL(##class(APPS.common.enu.Toepassing).WWW(),Pad,BestandNaam,Extensie,,"WebOL"),"http://res.vanhoecke.be/Images/ORGALUX/Orgalux/ViaSleutelG/UNITTESTBESTAND.JPG")
+	Do $$$AssertEquals(..ImageLink.CreateURL(##class(APPS.common.enu.Toepassing).WWW(),Pad,BestandNaam,Extensie,,"WebVH"),"http://res.vanhoecke.be/media/Orgalux/ViaSleutelG/UNITTESTBESTAND.JPG")
+	Do $$$AssertEquals(..ImageLink.CreateURL(##class(APPS.common.enu.Toepassing).WWW(),Pad,BestandNaam,Extensie,,"vHintra"),"http://"_##class(TECH.Context.RuntimeContext).Instance().GeefServerNaam()_"/csp/vhintra/Orgalux/ViaSleutelG/UNITTESTBESTAND.JPG")
 ]]></Implementation>
 </Method>
 </Class>
Index: APPS/Halux/PPS/Activiteit/impl/SST/LijstVerwerkers/VoormontageSpaceStep/DocumentInhoudBuilder.cls.xml
===================================================================
diff -u -r62348 -r74862
--- APPS/Halux/PPS/Activiteit/impl/SST/LijstVerwerkers/VoormontageSpaceStep/DocumentInhoudBuilder.cls.xml	(.../DocumentInhoudBuilder.cls.xml)	(revision 62348)
+++ APPS/Halux/PPS/Activiteit/impl/SST/LijstVerwerkers/VoormontageSpaceStep/DocumentInhoudBuilder.cls.xml	(.../DocumentInhoudBuilder.cls.xml)	(revision 74862)
@@ -23,6 +23,14 @@
 <Private>1</Private>
 </Property>
 
+<Method name="GeefImageDir">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ##class(TECH.Config.ConfigMgr).Instance().GeefString("ImagesDirectory","\\Notes01\Images")
+]]></Implementation>
+</Method>
+
 <Method name="%OnNew">
 <FormalSpec>Productkenmerken:APPS.Halux.PPS.impl.AansturingActie.common.VoormontageSpaceStep.dto.ProductKenmerken,InhoudBuilder:APPS.common.Document.TagBasedDocument.InhoudBuilder=""</FormalSpec>
 <ReturnType>%Status</ReturnType>
@@ -51,10 +59,10 @@
 	
 	Do ..VoegToeRubriek("Tablet", ..GeefRijDataStepTablet(), ..GeefKolommenDefinitieStepTablet())
 	
-	Do ..VoegToeRubriek("Traverse", ..GeefRijDataStepTraverse(), ..GeefKolommenDefinitieStepTraverse(), $LB("file://Notes01/Images/GENERIEK/SST/Voormontage/Traverse.jpg"))
+	Do ..VoegToeRubriek("Traverse", ..GeefRijDataStepTraverse(), ..GeefKolommenDefinitieStepTraverse(), $LB("file:"_$TR(..GeefImageDir(),"\","/") _ "/GENERIEK/SST/Voormontage/Traverse.jpg"))
 	
 	If (..SSTKenmerken.Bewegingstechnologie = ##class(DOM.PM.enu.SSTBewegingstechnologie).Servodrive()) {
-		Do ..VoegToeRubriek("Servodrive profiel", ..GeefRijDataLijstServodrive(), ..GeefKolommenDefinitieServodrive(), $LB("file://Notes01/Images/GENERIEK/SST/Voormontage/Servodrive.jpg"))	
+		Do ..VoegToeRubriek("Servodrive profiel", ..GeefRijDataLijstServodrive(), ..GeefKolommenDefinitieServodrive(), $LB("file:"_$TR(..GeefImageDir(),"\","/") _ "/GENERIEK/SST/Voormontage/Servodrive.jpg"))	
 		Do ..InhoudBuilder.VoegToePaginaEinde()
 		Do ..VoegToeRubriek("Onderdelen servodrive", ..GeefRijDataLijstOnderdelenServodrive(), ..GeefKolommenDefinitieOnderdelenServodrive())	
 	}
Index: PVTREE.mac.rou
===================================================================
diff -u -r29059 -r74862
--- PVTREE.mac.rou	(.../PVTREE.mac.rou)	(revision 29059)
+++ PVTREE.mac.rou	(.../PVTREE.mac.rou)	(revision 74862)
@@ -251,7 +251,7 @@
  
  
 Image(PRNr)
-	Set StartPad="\\Notes01\Images\"
+	Set StartPad=##class(TECH.Config.ConfigMgr).Instance().GeefString("ImagesDirectory","\\Notes01\Images") _ "\"
 	Set rsImg=##class(%ResultSet).%New("Res.ImageLink:GetViaFunctieTypes")
 	Do rsImg.Execute("PR",PRNr,$LB("PB"),"N") ; Haalt alle objecten waarvang de functietype is PB en AG (ook dubbels worden getoond)
 	Set TFile=""
Index: APPS/Halux/PPS/Document/ProductieDetailDocument/impl/common/BladInhoudBuilderTemplate.cls.xml
===================================================================
diff -u -r74286 -r74862
--- APPS/Halux/PPS/Document/ProductieDetailDocument/impl/common/BladInhoudBuilderTemplate.cls.xml	(.../BladInhoudBuilderTemplate.cls.xml)	(revision 74286)
+++ APPS/Halux/PPS/Document/ProductieDetailDocument/impl/common/BladInhoudBuilderTemplate.cls.xml	(.../BladInhoudBuilderTemplate.cls.xml)	(revision 74862)
@@ -71,6 +71,14 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefImageDir">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ##class(TECH.Config.ConfigMgr).Instance().GeefString("ImagesDirectory","\\Notes01\Images")
+]]></Implementation>
+</Method>
+
 <Method name="GeefInhoud">
 <FormalSpec>InputParameters:APPS.Halux.PPS.Document.ProductieDetailDocument.InputParameters</FormalSpec>
 <ReturnType>APPS.Halux.PPS.Document.ProductieDetailDocument.impl.common.Inhoud</ReturnType>
@@ -415,7 +423,7 @@
 		do ExceptionStream.WriteLine(Exception.ToString())
 		do ##class(vhLib.Logger).%New().Warning("GeefMaatwerkProductAfbeelding", ExceptionStream )
 		
-		set Afbeelding = "file://Notes01/Images/NoImageAvailable.jpg"
+		set Afbeelding = "file:"_$TR(..GeefImageDir(),"\","/") _ "/NoImageAvailable.jpg"
 	}
 	
 	Quit Afbeelding
Index: BL/Prod/ImageLink.cls.xml
===================================================================
diff -u -r74755 -r74862
--- BL/Prod/ImageLink.cls.xml	(.../ImageLink.cls.xml)	(revision 74755)
+++ BL/Prod/ImageLink.cls.xml	(.../ImageLink.cls.xml)	(revision 74862)
@@ -624,6 +624,14 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefImageDir">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ##class(TECH.Config.ConfigMgr).Instance().GeefString("ImagesDirectory","\\Notes01\Images")
+]]></Implementation>
+</Method>
+
 <Method name="CreateURL">
 <FormalSpec>Toepassing:APPS.common.enu.Toepassing,Pad:%String,FileNaam:%String,Extensie:%String,Sequence:%String="",DirectoryCode:%String=""</FormalSpec>
 <Implementation><![CDATA[
@@ -644,14 +652,14 @@
 	
 	If Toepassing=##class(APPS.common.enu.Toepassing).Bartender(){
 		If ..IsDirectoryCodeWebOL(DirectoryCode) {
-			Set Root="\\Notes01\Images\Orgalux",Delim="\",URL=..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim)
+			Set Root=..GeefImageDir()_"\Orgalux",Delim="\",URL=..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim)
 		}Else{ 
-			Set Root="\\Notes01\Images",Delim="\",URL=..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim)
+			Set Root=..GeefImageDir(),Delim="\",URL=..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim)
 		}
 	}
 	
 	If (Toepassing = ..Toepassing.AX) {
-		Set Root = "\\Notes01\Images"
+		Set Root = ..GeefImageDir()
 		Set Delim = "\"
 		Set URL = ..AddPaths(Root, ..AddPaths(Pad, FileNaam _ ..GeefSequentieNummer(Sequence) _ "." _ Extensie, Delim), Delim)
 	}
@@ -669,21 +677,21 @@
 		}	
 	}
 	Set:Toepassing=##class(APPS.common.enu.Toepassing).FopLink() Root="//res.vanhoecke.be/Images",Delim="/",URL="http:"_$$$URL(..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim))
-	Set:Toepassing=##class(APPS.common.enu.Toepassing).FopEmbed() Root="//Notes01/Images",Delim="/",URL="file:"_$$$URL(..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim))
-	Set:Toepassing=##class(APPS.common.enu.Toepassing).FopEmbedPS() Root="//Notes01/Images",Delim="/",URL="file:"_$$$URL(..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim))
-	Set:Toepassing=##class(APPS.common.enu.Toepassing).FopEmbedPDF() Root="//Notes01/Images",Delim="/",URL="file:"_$$$URL(..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim))
-	Set:Toepassing=##class(APPS.common.enu.Toepassing).Print() Root="\\Notes01\Images",Delim="\",URL=..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim)
-	Set:Toepassing=##class(APPS.common.enu.Toepassing).File() Root="\\Notes01\Images",Delim="\",URL=..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim)
+	Set:Toepassing=##class(APPS.common.enu.Toepassing).FopEmbed() Root=..GeefImageDir(),Delim="/",URL="file:"_$$$URL(..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim))
+	Set:Toepassing=##class(APPS.common.enu.Toepassing).FopEmbedPS() Root=..GeefImageDir(),Delim="/",URL="file:"_$$$URL(..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim))
+	Set:Toepassing=##class(APPS.common.enu.Toepassing).FopEmbedPDF() Root=..GeefImageDir(),Delim="/",URL="file:"_$$$URL(..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim))
+	Set:Toepassing=##class(APPS.common.enu.Toepassing).Print() Root=..GeefImageDir(),Delim="\",URL=..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim)
+	Set:Toepassing=##class(APPS.common.enu.Toepassing).File() Root=..GeefImageDir(),Delim="\",URL=..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim)
 	Set:Toepassing=##class(APPS.common.enu.Toepassing).Label() Root="",Delim="\",URL=..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim)
-	Set:Toepassing=##class(APPS.common.enu.Toepassing).LabelRoot() Root="\\Notes01\Images",Delim="\",URL=..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim)
-	Set:Toepassing=##class(APPS.common.enu.Toepassing).Wms() Root="\\Notes01\Images",Delim="\",URL=..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim)
-	Set:Toepassing=##class(APPS.common.enu.Toepassing).Makova() Root="\\Notes01\Images",Delim="\",URL=..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim)
-	Set:Toepassing=##class(APPS.common.enu.Toepassing).Thumbnail() Root="\\Notes01\Images",Delim="\",URL=..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim)
+	Set:Toepassing=##class(APPS.common.enu.Toepassing).LabelRoot() Root=..GeefImageDir(),Delim="\",URL=..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim)
+	Set:Toepassing=##class(APPS.common.enu.Toepassing).Wms() Root=..GeefImageDir(),Delim="\",URL=..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim)
+	Set:Toepassing=##class(APPS.common.enu.Toepassing).Makova() Root=..GeefImageDir(),Delim="\",URL=..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim)
+	Set:Toepassing=##class(APPS.common.enu.Toepassing).Thumbnail() Root=..GeefImageDir(),Delim="\",URL=..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim)
 	If Toepassing=##class(APPS.common.enu.Toepassing).BartenderVoorkeurVector() { 
 		If ..IsDirectoryCodeWebOL(DirectoryCode) {
-			Set Root="\\Notes01\Images\Orgalux",Delim="\",URL=..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim)
+			Set Root=..GeefImageDir()_"\Orgalux",Delim="\",URL=..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim)
 		}Else{
-			Set Root="\\Notes01\Images",Delim="\",URL=..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim)
+			Set Root=..GeefImageDir(),Delim="\",URL=..AddPaths(Root,..AddPaths(Pad,FileNaam_$S($G(Sequence):"."_$E(1000+Sequence,2,4),1:"")_"."_Extensie,Delim),Delim)
 		}
 	}
 	Quit $G(URL)
@@ -711,7 +719,7 @@
 <FormalSpec>RelatiefPadNaarFolderOnderImagesFolder:%String,FileNaam:%String,Extensie:%String,Sequence:%Integer</FormalSpec>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	#dim Root As %String ="\\Notes01\Images"
+	
 	#dim Delim As %String ="\"
 	
 	#dim SequentieSuffix As %String = ""
@@ -722,7 +730,7 @@
 	
 	#dim BestandsNaamInclSequenceEnExtensie As %String = FileNaam _ SequentieSuffix _ "." _ Extensie
 	#dim RelatiefPadOnderImagesFolder As %String = ..AddPaths( RelatiefPadNaarFolderOnderImagesFolder, BestandsNaamInclSequenceEnExtensie, Delim)
-	#dim AbsoluutPad As %String =..AddPaths( Root, RelatiefPadOnderImagesFolder, Delim )
+	#dim AbsoluutPad As %String =..AddPaths( ..GeefImageDir(), RelatiefPadOnderImagesFolder, Delim )
 	
 	Quit AbsoluutPad
 ]]></Implementation>
Index: BL/Prod/ImageLinkImport/BlumImagesVoorAdminImporteerder.cls.xml
===================================================================
diff -u -r68448 -r74862
--- BL/Prod/ImageLinkImport/BlumImagesVoorAdminImporteerder.cls.xml	(.../BlumImagesVoorAdminImporteerder.cls.xml)	(revision 68448)
+++ BL/Prod/ImageLinkImport/BlumImagesVoorAdminImporteerder.cls.xml	(.../BlumImagesVoorAdminImporteerder.cls.xml)	(revision 74862)
@@ -82,8 +82,7 @@
 
 <Method name="GeefDetailFeedback">
 <ReturnType>%String</ReturnType>
-<Implementation><![CDATA[
-	Quit ##class(TECH.StringUtils).Replace(##class(TECH.StringUtils).Replace(..DetailFeedback, "Er wordt geen imageLink gekoppeld aan product 'ProductId'.", "", ), "Import ImagesVoorBlumProducten : Bestand","file")
+<Implementation><![CDATA[	Quit ##class(TECH.StringUtils).Replace(##class(TECH.StringUtils).Replace(..DetailFeedback, "Er wordt geen imageLink gekoppeld aan product 'ProductId'.", "", ), "Import ImagesVoorBlumProducten : Bestand","file")
 ]]></Implementation>
 </Method>
 
@@ -221,9 +220,10 @@
 	#dim BestandExtensie As %String = ##class(TECH.File).GeefExtensie(BestandVolledigeNaam)
 	#dim BestandLocatie As %String = ##class(TECH.File).GetDirectory(BestandVolledigeNaam)
 	
+	#dim RootPath as %String = ##class(TECH.Config.ConfigMgr).Instance().GeefString("ImagesDirectory","\\Notes01\Images")
 	#dim ImageSubdir As %String = $$$UCase(##class(TECH.File).NormalizeDirectory(BestandLocatie))
-	If ImageSubdir [ "NOTES01\IMAGES\" {
-		Set ImageSubdir = $Piece(ImageSubdir, "NOTES01\IMAGES\", 2)
+	If ImageSubdir [ $$$UCase(RootPath) {
+		Set ImageSubdir = $Piece(ImageSubdir, RootPath _"\", 2)
 	}
 	If $Extract(ImageSubdir,*)="\" {
 		Set ImageSubdir = $Extract(ImageSubdir, 1, *-1)
Index: BL/Prod/ImageLinkImport.cls.xml
===================================================================
diff -u -r69313 -r74862
--- BL/Prod/ImageLinkImport.cls.xml	(.../ImageLinkImport.cls.xml)	(revision 69313)
+++ BL/Prod/ImageLinkImport.cls.xml	(.../ImageLinkImport.cls.xml)	(revision 74862)
@@ -1153,12 +1153,20 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefImageDir">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ##class(TECH.Config.ConfigMgr).Instance().GeefString("ImagesDirectory","\\Notes01\Images")
+]]></Implementation>
+</Method>
+
 <Method name="ImportOneOrgalux">
 <FormalSpec>PRNr:%String</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	#define OLPath "Orgalux\"
-	#define OLRoot "\\notes01\images\"
+	#define OLRoot ..GeefImageDir() _ "\"
 	#define OLGroep "OL"
 	Do ..RemoveOldImages(..#OLObjType,PRNr,..#OLOorsprong)
 	Set blMulti=##class(BL.Kenm.ProdMulti).Create($$$OLGroep)
@@ -1237,7 +1245,7 @@
 <Private>1</Private>
 <Implementation><![CDATA[
 	If $G(CheckLink,1) Do
-	. Set FullPath="//Notes01/Images/"_Image
+	. Set FullPath=..GeefImageDir()_"/"_Image
 	. Set Exist=##class(%File).Exists(FullPath)
 	. If $$$Not(Exist) Write:(..OutputToScreen) "Bestand bestaat niet "_FullPath,!   ; Image
 	Set Image=$Tr(Image,"/","\")
@@ -1419,10 +1427,10 @@
 Routine laten lopen vóór method AddSVG !!!!
 D ##class(BL.Prod.ImageLinkImport).%New().ReplaceWithVHImage()</Description>
 <Implementation><![CDATA[
-	Set Dir("P")="//Notes01/Images/Blum/P/"
-	Set Dir("V")="//Notes01/Images/Blum/P/"
-	Set Dir("W")="//Notes01/Images/Blum/W/"
-	Set Dir("T")="//Notes01/Images/Blum/T/"
+	Set Dir("P")=..GeefImageDir()_"/Blum/P/"
+	Set Dir("V")=..GeefImageDir()_"/Blum/P/"
+	Set Dir("W")=..GeefImageDir()_"/Blum/W/"
+	Set Dir("T")=..GeefImageDir()_"/Blum/T/"
 	
 	#include %occStatus
 	Kill Cache
Index: EWPR.mac.rou
===================================================================
diff -u -r73355 -r74862
--- EWPR.mac.rou	(.../EWPR.mac.rou)	(revision 73355)
+++ EWPR.mac.rou	(.../EWPR.mac.rou)	(revision 74862)
@@ -202,7 +202,7 @@
 
 
 Image(PRNr)
-	Set StartPad="\\Notes01\Images\"
+	Set StartPad=##class(TECH.Config.ConfigMgr).Instance().GeefString("ImagesDirectory","\\Notes01\Images") _ "\"
 	Set rsImg=##Class(%ResultSet).%New("Res.ImageLink:GetViaFunctieTypes")
 	Do rsImg.Execute("PR",PRNr,$LB("PB"),"N") ; Haalt alle objecten waarvang de functietype is PB en AG (ook dubbels worden getoond)
 	Set TFile=""
Index: BL/Blum/Cataloog/ImportPDF.cls.xml
===================================================================
diff -u -r29059 -r74862
--- BL/Blum/Cataloog/ImportPDF.cls.xml	(.../ImportPDF.cls.xml)	(revision 29059)
+++ BL/Blum/Cataloog/ImportPDF.cls.xml	(.../ImportPDF.cls.xml)	(revision 74862)
@@ -41,11 +41,13 @@
 <Parameter name="TRUNCATE" value="1"/>
 </Property>
 
-<Property name="RootDirPDFs">
-<Type>%String</Type>
-<Parameter name="TRUNCATE" value="1"/>
-</Property>
+<UDLText name="T">
+<Content><![CDATA[
+// Property RootDirPDFs As %String(TRUNCATE = 1);
 
+]]></Content>
+</UDLText>
+
 <Property name="BlumIndexFilePath">
 <Type>%String</Type>
 <Parameter name="TRUNCATE" value="1"/>
@@ -65,7 +67,8 @@
 	Kill ^BlumCat("P"_Language)
 	
 	Set filePrefix = $CASE($Get(Language),"N":"nl_","F":"fr_",:"input error")
-	Set RootDirPDFs="\\Notes01\Images\Blum\CA"_$S($Get(Language)="N":"N",1:"F")
+	Set RootDirPDFs=##class(TECH.Config.ConfigMgr).Instance().GeefString("ImagesDirectory","\\Notes01\Images")
+	Set RootDirPDFs=RootDirPDFs _"\Blum\CA"_$S($Get(Language)="N":"N",1:"F")
 	d WL^vhDBG("prefix : "_filePrefix)
 	
 	if (##class(%File).DirectoryExists(RootDirPDFs)) Do
@@ -123,7 +126,8 @@
 	. Kill ^BlumCat("I"_"F")
 	Else  Do
 	. Kill ^BlumCat("I"_Language)
-
+	
+	// TODO : dfs equivalent hiervoor
 	Set BlumIndexFilePath="\\notes01\shared\P V\BlumIndex2008.txt"
 	
 	Quit:'(##class(%File).Exists(BlumIndexFilePath))
Index: APPS/common/Document/impl/DocBase/DocBaseUtils.cls.xml
===================================================================
diff -u -r29059 -r74862
--- APPS/common/Document/impl/DocBase/DocBaseUtils.cls.xml	(.../DocBaseUtils.cls.xml)	(revision 29059)
+++ APPS/common/Document/impl/DocBase/DocBaseUtils.cls.xml	(.../DocBaseUtils.cls.xml)	(revision 74862)
@@ -8,7 +8,8 @@
 <Private>1</Private>
 <ReturnType>BL.FOP.Basis.pxAttribType</ReturnType>
 <Implementation><![CDATA[
-	//  Nog te configureren : Res.ImageLinks aanmaken voor de (ook nog aan te maken) logo's in de daarvoor bedoelde map op \\Notes01\images\ 
+	//  Nog te configureren : Res.ImageLinks aanmaken voor de (ook nog aan te maken) logo's in de daarvoor bedoelde map op \\Notes01\images\ -> 
+	// zie config Item ##class(TECH.Config.ConfigMgr).Instance().GeefString("ImagesDirectory","\\Notes01\Images")
  ; 	#dim ImageRef As %String = LogoNaam
 	#dim ImageRef As %String = "BY2_ER"
 	#dim Prefs As %List = $LB("V",$LB("SVG"),"W",$LB("JPG"))
Index: BL/Prod/ImageLinkControle.cls.xml
===================================================================
diff -u -r29059 -r74862
--- BL/Prod/ImageLinkControle.cls.xml	(.../ImageLinkControle.cls.xml)	(revision 29059)
+++ BL/Prod/ImageLinkControle.cls.xml	(.../ImageLinkControle.cls.xml)	(revision 74862)
@@ -111,11 +111,19 @@
 ]]></Content>
 </UDLText>
 
+<Method name="GeefImageDir">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ##class(TECH.Config.ConfigMgr).Instance().GeefString("ImagesDirectory","\\Notes01\Images")
+]]></Implementation>
+</Method>
+
 <Method name="Test">
 <ClassMethod>1</ClassMethod>
 <Implementation><![CDATA[
-  ; Do ..Instantiate().LijstOverbodigeFiles("\\notes01\images\Orgalux")
-   Do ..Instantiate().LijstDeadLinks("\\notes01\images\blum")
+   ;Do ..Instantiate().LijstOverbodigeFiles(..GeefImageDir() _ "\Orgalux")
+   Do ..Instantiate().LijstDeadLinks(..GeefImageDir() _ "\blum")
 ]]></Implementation>
 </Method>
 
@@ -310,7 +318,7 @@
 <FormalSpec>URL</FormalSpec>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	Set Pad=$Piece(URL,"\\Notes01\Images\",2)
+	Set Pad=$Piece(URL,..GeefImageDir() _ "\",2)
 	Set Pad=$Piece(Pad,"\",1,$L(Pad,"\")-1)
 	Quit Pad
 ]]></Implementation>
Index: vhTest/Fake/CHUI/Prod/ProductLabel.cls.xml
===================================================================
diff -u -r62320 -r74862
--- vhTest/Fake/CHUI/Prod/ProductLabel.cls.xml	(.../ProductLabel.cls.xml)	(revision 62320)
+++ vhTest/Fake/CHUI/Prod/ProductLabel.cls.xml	(.../ProductLabel.cls.xml)	(revision 74862)
@@ -8,40 +8,33 @@
 <Super>CHUI.Prod.ProductLabel</Super>
 
 <Method name="AskDevice">
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="AskLabel">
 <FormalSpec>EditScherm:%String</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="AskLayout">
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="DefaultBlum">
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="DefaultHaluxMag">
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="DefaultRecuPack">
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="DefaultVH">
 <FormalSpec>pxLabel:APPS.common.Print.AbstractLabel</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="GeefKleur">
@@ -53,35 +46,29 @@
 
 <Method name="HistpakPalletInfo">
 <FormalSpec>Lijn:%Integer</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="Init">
 <FormalSpec>oProd:Prod.Product,DefaultPrinter:%String</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="IsRecuPack">
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="One">
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="Print">
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="PrintMaatwerkMetDnaCodes">
 <FormalSpec>DnaCodeObject:DOM.Halux.AAP.DnaCode</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 </Class>
 
Index: BL/Flow/Proxy/pxProductLijn.cls.xml
===================================================================
diff -u -r73339 -r74862
--- BL/Flow/Proxy/pxProductLijn.cls.xml	(.../pxProductLijn.cls.xml)	(revision 73339)
+++ BL/Flow/Proxy/pxProductLijn.cls.xml	(.../pxProductLijn.cls.xml)	(revision 74862)
@@ -548,17 +548,19 @@
 <FormalSpec>PasAanIndienOngeldig:%Boolean</FormalSpec>
 <ProcedureBlock>1</ProcedureBlock>
 <Implementation><![CDATA[
+	#dim RootPath as %String = ##class(TECH.Config.ConfigMgr).Instance().GeefString("ImagesDirectory","\\Notes01\Images")
+	
 	#dim NoImageUrl As %String = ""
 	If PasAanIndienOngeldig {
-		Set NoImageUrl = "file://Notes01/Images/NoImageAvailable_PROD.jpg"
+		Set NoImageUrl = RootPath _ "\NoImageAvailable_PROD.jpg"
 	}
 	
 	#dim ImageUrl As BL.FOP.Basis.pxAttribType = ..PRODUCT.ImageUrl
 	#dim ImageFilePath As %String = ""
 	If $IsObject(ImageUrl) {
 		Set ImageFilePath = $ZSTRIP(ImageUrl.Content,"*C")
 		If ImageFilePath [ "Notes01" { 
-			Set ImageFilePath = "\\Notes01\Images\" _ $P($TR(ImageUrl.Content, "/", "\"), "Notes01\Images", 2,99)
+			Set ImageFilePath = RootPath _ "\" _ $P($TR(ImageUrl.Content, "/", "\"), "Notes01\Images", 2,99)
 		}
 		If ($$$HasLength(ImageFilePath)) && ($$$Not(##class(TECH.File).Exists(ImageFilePath))) {
 			Do ##class(vhLib.Logger).%New().WarningMail("ControleerProductImageUrl","ImagePath is ongeldig en is aangepast. '" _$$$LCVT(ImageUrl.Content)_"' --> '"_NoImageUrl_"'")
Index: APPS/PM/OL/AfgeleideKenmerkenGenerator.cls.xml
===================================================================
diff -u -r29059 -r74862
--- APPS/PM/OL/AfgeleideKenmerkenGenerator.cls.xml	(.../AfgeleideKenmerkenGenerator.cls.xml)	(revision 29059)
+++ APPS/PM/OL/AfgeleideKenmerkenGenerator.cls.xml	(.../AfgeleideKenmerkenGenerator.cls.xml)	(revision 74862)
@@ -179,7 +179,8 @@
 <FormalSpec>FotoSleutelLijst:%ListOfDataTypes</FormalSpec>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
-	#define OLPath "\\Notes01\Images\Orgalux\"
+	;#define OLPath "\\Notes01\Images\Orgalux\"
+	#define OLPath ##class(TECH.Config.ConfigMgr).Instance().GeefString("ImagesDirectory","\\Notes01\Images")_"\Orgalux\"
  
 	; Get values from an existing Key:
 	Set FotoSleutelVoorTemplate="<AYxx>"
Index: vhConsistency/Checks/BL/Prod/TestImageLink.cls.xml
===================================================================
diff -u -r70341 -r74862
--- vhConsistency/Checks/BL/Prod/TestImageLink.cls.xml	(.../TestImageLink.cls.xml)	(revision 70341)
+++ vhConsistency/Checks/BL/Prod/TestImageLink.cls.xml	(.../TestImageLink.cls.xml)	(revision 74862)
@@ -20,46 +20,56 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefImageDir">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	;quit "\\Vanhoecke.be\T2_apps\PRD\Images"
+	Quit ##class(TECH.Config.ConfigMgr).Instance().GeefString("ImagesDirectory","\\Notes01\Images")
+]]></Implementation>
+</Method>
+
 <Method name="ControleerFlex">
 <Private>1</Private>
 <Implementation><![CDATA[
 	#dim Toepassing As APPS.common.enu.Toepassing = ##class(APPS.common.enu.Toepassing).Flex()
 	Do ..Controleer("http://res.vanhoecke.be/Images/BLUM/W/42511216_BT_P_1_PB_BAU_SALL_AOF_V1.JPG",Toepassing,1935)
 	
 	#dim ProductID As %String = 821043	
-	Do ..Controleer("\\Notes01\Images\VH\W\EXXX072.JPG", ..Toepassing.AX, ProductID)
+	Do ..Controleer(..GeefImageDir() _ "\VH\W\EXXX072.JPG", ..Toepassing.AX, ProductID)
 	Do ..Controleer("http://res.vanhoecke.be/Images/VH/W/EXXX072.JPG",##class(APPS.common.enu.Toepassing).Flex(),ProductID)
 	Do ..Controleer("",##class(APPS.common.enu.Toepassing).Bartender(),ProductID)
 	Do ..Controleer("http://res.vanhoecke.be/Images/VH/W/EXXX072.JPG",##class(APPS.common.enu.Toepassing).VhintraShell(),ProductID)
 	Do ..Controleer("http://res.vanhoecke.be/Images/VH/W/EXXX072.JPG",##class(APPS.common.enu.Toepassing).Web(),ProductID)
 	Do ..Controleer("",##class(APPS.common.enu.Toepassing).WebOrgalux(),ProductID)
 	Do ..Controleer("http://res.vanhoecke.be/Images/VH/W/EXXX072.JPG",##class(APPS.common.enu.Toepassing).WWW(),ProductID)
-	Do ..Controleer("\\Notes01\Images\VH\W\EXXX072.JPG",##class(APPS.common.enu.Toepassing).Print(),ProductID)
-	Do ..Controleer("\\Notes01\Images\VH\W\EXXX072.JPG",##class(APPS.common.enu.Toepassing).File(),ProductID)
+	Do ..Controleer(..GeefImageDir() _ "\VH\W\EXXX072.JPG",##class(APPS.common.enu.Toepassing).Print(),ProductID)
+	Do ..Controleer(..GeefImageDir() _ "\VH\W\EXXX072.JPG",##class(APPS.common.enu.Toepassing).File(),ProductID)
 	Do ..Controleer("VH\W\EXXX072.JPG",##class(APPS.common.enu.Toepassing).Label(),ProductID)
-	Do ..Controleer("\\Notes01\Images\VH\W\EXXX072.JPG",##class(APPS.common.enu.Toepassing).LabelRoot(),ProductID)
-	Do ..Controleer("\\Notes01\Images\VH\W\EXXX072.JPG",##class(APPS.common.enu.Toepassing).Wms(),ProductID)
+	Do ..Controleer(..GeefImageDir() _ "\VH\W\EXXX072.JPG",##class(APPS.common.enu.Toepassing).LabelRoot(),ProductID)
+	Do ..Controleer(..GeefImageDir() _ "\VH\W\EXXX072.JPG",##class(APPS.common.enu.Toepassing).Wms(),ProductID)
 	Do ..Controleer("",##class(APPS.common.enu.Toepassing).Makova(),ProductID)
-	Do ..Controleer("\\Notes01\Images\VH\T\EXXX072.JPG",##class(APPS.common.enu.Toepassing).Thumbnail(),ProductID)
-	Do ..Controleer("\\Notes01\Images\VH\W\EXXX072.JPG",##class(APPS.common.enu.Toepassing).BartenderVoorkeurVector(),ProductID)
+	Do ..Controleer(..GeefImageDir() _ "\VH\T\EXXX072.JPG",##class(APPS.common.enu.Toepassing).Thumbnail(),ProductID)
+	Do ..Controleer(..GeefImageDir() _ "\VH\W\EXXX072.JPG",##class(APPS.common.enu.Toepassing).BartenderVoorkeurVector(),ProductID)
 	Do ..Controleer("VH/W/EXXX072.JPG",##class(APPS.common.enu.Toepassing).WWWOrgalux(),ProductID)	
 	
 	Set ProductID = 404375
-	Do ..Controleer("\\Notes01\Images\Orgalux\ViaSleutelG\TKCUISFL.JPG", ..Toepassing.AX, ProductID)
+	Do ..Controleer(..GeefImageDir() _ "\Orgalux\ViaSleutelG\TKCUISFL.JPG", ..Toepassing.AX, ProductID)
 	Do ..Controleer("http://res.vanhoecke.be/Images/Orgalux/ViaSleutelG/TKCUISFL.JPG",##class(APPS.common.enu.Toepassing).Flex(),ProductID)
-	Do ..Controleer("\\Notes01\Images\Orgalux\ViaSleutelG\TKCUISFL.JPG",##class(APPS.common.enu.Toepassing).Bartender(),ProductID)
+	Do ..Controleer(..GeefImageDir() _ "\Orgalux\ViaSleutelG\TKCUISFL.JPG",##class(APPS.common.enu.Toepassing).Bartender(),ProductID)
 	Do ..Controleer("http://res.vanhoecke.be/Images/Orgalux/ViaSleutelG/TKCUISFL.JPG",##class(APPS.common.enu.Toepassing).VhintraShell(),ProductID)
 	Do ..Controleer("http://res.vanhoecke.be/Images/Orgalux/ViaSleutelG/TKCUISFL.JPG",##class(APPS.common.enu.Toepassing).Web(),ProductID)
 	Do ..Controleer("",##class(APPS.common.enu.Toepassing).WebOrgalux(),ProductID)
 	Do ..Controleer("http://res.vanhoecke.be/Images/Orgalux/ViaSleutelG/TKCUISFL.JPG",##class(APPS.common.enu.Toepassing).WWW(),ProductID)
-	Do ..Controleer("\\Notes01\Images\Orgalux\ViaSleutelG\TKCUISFL.JPG",##class(APPS.common.enu.Toepassing).Print(),ProductID)
-	Do ..Controleer("\\Notes01\Images\Orgalux\ViaSleutelG\TKCUISFL.JPG",##class(APPS.common.enu.Toepassing).File(),ProductID)
+	Do ..Controleer(..GeefImageDir() _ "\Orgalux\ViaSleutelG\TKCUISFL.JPG",##class(APPS.common.enu.Toepassing).Print(),ProductID)
+	Do ..Controleer(..GeefImageDir() _ "\Orgalux\ViaSleutelG\TKCUISFL.JPG",##class(APPS.common.enu.Toepassing).File(),ProductID)
 	Do ..Controleer("Orgalux\ViaSleutelG\TKCUISFL.JPG",##class(APPS.common.enu.Toepassing).Label(),ProductID)
-	Do ..Controleer("\\Notes01\Images\Orgalux\ViaSleutelG\TKCUISFL.JPG",##class(APPS.common.enu.Toepassing).LabelRoot(),ProductID)
-	Do ..Controleer("\\Notes01\Images\Orgalux\ViaSleutelG\TKCUISFL.JPG",##class(APPS.common.enu.Toepassing).Wms(),ProductID)
+	Do ..Controleer(..GeefImageDir() _ "\Orgalux\ViaSleutelG\TKCUISFL.JPG",##class(APPS.common.enu.Toepassing).LabelRoot(),ProductID)
+	Do ..Controleer(..GeefImageDir() _ "\Orgalux\ViaSleutelG\TKCUISFL.JPG",##class(APPS.common.enu.Toepassing).Wms(),ProductID)
 	Do ..Controleer("",##class(APPS.common.enu.Toepassing).Makova(),ProductID)
-	Do ..Controleer("\\Notes01\Images\Orgalux\ViaSleutelK\TKCUISFL.JPG",##class(APPS.common.enu.Toepassing).Thumbnail(),ProductID)
-	Do ..Controleer("\\Notes01\Images\Orgalux\ViaSleutelG\TKCUISFL.JPG",##class(APPS.common.enu.Toepassing).BartenderVoorkeurVector(),ProductID)
+	Do ..Controleer(..GeefImageDir() _ "\Orgalux\ViaSleutelK\TKCUISFL.JPG",##class(APPS.common.enu.Toepassing).Thumbnail(),ProductID)
+	Do ..Controleer(..GeefImageDir() _ "\Orgalux\ViaSleutelG\TKCUISFL.JPG",##class(APPS.common.enu.Toepassing).BartenderVoorkeurVector(),ProductID)
 	Do ..Controleer("Orgalux/ViaSleutelG/TKCUISFL.JPG",##class(APPS.common.enu.Toepassing).WWWOrgalux(),ProductID)
 ]]></Implementation>
 </Method>
Index: APPS/PM/OL/FotoBestandAanInfoSleutelKoppelaar.cls.xml
===================================================================
diff -u -r29059 -r74862
--- APPS/PM/OL/FotoBestandAanInfoSleutelKoppelaar.cls.xml	(.../FotoBestandAanInfoSleutelKoppelaar.cls.xml)	(revision 29059)
+++ APPS/PM/OL/FotoBestandAanInfoSleutelKoppelaar.cls.xml	(.../FotoBestandAanInfoSleutelKoppelaar.cls.xml)	(revision 74862)
@@ -3,11 +3,13 @@
 <Class name="APPS.PM.OL.FotoBestandAanInfoSleutelKoppelaar">
 <Super>TECH.RegisteredObject</Super>
 
-<Parameter name="OLPath">
-<Type>%String</Type>
-<Default>\\Notes01\Images\Orgalux\</Default>
-</Parameter>
+<UDLText name="T">
+<Content><![CDATA[
+// Parameter OLPath As %String = "\\Notes01\Images\Orgalux\";
 
+]]></Content>
+</UDLText>
+
 <Property name="Key">
 <Type>%String</Type>
 <Private>1</Private>
@@ -122,7 +124,7 @@
 <FormalSpec>lbVTL:%String</FormalSpec>
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ..#OLPath_$$$Replace($List(lbVTL,2),"/","\")
+<Implementation><![CDATA[	Quit ##class(TECH.Config.ConfigMgr).Instance().GeefString("ImagesDirectory","\\Notes01\Images") _ $$$Replace($List(lbVTL,2),"/","\")
 ]]></Implementation>
 </Method>
 
Index: vhUnitTest/APPS/PM/Maatwerk/impl/AfbeeldingService/GeefAfbeeldingVoorIngegevenKenmerken/TestTAXLade.cls.xml
===================================================================
diff -u -r33872 -r74862
--- vhUnitTest/APPS/PM/Maatwerk/impl/AfbeeldingService/GeefAfbeeldingVoorIngegevenKenmerken/TestTAXLade.cls.xml	(.../TestTAXLade.cls.xml)	(revision 33872)
+++ vhUnitTest/APPS/PM/Maatwerk/impl/AfbeeldingService/GeefAfbeeldingVoorIngegevenKenmerken/TestTAXLade.cls.xml	(.../TestTAXLade.cls.xml)	(revision 74862)
@@ -9,8 +9,8 @@
 
 	Set TAORKenmerken.LadeHoogte = ..Enum.LadeHoogte.K
 	Set TAORKenmerken.RugHoogte = ..Enum.RugHoogte.K
-	
-	Do ..AssertImageURL(TAORKenmerken, "\\Notes01\Images\GENERIEK\TAOR_BOX\TAOR_BOX_K.SVG")
+	#dim ImageDir as %String = ##class(TECH.Config.ConfigMgr).Instance().GeefString("ImagesDirectory","\\Notes01\Images")
+	Do ..AssertImageURL(TAORKenmerken, ImageDir _ "\GENERIEK\TAOR_BOX\TAOR_BOX_K.SVG")
 ]]></Implementation>
 </Method>
 </Class>
Index: vhUnitTest/APPS/PM/Maatwerk/impl/AfbeeldingService/GeefAfbeeldingVoorIngegevenKenmerken/TestLBXFreeLade.cls.xml
===================================================================
diff -u -r29059 -r74862
--- vhUnitTest/APPS/PM/Maatwerk/impl/AfbeeldingService/GeefAfbeeldingVoorIngegevenKenmerken/TestLBXFreeLade.cls.xml	(.../TestLBXFreeLade.cls.xml)	(revision 29059)
+++ vhUnitTest/APPS/PM/Maatwerk/impl/AfbeeldingService/GeefAfbeeldingVoorIngegevenKenmerken/TestLBXFreeLade.cls.xml	(.../TestLBXFreeLade.cls.xml)	(revision 74862)
@@ -3,24 +3,36 @@
 <Class name="vhUnitTest.APPS.PM.Maatwerk.impl.AfbeeldingService.GeefAfbeeldingVoorIngegevenKenmerken.TestLBXFreeLade">
 <Super>vhUnitTest.APPS.PM.Maatwerk.impl.AfbeeldingService.GeefAfbeeldingVoorIngegevenKenmerken.Base</Super>
 
+<Property name="ImageRootDir">
+<Type>%String</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="OnBeforeAllTests">
+<Implementation><![CDATA[
+	Set ..ImageRootDir = ##class(TECH.Config.ConfigMgr).Instance().GeefString("ImagesDirectory","\\Notes01\Images")
+	Do ##super()
+]]></Implementation>
+</Method>
+
 <Method name="TestFree">
 <Implementation><![CDATA[
 	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken).CLadeZijwandTypeFree()
-	Do ..AssertImageURL(IngegevenKenmerken,"\\Notes01\Images\GENERIEK\LEGRA_BOX\C_Free_Legra.SVG")
+	Do ..AssertImageURL(IngegevenKenmerken,..ImageRootDir_"\GENERIEK\LEGRA_BOX\C_Free_Legra.SVG")
 ]]></Implementation>
 </Method>
 
 <Method name="TestFreeSpoelbaklade">
 <Implementation><![CDATA[
 	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken).CSpoelbakLadeZijwandTypeFree()
-	Do ..AssertImageURL(IngegevenKenmerken,"\\Notes01\Images\GENERIEK\LEGRA_BOX\C_Spoelbak_Free_Legra.SVG")
+	Do ..AssertImageURL(IngegevenKenmerken,..ImageRootDir_"\GENERIEK\LEGRA_BOX\C_Spoelbak_Free_Legra.SVG")
 ]]></Implementation>
 </Method>
 
 <Method name="TestFreeSifonlade">
 <Implementation><![CDATA[
 	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken).CSifonLadeZijWandTypeFree()
-	Do ..AssertImageURL(IngegevenKenmerken,"\\Notes01\Images\GENERIEK\LEGRA_BOX\C_Sifon_Free_Legra.SVG")
+	Do ..AssertImageURL(IngegevenKenmerken,..ImageRootDir_"\GENERIEK\LEGRA_BOX\C_Sifon_Free_Legra.SVG")
 ]]></Implementation>
 </Method>
 
@@ -30,15 +42,15 @@
 	Set IngegevenKenmerken.UitsparingData.AantalUitsparingen = ##class(DOM.PM.enu.AantalUitsparingen).Dubbel()
 	Set IngegevenKenmerken.UitsparingData.UitsparingZ2 = ##class(DOM.PM.enu.UitsparingCode).Smal()
 	Set IngegevenKenmerken.UitsparingData.RugDeelM = 200
-	Do ..AssertImageURL(IngegevenKenmerken,"\\Notes01\Images\GENERIEK\LEGRA_BOX\C_Sifon_x2_Free_Legra.SVG")
+	Do ..AssertImageURL(IngegevenKenmerken,..ImageRootDir_"\GENERIEK\LEGRA_BOX\C_Sifon_x2_Free_Legra.SVG")
 ]]></Implementation>
 </Method>
 
 <Method name="TestFreeSifonBinnenladeMetReling">
 <Implementation><![CDATA[
 	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken).CSifonLadeZijWandTypeFree()
 	Do ..ZetBinnenladeRelingKenmerken(IngegevenKenmerken)
-	Do ..AssertImageURL(IngegevenKenmerken,"\\Notes01\Images\GENERIEK\LEGRA_BOX\C_Z_Sifon_Reling_Free_Legra.SVG")
+	Do ..AssertImageURL(IngegevenKenmerken,..ImageRootDir_"\GENERIEK\LEGRA_BOX\C_Z_Sifon_Reling_Free_Legra.SVG")
 ]]></Implementation>
 </Method>
 
@@ -49,31 +61,31 @@
 	Set IngegevenKenmerken.UitsparingData.UitsparingZ2 = ##class(DOM.PM.enu.UitsparingCode).Smal()
 	Set IngegevenKenmerken.UitsparingData.RugDeelM = 200
 	Do ..ZetBinnenladeVullingKenmerken(IngegevenKenmerken, ##class(DOM.PM.enu.LBXVoorWandVerhogingHoogte).Laag())
-	Do ..AssertImageURL(IngegevenKenmerken,"\\Notes01\Images\GENERIEK\LEGRA_BOX\C_Z_Sifon_x2_Vulling_Laag_Free_Legra.SVG")
+	Do ..AssertImageURL(IngegevenKenmerken,..ImageRootDir_"\GENERIEK\LEGRA_BOX\C_Z_Sifon_x2_Vulling_Laag_Free_Legra.SVG")
 ]]></Implementation>
 </Method>
 
 <Method name="TestFreeBinnenladeMetReling">
 <Implementation><![CDATA[
 	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken).CLadeZijwandTypeFree()
 	Do ..ZetBinnenladeRelingKenmerken(IngegevenKenmerken)
-	Do ..AssertImageURL(IngegevenKenmerken,"\\Notes01\Images\GENERIEK\LEGRA_BOX\C_Z_Reling_Free_Legra.SVG")
+	Do ..AssertImageURL(IngegevenKenmerken,..ImageRootDir_"\GENERIEK\LEGRA_BOX\C_Z_Reling_Free_Legra.SVG")
 ]]></Implementation>
 </Method>
 
 <Method name="TestFreeBinnenladeMetVullingLaag">
 <Implementation><![CDATA[
 	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken).CLadeZijwandTypeFree()
 	Do ..ZetBinnenladeVullingKenmerken(IngegevenKenmerken, ##class(DOM.PM.enu.LBXVoorWandVerhogingHoogte).Laag())
-	Do ..AssertImageURL(IngegevenKenmerken,"\\Notes01\Images\GENERIEK\LEGRA_BOX\C_Z_Vulling_Laag_Free_Legra.SVG")
+	Do ..AssertImageURL(IngegevenKenmerken,..ImageRootDir_"\GENERIEK\LEGRA_BOX\C_Z_Vulling_Laag_Free_Legra.SVG")
 ]]></Implementation>
 </Method>
 
 <Method name="TestFreeBinnenladeMetVullingHoog">
 <Implementation><![CDATA[
 	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken).CLadeZijwandTypeFree()
 	Do ..ZetBinnenladeVullingKenmerken(IngegevenKenmerken, ##class(DOM.PM.enu.LBXVoorWandVerhogingHoogte).Hoog())
-	Do ..AssertImageURL(IngegevenKenmerken,"\\Notes01\Images\GENERIEK\LEGRA_BOX\C_Z_Vulling_Hoog_Free_Legra.SVG")
+	Do ..AssertImageURL(IngegevenKenmerken,..ImageRootDir_"\GENERIEK\LEGRA_BOX\C_Z_Vulling_Hoog_Free_Legra.SVG")
 ]]></Implementation>
 </Method>
 
Index: DOM/PM/OL/Gamma/ProductGroepFoto.cls.xml
===================================================================
diff -u -r29059 -r74862
--- DOM/PM/OL/Gamma/ProductGroepFoto.cls.xml	(.../ProductGroepFoto.cls.xml)	(revision 29059)
+++ DOM/PM/OL/Gamma/ProductGroepFoto.cls.xml	(.../ProductGroepFoto.cls.xml)	(revision 74862)
@@ -31,6 +31,14 @@
 <Parameter name="TRUNCATE" value="1"/>
 </Property>
 
+<Method name="GeefImageDir">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ##class(TECH.Config.ConfigMgr).Instance().GeefString("ImagesDirectory","\\Notes01\Images")
+]]></Implementation>
+</Method>
+
 <Method name="Import">
 <ClassMethod>1</ClassMethod>
 <Implementation><![CDATA[
@@ -69,7 +77,7 @@
 	
 	#define FotoPrefix 		"ProductGroepFotoG\"
 	#define ThumbnailPrefix "ProductGroepFotoK\"
-	set root = "\\notes01\images\orgalux\"
+	set root = ..GeefImageDir()_"\orgalux\"
 	
 	set Thumbnail = $$$ThumbnailPrefix_iFoto_".jpg"
 	set Foto = $$$FotoPrefix_iFoto_".jpg"