Index: vhDeploy/JCL/D20111028BLProdVoorraadTellingDoc.cls.xml =================================================================== diff -u --- vhDeploy/JCL/D20111028BLProdVoorraadTellingDoc.cls.xml (revision 0) +++ vhDeploy/JCL/D20111028BLProdVoorraadTellingDoc.cls.xml (revision 2553) @@ -0,0 +1,18 @@ + + + +1 +svn.Deploy +0 + + +ConfigItems - BLProdVoorraadTellingDoc + + + +1 + + + + Index: BL/Prod/VoorraadTellingDoc.cls.xml =================================================================== diff -u -r1074 -r2553 --- BL/Prod/VoorraadTellingDoc.cls.xml (.../VoorraadTellingDoc.cls.xml) (revision 1074) +++ BL/Prod/VoorraadTellingDoc.cls.xml (.../VoorraadTellingDoc.cls.xml) (revision 2553) @@ -76,12 +76,13 @@ Set sc=blTel.BuildTaskRenderAndFile(.FilePath,) Set Task=blTel.FopTask -#If (0)&&(##class(TECH.Config.ConfigMgr).Instance().GetOmgeving()="DEV") - Set tmpDoc=Task.Docs.GetNext("") - Set FileName="\\Cache02\c$\Temp\VoorraadTelling_"_($P($H,",",2))_".xml" - Set %blnIndentProxy=1 - Set:($G(blnTest,1))&&($$$ISOK(sc)) sc=##class(BL.Sys.FOP.DataMgr).SaveDocDataToFile(tmpDoc,.FileName) -#EndIf + if ##class(TECH.Config.ConfigMgr).Instance().GetBoolean("BL.Prod.VoorraadTellingDoc_DumpFile") { + Set tmpDoc=Task.Docs.GetNext("") + set Path = ##class(TECH.Config.ConfigMgr).Instance().GetString("DefaultExportDirectory") + set FileName = ##class(TECH.Files).AppendFile(Path,"VoorraadTelling"_($P($H,",",2))_".xml") + Set %blnIndentProxy=1 + Set:($G(blnTest,1))&&($$$ISOK(sc)) sc=##class(BL.Sys.FOP.DataMgr).SaveDocDataToFile(tmpDoc,.FileName) + } Do blTel.Close() Set blTel=""