Index: BL/Sys/FOP/DocBaseDirectoryUtils.cls.xml
===================================================================
diff -u
--- BL/Sys/FOP/DocBaseDirectoryUtils.cls.xml	(revision 0)
+++ BL/Sys/FOP/DocBaseDirectoryUtils.cls.xml	(revision 73452)
@@ -0,0 +1,138 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="BL.Sys.FOP.DocBaseDirectoryUtils">
+<IncludeCode>BL.Sys.FOP.Common</IncludeCode>
+<Super>TECH.RegisteredObject</Super>
+
+<Property name="ProjectSettingsAPI">
+<Type>DOM.common.ProjectSettingsAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="ConfigMgr">
+<Type>TECH.Config.ConfigMgr</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="DocBaseDfsDir">
+<Type>%String</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>ProjectSettingsAPI:DOM.common.ProjectSettingsAPI=""</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..ProjectSettingsAPI = $$$Inject(ProjectSettingsAPI,##class(DOM.DomeinContext).Instance().GeefProjectSettingsAPI())
+	Set ..ConfigMgr = ##class(TECH.Config.ConfigMgr).Instance()
+	Set ..DocBaseDfsDir = ..GeefDocBaseDfsBasisFolder()
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="ConvertFopLocalDirToNetworkPath">
+<FormalSpec>FopLocalDir:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	Quit:(..IsActiefDocBaseV7()) FopLocalDir   ; Nothing to convert for DocBaseV7 
+	
+	Quit $$Replace^vhLib.String($$Replace^vhLib.String(FopLocalDir, "E:\", "\\192.168.1.7\e$\") ,"C:\", "\\192.168.1.7\c$\")
+]]></Implementation>
+</Method>
+
+<Method name="GeefPDFTestDir">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	Quit "E:\FOP\PDFTest"   ; Dit pad is relatief t.o.v. FOP-server, m.a.w. op de E-schijf van FOP. 
+]]></Implementation>
+</Method>
+
+<Method name="GeefPDFTestDirNtw">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ..ConvertFopLocalDirToNetworkPath(..GeefPDFTestDir())
+]]></Implementation>
+</Method>
+
+<Method name="GeefCacheExportDirVoorDetailBlad">
+<Description>
+Value before DocBaseV7      : "\\CacheTst2010\e$\CacheExport\2010v2\ADMIN1\PAS.ProductieDetailBlad"
+New value (after July 2024) : "\\Notes01\FOP\TestOutput\CacheTst2010\CacheExport\2010v2\DEV1\PAS.ProductieDetailBlad"</Description>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ..ConfigMgr.GeefString("APPS.Halux.PPS.ProductieDetailBlad.DocumentGenerator_FileLocation")
+]]></Implementation>
+</Method>
+
+<Method name="GeefOMRSourceDir">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit $$$OMRSourceDir
+]]></Implementation>
+</Method>
+
+<Method name="GeefOMRSourceDirNtw">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ..ConvertFopLocalDirToNetworkPath($$$OMRSourceDir)
+]]></Implementation>
+</Method>
+
+<Method name="GeefOMRPrintDir">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit $$$OMRPrintDir
+]]></Implementation>
+</Method>
+
+<Method name="GeefOMRPrintDirNtw">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ..ConvertFopLocalDirToNetworkPath($$$OMRPrintDir)
+]]></Implementation>
+</Method>
+
+<Method name="GeefPDFMailDir">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit $$$PDFMailDir
+]]></Implementation>
+</Method>
+
+<Method name="GeefPDFMailDirNtw">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ..ConvertFopLocalDirToNetworkPath($$$PDFMailDir)
+]]></Implementation>
+</Method>
+
+<Method name="GeefFOPInetPubDir">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit $$$FOPInetPubDir
+]]></Implementation>
+</Method>
+
+<Method name="GeefFOPInetPubDirNtw">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ..ConvertFopLocalDirToNetworkPath($$$FOPInetPubDir)
+]]></Implementation>
+</Method>
+
+<Method name="GeefFOPInetPubURL">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit $$$FOPInetPubURL
+]]></Implementation>
+</Method>
+
+<Method name="IsActiefDocBaseV7">
+<Private>1</Private>
+<Implementation><![CDATA[	Quit ..ProjectSettingsAPI.IsActiefDocBaseV7()
+]]></Implementation>
+</Method>
+
+<Method name="GeefDocBaseDfsBasisFolder">
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	Quit ..ConfigMgr.GeefString("BL.Sys.FOP.DocBase_DfsBasisFolder")   ; "\\vanhoecke.be\APPS\DEV\DocBase\"
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>