Index: APPS/CHUI/TerminalNavigatieService.cls.xml
===================================================================
diff -u -r2083 -r2086
--- APPS/CHUI/TerminalNavigatieService.cls.xml	(.../TerminalNavigatieService.cls.xml)	(revision 2083)
+++ APPS/CHUI/TerminalNavigatieService.cls.xml	(.../TerminalNavigatieService.cls.xml)	(revision 2086)
@@ -10,17 +10,19 @@
 <Implementation><![CDATA[
 	do ..InputControle(GebruikersID, ComputerNaam)
 	
-	if ProductRaapleegScherm = "" set ProductRaadplaagScherm = ##class(APPS.CHUI.enu.ProductRaadpleegScherm).Algemeen()
+	if ProductRaadpleegScherm = "" set ProductRaadpleegScherm = ##class(APPS.CHUI.enu.ProductRaadpleegScherm).Algemeen()
 
 	set Taak = ##class(APPS.CHUI.TerminalNavigatieService.impl.TaakRaadpleegProduct).%New(GebruikersID,ComputerNaam)
 	set Taak.ProductID = ProductID
 	set Taak.SubScherm = ProductRaadpleegScherm
 	
-	set scSaved = Data.%Save()
+	set scSaved = Taak.%Save()
 	
 	if $$$ISERR(scSaved) {
 		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.StatusException).%New(##class(TECH.enu.ExceptionCode).GeneralError(),"TerminalNavigatieTaak kan niet worden bewaard",scSaved))
 	}
+	
+	quit
 ]]></Implementation>
 </Method>
 
@@ -42,11 +44,11 @@
 <FormalSpec>ComputerNaam</FormalSpec>
 <ReturnType>APPS.CHUI.TerminalNavigatieService.impl.TerminalNavigatieTaak</ReturnType>
 <Implementation><![CDATA[
-	set rsTaak = $$ExecDynQuery^vhQUERYLIB("SELECT ID FROM APPS_CHUI_TerminalNavigatieService_impl.TerminalNavigatieTaak WHERE ComputerNaam = ?")
+	set rsTaak = $$ExecDynQuery^vhQUERYLIB("SELECT ID FROM APPS_CHUI_TerminalNavigatieService_impl.TerminalNavigatieTaak WHERE ComputerNaam = ?",$lb(ComputerNaam))
 	
 	set Taak = ""
-	if rsRegistratie.Next() {
-		set TaakID = rsTaak.GetData("ID")
+	if rsTaak.Next() {
+		set TaakID = rsTaak.Get("ID")
 		if $length(TaakID) { 
 			set Taak = ##class(APPS.CHUI.TerminalNavigatieService.impl.TerminalNavigatieTaak).%OpenId(TaakID)
 		}
@@ -68,9 +70,19 @@
 <FormalSpec>ComputerNaam</FormalSpec>
 <Implementation><![CDATA[
 	set Taak = ..GeefTaak(ComputerNaam)
-	if $isObject(Taak) do Taak.Voeruit()
+	if $isObject(Taak) {
+		do Taak.%DeleteId(Taak.%Id())
+		do Taak.VoerUit()
+	}
 	quit
 ]]></Implementation>
 </Method>
+
+<Method name="WatcherActief">
+<FormalSpec>ComputerNaam</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	
+]]></Implementation>
+</Method>
 </Class>
 </Export>