Index: zTryout/PRA/WSAuthenticatie.cls.xml
===================================================================
diff -u -r29059 -r31560
--- zTryout/PRA/WSAuthenticatie.cls.xml	(.../WSAuthenticatie.cls.xml)	(revision 29059)
+++ zTryout/PRA/WSAuthenticatie.cls.xml	(.../WSAuthenticatie.cls.xml)	(revision 31560)
@@ -3,7 +3,7 @@
 <Class name="zTryout.PRA.WSAuthenticatie">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Default>WSAuthenticatie</Default>
Index: WS/Config/ConfigService.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/Config/ConfigService.cls.xml	(.../ConfigService.cls.xml)	(revision 29059)
+++ WS/Config/ConfigService.cls.xml	(.../ConfigService.cls.xml)	(revision 31560)
@@ -3,7 +3,7 @@
 <Class name="WS.Config.ConfigService">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Default>ConfigService</Default>
Index: WS/VKP/Maatwerk/ConfiguratorService.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/VKP/Maatwerk/ConfiguratorService.cls.xml	(.../ConfiguratorService.cls.xml)	(revision 29059)
+++ WS/VKP/Maatwerk/ConfiguratorService.cls.xml	(.../ConfiguratorService.cls.xml)	(revision 31560)
@@ -3,7 +3,7 @@
 <Class name="WS.VKP.Maatwerk.ConfiguratorService">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Default>ConfiguratorService</Default>
Index: WS/Halux/Planning/BatchService.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/Halux/Planning/BatchService.cls.xml	(.../BatchService.cls.xml)	(revision 29059)
+++ WS/Halux/Planning/BatchService.cls.xml	(.../BatchService.cls.xml)	(revision 31560)
@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="WS.Halux.Planning.BatchService">
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Default>BatchService</Default>
Index: WS/EC/WebshopConfiguratorProjectSettingsService.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/EC/WebshopConfiguratorProjectSettingsService.cls.xml	(.../WebshopConfiguratorProjectSettingsService.cls.xml)	(revision 29059)
+++ WS/EC/WebshopConfiguratorProjectSettingsService.cls.xml	(.../WebshopConfiguratorProjectSettingsService.cls.xml)	(revision 31560)
@@ -3,7 +3,7 @@
 <Class name="WS.EC.WebshopConfiguratorProjectSettingsService">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Default>WebshopConfiguratorProjectSettingsService</Default>
Index: WS/common/DataService.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/common/DataService.cls.xml	(.../DataService.cls.xml)	(revision 29059)
+++ WS/common/DataService.cls.xml	(.../DataService.cls.xml)	(revision 31560)
@@ -3,7 +3,7 @@
 <Class name="WS.common.DataService">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Default>DataService</Default>
Index: vhDeploy/Deploy.cls.xml
===================================================================
diff -u -r29059 -r31560
--- vhDeploy/Deploy.cls.xml	(.../Deploy.cls.xml)	(revision 29059)
+++ vhDeploy/Deploy.cls.xml	(.../Deploy.cls.xml)	(revision 31560)
@@ -6,7 +6,7 @@
 
 <Method name="InitialiseRuntime">
 <ClassMethod>1</ClassMethod>
