Index: AXimpl/Dynamics/DocumentLocationOut/DocumentLocationService.cls.xml
===================================================================
diff -u -r48312 -r48313
--- AXimpl/Dynamics/DocumentLocationOut/DocumentLocationService.cls.xml	(.../DocumentLocationService.cls.xml)	(revision 48312)
+++ AXimpl/Dynamics/DocumentLocationOut/DocumentLocationService.cls.xml	(.../DocumentLocationService.cls.xml)	(revision 48313)
@@ -4,24 +4,6 @@
 <ProcedureBlock>1</ProcedureBlock>
 <Super>%SOAP.WebClient</Super>
 
-<Method name="getFilenamePDF">
-<Final>1</Final>
-<FormalSpec>salesInvoicePDFIn:AXif.Dynamics.DocumentLocationOut.tns.ADUSalesInvoicePDFInDC(XMLNAME="_salesInvoicePDFIn")</FormalSpec>
-<ProcedureBlock>1</ProcedureBlock>
-<ReturnType>AXif.Dynamics.DocumentLocationOut.tns.ADUSalesInvoicePDFOutDC</ReturnType>
-<WebMethod>1</WebMethod>
-<SoapBindingStyle>document</SoapBindingStyle>
-<SoapBodyUse>literal</SoapBodyUse>
-<Implementation><![CDATA[ Quit ..WebMethod("getFilenamePDF","ADUSalesInvoicePDFServiceGetFilenamePDFRequest").Invoke($this,"http://tempuri.org/ADUSalesInvoicePDFService/getFilenamePDF",.salesInvoicePDFIn)
-]]></Implementation>
-</Method>
-
-<Parameter name="LOCATION">
-<Description>
-This is the URL used to access the web service.</Description>
-<Default>http://ax-aos-dev.vanhoecke.be:81/MicrosoftDynamicsAXAif60_DEV/ADUDocumentPDFSoapUI/xppservice.svc</Default>
-</Parameter>
-
 <Parameter name="NAMESPACE">
 <Description>
 This is the namespace used by the Service</Description>
@@ -51,6 +33,33 @@
 This is the namespace used for types by the Service</Description>
 <Default>http://tempuri.org</Default>
 </Parameter>
+
+<Method name="%OnNew">
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..Location = ##class(TECH.Config.ConfigMgr).Instance().GetString("VHIP464DocumentLocationServiceUrl")
+	
+	Set ..HttpUsername = "VHEPN\AIF_User"
+	Set ..HttpPassword = "Cr&at!on_ofB4tch3s"
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="getFilenamePDF">
+<Final>1</Final>
+<FormalSpec>salesInvoicePDFIn:AXif.Dynamics.DocumentLocationOut.tns.ADUSalesInvoicePDFInDC(XMLNAME="_salesInvoicePDFIn")</FormalSpec>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>AXif.Dynamics.DocumentLocationOut.tns.ADUSalesInvoicePDFOutDC</ReturnType>
+<WebMethod>1</WebMethod>
+<SoapBindingStyle>document</SoapBindingStyle>
+<SoapBodyUse>literal</SoapBodyUse>
+<Implementation><![CDATA[ Quit ..WebMethod("getFilenamePDF","ADUSalesInvoicePDFServiceGetFilenamePDFRequest").Invoke($this,"http://tempuri.org/ADUSalesInvoicePDFService/getFilenamePDF",.salesInvoicePDFIn)
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhDeploy/Deploy20171214xDocumentLocationServiceUrl.cls.xml
===================================================================
diff -u
--- vhDeploy/Deploy20171214xDocumentLocationServiceUrl.cls.xml	(revision 0)
+++ vhDeploy/Deploy20171214xDocumentLocationServiceUrl.cls.xml	(revision 48313)
@@ -0,0 +1,30 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Deploy20171214xDocumentLocationServiceUrl">
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>DocumentLocation url voor productie en development</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	#dim Sleutel As %String = "VHIP464DocumentLocationServiceUrl"
+	#dim ProductieUrl As %String = "" 
+	#dim DevelopmentUrl As %String = "http://ax-aos-dev.vanhoecke.be:84/MicrosoftDynamicsAXAif60_ACCEPT/SalesInvoicePDFService/xppservice.svc"
+	
+	If ($$$Not(##class(TECH.Config.ConfigMgr).Instance().BestaatSleutel(Sleutel))) {
+		If (##class(TECH.Config.ConfigMgr).Instance().GetOmgeving() = "PROD"){
+			Do ##class(TECH.Config.ConfigMgr).Instance().SetString(Sleutel, ProductieUrl)
+		} Else {
+			Do ##class(TECH.Config.ConfigMgr).Instance().SetString(Sleutel, DevelopmentUrl)
+		}
+	}
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>