Index: OBJTimpl/WMSOrder/OphalenVoorraadKlaargezetHLX.cls.xml
===================================================================
diff -u -r70681 -r71100
--- OBJTimpl/WMSOrder/OphalenVoorraadKlaargezetHLX.cls.xml	(.../OphalenVoorraadKlaargezetHLX.cls.xml)	(revision 70681)
+++ OBJTimpl/WMSOrder/OphalenVoorraadKlaargezetHLX.cls.xml	(.../OphalenVoorraadKlaargezetHLX.cls.xml)	(revision 71100)
@@ -51,7 +51,9 @@
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..ConfigMgr = $$$Inject(ConfigMgr,##class(TECH.Config.ConfigMgr).Instance())
-	Set ..SqlConnection = ..GeefSQLConnectie()
+	If ..KanOphalenObjectiveSqlData() {
+		Set ..SqlConnection = ..GeefSQLConnectie()
+	}
 	
 	//d ##class(TECH.Config.ConfigMgr).Instance().SetString("OBJTimpl.DatasourceName","OBJT_ACP")
 	
@@ -75,6 +77,8 @@
 <Method name="GeefIterator">
 <FormalSpec>OBJTItemID</FormalSpec>
 <Implementation><![CDATA[
+	Quit:($$$Not(..KanOphalenObjectiveSqlData())) ""   ; Should return an emtpy ResultSetIterator :-( 
+	
 	#Dim ResultSet as %ResultSet = ..GeefResultSet(OBJTItemID)
 	Set Iterator=##class(TECH.ResultSetIterator).%New(ResultSet)
 	Quit Iterator
@@ -119,6 +123,8 @@
 <Method name="GeefKlaargezetteVoorraad">
 <FormalSpec>PRNr</FormalSpec>
 <Implementation><![CDATA[
+	Quit:($$$Not(..KanOphalenObjectiveSqlData())) 0
+	
 	Set OBJTItemID=##class(OBJTimpl.PM.OBJTIdentLookupService).%New().GeefOBJTIdentNr($$$PRGet($$$IdentNummer))
 	Set Aantal=""
 	If OBJTItemID'="" 
@@ -154,6 +160,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="KanOphalenObjectiveSqlData">
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ..ConfigMgr.GeefBoolean("OBJTimpl.WMSOrder.KanOphalenObjectiveSqlData")
+]]></Implementation>
+</Method>
+
 <Method name="GeefSQLConnectie">
 <Private>1</Private>
 <Implementation><![CDATA[
Index: vhDeploy/D20230607xConfigItemOphalenObjectiveSqlData.cls.xml
===================================================================
diff -u
--- vhDeploy/D20230607xConfigItemOphalenObjectiveSqlData.cls.xml	(revision 0)
+++ vhDeploy/D20230607xConfigItemOphalenObjectiveSqlData.cls.xml	(revision 71100)
@@ -0,0 +1,33 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.D20230607xConfigItemOphalenObjectiveSqlData">
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>ConfigItem instellen - KanOphalenObjectiveSqlData</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[	Do ..StelInConfigItem()
+]]></Implementation>
+</Method>
+
+<Method name="StelInConfigItem">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	#dim ConfigSleutel As %String = "OBJTimpl.WMSOrder.KanOphalenObjectiveSqlData"
+
+	#dim ConfigWaarde As %Boolean = $$$False
+	If ##class(TECH.StringUtils).Equals($$$Server, "CACHE01", "CACHEACP2010") {
+		Set ConfigWaarde = $$$True
+	}
+
+	Do ##class(TECH.Config.ConfigMgr).Instance().SetBoolean(ConfigSleutel, ConfigWaarde)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>