Index: APPS/CHUI/TerminalNavigatieService/impl/TaakRaadpleegKlant.cls.xml
===================================================================
diff -u -r48394 -r49109
--- APPS/CHUI/TerminalNavigatieService/impl/TaakRaadpleegKlant.cls.xml	(.../TaakRaadpleegKlant.cls.xml)	(revision 48394)
+++ APPS/CHUI/TerminalNavigatieService/impl/TaakRaadpleegKlant.cls.xml	(.../TaakRaadpleegKlant.cls.xml)	(revision 49109)
@@ -39,6 +39,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefSessieId">
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	quit ..%ClassName()_"_"_..KlantID_" "_..SubScherm_" "_..OrderID
+]]></Implementation>
+</Method>
+
 <Storage name="Default">
 <Type>%Library.CacheStorage</Type>
 <DefaultData>TaakRaadpleegKlantDefaultData</DefaultData>
Index: APPS/CHUI/TerminalNavigatieService/impl/TaakRaadpleegProduct.cls.xml
===================================================================
diff -u -r29059 -r49109
--- APPS/CHUI/TerminalNavigatieService/impl/TaakRaadpleegProduct.cls.xml	(.../TaakRaadpleegProduct.cls.xml)	(revision 29059)
+++ APPS/CHUI/TerminalNavigatieService/impl/TaakRaadpleegProduct.cls.xml	(.../TaakRaadpleegProduct.cls.xml)	(revision 49109)
@@ -34,6 +34,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefSessieId">
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	quit ..%ClassName()_"_"_..ProductID
+]]></Implementation>
+</Method>
+
 <Storage name="Default">
 <Type>%Library.CacheStorage</Type>
 <DefaultData>TaakRaadpleegProductDefaultData</DefaultData>
Index: APPS/CHUI/TerminalNavigatieService/impl/TaakRaadpleegToelevering.cls.xml
===================================================================
diff -u -r29059 -r49109
--- APPS/CHUI/TerminalNavigatieService/impl/TaakRaadpleegToelevering.cls.xml	(.../TaakRaadpleegToelevering.cls.xml)	(revision 29059)
+++ APPS/CHUI/TerminalNavigatieService/impl/TaakRaadpleegToelevering.cls.xml	(.../TaakRaadpleegToelevering.cls.xml)	(revision 49109)
@@ -30,11 +30,17 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefSessieId">
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	quit ..%ClassName()_"_"_..ToeleveringID
+]]></Implementation>
+</Method>
+
 <Storage name="Default">
 <Type>%Library.CacheStorage</Type>
 <DefaultData>TaakRaadpleegToeleveringDefaultData</DefaultData>
 <Data name="TaakRaadpleegToeleveringDefaultData">
-<Structure>listnode</Structure>
 <Subscript>"TaakRaadpleegToelevering"</Subscript>
 <Value name="1">
 <Value>SubScherm</Value>
Index: APPS/CHUI/TerminalNavigatieService/impl/TaakRaadpleegOrder.cls.xml
===================================================================
diff -u -r43332 -r49109
--- APPS/CHUI/TerminalNavigatieService/impl/TaakRaadpleegOrder.cls.xml	(.../TaakRaadpleegOrder.cls.xml)	(revision 43332)
+++ APPS/CHUI/TerminalNavigatieService/impl/TaakRaadpleegOrder.cls.xml	(.../TaakRaadpleegOrder.cls.xml)	(revision 49109)
@@ -36,6 +36,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefSessieId">
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	quit ..%ClassName()_"_"_..OrderID
+]]></Implementation>
+</Method>
+
 <Storage name="Default">
 <Type>%Library.CacheStorage</Type>
 <DefaultData>TaakRaadpleegOrderDefaultData</DefaultData>
Index: APPS/CHUI/TerminalNavigatieService/impl/TerminalNavigatieTaak.cls.xml
===================================================================
diff -u -r29059 -r49109
--- APPS/CHUI/TerminalNavigatieService/impl/TerminalNavigatieTaak.cls.xml	(.../TerminalNavigatieTaak.cls.xml)	(revision 29059)
+++ APPS/CHUI/TerminalNavigatieService/impl/TerminalNavigatieTaak.cls.xml	(.../TerminalNavigatieTaak.cls.xml)	(revision 49109)
@@ -39,6 +39,11 @@
 	set QU = Gebruiker.GeefInitialen()
 	set QU(1) = Gebruiker.GeefVhUserID()
 	set Q="K" do ^cA604,INIT^vhTERMINA
+	
+	Do ##class(TECH.Context.RuntimeContext).Instance().ZetPersonalityID(##class(DOM.common.enu.Personality).VanHoecke())
+ 	Do ##class(TECH.Context.RuntimeContext).Instance().ZetGebruikerID(..GebruikerID)
+ 	Do ##class(TECH.Context.RuntimeContext).Instance().ZetApplicatie(..%ClassName())
+	Do ##class(TECH.Context.RuntimeContext).Instance().ZetSessieID(..GeefSessieId())
 ]]></Implementation>
 </Method>
 
@@ -62,6 +67,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefSessieId">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+</Method>
+
 <Storage name="Default">
 <Type>%Library.CacheStorage</Type>
 <DataLocation>^APPS.CHUI.TerminalNavigatieTaakD</DataLocation>