-<Implementation><![CDATA[	do ##class(APPS.common.RuntimeInitialiser).Initialise()
+<Implementation><![CDATA[	do ##class(APPS.common.RuntimeInitialiser).Initialise("Deploy_"_$J)
 ]]></Implementation>
 </Method>
 </Class>
Index: WS/EC/SessieLozeExterneVerkoopService.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/EC/SessieLozeExterneVerkoopService.cls.xml	(.../SessieLozeExterneVerkoopService.cls.xml)	(revision 29059)
+++ WS/EC/SessieLozeExterneVerkoopService.cls.xml	(.../SessieLozeExterneVerkoopService.cls.xml)	(revision 31560)
@@ -13,7 +13,7 @@
 calls kan uitvoeren.</Description>
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Default>ExterneVerkoopService</Default>
Index: zTryout/PBO/Scripts/Superklasse.cls.xml
===================================================================
diff -u
--- zTryout/PBO/Scripts/Superklasse.cls.xml	(revision 0)
+++ zTryout/PBO/Scripts/Superklasse.cls.xml	(revision 31560)
@@ -0,0 +1,26 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="zTryout.PBO.Scripts.Superklasse">
+<Super>TECH.RegisteredObject</Super>
+
+<Method name="ChangeParentClass">
+<Implementation><![CDATA[
+	#dim SubClassesWebService As %ListOfDataTypes = ##class(TECH.ClassUtils).GetDerivedClasses("vhLib.WebService")
+	#dim SubClassesAuthenticatedWebService As %ListOfDataTypes = ##class(TECH.ClassUtils).GetDerivedClasses("WS.GeauthenticeerdeWebService")
+	#dim Classes As %ListOfDataTypes = ##class(TECH.ListUtils).Verschil(SubClassesWebService,SubClassesAuthenticatedWebService)
+	Do Classes.RemoveAt(Classes.Find("WS.GeauthenticeerdeWebService"))
+	
+	Set ClassIterator = ##class(TECH.ListIterator).%New(Classes)
+	While ClassIterator.HasNext() {
+		#dim ClassName As TECH.String = ClassIterator.Next()
+		#dim ClassDefinition As %Dictionary.ClassDefinition = ##class(%Dictionary.ClassDefinition).%OpenId(ClassName)
+		Set ClassDefinition.Super = $REPLACE(ClassDefinition.Super,"vhLib.WebService","WS.OngeauthenticeerdeWebService")
+		Do ClassDefinition.%Save()
+		Do ##class(svn.Helper).%New().SVNExport(ClassName_".cls")
+	}
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: WS/FOP/StatusServer.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/FOP/StatusServer.cls.xml	(.../StatusServer.cls.xml)	(revision 29059)
+++ WS/FOP/StatusServer.cls.xml	(.../StatusServer.cls.xml)	(revision 31560)
@@ -7,7 +7,7 @@
 <ClassType/>
 <IncludeCode>vhLib.Macro</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Description>
Index: WS/EC/WebShopServer.cls.xml
===================================================================
diff -u -r30707 -r31560
--- WS/EC/WebShopServer.cls.xml	(.../WebShopServer.cls.xml)	(revision 30707)
+++ WS/EC/WebShopServer.cls.xml	(.../WebShopServer.cls.xml)	(revision 31560)
@@ -4,7 +4,7 @@
 <ClassType/>
 <IncludeCode>BL.EC.Common,BL.Derde.KlantSpecifiek</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="errWrongLogin">
 <Default>WrongLogin</Default>
Index: WS/TestServer.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/TestServer.cls.xml	(.../TestServer.cls.xml)	(revision 29059)
+++ WS/TestServer.cls.xml	(.../TestServer.cls.xml)	(revision 31560)
@@ -3,7 +3,7 @@
 <Class name="WS.TestServer">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Default>TestServer</Default>
@@ -17,7 +17,9 @@
 <ClassMethod>1</ClassMethod>
 <ReturnType>%String</ReturnType>
 <WebMethod>1</WebMethod>
-<Implementation><![CDATA[	Quit 1_" - "_$$$Server_" - "_$$$NSpace_" - "_..%ClassName(1)
+<Implementation><![CDATA[
+	for i=1:1:$Random(50) Do ##class(vhLib.Logger).%New().Info("qfl"_i,"kjh")
+	Quit 1_" - "_$$$Server_" - "_$$$NSpace_" - "_..%ClassName(1)
 ]]></Implementation>
 </Method>
 
Index: WS/Sys/Toegang/UserServer.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/Sys/Toegang/UserServer.cls.xml	(.../UserServer.cls.xml)	(revision 29059)
+++ WS/Sys/Toegang/UserServer.cls.xml	(.../UserServer.cls.xml)	(revision 31560)
@@ -4,7 +4,7 @@
 <ClassType/>
 <IncludeCode>BL.Sys.Toegang</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="XMLIGNORENULL">
 <Default>0</Default>
Index: WS/algemeen/BarcodeService.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/algemeen/BarcodeService.cls.xml	(.../BarcodeService.cls.xml)	(revision 29059)
+++ WS/algemeen/BarcodeService.cls.xml	(.../BarcodeService.cls.xml)	(revision 31560)
@@ -3,7 +3,7 @@
 <Class name="WS.algemeen.BarcodeService">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Default>BarcodeService</Default>
Index: WS/vhLib/LoggingService.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/vhLib/LoggingService.cls.xml	(.../LoggingService.cls.xml)	(revision 29059)
+++ WS/vhLib/LoggingService.cls.xml	(.../LoggingService.cls.xml)	(revision 31560)
@@ -2,7 +2,7 @@
 <Export generator="Cache" version="24">
 <Class name="WS.vhLib.LoggingService">
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Description>
Index: WS/TAPI/SMSService.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/TAPI/SMSService.cls.xml	(.../SMSService.cls.xml)	(revision 29059)
+++ WS/TAPI/SMSService.cls.xml	(.../SMSService.cls.xml)	(revision 31560)
@@ -3,7 +3,7 @@
 <Class name="WS.TAPI.SMSService">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Default>WS.TAPI.SMSService</Default>
Index: WS/CRM/Interacties.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/CRM/Interacties.cls.xml	(.../Interacties.cls.xml)	(revision 29059)
+++ WS/CRM/Interacties.cls.xml	(.../Interacties.cls.xml)	(revision 31560)
@@ -4,7 +4,7 @@
 <ClassType/>
 <IncludeCode>BL.EC.Common</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Description>
Index: zTryout/PRA/BevestigingNodigVoorbeeld.cls.xml
===================================================================
diff -u -r29059 -r31560
--- zTryout/PRA/BevestigingNodigVoorbeeld.cls.xml	(.../BevestigingNodigVoorbeeld.cls.xml)	(revision 29059)
+++ zTryout/PRA/BevestigingNodigVoorbeeld.cls.xml	(.../BevestigingNodigVoorbeeld.cls.xml)	(revision 31560)
@@ -4,7 +4,7 @@
 <Description>
 zTryout.PRA.BevestigingNodigVoorbeeld</Description>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Description>
Index: WS/EC/UNI/SFS/OrderServiceInternal.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/EC/UNI/SFS/OrderServiceInternal.cls.xml	(.../OrderServiceInternal.cls.xml)	(revision 29059)
+++ WS/EC/UNI/SFS/OrderServiceInternal.cls.xml	(.../OrderServiceInternal.cls.xml)	(revision 31560)
@@ -3,7 +3,7 @@
 <Class name="WS.EC.UNI.SFS.OrderServiceInternal">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Default>OrderServiceInternal</Default>
Index: WS/VisiDot/OperatorServer.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/VisiDot/OperatorServer.cls.xml	(.../OperatorServer.cls.xml)	(revision 29059)
+++ WS/VisiDot/OperatorServer.cls.xml	(.../OperatorServer.cls.xml)	(revision 31560)
@@ -4,7 +4,7 @@
 <ClassType/>
 <IncludeCode>TECH.Error</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Description>
Index: zTryout/WS/Webserver.cls.xml
===================================================================
diff -u -r29059 -r31560
--- zTryout/WS/Webserver.cls.xml	(.../Webserver.cls.xml)	(revision 29059)
+++ zTryout/WS/Webserver.cls.xml	(.../Webserver.cls.xml)	(revision 31560)
@@ -3,7 +3,7 @@
 <Class name="zTryout.WS.Webserver">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Description>
Index: WS/Derde/Klant/Select.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/Derde/Klant/Select.cls.xml	(.../Select.cls.xml)	(revision 29059)
+++ WS/Derde/Klant/Select.cls.xml	(.../Select.cls.xml)	(revision 31560)
@@ -4,7 +4,7 @@
 <ClassType/>
 <IncludeCode>BL.Sys.Proxy,BL.Sys.Toegang,BL.Derde.Derde,BL.Sys.Resources</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="XMLIGNORENULL">
 <Default>0</Default>
Index: WS/Web/OLParticulier/OrgaluxProductGamma.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/Web/OLParticulier/OrgaluxProductGamma.cls.xml	(.../OrgaluxProductGamma.cls.xml)	(revision 29059)
+++ WS/Web/OLParticulier/OrgaluxProductGamma.cls.xml	(.../OrgaluxProductGamma.cls.xml)	(revision 31560)
@@ -4,7 +4,7 @@
 <ClassType/>
 <Import>TECH.Timing</Import>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Description>
Index: WS/Prod/OptiBox/OptimizerServer.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/Prod/OptiBox/OptimizerServer.cls.xml	(.../OptimizerServer.cls.xml)	(revision 29059)
+++ WS/Prod/OptiBox/OptimizerServer.cls.xml	(.../OptimizerServer.cls.xml)	(revision 31560)
@@ -7,7 +7,7 @@
 <ClassType/>
 <IncludeCode>BL.Prod.OptiBox,BL.Sys.Toegang,BL.Sys.Proxy</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="XMLIGNORENULL">
 <Default>1</Default>
Index: WS/Info/Agenda.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/Info/Agenda.cls.xml	(.../Agenda.cls.xml)	(revision 29059)
+++ WS/Info/Agenda.cls.xml	(.../Agenda.cls.xml)	(revision 31560)
@@ -5,7 +5,7 @@
 Agenda info </Description>
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Default>InfoAgenda</Default>
Index: WS/Halux/PPS/Aansturing/TAOR/OpdeelzaagRespondService.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/Halux/PPS/Aansturing/TAOR/OpdeelzaagRespondService.cls.xml	(.../OpdeelzaagRespondService.cls.xml)	(revision 29059)
+++ WS/Halux/PPS/Aansturing/TAOR/OpdeelzaagRespondService.cls.xml	(.../OpdeelzaagRespondService.cls.xml)	(revision 31560)
@@ -3,7 +3,7 @@
 <Class name="WS.Halux.PPS.Aansturing.TAOR.OpdeelzaagRespondService">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Description>
Index: WS/VKP/Maatwerk/AluKaderServiceNS.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/VKP/Maatwerk/AluKaderServiceNS.cls.xml	(.../AluKaderServiceNS.cls.xml)	(revision 29059)
+++ WS/VKP/Maatwerk/AluKaderServiceNS.cls.xml	(.../AluKaderServiceNS.cls.xml)	(revision 31560)
@@ -2,7 +2,7 @@
 <Export generator="Cache" version="24">
 <Class name="WS.VKP.Maatwerk.AluKaderServiceNS">
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Default>AluKaderServiceNS</Default>
Index: WS/HR/BrandLijst/BrandLijstService.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/HR/BrandLijst/BrandLijstService.cls.xml	(.../BrandLijstService.cls.xml)	(revision 29059)
+++ WS/HR/BrandLijst/BrandLijstService.cls.xml	(.../BrandLijstService.cls.xml)	(revision 31560)
@@ -5,7 +5,7 @@
 WS.HR.BrandLijst.BrandLijstService</Description>
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="NAMESPACE">
 <Default>http://vhisie.vanhoecke.be/V3</Default>
Index: WS/Prod/OptiBox/OptiServer.cls.xml
===================================================================
diff -u -r31337 -r31560
--- WS/Prod/OptiBox/OptiServer.cls.xml	(.../OptiServer.cls.xml)	(revision 31337)
+++ WS/Prod/OptiBox/OptiServer.cls.xml	(.../OptiServer.cls.xml)	(revision 31560)
@@ -7,7 +7,7 @@
 <ClassType/>
 <IncludeCode>BL.Prod.OptiBox,BL.Sys.Toegang,BL.Sys.Proxy,BL.Sys.Resources</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="XMLIGNORENULL">
 <Default>0</Default>
@@ -674,8 +674,6 @@
 <ReturnType>BL.Sys.Proxy.pxStatus</ReturnType>
 <WebMethod>1</WebMethod>
 <Implementation><![CDATA[
-	do ##class(APPS.common.RuntimeInitialiser).Initialise()
-	
 	Set Logger = ##class(vhLib.Logger).%New("HALUX.KARTON")
 	Do Logger.Debug("GetWPBatchIDsViaWerkpost", "Werkpost: " _ Werkpost)
 	
@@ -741,8 +739,6 @@
 <ReturnType>BL.Sys.Proxy.pxStatus</ReturnType>
 <WebMethod>1</WebMethod>
 <Implementation><![CDATA[
-	do ##class(APPS.common.RuntimeInitialiser).Initialise()
-
 	#dim WPClassName as %String
 	#dim pxStatus as BL.Sys.Proxy.pxStatus
 	#dim BL as BL.PPS.TBX.WPAbstract
@@ -789,8 +785,6 @@
 <ReturnType>BL.Sys.Proxy.pxStatus</ReturnType>
 <WebMethod>1</WebMethod>
 <Implementation><![CDATA[
-	do ##class(APPS.common.RuntimeInitialiser).Initialise()
-
 	Set Logger = ##class(vhLib.Logger).%New("HALUX.KARTON")
 	Do Logger.Debug("ProcessNextBatchItems", "Werkpost: " _ Werkpost _ " BatchID: " _ BatchID _ " ProcessCnt: " _ ProcessCnt)
 	Do ..WijzigWerkpostIndienLOSCOMP(.Werkpost,BatchID)
@@ -835,8 +829,6 @@
 <ReturnType>BL.Sys.Proxy.pxStatus</ReturnType>
 <WebMethod>1</WebMethod>
 <Implementation><![CDATA[
-	do ##class(APPS.common.RuntimeInitialiser).Initialise()
-	
 	Set Logger = ##class(vhLib.Logger).%New("HALUX.KARTON")
 	Do Logger.Debug("ReProcessItem", "Werkpost: " _ Werkpost _ " BatchID: " _ BatchID _ " QueueID: " _ QueueID)
 	Do ..WijzigWerkpostIndienLOSCOMP(.Werkpost,BatchID)
@@ -881,8 +873,6 @@
 <ReturnType>BL.Sys.Proxy.pxStatus</ReturnType>
 <WebMethod>1</WebMethod>
 <Implementation><![CDATA[
-	do ##class(APPS.common.RuntimeInitialiser).Initialise()
-
 	Set Logger = ##class(vhLib.Logger).%New("HALUX.KARTON")
 	Do Logger.Debug("GetProductURL", "Werkpost: " _ Werkpost _ " QueueID: " _ QueueID)
 
@@ -925,8 +915,6 @@
 <ReturnType>BL.Sys.Proxy.pxStatus</ReturnType>
 <WebMethod>1</WebMethod>
 <Implementation><![CDATA[
-	do ##class(APPS.common.RuntimeInitialiser).Initialise()
-
 	Set Logger = ##class(vhLib.Logger).%New("HALUX.KARTON")
 	Do Logger.Debug("AllFromBatch", "Werkpost: " _ Werkpost _ " BatchID: " _ BatchID _ " ExcludeList: " _ ExcludeList)
 	Do ..WijzigWerkpostIndienLOSCOMP(.Werkpost,BatchID)
@@ -981,8 +969,6 @@
 <ReturnType>BL.Sys.Proxy.pxStatus</ReturnType>
 <WebMethod>1</WebMethod>
 <Implementation><![CDATA[
-	do ##class(APPS.common.RuntimeInitialiser).Initialise()
-
 	Set Logger = ##class(vhLib.Logger).%New("HALUX.KARTON")
 	Do Logger.Debug("Bulk", "Werkpost: " _ Werkpost _ " DoosType: " _ DoosType _ " Aantal: " _ Aantal)
 
@@ -1024,7 +1010,7 @@
 <ReturnType>BL.Sys.Proxy.pxStatus</ReturnType>
 <WebMethod>1</WebMethod>
 <Implementation><![CDATA[
-	do ##class(APPS.common.RuntimeInitialiser).Initialise()
+	
 
 	Set Logger = ##class(vhLib.Logger).%New("HALUX.KARTON")
 	Do Logger.Debug("ModifyStatus", "Werkpost: " _ Werkpost _ " BatchID: " _ BatchID _ " QueueID: " _ QueueID _ " Actie: " _ Actie)
Index: WS/Halux/PPS/TBXPersServer.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/Halux/PPS/TBXPersServer.cls.xml	(.../TBXPersServer.cls.xml)	(revision 29059)
+++ WS/Halux/PPS/TBXPersServer.cls.xml	(.../TBXPersServer.cls.xml)	(revision 31560)
@@ -7,7 +7,7 @@
 <ClassType/>
 <IncludeCode>BL.Sys.Toegang,BL.Sys.Proxy,BL.Sys.Resources,TECH.Error</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Description>
Index: WS/OngeauthenticeerdeWebService.cls.xml
===================================================================
diff -u
--- WS/OngeauthenticeerdeWebService.cls.xml	(revision 0)
+++ WS/OngeauthenticeerdeWebService.cls.xml	(revision 31560)
@@ -0,0 +1,25 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WS.OngeauthenticeerdeWebService">
+<Super>vhLib.WebService</Super>
+
+<Method name="ProcessBody">
+<FormalSpec><![CDATA[action:%String,requestBody:%CharacterStream,&responseBody:%CharacterStream]]></FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	do ##class(APPS.common.RuntimeInitialiser).Initialise($ClassName()_"_"_..GeefUniekID())
+	Quit ##super(action,requestBody,.requestBody)
+]]></Implementation>
+</Method>
+
+<Method name="GeefUniekID">
+<Private>1</Private>
+<ReturnType>TECH.String</ReturnType>
+<Implementation><![CDATA[	Quit $Job_"_"_$TR($zdt($zu(188),8,,5)," :.","")
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: WS/PM/ProductService.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/PM/ProductService.cls.xml	(.../ProductService.cls.xml)	(revision 29059)
+++ WS/PM/ProductService.cls.xml	(.../ProductService.cls.xml)	(revision 31560)
@@ -3,7 +3,7 @@
 <Class name="WS.PM.ProductService">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Default>ProductService</Default>
Index: WS/EC/SessionService.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/EC/SessionService.cls.xml	(.../SessionService.cls.xml)	(revision 29059)
+++ WS/EC/SessionService.cls.xml	(.../SessionService.cls.xml)	(revision 31560)
@@ -3,7 +3,7 @@
 <Class name="WS.EC.SessionService">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Default>SessionService</Default>
Index: WS/TAPI/Router.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/TAPI/Router.cls.xml	(.../Router.cls.xml)	(revision 29059)
+++ WS/TAPI/Router.cls.xml	(.../Router.cls.xml)	(revision 31560)
@@ -3,7 +3,7 @@
 <Class name="WS.TAPI.Router">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="XMLIGNORENULL">
 <Default>0</Default>
Index: WS/Derde/Agenda/AgendaServer.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/Derde/Agenda/AgendaServer.cls.xml	(.../AgendaServer.cls.xml)	(revision 29059)
+++ WS/Derde/Agenda/AgendaServer.cls.xml	(.../AgendaServer.cls.xml)	(revision 31560)
@@ -4,7 +4,7 @@
 <ClassType/>
 <IncludeCode>BL.EC.Common</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Description>
Index: WS/TBX/DataIO.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/TBX/DataIO.cls.xml	(.../DataIO.cls.xml)	(revision 29059)
+++ WS/TBX/DataIO.cls.xml	(.../DataIO.cls.xml)	(revision 31560)
@@ -7,7 +7,7 @@
 <ClassType/>
 <IncludeCode>vhLib.Macro</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="XMLIGNORENULL">
 <Default>0</Default>
Index: WS/algemeen/VhintraShell/SessionService.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/algemeen/VhintraShell/SessionService.cls.xml	(.../SessionService.cls.xml)	(revision 29059)
+++ WS/algemeen/VhintraShell/SessionService.cls.xml	(.../SessionService.cls.xml)	(revision 31560)
@@ -3,7 +3,7 @@
 <Class name="WS.algemeen.VhintraShell.SessionService">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Default>SessionService</Default>
Index: WS/Derde/Fax/UitgaandeFaxServer.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/Derde/Fax/UitgaandeFaxServer.cls.xml	(.../UitgaandeFaxServer.cls.xml)	(revision 29059)
+++ WS/Derde/Fax/UitgaandeFaxServer.cls.xml	(.../UitgaandeFaxServer.cls.xml)	(revision 31560)
@@ -7,7 +7,7 @@
 <ClassType/>
 <IncludeCode>vhLib.Macro</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="XMLIGNORENULL">
 <Default>0</Default>
Index: WS/algemeen/VhintraShell/EntiteitGebruikService.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/algemeen/VhintraShell/EntiteitGebruikService.cls.xml	(.../EntiteitGebruikService.cls.xml)	(revision 29059)
+++ WS/algemeen/VhintraShell/EntiteitGebruikService.cls.xml	(.../EntiteitGebruikService.cls.xml)	(revision 31560)
@@ -3,7 +3,7 @@
 <Class name="WS.algemeen.VhintraShell.EntiteitGebruikService">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Default>EntiteitGebruikService</Default>
Index: EWRECR.mac.rou
===================================================================
diff -u -r29059 -r31560
--- EWRECR.mac.rou	(.../EWRECR.mac.rou)	(revision 29059)
+++ EWRECR.mac.rou	(.../EWRECR.mac.rou)	(revision 31560)
@@ -17,7 +17,7 @@
 START   
 	Set $ZTrap="OnEWRECRError"
  
-	do ##class(APPS.common.RuntimeInitialiser).Initialise()
+	do ##class(APPS.common.RuntimeInitialiser).Initialise("EWRECR_"_$J)
 	
 	Do ##class(vhLib.Logger).%New($$$EWRECRLoggerGroep).Info("Start","EWRECR wordt gestart."_"   Device: "_$I)
  
Index: WS/common/ProductCriteria/ProductZoekService.cls.xml
===================================================================
diff -u -r29069 -r31560
--- WS/common/ProductCriteria/ProductZoekService.cls.xml	(.../ProductZoekService.cls.xml)	(revision 29069)
+++ WS/common/ProductCriteria/ProductZoekService.cls.xml	(.../ProductZoekService.cls.xml)	(revision 31560)
@@ -4,7 +4,7 @@
 <ClassType/>
 <Import>APPS.common.ProductCriteria.dto</Import>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Default>ProductZoekService</Default>
Index: Intra/PPS/TBX/WPZaag.cls.xml
===================================================================
diff -u -r29059 -r31560
--- Intra/PPS/TBX/WPZaag.cls.xml	(.../WPZaag.cls.xml)	(revision 29059)
+++ Intra/PPS/TBX/WPZaag.cls.xml	(.../WPZaag.cls.xml)	(revision 31560)
@@ -6,7 +6,7 @@
 <ClassType/>
 <IncludeCode>vhLib.Macro,BL.Sys.Proxy,BL.Sys.Toegang,Prod.Product,BL.Sys.Resources</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="XMLIGNORENULL">
 <Default>0</Default>
Index: zTryout/JCL/WebService.cls.xml
===================================================================
diff -u -r29059 -r31560
--- zTryout/JCL/WebService.cls.xml	(.../WebService.cls.xml)	(revision 29059)
+++ zTryout/JCL/WebService.cls.xml	(.../WebService.cls.xml)	(revision 31560)
@@ -3,7 +3,7 @@
 <Class name="zTryout.JCL.WebService">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Default>WebService</Default>
Index: vhCARETAKER.mac.rou
===================================================================
diff -u -r31333 -r31560
--- vhCARETAKER.mac.rou	(.../vhCARETAKER.mac.rou)	(revision 31333)
+++ vhCARETAKER.mac.rou	(.../vhCARETAKER.mac.rou)	(revision 31560)
@@ -2,7 +2,7 @@
 
 InitRuntimeContext
 	do ##class(vhLib.OldSchool).InitVars()
-	do ##class(APPS.common.RuntimeInitialiser).Initialise()
+	do ##class(APPS.common.RuntimeInitialiser).Initialise("CARETAKER_"_$J)
 	Quit
 
 OrderStatistiek ; Dagelijkse creatie van de orderstatistiek ivm orderintake, levering en portefeuille 
Index: Intra/PPS/OL/Inpak.cls.xml
===================================================================
diff -u -r29059 -r31560
--- Intra/PPS/OL/Inpak.cls.xml	(.../Inpak.cls.xml)	(revision 29059)
+++ Intra/PPS/OL/Inpak.cls.xml	(.../Inpak.cls.xml)	(revision 31560)
@@ -6,7 +6,7 @@
 <ClassType/>
 <IncludeCode>vhLib.Macro,BL.Sys.Proxy,BL.Sys.Toegang,Prod.Product,BL.Sys.Resources</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="XMLIGNORENULL">
 <Default>0</Default>
Index: WS/P2L/PickToLightService.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/P2L/PickToLightService.cls.xml	(.../PickToLightService.cls.xml)	(revision 29059)
+++ WS/P2L/PickToLightService.cls.xml	(.../PickToLightService.cls.xml)	(revision 31560)
@@ -3,7 +3,7 @@
 <Class name="WS.P2L.PickToLightService">
 <ClassType/>
 <IncludeCode>vhLib.Macro</IncludeCode>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="XMLIGNORENULL">
 <Default>0</Default>
Index: WS/EC/UserServer.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/EC/UserServer.cls.xml	(.../UserServer.cls.xml)	(revision 29059)
+++ WS/EC/UserServer.cls.xml	(.../UserServer.cls.xml)	(revision 31560)
@@ -10,7 +10,7 @@
 <ClassType/>
 <IncludeCode>BL.EC.Common</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="XMLIGNORENULL">
 <Default>0</Default>
Index: WS/Sys/SecurityServer.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/Sys/SecurityServer.cls.xml	(.../SecurityServer.cls.xml)	(revision 29059)
+++ WS/Sys/SecurityServer.cls.xml	(.../SecurityServer.cls.xml)	(revision 31560)
@@ -4,7 +4,7 @@
 <ClassType/>
 <IncludeCode>BL.Sys.Toegang,BL.Sys.Proxy,BL.Sys.Resources</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="XMLIGNORENULL">
 <Default>0</Default>
Index: WS/PR/KADWeb.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/PR/KADWeb.cls.xml	(.../KADWeb.cls.xml)	(revision 29059)
+++ WS/PR/KADWeb.cls.xml	(.../KADWeb.cls.xml)	(revision 31560)
@@ -5,7 +5,7 @@
 WS.PR.KADWeb</Description>
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="XMLIGNORENULL">
 <Default>0</Default>
Index: WS/algemeen/VhintraShell/ApplicatieGebruikService.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/algemeen/VhintraShell/ApplicatieGebruikService.cls.xml	(.../ApplicatieGebruikService.cls.xml)	(revision 29059)
+++ WS/algemeen/VhintraShell/ApplicatieGebruikService.cls.xml	(.../ApplicatieGebruikService.cls.xml)	(revision 31560)
@@ -3,7 +3,7 @@
 <Class name="WS.algemeen.VhintraShell.ApplicatieGebruikService">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Default>ApplicatieGebruikService</Default>
Index: WS/Web/OLParticulier/LadeSelector.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/Web/OLParticulier/LadeSelector.cls.xml	(.../LadeSelector.cls.xml)	(revision 29059)
+++ WS/Web/OLParticulier/LadeSelector.cls.xml	(.../LadeSelector.cls.xml)	(revision 31560)
@@ -3,7 +3,7 @@
 <Class name="WS.Web.OLParticulier.LadeSelector">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService,TECH.Error.ErrorAdaptor</Super>
+<Super>WS.OngeauthenticeerdeWebService,TECH.Error.ErrorAdaptor</Super>
 <Inheritance>right</Inheritance>
 
 <Parameter name="SERVICENAME">
Index: WS/PM/Maatwerk/Framework/ConfiguratieService.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/PM/Maatwerk/Framework/ConfiguratieService.cls.xml	(.../ConfiguratieService.cls.xml)	(revision 29059)
+++ WS/PM/Maatwerk/Framework/ConfiguratieService.cls.xml	(.../ConfiguratieService.cls.xml)	(revision 31560)
@@ -3,7 +3,7 @@
 <Class name="WS.PM.Maatwerk.Framework.ConfiguratieService">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Default>Planningstool</Default>
Index: WS/Sys/GeneralServer.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/Sys/GeneralServer.cls.xml	(.../GeneralServer.cls.xml)	(revision 29059)
+++ WS/Sys/GeneralServer.cls.xml	(.../GeneralServer.cls.xml)	(revision 31560)
@@ -4,7 +4,7 @@
 <ClassType/>
 <IncludeCode>BL.Sys.Toegang,BL.Sys.Proxy,BL.Sys.Resources</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="XMLIGNORENULL">
 <Default>0</Default>
Index: zTryout/FM/Product/ProductWS.cls.xml
===================================================================
diff -u -r29059 -r31560
--- zTryout/FM/Product/ProductWS.cls.xml	(.../ProductWS.cls.xml)	(revision 29059)
+++ zTryout/FM/Product/ProductWS.cls.xml	(.../ProductWS.cls.xml)	(revision 31560)
@@ -3,7 +3,7 @@
 <Class name="zTryout.FM.Product.ProductWS">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="XMLIGNORENULL">
 <Default>0</Default>
Index: WS/APPS/CRM/VHCC/Welkom.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/APPS/CRM/VHCC/Welkom.cls.xml	(.../Welkom.cls.xml)	(revision 29059)
+++ WS/APPS/CRM/VHCC/Welkom.cls.xml	(.../Welkom.cls.xml)	(revision 31560)
@@ -4,7 +4,7 @@
 <ClassType/>
 <IncludeCode>TECH.Error</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Description>
Index: WS/algemeen/VhintraShell/BeschikbareApplicatieService.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/algemeen/VhintraShell/BeschikbareApplicatieService.cls.xml	(.../BeschikbareApplicatieService.cls.xml)	(revision 29059)
+++ WS/algemeen/VhintraShell/BeschikbareApplicatieService.cls.xml	(.../BeschikbareApplicatieService.cls.xml)	(revision 31560)
@@ -3,7 +3,7 @@
 <Class name="WS.algemeen.VhintraShell.BeschikbareApplicatieService">
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Default>BeschikbareApplicatieService</Default>
Index: zTryout/PRA/SoapEsc/SrvSoapEsc.cls.xml
===================================================================
diff -u -r29059 -r31560
--- zTryout/PRA/SoapEsc/SrvSoapEsc.cls.xml	(.../SrvSoapEsc.cls.xml)	(revision 29059)
+++ zTryout/PRA/SoapEsc/SrvSoapEsc.cls.xml	(.../SrvSoapEsc.cls.xml)	(revision 31560)
@@ -5,7 +5,7 @@
 zTryout.PRA.SoapEsc.SrvSoapEsc</Description>
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="XMLIGNORENULL">
 <Default>0</Default>
Index: WS/PPS/TBX/Server.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/PPS/TBX/Server.cls.xml	(.../Server.cls.xml)	(revision 29059)
+++ WS/PPS/TBX/Server.cls.xml	(.../Server.cls.xml)	(revision 31560)
@@ -7,7 +7,7 @@
 <ClassType/>
 <IncludeCode>BL.Prod.OptiBox,BL.Sys.Toegang,BL.Sys.Proxy,BL.Sys.Resources</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="XMLIGNORENULL">
 <Default>0</Default>
Index: zTryout/PRA/SoapPolymorf/SoapService.cls.xml
===================================================================
diff -u -r29059 -r31560
--- zTryout/PRA/SoapPolymorf/SoapService.cls.xml	(.../SoapService.cls.xml)	(revision 29059)
+++ zTryout/PRA/SoapPolymorf/SoapService.cls.xml	(.../SoapService.cls.xml)	(revision 31560)
@@ -5,7 +5,7 @@
 zTryout.PRA.SoapPolymorf.MyService</Description>
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="XMLIGNORENULL">
 <Default>0</Default>
Index: WS/EC/ProductServer.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/EC/ProductServer.cls.xml	(.../ProductServer.cls.xml)	(revision 29059)
+++ WS/EC/ProductServer.cls.xml	(.../ProductServer.cls.xml)	(revision 31560)
@@ -11,7 +11,7 @@
 <ClassType/>
 <IncludeCode>BL.EC.Common</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="XMLIGNORENULL">
 <Default>0</Default>
Index: WS/TBX/Calc.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/TBX/Calc.cls.xml	(.../Calc.cls.xml)	(revision 29059)
+++ WS/TBX/Calc.cls.xml	(.../Calc.cls.xml)	(revision 31560)
@@ -5,7 +5,7 @@
 WS.TBX.Calc</Description>
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="XMLIGNORENULL">
 <Default>1</Default>
Index: WS/Prod/Select.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/Prod/Select.cls.xml	(.../Select.cls.xml)	(revision 29059)
+++ WS/Prod/Select.cls.xml	(.../Select.cls.xml)	(revision 31560)
@@ -4,7 +4,7 @@
 <ClassType/>
 <IncludeCode>BL.Sys.Toegang,BL.Sys.Proxy,BL.Prod,BL.Sys.Resources</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="XMLIGNORENULL">
 <Default>0</Default>
Index: WS/Halux/PPS/TBXZaagServer.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/Halux/PPS/TBXZaagServer.cls.xml	(.../TBXZaagServer.cls.xml)	(revision 29059)
+++ WS/Halux/PPS/TBXZaagServer.cls.xml	(.../TBXZaagServer.cls.xml)	(revision 31560)
@@ -7,7 +7,7 @@
 <ClassType/>
 <IncludeCode>BL.Sys.Toegang,BL.Sys.Proxy,BL.Sys.Resources,TECH.Error</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Description>
Index: WS/Blum/OnlineProductConfigurator.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/Blum/OnlineProductConfigurator.cls.xml	(.../OnlineProductConfigurator.cls.xml)	(revision 29059)
+++ WS/Blum/OnlineProductConfigurator.cls.xml	(.../OnlineProductConfigurator.cls.xml)	(revision 31560)
@@ -2,7 +2,7 @@
 <Export generator="Cache" version="24">
 <Class name="WS.Blum.OnlineProductConfigurator">
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Description>
Index: IINT.mac.rou
===================================================================
diff -u -r29059 -r31560
--- IINT.mac.rou	(.../IINT.mac.rou)	(revision 29059)
+++ IINT.mac.rou	(.../IINT.mac.rou)	(revision 31560)
@@ -61,6 +61,7 @@
    Set GebruikerInitialen = ##class(vhLib.TerminalDevice).GeefIctGebruikerInitialenVanIP($$GetClientIP^vhLib)
    Set GebruikerID = $$GeefUserIDViaInitialen^vhUSER(GebruikerInitialen)
    Do ##class(TECH.Context.RuntimeContext).Instance().ZetGebruikerID("4682||"_GebruikerID)
+   Do ##class(TECH.Context.RuntimeContext).Instance().ZetSessieID("AdminSessie_"_$Job)
    Quit
    
 SWITCH ;gecopieerd in ^|%SYS|%S
@@ -131,6 +132,8 @@
  I K G 3  ;toegang geweigerd 
  Do ##class(TECH.Context.RuntimeContext).Instance().ZetPersonalityID(##class(DOM.common.enu.Personality).VanHoecke())
  Do ##class(TECH.Context.RuntimeContext).Instance().ZetGebruikerID("4682||"_QU(1))
+ Do ##class(TECH.Context.RuntimeContext).Instance().ZetSessieID("AdminSessie_"_$Job)
+ Do ##class(Tools.Wlip).%New(26).String("jjk;lk")
  D ^cA501 ;starten menu
 25 I $G(^cLOG(cs,"LOGIN",0)) G 21
  ;
Index: vhTest/Fake/TECH/BackgroundProcessStarter.cls.xml
===================================================================
diff -u -r29059 -r31560
--- vhTest/Fake/TECH/BackgroundProcessStarter.cls.xml	(.../BackgroundProcessStarter.cls.xml)	(revision 29059)
+++ vhTest/Fake/TECH/BackgroundProcessStarter.cls.xml	(.../BackgroundProcessStarter.cls.xml)	(revision 31560)
@@ -9,7 +9,7 @@
 	Do ParameterData.SetRuntimeInfo(..BuildRuntimeInfo())
 	#dim status As %Status = ParameterData.%Save()	
 	
-	Do ##class(TECH.BackgroundProcess).VoerUit(ParameterData.GeefID())
+	Do ##class(TECH.BackgroundProcess).VoerUit(ParameterData.GeefID(), ##class(TECH.Context.RuntimeContext).Instance().GeefSessieID())
 ]]></Implementation>
 </Method>
 
Index: APPS/common/RuntimeInitialiser.cls.xml
===================================================================
diff -u -r29059 -r31560
--- APPS/common/RuntimeInitialiser.cls.xml	(.../RuntimeInitialiser.cls.xml)	(revision 29059)
+++ APPS/common/RuntimeInitialiser.cls.xml	(.../RuntimeInitialiser.cls.xml)	(revision 31560)
@@ -5,10 +5,12 @@
 
 <Method name="Initialise">
 <ClassMethod>1</ClassMethod>
+<FormalSpec>SessieID:%String=""</FormalSpec>
 <Implementation><![CDATA[
 	#dim RuntimeContext As TECH.Context.RuntimeContext = ##class(TECH.Context.RuntimeContext).Instance()
 	Do RuntimeContext.ZetPersonalityID(##class(DOM.common.enu.Personality).VanHoecke())
 	Do RuntimeContext.ZetGebruikerID("4682||0")
+	Do RuntimeContext.ZetSessieID(SessieID)
 ]]></Implementation>
 </Method>
 </Class>
Index: APPS/Monitoring/ImageSynchronisatieWWWHttpControle.cls.xml
===================================================================
diff -u -r31440 -r31560
--- APPS/Monitoring/ImageSynchronisatieWWWHttpControle.cls.xml	(.../ImageSynchronisatieWWWHttpControle.cls.xml)	(revision 31440)
+++ APPS/Monitoring/ImageSynchronisatieWWWHttpControle.cls.xml	(.../ImageSynchronisatieWWWHttpControle.cls.xml)	(revision 31560)
@@ -28,7 +28,7 @@
 <ClassMethod>1</ClassMethod>
 <Implementation><![CDATA[
 	Try {
-		do ##class(APPS.common.RuntimeInitialiser).Initialise()
+		do ##class(APPS.common.RuntimeInitialiser).Initialise(..%ClassName(0)_"_"_$Job)
 		Do ..%New().RunAtInterval(600-8)
 	}
 	Catch {
Index: WS/APPS/algemeen/entiteitcomponent/EntiteitComponentDataService.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/APPS/algemeen/entiteitcomponent/EntiteitComponentDataService.cls.xml	(.../EntiteitComponentDataService.cls.xml)	(revision 29059)
+++ WS/APPS/algemeen/entiteitcomponent/EntiteitComponentDataService.cls.xml	(.../EntiteitComponentDataService.cls.xml)	(revision 31560)
@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="WS.APPS.algemeen.entiteitcomponent.EntiteitComponentDataService">
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Default>EntiteitComponentDataService</Default>
Index: WS/EWMS/PrintLabels.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/EWMS/PrintLabels.cls.xml	(.../PrintLabels.cls.xml)	(revision 29059)
+++ WS/EWMS/PrintLabels.cls.xml	(.../PrintLabels.cls.xml)	(revision 31560)
@@ -5,7 +5,7 @@
 WS.EWMS.PrintLabels</Description>
 <ClassType/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="XMLIGNORENULL">
 <Default>0</Default>
Index: WS/Prod/Product.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/Prod/Product.cls.xml	(.../Product.cls.xml)	(revision 29059)
+++ WS/Prod/Product.cls.xml	(.../Product.cls.xml)	(revision 31560)
@@ -4,7 +4,7 @@
 <ClassType/>
 <IncludeCode>BL.Sys.Proxy,BL.Sys.Toegang,BL.Prod,BL.Sys.Resources</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="XMLIGNORENULL">
 <Default>0</Default>
Index: WS/PM/Specials/SpecialsEditorService.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/PM/Specials/SpecialsEditorService.cls.xml	(.../SpecialsEditorService.cls.xml)	(revision 29059)
+++ WS/PM/Specials/SpecialsEditorService.cls.xml	(.../SpecialsEditorService.cls.xml)	(revision 31560)
@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="WS.PM.Specials.SpecialsEditorService">
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="SERVICENAME">
 <Default>SpecialsEditorService</Default>
Index: WS/EC/DataServer.cls.xml
===================================================================
diff -u -r29059 -r31560
--- WS/EC/DataServer.cls.xml	(.../DataServer.cls.xml)	(revision 29059)
+++ WS/EC/DataServer.cls.xml	(.../DataServer.cls.xml)	(revision 31560)
@@ -22,7 +22,7 @@
 <ClassType/>
 <IncludeCode>BL.EC.Common</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>vhLib.WebService</Super>
+<Super>WS.OngeauthenticeerdeWebService</Super>
 
 <Parameter name="XMLIGNORENULL">
 <Default>0</Default>