Index: CSPimpl/GLS/Parcels/Service.cls.xml
===================================================================
diff -u -r50878 -r50911
--- CSPimpl/GLS/Parcels/Service.cls.xml	(.../Service.cls.xml)	(revision 50878)
+++ CSPimpl/GLS/Parcels/Service.cls.xml	(.../Service.cls.xml)	(revision 50911)
@@ -37,7 +37,7 @@
 	Quit:((Datum="")||(Datum=..GeefParcelDatum()))
 	
 	Do ##class(TECH.Context.RuntimeContext).Instance().ZetPersonalityID(##class(DOM.common.enu.Personality).VanHoecke())
-	Do ##class(vhPowerTools.APPS.TRANSP.GLS.Bevestiger).ProcessQueryAsync("select ID from APPS_TRANSP_GLS_GLSv1_data.VerzendData Where VerzendWijze = 'Parcel' and TijdstipLaatsteWijziging %StartsWith '" _Datum _"' and LaatsteRequestType = 'Registratie' order by ID DESC")
+	Do ##class(APPS.TRANSP.GLS.impl.Bevestiger).ProcessQueryAsync("select ID from APPS_TRANSP_GLS_GLSv1_data.VerzendData Where VerzendWijze = 'Parcel' and TijdstipLaatsteWijziging %StartsWith '" _Datum _"' and LaatsteRequestType = 'Registratie' order by ID DESC")
 ]]></Implementation>
 </Method>
 
Index: vhCARETAKER.mac.rou
===================================================================
diff -u -r50909 -r50911
--- vhCARETAKER.mac.rou	(.../vhCARETAKER.mac.rou)	(revision 50909)
+++ vhCARETAKER.mac.rou	(.../vhCARETAKER.mac.rou)	(revision 50911)
@@ -664,7 +664,7 @@
 StartCacheBackup ; Cach� backup ( !! niet manueel starten Cach� wordt gestopt !! )
 	try { 
  		Do InitRuntimeContext
- 		#dim CurrentTimeStamp As %TimeStamp = ##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentTimeStamp() 
+		#dim CurrentTimeStamp As %TimeStamp = ##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentTimeStamp()
 		set ^svn.Deploy("StartCacheBackup")= CurrentTimeStamp
 		set ^svn.Deploy("StartCacheBackup","G0")= CurrentTimeStamp
 		set ^svn.Deploy("StartCacheBackup","G1")= CurrentTimeStamp
@@ -1077,10 +1077,10 @@
 VersturenGLSParcels ; Overgebleven parcels van transport te sluiten
 	try { 
  		Do InitRuntimeContext
- 		#dim Datum As %String = $ZD($H,3)
- 		#dim ParcelQuery As %String = "select ID from APPS_TRANSP_GLS_GLSv1_data.VerzendData Where VerzendWijze = 'Parcel' and TijdstipLaatsteWijziging %StartsWith '{0}' and LaatsteRequestType = 'Registratie' order by ID DESC"
+		#dim Datum As %String = $ZD($H,3)
+		#dim ParcelQuery As %String = "select ID from APPS_TRANSP_GLS_GLSv1_data.VerzendData Where VerzendWijze = 'Parcel' and TijdstipLaatsteWijziging %StartsWith '{0}' and LaatsteRequestType = 'Registratie' order by ID DESC"
  		Set ParcelQuery = ##class(TECH.StringUtils).BuildText(ParcelQuery, Datum)
-		Do ##class(vhPowerTools.APPS.TRANSP.GLS.Bevestiger).ProcessQueryAsync(ParcelQuery)
+		Do ##class(APPS.TRANSP.GLS.impl.Bevestiger).ProcessQueryAsync(ParcelQuery)
 		}
 	catch(Exceptie) {
 		do OnError		
@@ -1095,3 +1095,4 @@
 	
 EndErrorTrapping
 	quit
+