Index: CHUI/OldRtns.cls.xml
===================================================================
diff -u -r1952 -r2578
--- CHUI/OldRtns.cls.xml	(.../OldRtns.cls.xml)	(revision 1952)
+++ CHUI/OldRtns.cls.xml	(.../OldRtns.cls.xml)	(revision 2578)
@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="9">
 <Class name="CHUI.OldRtns">
-<IncludeCode>%CHUI.System</IncludeCode>
+<IncludeCode>TCHUI.System</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
 <Super>%RegisteredObject</Super>
 <ClassDefinitionError>0</ClassDefinitionError>
@@ -16,7 +16,7 @@
 	Do X^cA612
 	Do RAADPL^KLANT(KlantNr,$G(Scherm))
 	
-	Do ##class(%CHUI.TCanvas).InitializeTerminal()
+	Do ##class(TCHUI.TCanvas).InitializeTerminal()
 	Do %Screen.SetNewColorMap()
 	Do %Screen.PaintAll()
 	
@@ -34,7 +34,7 @@
 	Do X^cA612
 	Do RAADPL^LEVER(LevNr)
 	
-	Do ##class(%CHUI.TCanvas).InitializeTerminal()
+	Do ##class(TCHUI.TCanvas).InitializeTerminal()
 	Do %Screen.SetNewColorMap()
 	Do %Screen.PaintAll()
 	
@@ -52,7 +52,7 @@
 	Do X^cA612
 	Do RAADPL^PRODUKT(PRNr,$G(Scherm))
 	
-	Do ##class(%CHUI.TCanvas).InitializeTerminal()
+	Do ##class(TCHUI.TCanvas).InitializeTerminal()
 	Do %Screen.SetNewColorMap()
 	Do %Screen.PaintAll()